**fig3_9.txt**

/* 1*/	// Advance the current position.

/* 2*/	template <class Etype>
/* 3*/	inline const List<Etype> &
/* 4*/	List<Etype>::
/* 5*/	operator ++( )
/* 6*/	{
/* 7*/	    if( Current_Pos != NULL )
/* 8*/	        Current_Pos = Current_Pos->Next;
/* 9*/	    return *this;
/*10*/	}


/* 1*/	// Retrieve element in the current position.
/* 2*/	// Return value is undefined if current position is NULL.

/* 3*/	template <class Etype>
/* 4*/	inline const Etype &
/* 5*/	List<Etype>::
/* 6*/	operator ( ) ( ) const
/* 7*/	{
/* 8*/	    if( Current_Pos != NULL )
/* 9*/	        return Current_Pos->Element;
/*10*/	    else
/*11*/	        return List_Head->Element;
/*12*/	}


/* 1*/	// Check if current position is not NULL.

/* 2*/	template <class Etype>
/* 3*/	inline int
/* 4*/	List<Etype>::
/* 5*/	operator !( ) const
/* 6*/	{
/* 7*/	    return Current_Pos != NULL;
/* 8*/	}