%% noeuds circulaires de rayon constant

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

/Circleradius .2 def

setPalatino
-2 5 (A) Tc rootnode
[
TC
]
tree