CP2003 - Tutorial 11

Prolog

Write a program that stores information about your family, and will answer queries about relationships.

Information about individual people must be stored as facts containing the persons name, sex and parents' names, e.g.

person(geoff,male,bob,margaret).

Here are the queries you should be able to answer ...

?-father(Person,Father).

?-mother(Person,Mother).

?-aunt(Person,Aunt). Algorithm : An aunt is a parent's sister.

?-uncle(Person,Uncle). Algorithm : An uncle is a parent's brother.

?-nephew(Person,Nephew). Algorithm : A nephew is a sibling's son.

?-niece(Person,Niece). Algorithm : A niece is a sibling's daughter.

?-descendant(Person,Descendant). Algorithm : A descendant is an offspring or a descendant's offspring.

?-ancestor(Person,Ancestor). Algorithm : The inverse of descendant.

?-relation(Person,Relation). Algorithm : Descendants of most distant ancestor.