
  TYPE
    clt$pdt_parameter_name = record
      name: clt$parameter_name,
      class: clt$named_entry_class,
      position: clt$parameter_number,
    recend;

*copyc clt$named_entry_class
*copyc clt$parameter_name
*copyc clt$parameter_number
