home *** CD-ROM | disk | FTP | other *** search
/ PC Plus SuperCD 45 / SuperCD45.iso / talleres / prog_alternat / prolog_43 / lists.pl next >
Encoding:
Text File  |  1999-12-14  |  88 b   |  9 lines
  1.  
  2. amember(X, [ X|Tail] ).
  3.  
  4. amember(X, [ Head|Tail ] ) :-
  5.     amember(X, Tail ). 
  6.  
  7.  
  8.  
  9.