sig   type 'a t   type key = int   val empty : eq:('a -> 'a -> bool) -> 'a BatIMap.t   val singleton : eq:('a -> 'a -> bool) -> int -> 'a -> 'a BatIMap.t   val is_empty : 'a BatIMap.t -> bool   val add : int -> 'a -> 'a BatIMap.t -> 'a BatIMap.t   val add_range : int -> int -> 'a -> 'a BatIMap.t -> 'a BatIMap.t   val find : int -> 'a BatIMap.t -> 'a   val modify : int -> ('a -> 'a) -> 'a BatIMap.t -> 'a BatIMap.t   val modify_def : 'a -> int -> ('a -> 'a) -> 'a BatIMap.t -> 'a BatIMap.t   val modify_opt :     int -> ('a option -> 'a option) -> 'a BatIMap.t -> 'a BatIMap.t   val remove : int -> 'a BatIMap.t -> 'a BatIMap.t   val remove_range : int -> int -> 'a BatIMap.t -> 'a BatIMap.t   val from : int -> 'a BatIMap.t -> 'a BatIMap.t   val after : int -> 'a BatIMap.t -> 'a BatIMap.t   val until : int -> 'a BatIMap.t -> 'a BatIMap.t   val before : int -> 'a BatIMap.t -> 'a BatIMap.t   val mem : int -> 'a BatIMap.t -> bool   val iter : (int -> 'a -> unit) -> 'a BatIMap.t -> unit   val iter_range : (int -> int -> 'a -> unit) -> 'a BatIMap.t -> unit   val map :     ?eq:('b -> 'b -> bool) -> ('a -> 'b) -> 'a BatIMap.t -> 'b BatIMap.t   val mapi :     ?eq:('b -> 'b -> bool) ->     (int -> 'a -> 'b) -> 'a BatIMap.t -> 'b BatIMap.t   val map_range :     ?eq:('b -> 'b -> bool) ->     (int -> int -> 'a -> 'b) -> 'a BatIMap.t -> 'b BatIMap.t   val fold : (int -> 'b -> 'a -> 'a) -> 'b BatIMap.t -> 'a -> 'a   val fold_range : (int -> int -> 'b -> 'a -> 'a) -> 'b BatIMap.t -> 'a -> 'a   val set_to_map : ?eq:('a -> 'a -> bool) -> BatISet.t -> 'a -> 'a BatIMap.t   val domain : 'a BatIMap.t -> BatISet.t   val map_to_set : ('a -> bool) -> 'a BatIMap.t -> BatISet.t   val enum : 'a BatIMap.t -> (int * int * 'a) BatEnum.t   val of_enum :     eq:('a -> 'a -> bool) -> (int * int * 'a) BatEnum.t -> 'a BatIMap.t   val fold2_range :     (int -> int -> 'a option -> 'b option -> 'c -> 'c) ->     'a BatIMap.t -> 'b BatIMap.t -> 'c -> 'c   val union :     ('a -> 'a -> 'a) -> 'a BatIMap.t -> 'a BatIMap.t -> 'a BatIMap.t   val merge :     ?eq:('c -> 'c -> bool) ->     (int -> int -> 'a option -> 'b option -> 'c option) ->     'a BatIMap.t -> 'b BatIMap.t -> 'c BatIMap.t   val forall2_range :     (int -> int -> 'a option -> 'b option -> bool) ->     'a BatIMap.t -> 'b BatIMap.t -> bool   val get_dec_eq : 'a BatIMap.t -> 'a -> 'a -> bool   module Infix :     sig       val ( --> ) : 'a BatIMap.t -> int -> 'a       val ( <-- ) : 'a BatIMap.t -> int * 'a -> 'a BatIMap.t     end end