A linked list can be used as a representation of a set. member (written &isin) tests whether a given item is in the list.
(member 'dick '(tom dick harry)) -> (dick harry) (member 'fred '(tom dick harry)) -> nil
(defun member (item lst)
(if (null lst)
nil
(if (eql item (first lst))
lst
(member item (rest lst)) ) ) )
public static Cons member (Object item, Cons lst) {
if ( lst == null )
return null;
else if ( item.equals(first(lst)) )
return lst;
else return member(item, rest(lst)); }