, X , . ֳ call(X) , X . ֳ call(X) , X . , , , : call ? ,
, ll((a,)),.
:
, (,X),.
, '=..' , , -. , , consult - , ?-, . , , X Y , call :
, Z=..[P,X,Y], call(Z),.
:
,(,Y),.
, , . .
Not(X)
, X , . ֳ not(X) , X . ֳ not(X) , X . not call, , , , .
?
/* 1 */? (,[,b,c]), write(X).
/* 2 */? not(not((,[,b,c]))), write(X).
, , 2 (,[,b,c]) , not((,[,b,c])) not(not((X,[a,b,c]))) . . '', . , :
1. ֳ , X .
2. not, , , , . , , , , X , , . , X .
|
|
3. not, , (not((...))) . X .
4. write X.
47.г
X=Y
X=Y, X Y , . , ( X Y, , ). . ,
X=X.
, 쳺, .
X\=Y
'\=' '=' . , X\=Y , X=Y , . X\=Y .
'==' , '=' , X==Y , X=Y. . ³ '==' , . '=' , , . , '==' , , . . , :
? X==Y.
false
?- X==X.
X=_23/* true */.
\==Y
'==', '\=' '='. , , , , '==' , .
48.