
  TYPE
    pft$sequence_record = record
      sequence: pft$sequence,
    recend;

*copyc pft$sequence
