
  TYPE
    cyt$string_size = 0 .. cyc$max_string_size;

*copyc cyc$max_string_size
