[Haskell-cafe] Euler 201 performance mystery