(and (symbolp x) (equal (char (symbol-name x) 0) #?)I) (defun get-binding (var bindings) Find a ( v...
Question:
(and (symbolp x) (equal (char (symbol-name x) 0) #\?)I)
(defun get-binding (var bindings)
"Find a ( v a r i a b l e . value) p a i r i n a binding l i s t ."
(assoc var bindings))
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: