9 lines
87 B
Plaintext
9 lines
87 B
Plaintext
|
(defrule hw
|
||
|
|
(f ?x)
|
||
|
|
=>
|
||
|
|
(printout t ?x crlf))
|
||
|
|
|
||
|
|
(assert (f "Hello World"))
|
||
|
|
|
||
|
|
(run)
|