autocrop
setTimes
/arrowscale {.8 dup} def
/nodesep 2 store
/levelsep 4 store
/treeedge {(->) ncline} def
3 setdboxit
0 0 (root) Tc rootnode 
[{setTimesItalic} 
   (x) Tr non_relie
   (y) Tr 
   (z) Tr non_relie
] 
tree
/armA 15 store
(A) (A2) (->) ncbar
/angleA 180 store
/angleB 180 store
(A) (A0) (->) ncbar