
  TYPE
    clt$list_size = 0 .. clc$max_list_size;

*copyc clc$max_list_size
