なぜProblem12が解けんのだ

ここ数日チャレンジしているけれど、Project EulerのProblem12が一向に解けない。

Problem 12 - Haskellはスケるよは、実に素直に書いてるように見える。concatと内包表記の使い方は素晴しいとは思うけれど、アルゴリズム的にはすごく素直に最初から探索しているように見える。

これは一番最初に試して、解けなくて明らめたアルゴリズム(id:mzp:20080324:tri)と同じ気がするんだけどなぁ。sqrtがポイントなのかなぁ。それともリストモナドが賢すぎるのか。