type t
val simple : Picture.t -> t
val render : ?width:float -> ?height:float -> [ `pdf | `svg ] -> t -> target -> unit