Project Euler solutions in haskell