Clips language example using fact base

2008-07-23 21:10:23 -04:00
parent 3fa7c46d11
commit 684ccfa19e
1 changed files with 8 additions and 0 deletions
--- a/clips.clips
+++ b/clips.clips
@@ -0,0 +1,8 @@
 (defrule hw
    (f ?x)
 =>
    (printout t ?x crlf))
 (assert (f "Hello World"))
 (run)