12 lines
147 B
Plaintext
12 lines
147 B
Plaintext
|
letter(a).
|
||
|
|
letter(b).
|
||
|
|
letter(c).
|
||
|
|
|
||
|
|
{p(1..3, Y)} :- letter(Y).
|
||
|
|
:- p(X1, Y), p(X2, Y), X1 != X2.
|
||
|
|
|
||
|
|
q(X) :- p(X, _).
|
||
|
|
:- X = 1..3, not q(X).
|
||
|
|
|
||
|
|
#show p/2.
|