1
(***********************************************************************)
5
(* Fran�ois Pessaux, projet Cristal, INRIA Rocquencourt *)
6
(* Pierre Weis, projet Cristal, INRIA Rocquencourt *)
7
(* Jun Furuse, projet Cristal, INRIA Rocquencourt *)
9
(* Copyright 1999-2004, *)
10
(* Institut National de Recherche en Informatique et en Automatique. *)
11
(* Distributed only by permission. *)
13
(***********************************************************************)
15
(* $Id: png.mli,v 1.10 2004/09/07 07:31:06 weis Exp $ *)
17
val check_header : string -> Images.header;;
18
(** Checks the file header *)
20
val load : string -> Images.load_option list -> Images.t;;
21
(** Loads a png image. *)
23
val load_as_rgb24 : string -> Images.load_option list -> Images.t;;
24
(** Loads a png image, and coerce it to Rgb24. *)
26
val save : string -> Images.save_option list -> Images.t -> unit;;
27
(** Saves an image into a png file format. *)