%% 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