/*  --- Copyright University of Sussex 1990. All rights reserved. ----------
 >  File:			$poplocal/local/plog/lib/member.pl
 >  Purpose:		standard definition of member
 >  Author:         Aaron Sloman Mon Mar  1 20:03:43 GMT 1993
 >  Documentation:	PLOGHELP * USEFUL
 */
member(X, [X|_]).
member(X, [_|Xs]) :-
	member(X, Xs).
