functor (G : GRAPH) ->
  sig
    type engine =
      [ `Dot of
          [ `Nodesep of int
          | `Rankdir of [ `LeftToRight | `TopToBottom]
          | `Ranksep of int] list]
    val draw_graph :
      unit ->
      Avl_draw.MakeGraphics.engine -> int -> int -> G.graph -> int * int
  end