val create : int -> bool -> t
val init : int -> (int -> bool) -> t
val set : t -> int -> bool -> unit
val get : t -> int -> bool
val sub : t -> int -> int -> t
val fill : t -> int -> int -> bool -> unit
val blit : t -> int -> t -> int -> int -> unit
val iter : (bool -> unit) -> t -> unit
val map : (bool -> bool) -> t -> t
val iteri : (int -> bool -> unit) -> t -> unit
val mapi : (int -> bool -> bool) -> t -> t
val fold_left : ('a -> bool -> 'a) -> 'a -> t -> 'a
val fold_right : (bool -> 'a -> 'a) -> t -> 'a -> 'a
val foldi_left : ('a -> int -> bool -> 'a) -> 'a -> t -> 'a
val foldi_right : (int -> bool -> 'a -> 'a) -> t -> 'a -> 'a
val gray_iter : (t -> unit) -> int -> unit
val shiftl : t -> int -> t
val shiftr : t -> int -> t
val all_zeros : t -> bool
val to_string : t -> string
val of_string : string -> t
val to_list : t -> int list
val of_list : int list -> t
val of_list_with_length : int list -> int -> t
val unsafe_set : t -> int -> bool -> unit
val unsafe_get : t -> int -> bool