%% noeuds fantomes

autocrop
1 setdboxit     %% espace entre le contenu d'un noeud et son
                %% encadrement ou encerclement
setPalatino
0 5 (A) Tc rootnode 
[
   Tc
   [
      Tc 
      Tc 
      Tc
      Tf     %% noeud fantome
   ]
   Tc
   Tc
   [
      Tf     %% noeud fantome
      Tc 
      Tc 
      Tc
   ]
   Tc
] 
tree