http://projecteuler.net/index.php?section=problems&id=32 重複は数えないからsetを使う。そして和を取る。iterableでsetを引数に取れるようにしたが、よく考えたらaccumulateを使えばいいだけだった。これがnumericにあることをいつも忘れる。

http://projecteuler.net/index.php?section=problems&id=18 経路を辿るときに座標と経路番号の3要素のタプルで状態を持ってunfoldしています。 2要素のタプルは簡単にアクセスできますが、 let t = (1, 2) printfn "%d" (snd t) // 23つ以上の要素のタプル…