maxsharing-1.0.3: examples/running_eff.l

\x. \f. let  r = f r x  in  r