fork download
  1. odd(X):- 1 is mod(X,2).
  2. even(X):- 0 is mod(X,2).
  3. comp(X):-
  4. odd(X).
Success #stdin #stdout 0.02s 68352KB
stdin
comp(3).
stdout
GNU Prolog 1.3.1
By Daniel Diaz
Copyright (C) 1999-2009 Daniel Diaz

yes