`sig
type t
exception Negative_index of string
val empty : unit -> BatBitSet.t
val create : int -> BatBitSet.t
val create_full : int -> BatBitSet.t
val copy : BatBitSet.t -> BatBitSet.t
val clone : BatBitSet.t -> BatBitSet.t
val set : BatBitSet.t -> int -> unit
val unset : BatBitSet.t -> int -> unit
val put : BatBitSet.t -> bool -> int -> unit
val toggle : BatBitSet.t -> int -> unit
val is_set : BatBitSet.t -> int -> bool
val compare : BatBitSet.t -> BatBitSet.t -> int
val equals : BatBitSet.t -> BatBitSet.t -> bool
val count : BatBitSet.t -> int
val enum : BatBitSet.t -> int BatEnum.t
val intersect : BatBitSet.t -> BatBitSet.t -> unit
val unite : BatBitSet.t -> BatBitSet.t -> unit
val differentiate : BatBitSet.t -> BatBitSet.t -> unit
val differentiate_sym : BatBitSet.t -> BatBitSet.t -> unit
val inter : BatBitSet.t -> BatBitSet.t -> BatBitSet.t
val union : BatBitSet.t -> BatBitSet.t -> BatBitSet.t
val diff : BatBitSet.t -> BatBitSet.t -> BatBitSet.t
val sym_diff : BatBitSet.t -> BatBitSet.t -> BatBitSet.t
val print : 'a BatInnerIO.output -> BatBitSet.t -> unit
end`