sig   type ('a, 'b) t   val create : ?random:bool -> int -> ('a, 'b) Facile.Data.Hashtbl.t   val get : ('a, 'b) Facile.Data.Hashtbl.t -> ('a, 'b) Hashtbl.t   val add : ('a, 'b) Facile.Data.Hashtbl.t -> '-> '-> unit   val find : ('a, 'b) Facile.Data.Hashtbl.t -> '-> 'b   val mem : ('a, 'b) Facile.Data.Hashtbl.t -> '-> bool   val remove : ('a, 'b) Facile.Data.Hashtbl.t -> '-> unit   val replace : ('a, 'b) Facile.Data.Hashtbl.t -> '-> '-> unit   val iter : ('-> '-> unit) -> ('a, 'b) Facile.Data.Hashtbl.t -> unit   val fold :     ('-> '-> '-> 'c) -> ('a, 'b) Facile.Data.Hashtbl.t -> '-> 'c end