functor (Key : Key_binable) ->
  sig
    type key = Key.t
    type ('a, 'b) hashtbl = ('a, 'b) t
    type 'b t = (key, 'b) hashtbl
    type ('a, 'b) t_ = 'b t
    type 'a key_ = key
    val hashable : key Hashable.t
    val create :
      ('a key_, unit -> ('a, 'b) t_) create_options_without_hashable
    val of_alist :
      ('a key_,
       ('a key_ * 'b) list ->
       [ `Duplicate_key of 'a key_ | `Ok of ('a, 'b) t_ ])
      create_options_without_hashable
    val of_alist_report_all_dups :
      ('a key_,
       ('a key_ * 'b) list ->
       [ `Duplicate_keys of 'a key_ list | `Ok of ('a, 'b) t_ ])
      create_options_without_hashable
    val of_alist_exn :
      ('a key_, ('a key_ * 'b) list -> ('a, 'b) t_)
      create_options_without_hashable
    val of_alist_multi :
      ('a key_, ('a key_ * 'b) list -> ('a, 'b list) t_)
      create_options_without_hashable
    val create_mapped :
      ('a key_,
       get_key:('r -> 'a key_) ->
       get_data:('r -> 'b) ->
       'r list -> [ `Duplicate_keys of 'a key_ list | `Ok of ('a, 'b) t_ ])
      create_options_without_hashable
    val create_with_key :
      ('a key_,
       get_key:('r -> 'a key_) ->
       'r list -> [ `Duplicate_keys of 'a key_ list | `Ok of ('a, 'r) t_ ])
      create_options_without_hashable
    val create_with_key_exn :
      ('a key_, get_key:('r -> 'a key_) -> 'r list -> ('a, 'r) t_)
      create_options_without_hashable
    val group :
      ('a key_,
       get_key:('r -> 'a key_) ->
       get_data:('r -> 'b) ->
       combine:('b -> 'b -> 'b) -> 'r list -> ('a, 'b) t_)
      create_options_without_hashable
    val sexp_of_key : ('a, 'b) t_ -> 'a key_ -> Sexplib.Sexp.t
    val clear : ('a, 'b) t_ -> unit
    val copy : ('a, 'b) t_ -> ('a, 'b) t_
    val invariant : ('a, 'b) t_ -> unit
    val fold :
      ('a, 'b) t_ -> init:'c -> f:(key:'a key_ -> data:'b -> 'c -> 'c) -> 'c
    val iter : ('a, 'b) t_ -> f:(key:'a key_ -> data:'b -> unit) -> unit
    val existsi : ('a, 'b) t_ -> f:(key:'a key_ -> data:'b -> bool) -> bool
    val exists : ('a, 'b) t_ -> f:('b -> bool) -> bool
    val length : ('a, 'b) t_ -> int
    val is_empty : ('a, 'b) t_ -> bool
    val mem : ('a, 'b) t_ -> 'a key_ -> bool
    val remove : ('a, 'b) t_ -> 'a key_ -> unit
    val remove_one : ('a, 'b list) t_ -> 'a key_ -> unit
    val replace : ('a, 'b) t_ -> key:'a key_ -> data:'b -> unit
    val set : ('a, 'b) t_ -> key:'a key_ -> data:'b -> unit
    val add : ('a, 'b) t_ -> key:'a key_ -> data:'b -> [ `Duplicate | `Ok ]
    val add_exn : ('a, 'b) t_ -> key:'a key_ -> data:'b -> unit
    val change : ('a, 'b) t_ -> 'a key_ -> ('b option -> 'b option) -> unit
    val add_multi : ('a, 'b list) t_ -> key:'a key_ -> data:'b -> unit
    val remove_multi : ('a, 'b list) t_ -> 'a key_ -> unit
    val map : ('a, 'b) t_ -> f:('b -> 'c) -> ('a, 'c) t_
    val mapi : ('a, 'b) t_ -> f:(key:'a key_ -> data:'b -> 'c) -> ('a, 'c) t_
    val filter_map : ('a, 'b) t_ -> f:('b -> 'c option) -> ('a, 'c) t_
    val filter_mapi :
      ('a, 'b) t_ -> f:(key:'a key_ -> data:'b -> 'c option) -> ('a, 'c) t_
    val filter : ('a, 'b) t_ -> f:('b -> bool) -> ('a, 'b) t_
    val filteri :
      ('a, 'b) t_ -> f:(key:'a key_ -> data:'b -> bool) -> ('a, 'b) t_
    val partition_map :
      ('a, 'b) t_ ->
      f:('b -> [ `Fst of 'c | `Snd of 'd ]) -> ('a, 'c) t_ * ('a, 'd) t_
    val partition_mapi :
      ('a, 'b) t_ ->
      f:(key:'a key_ -> data:'b -> [ `Fst of 'c | `Snd of 'd ]) ->
      ('a, 'c) t_ * ('a, 'd) t_
    val partition_tf :
      ('a, 'b) t_ -> f:('b -> bool) -> ('a, 'b) t_ * ('a, 'b) t_
    val partitioni_tf :
      ('a, 'b) t_ ->
      f:(key:'a key_ -> data:'b -> bool) -> ('a, 'b) t_ * ('a, 'b) t_
    val find_or_add : ('a, 'b) t_ -> 'a key_ -> default:(unit -> 'b) -> 'b
    val find : ('a, 'b) t_ -> 'a key_ -> 'b option
    val find_exn : ('a, 'b) t_ -> 'a key_ -> 'b
    val find_and_remove : ('a, 'b) t_ -> 'a key_ -> 'b option
    val iter_vals : ('a, 'b) t_ -> f:('b -> unit) -> unit
    val merge :
      ('k, 'a) t_ ->
      ('k, 'b) t_ ->
      f:(key:'k key_ ->
         [ `Both of 'a * 'b | `Left of 'a | `Right of 'b ] -> 'c option) ->
      ('k, 'c) t_
    val merge_into :
      f:(key:'a key_ -> 'b -> 'b option -> 'b option) ->
      src:('a, 'b) t_ -> dst:('a, 'b) t_ -> unit
    val keys : ('a, 'b) t_ -> 'a key_ list
    val data : ('a, 'b) t_ -> 'b list
    val filter_inplace : ('a, 'b) t_ -> f:('b -> bool) -> unit
    val filteri_inplace : ('a, 'b) t_ -> f:('a key_ -> 'b -> bool) -> unit
    val equal : ('a, 'b) t_ -> ('a, 'b) t_ -> ('b -> 'b -> bool) -> bool
    val to_alist : ('a, 'b) t_ -> ('a key_ * 'b) list
    val validate :
      name:('a key_ -> string) ->
      'b Validate.check -> ('a, 'b) t_ Validate.check
    val incr : ?by:int -> ('a, int) t_ -> 'a key_ -> unit
    val t_of_sexp : (Sexplib.Sexp.t -> 'b) -> Sexplib.Sexp.t -> 'b t
    val sexp_of_t : ('b -> Sexplib.Sexp.t) -> 'b t -> Sexplib.Sexp.t
    val bin_size_t : ('a, 'a t) Bin_prot.Size.sizer1
    val bin_write_t : ('a, 'a t) Bin_prot.Map_to_safe.writer1
    val bin_write_t_ : ('a, 'a t) Bin_prot.Unsafe_write_c.writer1
    val bin_read_t : ('a, 'a t) Bin_prot.Map_to_safe.reader1
    val bin_read_t_ : ('a, 'a t) Bin_prot.Unsafe_read_c.reader1
    val bin_read_t__ : ('a, int -> 'a t) Bin_prot.Unsafe_read_c.reader1
    val bin_writer_t : ('a, 'a t) Bin_prot.Type_class.S1.writer
    val bin_reader_t : ('a, 'a t) Bin_prot.Type_class.S1.reader
    val bin_t : ('a, 'a t) Bin_prot.Type_class.S1.t
  end