val write : out_channel -> bool -> bool -> Pdf.t -> unit