[Haskell-beginners] foldl by foldr