sig
  type ('a, 'b) t = ('a * 'b) list
  val add :
    ('a, 'b) List.Assoc.t ->
    ?equal:('a -> 'a -> bool) -> 'a -> 'b -> ('a, 'b) List.Assoc.t
  val find :
    ('a, 'b) List.Assoc.t ->
    ?equal:('a -> 'a -> bool) -> 'a -> 'b option
  val find_exn :
    ('a, 'b) List.Assoc.t -> ?equal:('a -> 'a -> bool) -> 'a -> 'b
  val mem :
    ('a, 'b) List.Assoc.t -> ?equal:('a -> 'a -> bool) -> 'a -> bool
  val remove :
    ('a, 'b) List.Assoc.t ->
    ?equal:('a -> 'a -> bool) -> 'a -> ('a, 'b) List.Assoc.t
  val map :
    ('a, 'b) List.Assoc.t -> f:('b -> 'c) -> ('a, 'c) List.Assoc.t
  val inverse : ('a, 'b) List.Assoc.t -> ('b, 'a) List.Assoc.t
  val t_of_sexp :
    (Sexplib.Sexp.t -> 'a) ->
    (Sexplib.Sexp.t -> 'b) -> Sexplib.Sexp.t -> ('a, 'b) List.Assoc.t
  val sexp_of_t :
    ('a -> Sexplib.Sexp.t) ->
    ('b -> Sexplib.Sexp.t) -> ('a, 'b) List.Assoc.t -> Sexplib.Sexp.t
end