
  TYPE
    pft$internal_path = array [1 .. * ] of pft$internal_name;

*copyc pft$internal_name
