Euler 1 and 2 in Haskell. Room for improvement in my Haskell skills...