λx. x K S K @はてな

このブログ内に記載された文章およびコードの著作権は,すべて Keisuke Nakano に帰属します.

ネタばらし(fibonacci.ml)

m.ukaiさんに追いつかれたのでバラします. statisticsが全く同じなので,たぶん名前以外は同じだと思います.

let rec l x y=Printf.printf"%.f
"y;x<2e9&l(x+.y)x;;l 1. 1.
Hamming Numbersの方も抜かれてしまったので再び縮めておきました.

[追記] suigintoさんのコレはなかなか強力かも.フィボナッチもまだ縮みました.