type (!'a, !'b) t = {mutable buckets : ('a, 'b) bucket array;mutable size : int;eq : 'a -> 'a -> bool;hash : 'a -> int;max_load : float;}val create :
?max_load:float ->
?eq:('a -> 'a -> bool) ->
?hash:('a -> int) ->
int ->
('a, 'b) tmodule type Hashable = sig ... endval clear : ('a, 'b) t -> unitval find : ('a, 'b) t -> 'a -> 'bval replace : ('a, 'b) t -> 'a -> 'b -> unitval add : ('a, 'b) t -> 'a -> 'b -> unitval remove : ('a, 'b) t -> 'a -> unitval length : ('a, 'b) t -> intval mem : ('a, 'b) t -> 'a -> boolval iter : ('a -> 'b -> unit) -> ('a, 'b) t -> unitval filter : ('a -> 'b -> bool) -> ('a, 'b) t -> unitval fold : ('c -> 'a -> 'b -> 'c) -> 'c -> ('a, 'b) t -> 'cval of_seq : ('a, 'b) t -> ('a * 'b) CCSequence.t -> unitval to_seq : ('a, 'b) t -> ('a * 'b) CCSequence.tval stats : ('a, 'b) t -> int * int * int * int * int * intval get_eq : ('v, 'a) t -> 'v -> 'v -> boolval get_hash : ('v, 'a) t -> 'v -> int