sig
  type skeleton
  val mk_skeleton :
    int -> int -> Mlpost.Num.t -> Mlpost.Num.t -> Mlpost.Plot.skeleton
  type labels = int -> Mlpost.Num.t -> Mlpost.Picture.t option
  type ticks = (Mlpost.Num.t * Mlpost.Pen.t) option
  type drawing = Stepwise | Normal
  val draw_grid :
    ?hdash:(int -> Mlpost.Dash.t) ->
    ?vdash:(int -> Mlpost.Dash.t) ->
    ?hpen:(int -> Mlpost.Pen.t) ->
    ?vpen:(int -> Mlpost.Pen.t) ->
    ?color:Mlpost.Color.t -> Mlpost.Plot.skeleton -> Mlpost.Command.t
  val draw_axes :
    ?hpen:Mlpost.Pen.t ->
    ?vpen:Mlpost.Pen.t ->
    ?hlabel:Mlpost.Plot.labels ->
    ?vlabel:Mlpost.Plot.labels ->
    ?ticks:Mlpost.Plot.ticks ->
    ?closed:bool ->
    ?hcaption:Mlpost.Picture.t ->
    ?vcaption:Mlpost.Picture.t -> Mlpost.Plot.skeleton -> Mlpost.Command.t
  val draw_simple_axes :
    ?hpen:Mlpost.Pen.t ->
    ?vpen:Mlpost.Pen.t ->
    string -> string -> Mlpost.Plot.skeleton -> Mlpost.Command.t
  val draw_func :
    ?pen:Mlpost.Pen.t ->
    ?drawing:Mlpost.Plot.drawing ->
    ?style:Mlpost.Path.joint ->
    ?dashed:Mlpost.Dash.t ->
    ?color:Mlpost.Color.t ->
    ?label:Mlpost.Picture.t * Mlpost.Command.position * int ->
    ?from_x:int ->
    ?to_x:int -> (int -> float) -> Mlpost.Plot.skeleton -> Mlpost.Command.t
end