BiThrTree InPostNode(BiThrTree p)
{
/*在中序线索二叉树上寻找结点p 的中序后继结点*/
BiThrTree post;
post=p->rchild;
if
( p->rtag!=1 )
while
( post->rtag==0 ) post=post->lchild;
return
( post );
}