**fig4_21.txt**

/* 1*/	template <class Etype>
/* 2*/	Tree_Node<Etype>*
/* 3*/	Binary_Search_Tree<Etype>::
/* 4*/	Find_Max( Tree_Node<Etype> *T ) const
/* 5*/	{
/* 6*/	    if( T != NULL )
/* 7*/	        while( T->Right != NULL )
/* 8*/	            T = T->Right;
/* 9*/	    return T;
/*10*/	}