******** fig3.37 **********

	void
	delete( element_type x, LIST L )
	{
		position p, tmp_cell;

		p = find_previous( x, L );
		if( !is_last( p, L ) )
		{
			tmp_cell = CURSOR_SPACE[p].next;
			CURSOR_SPACE[p].next = CURSOR_SPACE[tmp_cell].next;
			cursor_free( tmp_cell );
		}
	}