sig
  type t = Mlpost.Command.t
  val make : Mlpost.Command.t -> Mlpost.Picture.t
  val tex : string -> Mlpost.Picture.t
  val transform : Mlpost.Transform.t -> Mlpost.Picture.t -> Mlpost.Picture.t
  val bbox : Mlpost.Picture.t -> Mlpost.Path.t
  val corner_bbox :
    ?dx:Mlpost.Num.t -> ?dy:Mlpost.Num.t -> Mlpost.Picture.t -> Mlpost.Path.t
  val center : Mlpost.Point.t -> Mlpost.Picture.t -> Mlpost.Picture.t
  val place_up_left : Mlpost.Point.t -> Mlpost.Picture.t -> Mlpost.Picture.t
  val place_up_right : Mlpost.Point.t -> Mlpost.Picture.t -> Mlpost.Picture.t
  val place_bot_left : Mlpost.Point.t -> Mlpost.Picture.t -> Mlpost.Picture.t
  val place_bot_right :
    Mlpost.Point.t -> Mlpost.Picture.t -> Mlpost.Picture.t
  val beside : Mlpost.Picture.t -> Mlpost.Picture.t -> Mlpost.Picture.t
  val below : Mlpost.Picture.t -> Mlpost.Picture.t -> Mlpost.Picture.t
  val ctr : Mlpost.Picture.t -> Mlpost.Point.t
  val north : Mlpost.Picture.t -> Mlpost.Point.t
  val south : Mlpost.Picture.t -> Mlpost.Point.t
  val west : Mlpost.Picture.t -> Mlpost.Point.t
  val east : Mlpost.Picture.t -> Mlpost.Point.t
  val north_west : Mlpost.Picture.t -> Mlpost.Point.t
  val south_west : Mlpost.Picture.t -> Mlpost.Point.t
  val north_east : Mlpost.Picture.t -> Mlpost.Point.t
  val south_east : Mlpost.Picture.t -> Mlpost.Point.t
  val corner : Mlpost.Command.position -> Mlpost.Picture.t -> Mlpost.Point.t
  val ulcorner : Mlpost.Picture.t -> Mlpost.Point.t
  val llcorner : Mlpost.Picture.t -> Mlpost.Point.t
  val urcorner : Mlpost.Picture.t -> Mlpost.Point.t
  val lrcorner : Mlpost.Picture.t -> Mlpost.Point.t
  val clip : Mlpost.Picture.t -> Mlpost.Path.t -> Mlpost.Picture.t
  val width : Mlpost.Picture.t -> Mlpost.Num.t
  val height : Mlpost.Picture.t -> Mlpost.Num.t
  val scale : Mlpost.Num.t -> Mlpost.Picture.t -> Mlpost.Picture.t
  val rotate : float -> Mlpost.Picture.t -> Mlpost.Picture.t
  val shift : Mlpost.Point.t -> Mlpost.Picture.t -> Mlpost.Picture.t
  val yscale : Mlpost.Num.t -> Mlpost.Picture.t -> Mlpost.Picture.t
  val xscale : Mlpost.Num.t -> Mlpost.Picture.t -> Mlpost.Picture.t
  val spin : float -> Mlpost.Picture.t -> Mlpost.Picture.t
  type escaped = [ `Backslash | `Underscore ]
  val escape_latex : Mlpost.Picture.escaped list -> string -> string
  val escape_all : string -> string
  val set_pos : Mlpost.Point.t -> Mlpost.Picture.t -> Mlpost.Picture.t
end