home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Liren Large Software Subsidy 9
/
09.iso
/
l
/
l217
/
2.ddi
/
EXAMPLES
/
CH03EX04.PRO
< prev
next >
Encoding:
Amiga
Atari
Commodore
DOS
FM Towns/JPY
Macintosh
Macintosh JP
NeXTSTEP
RISC OS/Acorn
UTF-8
Wrap
Prolog Source
|
1990-03-26
|
296 b
|
20 lines
/*
Copyright (c) 1986, 90 by Prolog Development Center
*/
predicates
male(symbol)
female(symbol)
parent(symbol, symbol)
clauses
male(bill).
male(joe).
female(sue).
female(tammy).
parent(bill, joe).
parent(sue, joe).
parent(joe, tammy).