classify(X,negative):- X < 0.
classify(X,positive):- X >
0. classify(X,Y):-
X=0,Y=zero;
X<0,Y=negative;
X>0,Y=positive.
goal classify(45,positive).
Yes
goal classify(45,What).
What=positive
1 solution