2
/* e */
union([A|B], C, D) :- member(A,C), !, union(B,C,D).
union([A|B], C, [A|D]) :- union(B,C,D).
union([],Z,Z).
/* f */
intersection([A|B], C, D) :- member(A,C), !, intersection(B,C,D).
intersection([A|B], C, [A|D]) :- intersection(B,C,D).
intersection([],Z,[]).
你們可以清楚地解釋這些表達式,可能在一棵樹,多謝。我很新的Prolog的:)序言 - 需要解釋的聯盟和交集
感謝您的回答,我只是在IRC中得到一個很好的解釋,它與您的回答非常相似:) – nXqd 2011-04-23 03:08:58