
  TYPE
    lot$library_list = record
      first: ^lot$library_descriptor,
      link_to_first_job_library: ^^lot$library_descriptor,
      container: ^SEQ ( * ),
    recend,

    lot$library_descriptor = record
      nnext: ^lot$library_descriptor,
      segment: lot$load_file,
      ring_brackets: amt$ring_attributes,
      attributes: lot$load_file_attributes,
      library_open: boolean,
      library_valid: boolean,
      phantom_library: boolean,
      phantom_library_active: boolean,
      text_embedded_library: boolean,
    recend;

*copyc amt$ring_attributes
*copyc lot$loader_type_definitions
