sig
  val generate_tex :
    ?pdf:bool -> string -> string -> string -> (int * 'a) list -> unit
  val generate_tex_cairo :
    string -> string -> string -> string -> (int * 'a) list -> unit
end