Project Euler 4（4）

ジェネレータの次があるかをexists_next()で問い合わせるようにした。ちょっとコードが煩雑になった。filterとtakewhileはコードがかなり重複しているような気がする。なんとかならないだろうか。
itertools.hを変えただけで、非常に速くなった。Haskellよりかなり速い。というか、Haskellはなぜこんなに遅い？