maxsharing-1.0.2: examples/repeat_naive.l

let repeat x = Cons x (repeat x)
in repeat 7