正解!

悩んでいた,Problem109 ですが,やっとこさバグ発見しましたよ。
「i」 と 「n」 を間違えていたという超超凡ミスでした。
e109-create-scores という関数内でのお話でした。


明後日の方向むいてテスト書きまくったりしていたので,
見つけるのに,1時間以上かかってもうた。

(loop for i from 1 to 170
      summing (reduce #'+ (mapcar #'e109-calc-score-ways
                                  (e109-create-scores i))))
;; => 42336