Problem #37 Haskell solved