
  TYPE
    clt$user_identification = record
      user: fst$path_element,
      family: fst$path_element,
    recend;

*copyc fst$path_element
