sig   type key   and 'a t   val create : int -> 'a MoreLabels.Hashtbl.S.t   val clear : 'a MoreLabels.Hashtbl.S.t -> unit   val reset : 'a MoreLabels.Hashtbl.S.t -> unit   val copy : 'a MoreLabels.Hashtbl.S.t -> 'a MoreLabels.Hashtbl.S.t   val add :     'a MoreLabels.Hashtbl.S.t ->     key:MoreLabels.Hashtbl.S.key -> data:'a -> unit   val remove : 'a MoreLabels.Hashtbl.S.t -> MoreLabels.Hashtbl.S.key -> unit   val find : 'a MoreLabels.Hashtbl.S.t -> MoreLabels.Hashtbl.S.key -> 'a   val find_all :     'a MoreLabels.Hashtbl.S.t -> MoreLabels.Hashtbl.S.key -> 'a list   val replace :     'a MoreLabels.Hashtbl.S.t ->     key:MoreLabels.Hashtbl.S.key -> data:'a -> unit   val mem : 'a MoreLabels.Hashtbl.S.t -> MoreLabels.Hashtbl.S.key -> bool   val iter :     f:(key:MoreLabels.Hashtbl.S.key -> data:'a -> unit) ->     'a MoreLabels.Hashtbl.S.t -> unit   val filter_map_inplace :     f:(key:MoreLabels.Hashtbl.S.key -> data:'a -> 'a option) ->     'a MoreLabels.Hashtbl.S.t -> unit   val fold :     f:(key:MoreLabels.Hashtbl.S.key -> data:'a -> 'b -> 'b) ->     'a MoreLabels.Hashtbl.S.t -> init:'b -> 'b   val length : 'a MoreLabels.Hashtbl.S.t -> int   val stats : 'a MoreLabels.Hashtbl.S.t -> MoreLabels.Hashtbl.statistics end