  TYPE
    fmt$cycle_description_unit = record
      global_file_entries_pointer: ^fmt$global_file_entries,
      { pointer to the corresponding global file information array }
      next_cycle_description_unit: ^fmt$cycle_description_unit,
      total_count: ost$non_negative_integers,
      { record of total number of assignments ever made to this cdu }
      entry_assignment: ^string ( * ),
      entries: ^fmt$cycle_descriptions,
    recend,

    fmt$cycle_descriptions = array [1 .. * ] of fmt$cycle_description;

*copyc osd$integer_limits
*copyc fmt$cycle_description
*copyc fmt$global_file_entries
