sig
  val check_header : string -> Images.header
  val load : string -> Images.load_option list -> Images.t
  val save : string -> Images.save_option list -> Images.t -> unit
  type colormodel = RGB | CMYK | WHITEBLACK | BLACKWHITE
  type in_handle
  val open_in :
    string -> int * int * float * Tiff.colormodel * Tiff.in_handle
  val read_scanline : Tiff.in_handle -> string -> int -> unit
  val close_in : Tiff.in_handle -> unit
  type out_handle
  val open_out : string -> int -> int -> float -> Tiff.out_handle
  val write_scanline : Tiff.out_handle -> string -> int -> unit
  val close_out : Tiff.out_handle -> unit
end