sig
  val generate_mp :
    string ->
    ?prelude:string -> ?eps:bool -> (int * Mlpost.Command.t) list -> unit
  val emit : string -> Mlpost.Command.t -> unit
  val dump : ?prelude:string -> ?pdf:bool -> ?eps: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
end