Subversion Repositories programming

Rev

Rev 107 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 107 Rev 108
Line -... Line 1...
- 
 
 1 
% Code Copyright: Ira W. Snyder
- 
 
 2 
% Date: 07-11-2005
- 
 
 3 
% License: Public Domain
- 
 
 4 
 
1 
odd(X) :- 1 is X mod 2.
 5 
odd(X) :- 1 is X mod 2.
2 
even(X) :- 0 is X mod 2.
 6 
even(X) :- 0 is X mod 2.
3 
 
 7 
 
4 
 
 8 
 
5 
sum_odd([],0).
 9 
sum_odd([],0).