Prolog 文件操作

Question

我使用 swi prolog，我有一个这样的文件，

yeni(a,b,c).
yeni(d,s,w).

我尝试创建一个出现谓词列的新列表。比如

[a,d] 
[b,s]
[c,w]

你有什么建议吗？

Answer 1

使用谓词加载文件，然后使用代码加载文件。

要获取包含谓词列表的列表，您可以使用 findall/3 谓词：

answer([L1,L2,L3):-
  findall(First, yeni(First,_,_),L1),
  findall(Second, yeni(_,Second,_),L2),
  findall(Third, yeni(_,_,Third),L3).

如果您不想手动加载文件，则可以在加载另一个文件时加载其中一个文件，如下所示：:

-consult(theOtherFile)。