sig
  module Display :
    sig
      type t =
          Graph.Imperative.Digraph.ConcreteBidirectionalLabeled(PkgV)(PkgE).t
      module V = G.V
      type vertex = V.t
      module E = G.E
      type edge = E.t
      val is_directed : bool
      val is_empty : t -> bool
      val nb_vertex : t -> int
      val nb_edges : t -> int
      val out_degree : t -> vertex -> int
      val in_degree : t -> vertex -> int
      val mem_vertex : t -> vertex -> bool
      val mem_edge : t -> vertex -> vertex -> bool
      val mem_edge_e : t -> edge -> bool
      val find_edge : t -> vertex -> vertex -> edge
      val find_all_edges : t -> vertex -> vertex -> edge list
      val succ : t -> vertex -> vertex list
      val pred : t -> vertex -> vertex list
      val succ_e : t -> vertex -> edge list
      val pred_e : t -> vertex -> edge list
      val iter_vertex : (vertex -> unit) -> t -> unit
      val fold_vertex : (vertex -> '-> 'a) -> t -> '-> 'a
      val iter_edges : (vertex -> vertex -> unit) -> t -> unit
      val fold_edges : (vertex -> vertex -> '-> 'a) -> t -> '-> 'a
      val iter_edges_e : (edge -> unit) -> t -> unit
      val fold_edges_e : (edge -> '-> 'a) -> t -> '-> 'a
      val map_vertex : (vertex -> vertex) -> t -> t
      val iter_succ : (vertex -> unit) -> t -> vertex -> unit
      val iter_pred : (vertex -> unit) -> t -> vertex -> unit
      val fold_succ : (vertex -> '-> 'a) -> t -> vertex -> '-> 'a
      val fold_pred : (vertex -> '-> 'a) -> t -> vertex -> '-> 'a
      val iter_succ_e : (edge -> unit) -> t -> vertex -> unit
      val fold_succ_e : (edge -> '-> 'a) -> t -> vertex -> '-> 'a
      val iter_pred_e : (edge -> unit) -> t -> vertex -> unit
      val fold_pred_e : (edge -> '-> 'a) -> t -> vertex -> '-> 'a
      val create : ?size:int -> unit -> t
      val clear : t -> unit
      val copy : t -> t
      val add_vertex : t -> vertex -> unit
      val remove_vertex : t -> vertex -> unit
      val add_edge : t -> vertex -> vertex -> unit
      val add_edge_e : t -> edge -> unit
      val remove_edge : t -> vertex -> vertex -> unit
      val remove_edge_e : t -> edge -> unit
      val vertex_name :
        Defaultgraphs.SyntacticDependencyGraph.G.V.t -> string
      val graph_attributes : '-> [> `Rankdir of [> `LeftToRight ] ] list
      val get_subgraph : '-> 'b option
      val default_edge_attributes : '-> 'b list
      val default_vertex_attributes : '-> [> `Shape of [> `Box ] ] list
      val vertex_attributes :
        Defaultgraphs.SyntacticDependencyGraph.G.V.t ->
        [> `Color of int
         | `Label of string
         | `Shape of [> `Diamond | `Ellipse | `Record ] ]
        list
      val edge_attributes :
        Defaultgraphs.SyntacticDependencyGraph.G.E.t ->
        [> `Color of int
         | `Dir of [> `None ]
         | `Label of string
         | `Style of [> `Dashed | `Solid ] ]
        list
    end
  val fprint_graph : Format.formatter -> Display.t -> unit
  val output_graph : out_channel -> Display.t -> unit
  val print :
    Format.formatter ->
    Defaultgraphs.SyntacticDependencyGraph.DotPrinter.Display.t -> unit
end