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