sandbox/lpn/kb2.pl

7 lines
191 B
Perl
Raw 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).