apply-refact-0.1.0.0: tests/examples/ListRec4.hs.expected

f xs a = foldM (+) a xs