;;Chapter 3, Test 10, Page 51
(deftest test-assoc-lists ()
  (let ((x `((+ . "add") (- . "subtract") (* . "multiply") (/ . "divide"))));creates an associated list
    (check
      (equal (cdr (assoc '* x)) "multiply");what is the value of *
      (not (assoc '^ x))))); notice that ^ returns nil b/c it is not part of the list.