oddEven(X, RET) :-
	X > 0,
	V is mod(X,2),
	ANS is 'yes' := V =:= 0,
	ANS is 'no' := V =:= 1.