Achievement unlocked: Approximate pi in haskell
Moved helper functions to `where' scoping.