sig
type bounding_box = (int * int * int * int) option
val load : string -> Images.load_option list -> Images.t
val save : string -> Images.save_option list -> Images.t -> unit
val load_ps :
string -> Ps.bounding_box -> Images.load_option list -> Images.t
val get_bounding_box : string -> Ps.bounding_box
end