Subversion Repositories programming

Rev

Rev 107 | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
108 ira 1 
% Code Copyright: Ira W. Snyder
2 
% Date: 07-11-2005
3 
% License: Public Domain
4 
 
107 ira 5 
odd(X) :- 1 is X mod 2.
6 
even(X) :- 0 is X mod 2.
7 
 
8 
 
9 
any_odd([H|_]) :- odd(H) , !.
10 
any_odd([_|T]) :- any_odd(T).