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

f p = fst p `func` snd p

f p =    fst p .= snd p