%% connexion de sous-arbres autocrop setPalatino /levelsep 3 def /nodesep 3 def 0 0 (A) Tc rootnode [ [30 dir (7) Tr (8) Tr (9) Tr] [150 dir (1) Tr (2) Tr (3) Tr] [down (4) Tr (5) Tr (6) Tr] ] tree