module OP:sig..end
val (|>) : 'a -> ('a -> 'b) -> 'bval (++) : ('a -> 'b) -> ('b -> 'c) -> 'a -> 'cval finally : (unit -> 'a) -> (unit -> unit) -> 'afinally f cleaner call the cleaner function when f is
complete even in the presence of exceptions.