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