% ========================================================================== % $Id: list_member.pl,v 1.2 2014/01/21 17:37:15 jlang Exp $ % CSI2120 example Code for lecture 3 % ========================================================================== % (C)opyright: % % Jochen Lang % EECS, University of Ottawa % 800 King Edward Ave. % Ottawa, On., K1N 6N5 % Canada. % http://www.eecs.uottawa.ca/~jlang % % Creator: jlang (Jochen Lang) based on Clocksin & Mellish % Email: jlang@eecs.uottawa.ca % ========================================================================== % $Log: list_member.pl,v $ % Revision 1.2 2014/01/21 17:37:15 jlang % Corrected file mix up between insert and member. % % Revision 1.1 2014/01/20 18:13:40 jlang % Created list processing examples for lecture 4. % % ========================================================================== listMember(X,[X|L]). % Searched for element is % head – boundary case listMember(X,[Y|L]) :- listMember(X,L). % loop over list