sig
  val of_bigarr :
    ('a, 'b, Bigarray.c_layout) Bigarray.Array2.t ->
    Cairo.format ->
    width:int -> height:int -> stride:int -> Cairo.image_surface
  val of_bigarr_32 :
    alpha:bool ->
    (int32, Bigarray.int32_elt, Bigarray.c_layout) Bigarray.Array2.t ->
    Cairo.image_surface
  val of_bigarr_24 :
    (int, Bigarray.int_elt, Bigarray.c_layout) Bigarray.Array2.t ->
    Cairo.image_surface
  val of_bigarr_8 :
    (int, Bigarray.int8_unsigned_elt, Bigarray.c_layout) Bigarray.Array2.t ->
    Cairo.image_surface
  val write_ppm_int32 :
    Pervasives.out_channel ->
    (int32, Bigarray.int32_elt, Bigarray.c_layout) Bigarray.Array2.t -> unit
  val write_ppm_int :
    Pervasives.out_channel ->
    (int, Bigarray.int_elt, Bigarray.c_layout) Bigarray.Array2.t -> unit
end