
  TYPE
    tut$appl_string_char = string ( * );

