
  TYPE
    put$selected_cycle_info = record
      selected_cycle: put$selected_cycle,
      new_selected_cycle: put$selected_cycle,
    recend;

*copyc put$selected_cycle
