6 lines
95 B
Scheme
6 lines
95 B
Scheme
(include "include/prolog.scm")
|
|
|
|
(! (man socrates))
|
|
(:- (mortal ?x) (man ?x))
|
|
(? (mortal ?who))
|