apply-refact-0.1.0.0: tests/examples/ListRec8.hs

f [] y = y; f (x:xs) y = f xs (f xs z)