All pastes #2088154 Raw Edit

Mine

public text v1 · immutable
#2088154 ·published 2011-10-08 21:48 UTC
rendered paste body
let rec join = function
    | p::ps, q::qs -> p::join(ps, q::qs)
    | [p], q::qs -> line(p,q)::qs
    | _,_ -> [];;