Implementing Euler's Project in Haskell