**fig6_29.txt**

/* 1*/	template <class Etype>
/* 2*/	void
/* 3*/	Left_Heap<Etype>::
/* 4*/	Insert( const Etype & X )
/* 5*/	{
/* 6*/	    Left_Node<Etype> *P;

/* 7*/	    P = new Left_Node<Etype> ( X );
/* 8*/	    if( P == NULL )
/* 9*/	        Error( "Out of space!!" );
/*10*/	    Root = Merge( P, Root );
/*11*/	}


/*12*/	template <class Etype>
/*13*/	void
/*14*/	Left_Heap<Etype>::
/*15*/	Merge( Left_Heap<Etype> & Value )
/*16*/	{
/*17*/	    Root = Merge( Root, Value.Root );
/*18*/	    Value.Root = NULL;
/*19*/	}