more Sum of integers

Haskell