Merge_with_duplicates_element (base.Base.Sequence.Merge_with_duplicates

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 ->
  int

val hash_fold_t : 
  ( Hash.state -> 'a -> Hash.state ) ->
  ( Hash.state -> 'b -> Hash.state ) ->
  Hash.state ->
  ( 'a, 'b ) t ->
  Hash.state

include Sexpable.S2 with type ('a, 'b) t := ( 'a, 'b ) t

val t_of_sexp : 
  ( Sexplib0__.Sexp.t -> 'a ) ->
  ( Sexplib0__.Sexp.t -> 'b ) ->
  Sexplib0__.Sexp.t ->
  ( 'a, 'b ) t

val sexp_of_t : 
  ( 'a -> Sexplib0__.Sexp.t ) ->
  ( 'b -> Sexplib0__.Sexp.t ) ->
  ( 'a, 'b ) t ->
  Sexplib0__.Sexp.t