كيفية تحديد قاعدة النسبية في حاسوب؟

Question

وكيفية تحديد قاعدة النسبية في برولوج؟

وهذا هو ما حصلت عليه حتى الآن:

spouce(X,Y) :-
    wife(X,Y).

spouce(X,Y) :-
    husband(X,Y).

relative-by-blood(X,Y) :-
    ancestor(Z,X),
    ancestor(Z,Y).


relative(X,Y) :-
    relative-by-blood(X,Y).

relative(X,Y) :-
    spouce(X,Y).

relative(X,Y) :-
    relative-by-blood(X,Z), %<- not sure what to do here.

ويرجع الفضل في ذلك مسبقا!

Answer 1

حسنا، بالنسبة للمبتدئين، أعتقد أنك بحاجة إلى إعادة كتابة relative(X,Y) على النحو التالي:

relative(X,Y) :- relative-by-blood(X,Y) ; spouce(X,Y).

ومن هناك ونحن بحاجة الى مزيد من المعلومات (أنا تعديل لإضافة إلى جوابي اذا حصلنا على أكثر). أيضا، يمكنك أن تعطينا قواعد ancestor بك؟