我正在尝试构建一个简单的谓词,它以两个列表作为输入,结果是由前两个列表的交集组成的第三个列表。我决定使用逻辑语句。我非常确定我的逻辑是正确的,但我的谓词不起作用。有什么想法吗?
element(X,[H|T]) :-
X=H
;
element(X,T).
intersection(L1,L2,R) :-
not((
element(A,L1),
not(element(A,L2))
)),
not((
element(A,L1),
not(element(A,R))
)).请不要张贴替代方法我想知道为什么这个每次都返回FALSE。
https://stackoverflow.com/questions/36630790
复制相似问题