
  TYPE
    clt$which_parameter = record
      case specific: boolean of
      = TRUE =
        number: clt$parameter_number,
      = FALSE =
        ,
      casend,
    recend;

*copyc clt$parameter_number
