Présentation de t08.jps

%% type de liaison

autocrop
1 setdboxit     %% espace entre le contenu d'un noeud et son
                %% encadrement ou encerclement

/treeedge {(->) ncline} def %% redefinition du type de liaison
setPalatino
0 5 (A) Tc rootnode 
[
   Tc
   [
      Tc 
      Tc 
      Tc
      Tf     %% noeud fantome
   ]
   Tc
   Tc
   [
      Tf     %% noeud fantome
      Tc 
      Tc 
      Tc
   ]
   Tc
] 
tree