
  TYPE
    clt$parameter_index = 1 .. clc$max_parameters + 1;

*copyc clc$max_parameters
