her.esy.fun/src/posts/0010-Haskell-Now/evenSum_v9.hs

5 lines
114 B
Haskell
Raw Normal View History

2019-12-25 15:35:56 +00:00
-- Version 9
import Data.List (foldl')
evenSum :: Integral a => [a] -> a
evenSum = (foldl' (+) 0) . (filter even)