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