.so /usr/aaron/start.rno
.he ''NCDELETE''
.mh
A Procedure For Non-constructive Deletion From A List
-----------------------------------------------------
.hm

The library function NCDELETE takes an item, a list, and an
equality function, and deletes from the list all elements which are
equal to the given item according to the equality function. The latter
should take two arguments and return a truth-value.

Examples:
 	: NCDELETE([CAT],[CAT [CAT] DOG [DOG] [CAT]],EQUAL) =>
 	** [CAT DOG [DOG]]
 	: NCDELETE([CAT], [CAT [CAT] DOG], NONOP=) =>
 	** [CAT [CAT] DOG]
 	: NCDELETE(3, [1 2 3 4 5], LAMBDA(X,Y); ABS(X-Y) < 2 END) =>
 	** [1 5]
