sig val draft : string option -> bool -> int list -> Pdf.t -> Pdf.t end