sig   type key   type 'a t   val create : int -> 'BatHashtbl.S.t   val length : 'BatHashtbl.S.t -> int   val is_empty : 'BatHashtbl.S.t -> bool   val clear : 'BatHashtbl.S.t -> unit   val copy : 'BatHashtbl.S.t -> 'BatHashtbl.S.t   val add : 'BatHashtbl.S.t -> BatHashtbl.S.key -> '-> unit   val remove : 'BatHashtbl.S.t -> BatHashtbl.S.key -> unit   val remove_all : 'BatHashtbl.S.t -> BatHashtbl.S.key -> unit   val find : 'BatHashtbl.S.t -> BatHashtbl.S.key -> 'a   val find_all : 'BatHashtbl.S.t -> BatHashtbl.S.key -> 'a list   val find_default : 'BatHashtbl.S.t -> BatHashtbl.S.key -> '-> 'a   val find_option : 'BatHashtbl.S.t -> BatHashtbl.S.key -> 'a option   val replace : 'BatHashtbl.S.t -> BatHashtbl.S.key -> '-> unit   val mem : 'BatHashtbl.S.t -> BatHashtbl.S.key -> bool   val iter : (BatHashtbl.S.key -> '-> unit) -> 'BatHashtbl.S.t -> unit   val fold :     (BatHashtbl.S.key -> '-> '-> 'b) -> 'BatHashtbl.S.t -> '-> 'b   val map :     (BatHashtbl.S.key -> '-> 'c) -> 'BatHashtbl.S.t -> 'BatHashtbl.S.t   val map_inplace :     (BatHashtbl.S.key -> '-> 'a) -> 'BatHashtbl.S.t -> unit   val filter : ('-> bool) -> 'BatHashtbl.S.t -> 'BatHashtbl.S.t   val filter_inplace : ('-> bool) -> 'BatHashtbl.S.t -> unit   val filteri :     (BatHashtbl.S.key -> '-> bool) ->     'BatHashtbl.S.t -> 'BatHashtbl.S.t   val filteri_inplace :     (BatHashtbl.S.key -> '-> bool) -> 'BatHashtbl.S.t -> unit   val filter_map :     (BatHashtbl.S.key -> '-> 'b option) ->     'BatHashtbl.S.t -> 'BatHashtbl.S.t   val filter_map_inplace :     (BatHashtbl.S.key -> '-> 'a option) -> 'BatHashtbl.S.t -> unit   val modify : BatHashtbl.S.key -> ('-> 'a) -> 'BatHashtbl.S.t -> unit   val modify_def :     '-> BatHashtbl.S.key -> ('-> 'a) -> 'BatHashtbl.S.t -> unit   val modify_opt :     BatHashtbl.S.key -> ('a option -> 'a option) -> 'BatHashtbl.S.t -> unit   val keys : 'BatHashtbl.S.t -> BatHashtbl.S.key BatEnum.t   val values : 'BatHashtbl.S.t -> 'BatEnum.t   val enum : 'BatHashtbl.S.t -> (BatHashtbl.S.key * 'a) BatEnum.t   val of_enum : (BatHashtbl.S.key * 'a) BatEnum.t -> 'BatHashtbl.S.t   val print :     ?first:string ->     ?last:string ->     ?sep:string ->     ('BatInnerIO.output -> BatHashtbl.S.key -> unit) ->     ('BatInnerIO.output -> '-> unit) ->     'BatInnerIO.output -> 'BatHashtbl.S.t -> unit   module Exceptionless :     sig       val find : 'BatHashtbl.S.t -> BatHashtbl.S.key -> 'a option       val modify :         BatHashtbl.S.key ->         ('-> 'a) -> 'BatHashtbl.S.t -> (unit, exn) BatPervasives.result     end   module Infix :     sig       val ( --> ) : 'BatHashtbl.S.t -> BatHashtbl.S.key -> 'a       val ( <-- ) : 'BatHashtbl.S.t -> BatHashtbl.S.key * '-> unit     end   module Labels :     sig       val add : 'BatHashtbl.S.t -> key:BatHashtbl.S.key -> data:'-> unit       val replace :         'BatHashtbl.S.t -> key:BatHashtbl.S.key -> data:'-> unit       val iter :         f:(key:BatHashtbl.S.key -> data:'-> unit) ->         'BatHashtbl.S.t -> unit       val map :         f:(key:BatHashtbl.S.key -> data:'-> 'b) ->         'BatHashtbl.S.t -> 'BatHashtbl.S.t       val map_inplace :         f:(key:BatHashtbl.S.key -> data:'-> 'a) ->         'BatHashtbl.S.t -> unit       val filter : f:('-> bool) -> 'BatHashtbl.S.t -> 'BatHashtbl.S.t       val filter_inplace : f:('-> bool) -> 'BatHashtbl.S.t -> unit       val filteri :         f:(key:BatHashtbl.S.key -> data:'-> bool) ->         'BatHashtbl.S.t -> 'BatHashtbl.S.t       val filteri_inplace :         f:(key:BatHashtbl.S.key -> data:'-> bool) ->         'BatHashtbl.S.t -> unit       val filter_map :         f:(key:BatHashtbl.S.key -> data:'-> 'b option) ->         'BatHashtbl.S.t -> 'BatHashtbl.S.t       val filter_map_inplace :         f:(key:BatHashtbl.S.key -> data:'-> 'a option) ->         'BatHashtbl.S.t -> unit       val fold :         f:(key:BatHashtbl.S.key -> data:'-> '-> 'b) ->         'BatHashtbl.S.t -> init:'-> 'b       val modify :         key:BatHashtbl.S.key -> f:('-> 'a) -> 'BatHashtbl.S.t -> unit       val modify_def :         default:'->         key:BatHashtbl.S.key -> f:('-> 'a) -> 'BatHashtbl.S.t -> unit       val modify_opt :         key:BatHashtbl.S.key ->         f:('a option -> 'a option) -> 'BatHashtbl.S.t -> unit     end end