10 lines
200 B
Perl
10 lines
200 B
Perl
|
happy(vincent).
|
||
|
|
listens2Music(butch).
|
||
|
|
playsAirGuitar(vincent):-
|
||
|
|
listens2Music(vincent),
|
||
|
|
happy(vincent).
|
||
|
|
playsAirGuitar(butch):-
|
||
|
|
happy(butch).
|
||
|
|
playsAirGuitar(butch):-
|
||
|
|
listens2Music(butch).
|