sig

  type (!'a, !'b, !'c) t
  val create :
    ('a, 'b) Bigarray.kind ->
    'c Bigarray.layout -> int -> ('a, 'b, 'c) Bigarray.Array1.t
  val init :
    ('a, 'b) Bigarray.kind ->
    'c Bigarray.layout ->
    int -> (int -> 'a) -> ('a, 'b, 'c) Bigarray.Array1.t
  external dim : ('a, 'b, 'c) Bigarray.Array1.t -> int = "%caml_ba_dim_1"
  external kind : ('a, 'b, 'c) Bigarray.Array1.t -> ('a, 'b) Bigarray.kind
    = "caml_ba_kind"
  external layout : ('a, 'b, 'c) Bigarray.Array1.t -> 'c Bigarray.layout
    = "caml_ba_layout"
  val change_layout :
    ('a, 'b, 'c) Bigarray.Array1.t ->
    'd Bigarray.layout -> ('a, 'b, 'd) Bigarray.Array1.t
  val size_in_bytes : ('a, 'b, 'c) Bigarray.Array1.t -> int
  external get : ('a, 'b, 'c) Bigarray.Array1.t -> int -> 'a
    = "%caml_ba_ref_1"
  external set : ('a, 'b, 'c) Bigarray.Array1.t -> int -> 'a -> unit
    = "%caml_ba_set_1"
  external sub :
    ('a, 'b, 'c) Bigarray.Array1.t ->
    int -> int -> ('a, 'b, 'c) Bigarray.Array1.t = "caml_ba_sub"
  val slice :
    ('a, 'b, 'c) Bigarray.Array1.t -> int -> ('a, 'b, 'c) Bigarray.Array0.t
  external blit :
    ('a, 'b, 'c) Bigarray.Array1.t -> ('a, 'b, 'c) Bigarray.Array1.t -> unit
    = "caml_ba_blit"
  external fill : ('a, 'b, 'c) Bigarray.Array1.t -> 'a -> unit
    = "caml_ba_fill"
  val of_array :
    ('a, 'b) Bigarray.kind ->
    'c Bigarray.layout -> 'a array -> ('a, 'b, 'c) Bigarray.Array1.t
  external unsafe_get : ('a, 'b, 'c) Bigarray.Array1.t -> int -> 'a
    = "%caml_ba_unsafe_ref_1"
  external unsafe_set : ('a, 'b, 'c) Bigarray.Array1.t -> int -> 'a -> unit
    = "%caml_ba_unsafe_set_1"
end