
  CONST
    clc$min_variable_dimension = -7fffffff(16),
    clc$max_variable_dimension = 7fffffff(16);

  TYPE
    clt$variable_dimension = clc$min_variable_dimension ..
          clc$max_variable_dimension;

