anchor.diff:  ;; This set of koans will introduce a few of the most common ones
   
   
  -;; Dolist evaluates a form for every element om a list.
  +;; Dolist evaluates a form for every element of a list.
   
   (defvar some-primes '(10301 11311 19991 999565999))
   
  
positive.code:       variable in turn"
    (let ((how-many-in-list 0)
          (biggest-in-list (first some-primes)))
      "this dolist loops over the some-primes, defined above"
      (dolist (one-prime some-primes)
        (if (> one-prime biggest-in-list)
            (setf biggest-in-list one-prime))
  
negative.code: 
  
  (define-test test-mapcar
      "mapcar takes a list and a function.  It returns a new list
       with the function applied to each element of the input"
    (let ((mc-result (mapcar #'evenp '(1 2 3 4 5))))
      (assert-equal mc-result ____)))
  