
  TYPE
    bat$tape_descriptor = record
      at_eoi: boolean,
      block_management_descriptor: ^bat$tape_block_mgmt_descriptor,
      error_options: amt$tape_error_options,
      failure_isolation: amt$tape_failure_isolation,
      file_label_type: amt$file_label_type,
      forced_write: boolean,
      get_tape_block_buffer: ^bat$tape_block,
      initial_volume: bat$initial_volume_control_info,
      labeled_volume_position: bat$labeled_volume_position,
      last_accessed: bat$last_accessed_labels,
      last_data_operation: amt$last_access_operation,
      next_position: bat$next_position_control_info,
      put_tape_block_buffer: ^bat$tape_block,
      requested_density: rmt$density,
      rewind_file_command: boolean,
      tape_attachment_information: fst$tape_attachment_information,
      tape_label_attr_command_info: fst$tape_attachment_information,
      volume_number: amt$volume_number,
      volume_position: amt$volume_position,
    recend;

*copyc amt$file_label_type
*copyc amt$internal_code
*copyc amt$last_access_operation
*copyc amt$tape_error_options
*copyc amt$tape_failure_isolation
*copyc amt$volume_number
*copyc amt$volume_position
*copyc bat$initial_volume_control_info
*copyc bat$labeled_volume_position
*copyc bat$last_accessed_labels
*copyc bat$next_position_control_info
*copyc bat$tape_block
*copyc bat$tape_block_mgmt_descriptor
*copyc fst$tape_attachment_information
*copyc fst$tape_label_sequence_header
*copyc fst$tape_label_block_descriptor
*copyc rmt$density
