anchor.diff:  (test p58 (is (= 26241 (problem-58))))
   (test p59 (is (= 107359 (problem-59))))
   (test p60 (is (= 26033 (problem-60))))
  +(test p61 (is (= 28684 (problem-61))))
  +
   
   (test p74 (is (= 402 (problem-74))))
   (test p145 (is (= 608720 (problem-145))))
  
positive.code:                       (when (satisfiesp e (list a b c d))
                          (in main (return-from problem-60 (+ a b c d e)))))))))))))))
  
  
  (defun problem-74 ()
    ;; The number 145 is well known for the property that the sum of the factorial
  
negative.code:   ;; We can ignore the - branch of the quadratic equation because negative
    ;; numbers aren't indexes.
    (dividesp (+ 1 (sqrt (1+ (* 8.0d0 n)))) 4))
  
  
  (defun heptagon (n)
    (* n (- (* 5 n) 3) 1/2))
  
  (defun octagon (n)
    (* n (- (* 3 n) 2)))
  
  
  (defun parse-strings-file (filename)
  