Выполнение / 2 / Readme

1.pro
Предикат child(X,Y) проверяет является ли Х потомком Y. Принимает
значения true или false
Предикат predok(X,Y) выдает имена родителей, бабушек, пробабушек и т.д
указанного ребенка Y. Формат ввода например:
goal: predok (X,"Энн")
Основан на рекурсии , работает хорошо.
Предикат potomok(X,Y) выдает имена детей, внуков и т.д.
указанного указанного родителя Y. Формат ввода например:
goal: potomok (X,"Памела")
Основан на рекурсии , работает хорошо.
Предикат mother(X) определяет имя матери Y введенного ребенка X.
Предикат father(X) определяет имя отца Y введенного ребенка X.
Предикат sister(X,Z) проверяет ясляется ли Х сестрой Z. Принимает
значения true или false
Предикат vnuchka(X,Y) проверяет является ли X внучкой Y.
(Мое индивидуальное задание)

Следующие 2 предиката я писал на скорую руку и их стоит либо вообще
исключить или немного переделать.Вооющем это мой глюк.
Предикат who_sister(X) находит, чья сестра X
(причем находит даже сводных братьев и сестер).
Предикат who_potomok(Y) выдает имена всех детей родителя Y.

(C) Shimarik & Абрамов Алексей (МП45 2001)