
  TYPE
    ost$ecp_file_identification = record
      case selector: ost$ecp_file_identifier of
      = osc$ecp_evaluated_file_ref =
        evaluated_file_reference: fst$evaluated_file_reference,
      = osc$ecp_file_identifier =
        file_identifier: amt$file_identifier,
      = osc$ecp_file_reference =
        file_reference: ^fst$file_reference,
      = osc$ecp_file_segment =
        file_segment: ^cell,
      = osc$ecp_pf_path =
        pf_path: ^pft$path,
        cycle_selector: pft$cycle_selector,
      casend,
    recend;

*copyc amt$file_identifier
*copyc fst$evaluated_file_reference
*copyc fst$file_reference
*copyc ost$ecp_file_identifier
*copyc pft$cycle_selector
*copyc pft$path
