Relationships

Description

Defining family relationships.

Source: The Art of Prolog

Download

Program source code: relationships.pl

Listing

uncle(Uncle,Person) :-
 
	brother(Uncle,Parent), parent(Parent,Person).
 
 
 
sibling(Sib1,Sib2) :-
 
	parent(Parent,Sib1), parent(Parent,SIb2), Sib1 \= Sib2.
 
 
 
cousin(Cousin1,Cousin2) :-
 
	parent(Parent1,Cousin1),
 
	parent(Parent2,Cousin2),
 
	sibling(Parent1,Parent2).
 
 
 
%Program 2.1:  Defining family relationships

Comments

Luck of definition of brother in family2

pl/prolog/pllib/relationships.txt · ostatnio zmienione: 2019/06/27 15:50 (edycja zewnętrzna)
www.chimeric.de Valid CSS Driven by DokuWiki do yourself a favour and use a real browser - get firefox!! Recent changes RSS feed Valid XHTML 1.0