
  TYPE
    rat$idb_directory_pointers = record
      sequence_p: ^rat$idb_directory_sequence,
      sequence_descriptor_p: ^rat$sequence_descriptor,
      header_p: ^rat$directory_header,
      directory_p: ^rat$directory,
    recend;

*copyc rat$idb_directory_types
*copyc rat$sequence_descriptor_types
