?? RIGHT := 110 ??

  TYPE
    dut$default_change_list = array [1 .. * ] of dut$default_change_list_entry,

    dut$default_change_list_entry = record
      default_name: dut$default_parameters,
      number: clt$parameter_number,
    recend,

    dut$default_parameters = (duc$dp_address_mode, duc$dp_exchange, duc$dp_iou, duc$dp_pp_type,
          duc$dp_processor),

    dut$default_parameter_list = array [dut$default_parameters] of dut$default_parameter_values,

    dut$default_parameter_lists = record
      value: dut$default_parameter_list,
      next_p: ^dut$default_parameter_lists,
    recend,

    dut$default_parameter_values = record
      default_set: boolean,
      value: ost$name,
    recend;

*copyc clt$parameter_number
*copyc ost$name
