[Haskell-cafe] definition of sum