BiThrTree InPreNode(BiThrTree p)
{
/*在中序线索二叉树上寻找结点p 的中序前驱结点*/
BiThrTree pre;
pre=p->lchild;
if
( p->ltag!=1 )
while
( pre->rtag==0 ) pre=pre->rchild;
return
( pre );
}