module type Mergeable = sig .. end
sig
end
type t
val make : unit -> t
unit -> t
val merge : t -> t -> t
t -> t -> t
merge a b
a
b