( l e t ((result (funcall matcher (funcall rule-if rul el input))) (if (not (eq result f...
Question:
( l e t ((result (funcall matcher (funcall rule-if rul el input)))
(if (not (eq result f a i l ) )
(funcall action result (funcall rule-then r u l e ) ) ) ) )
rules))
(defun use-eliza-rules (input)
Fantastic news! We've Found the answer you've been seeking!
Step by Step Answer:
Related Book For
Paradigms Of Artificial Intelligence Programming Case Studies In Common Lisp
ISBN: 9781558601918
1st Edition
Authors: Peter Norvig
Question Posted: