sig
  type ('a, 'b, 'c) t
  val create :
    ('a, 'b) Bigarray.kind ->
    'c Bigarray.layout -> ('a, 'b, 'c) Bigarray.Array0.t
  external kind : ('a, 'b, 'c) Bigarray.Array0.t -> ('a, 'b) Bigarray.kind
    = "caml_ba_kind"
  external layout : ('a, 'b, 'c) Bigarray.Array0.t -> 'c Bigarray.layout
    = "caml_ba_layout"
  val size_in_bytes : ('a, 'b, 'c) Bigarray.Array0.t -> int
  val get : ('a, 'b, 'c) Bigarray.Array0.t -> 'a
  val set : ('a, 'b, 'c) Bigarray.Array0.t -> 'a -> unit
  external blit :
    ('a, 'b, 'c) Bigarray.Array0.t -> ('a, 'b, 'c) Bigarray.Array0.t -> unit
    = "caml_ba_blit"
  external fill : ('a, 'b, 'c) Bigarray.Array0.t -> 'a -> unit
    = "caml_ba_fill"
  val of_value :
    ('a, 'b) Bigarray.kind ->
    'c Bigarray.layout -> 'a -> ('a, 'b, 'c) Bigarray.Array0.t
end