Prolog的新功能-列表挑战

Question

首先，对于英语可能不是我的母语，我可能会犯的任何错误我深表歉意。

因此，我决定自己一个人学习Prolog，并且遇到了这种“挑战”。

我有这个关于电视节目的数据库。 它具有以下谓词：

人（PERSON_ID，名称）。

显示（Show_id，名称）。

参与（PERSON_ID，Show_id，活动）。

我要找出的是2个人之间的关系...我必须这样写一个目标：network（Person1，Person2），给定2个人的名字（Person1，Person2）还会返回另外2个人的名字people，Person3和Person4-Person1在任何表演中都与Person3合作，Person2与Person4合作，而Person3和Person4都一起合作。

我列出了Person1参加过的所有演出的清单，然后列出了Person2参加过的所有演出的清单。

我的问题是如何从这里继续。 我考虑过列出一个清单，其中列出了在Person1中参加过演出的所有人员，并在另一个列表中列出了所有在Person2中进行过演出的人员，然后尝试找出是否所有Person1中的人员与某人一起工作，如果某人已经与Person2一起工作的人列表中的某人一起工作。

谁能给我一些解决方法的建议？ 谢谢！！

Answer 1

在序言中没有“回报价值”之类的东西

因此，您实际上必须写一个谓词，例如

网络（PERSON1，PERSON2，Person3可能，Person4）。

第一步是编写谓词work_with（Person1，Person2）

就像是：

worked_with(Person1,Person2):-
    participates(Person1,X,_),
    participates(Person2,X,_),
    Person1 \= Person2.

之后，网络谓词将类似于

network(P1,P2,P3,P4):-
    worked_with(P1,P3),
    worked_with(P2,P4),
    worked_with(P3,P4).

但是，该谓词使用ID代替名称作为输入； 您只需要编写一个包装即可进行解码。 我认为您可以尝试自己将其写为练习：b

顺便说一句，如果您才刚刚开始学习序言，我真的不认为有理由尝试类似的事情。 首先尝试更简单的方法来掌握序言的行为方式