Module Set.Merge_to_sequence_element
type (!'a, !'b) t = | Left of 'a| Right of 'b| Both of 'a * 'b
val compare :
('a -> 'a -> int) ->
('b -> 'b -> int) ->
('a, 'b) t ->
('a, 'b) t ->
intval t_of_sexp :
(Sexplib0__.Sexp.t -> 'a) ->
(Sexplib0__.Sexp.t -> 'b) ->
Sexplib0__.Sexp.t ->
('a, 'b) tval sexp_of_t :
('a -> Sexplib0__.Sexp.t) ->
('b -> Sexplib0__.Sexp.t) ->
('a, 'b) t ->
Sexplib0__.Sexp.t