**fig3_10.txt**

/* 1*/	// Assuming use of header node, find X.
/* 2*/	// If found, return TRUE and set the current position.

/* 3*/	template <class Etype>
/* 4*/	int
/* 5*/	List<Etype>::
/* 6*/	Find( const Etype & X )
/* 7*/	{
/* 8*/	    Node *P;

/* 9*/	    for( P = List_Head->Next; P != NULL; P = P->Next )
/*10*/	        if( P->Element == X )
/*11*/	        {
/*12*/	            Current_Pos = P;
/*13*/	            return 1;
/*14*/	        }

/*15*/	    return 0;
/*16*/	}