fEvenSum' :: [Integer] -> Integer
fEvenSum' l = myFoldl mySum 0 (filter even l)
             where  mySum acc x = acc + x  
fEvenSum' :: [Integer] -> Integer
fEvenSum' l = myFoldl mySum 0 (filter even l)
             where  mySum acc x = acc + x  
fEvenSum' l = myFoldl mySum 0 (filter even l)
             where  mySum acc x = acc + x  