sig
  val set_filename_prefix : string -> unit
  val generate :
    ?prelude:string ->
    ?verbose:bool ->
    ?clean:bool -> string -> (string * Mlpost.Command.t) list -> unit
  val emit : string -> Mlpost.Command.t -> unit
  val dump :
    ?prelude:string ->
    ?pdf:bool -> ?eps:bool -> ?verbose:bool -> ?clean:bool -> string -> unit
  type job = string * Mlpost.Command.t
  type jobs = Mlpost.Metapost.job list
  val mps :
    ?prelude:string ->
    ?verbose:bool -> string -> Mlpost.Metapost.jobs -> Mlpost.File.t list
  val pdf :
    ?prelude:string ->
    ?verbose:bool -> string -> Mlpost.Metapost.jobs -> Mlpost.File.t list
  val png :
    ?prelude:string ->
    ?verbose:bool -> string -> Mlpost.Metapost.jobs -> Mlpost.File.t list
  val temp_mps :
    ?prelude:string ->
    ?verbose:bool ->
    ?clean:bool -> string -> Mlpost.Metapost.jobs -> Mlpost.File.t list
  val temp_pdf :
    ?prelude:string ->
    ?verbose:bool ->
    ?clean:bool -> string -> Mlpost.Metapost.jobs -> Mlpost.File.t list
  val temp_png :
    ?prelude:string ->
    ?verbose:bool ->
    ?clean:bool -> string -> Mlpost.Metapost.jobs -> Mlpost.File.t list
  val dump_mp :
    ?prelude:string -> ?verbose:bool -> ?clean:bool -> string -> unit
  val dump_mps :
    ?prelude:string -> ?verbose:bool -> ?clean:bool -> string -> unit
  val dump_png :
    ?prelude:string -> ?verbose:bool -> ?clean:bool -> string -> unit
  val dump_pdf :
    ?prelude:string -> ?verbose:bool -> ?clean:bool -> string -> unit
  val read_prelude_from_tex_file : string -> string
  val dump_tex : ?prelude:string -> string -> unit
  val slideshow :
    Mlpost.Command.t list -> int -> (int * Mlpost.Command.t) list
  val emit_slideshow : string -> Mlpost.Command.t list -> unit
  val dumpable : unit -> unit
  val depend : string -> unit
end