Prolog查询可以满足但返回false

tbo*_*otz 4 prolog first-order-logic

我在下面有一个我编写的prolog程序的简单示例,其中包含一个可满足的查询,该查询始终为搜索返回false.

male(william).
male(harry).

% parent(x,y) - the parent of x is y
parent(william, diana).
parent(william, charles).
parent(harry, diana).
parent(harry, charles).

% Brother - the brother of X is Y
brother(X,Y) :- X\=Y, parent(X,A), parent(Y,A), male(Y).
Run Code Online (Sandbox Code Playgroud)

当我问两个常量是兄弟时,这样可以正常工作,但如果我试图找到一个常数prolog的兄弟,则返回false.

?- brother(william,harry).
true

?- brother(william,X).
false.
Run Code Online (Sandbox Code Playgroud)

我究竟做错了什么?

cod*_*der 5

问题在于X\=Y这部分运气逻辑纯度,因为\=/2它是非单调的.只需使其工作就可以改变顺序:

brother(X,Y) :- X\=Y, parent(X,A), parent(Y,A), male(Y).
Run Code Online (Sandbox Code Playgroud)

至:

brother(X,Y) :-  parent(X,A), parent(Y,A), male(Y), X\=Y.
Run Code Online (Sandbox Code Playgroud)

但更好的解决方案是使用dif/2保持纯度:

brother(X,Y) :- dif(X,Y), parent(X,A), parent(Y,A), male(Y).
Run Code Online (Sandbox Code Playgroud)

  • 谢谢.使用dif(X,Y)修复了问题.阅读dif/2和\ =/2的文档我想我明白为什么它以前不起作用. (2认同)