HaskellCourse/fold.hs

-- Exercice from slide 46

fsum::Num a => [a] -> a
fsum = foldl (+) 0