**fig3_37.txt**

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

/* 3*/	template <class Element_Type>
/* 4*/	int
/* 5*/	List<Element_Type>::
/* 6*/	Find( const Element_Type & X )
/* 7*/	{
/* 8*/	    unsigned int P = C.Cursor_Space[ List_Head ].Next;

/* 9*/	    for( ; P != 0; P = C.Cursor_Space[ P ].Next )
/*10*/	        if( C.Cursor_Space[ P ].Element == X )
/*11*/	        {
/*12*/	            Current_Pos = P;
/*13*/	            return 1;
/*14*/	        }

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