fork download
  1. oddEven(X, RET) :-
  2. X > 0,
  3. V is mod(X,2),
  4. RET is V.
  5.  
  6.  
Success #stdin #stdout 0.02s 68352KB
stdin
oddEven(4, RET).
stdout
GNU Prolog 1.3.1
By Daniel Diaz
Copyright (C) 1999-2009 Daniel Diaz

RET = 0

yes