Subversion Repositories programming

Rev

Details | Last modification | View Log | RSS feed

Rev Author Line No. Line
107 ira 1 
reigns(victoria,1837,1901).
2 
reigns(edward7,1901,1910).
3 
reigns(george5,1910,1936).
4 
reigns(edward8,1936,1936).
5 
reigns(george6,1936,1952).
6 
reigns(elizabeth2,1952,2004).
7 
 
8 
monarch(Person,Year) :-
9 
	reigns(Person,Low,High),
10 
	Year >= Low,
11 
	Year =< High.
12