maxsharing-1.0.2: examples/twice.l

let twice f x = f (f x) in twice twice inc