penter
penter(p1); /* enter parent pointers and leaf indices */
penter(left(p));
penter(right(p));
extern void penter(Node *);