sig
  type t
  type data =
      (int, Stdlib.Bigarray.int8_unsigned_elt, Stdlib.Bigarray.c_layout)
      Stdlib.Bigarray.Array1.t
  val data : Image.BGRA.t -> Image.BGRA.data
end