Построить базу данных о родственниках - Prolog

Формулировка задачи:

Построить базу данных о родственниках "мать" и "дочь" и правила "тетя", "племянница", "бабушка", "внучатая племянница".

Решение задачи: «Построить базу данных о родственниках»

textual
                            Листинг программы 
                        

                            % Построить базу данных о родственниках "мать" и "дочь" 
% и правила "тетя", "племянница", "бабушка", "внучатая племянница".
 
 
мать('Lucille', 'Laura').
мать('Nancy', 'Claire').
мать('Nancy', 'Gracie').
мать('Claire', 'Jill').
мать('Gracie', 'Carrie').
мать('Lillian', 'Karen').
мать('Lillian', 'Deanna').
 
дочь('Laura', 'Lucille').
дочь('Claire', 'Nancy').
дочь('Gracie', 'Nancy').
дочь('Jill', 'Claire').
дочь('Carrie', 'Gracie').
дочь('Karen', 'Lillian').
дочь('Deanna', 'Lillian').
 
% X- тётя Y
тетя(X, Y):- мать(Q, X), мать(Z,Y), мать(Q, Z).
                        