sandbox/lpn/ch01/kb2.pl

7 lines
191 B
Perl
Raw Permalink Normal View History

2018-01-16 17:46:44 +00:00
happy(yolanda).
listens2Music(mia).
listens2Music(yolanda):- happy(yolanda).
playsAirGuitar(mia):- listens2Music(mia).
playsAirGuitar(yolanda):- listens2Music(yolanda).
listens2Music(bruce).