4 lines
114 B
Haskell
4 lines
114 B
Haskell
-- Version 8
|
|
import Data.List (foldl')
|
|
evenSum :: Integral a => [a] -> a
|
|
evenSum l = foldl' (+) 0 (filter even l)
|