sig
  type key
  type ('a, 'b) hashtbl
  type 'b t = (Core_hashtbl_intf.S.key, 'b) Core_hashtbl_intf.S.hashtbl
  type ('a, 'b) t_ = 'b Core_hashtbl_intf.S.t
  type 'a key_ = Core_hashtbl_intf.S.key
  val hashable : Core_hashtbl_intf.S.key Core_hashtbl_intf.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 Core_hashtbl_intf.S.t
  val sexp_of_t :
    ('b -> Sexplib.Sexp.t) -> 'b Core_hashtbl_intf.S.t -> Sexplib.Sexp.t
end