
  TYPE
    dst$recovery_name_table = array [1 .. * ] of dst$recovery_address;

  TYPE
    dst$recovery_address = record
      name: pmt$program_name,
      address: ^cell,
      verification: llt$declaration_matching_value,
    recend;

*copyc llt$declaration_matching_value
*copyc pmt$program_name
