\pi calculation with plain Haskell lists