不正解!

どもです。

Euler Project の Problem109 をやっているんですが，正解にたどり着けず。
全部の場合の数をもとめてみると，

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

となり，問題文にある 42336 とは異なる。
なので，どっかが間違っている。もしくは，数え漏れがある。
うーん。眠いので寝る。

そうそう，ミニトマトさん達，続々発根しています。
各種6粒ずつセットして，カンパリさんが一番早く，
しかも6粒全部発根。イエローアイコさんがいまいちでちょっと心配。
詳細は後日。たぶんだけど。