anchor.diff:  
   (define-test test-limits-of-case
       "case is not suitable for all kinds of values, because
  -     it uses the function eql for comparisons. We will explore 
  +     it uses the function eql for comparisons. We will explore
        the implications of this in the equality-distinctions lesson"
     (let* ((name "John")
            (lastname (case name ("John" "Doe")
                                 ("Max" "Mustermann")
                                 (t "Anonymous"))))
  -  (assert-equal ____ lastname)))
  +  (assert-equal "Anonymous" lastname)))
   
   (define-test test-cond
       "cond is the general purpose form for checking multiple
  
positive.code:   (setf a 100)
    (let ((a 5)
          (b (* 10 a)))
      (assert-equal b ___)))
  
  (define-test test-let*-bindings-are-series
      "let* is like let, but successive bindings may use values of previous ones"
    (setf a 100)
    (let* ((a 5)
           (b (* 10 a)))
      (assert-equal b ___))
    (assert-equal a ___))
  
  
  (define-test write-your-own-let-statement
  
negative.code:         (cond ((> a 0) :positive)
                ((< a 0) :negative)
                (t :zero)))
    (assert-equal :positive c))
  