sig
  val iter_vertex : (PdgTypes.Node.t -> unit) -> t -> unit
  val iter_edges_e : (PdgTypes.G.E.t * bool -> unit) -> t -> unit
  val graph_attributes : t -> Graph.Graphviz.DotAttributes.graph list
  val default_vertex_attributes :
    t -> Graph.Graphviz.DotAttributes.vertex list
  val vertex_name : PdgTypes.Node.t -> string
  val vertex_attributes :
    PdgTypes.Node.t -> Graph.Graphviz.DotAttributes.vertex list
  val get_subgraph :
    PdgTypes.Node.t -> Graph.Graphviz.DotAttributes.subgraph option
  val default_edge_attributes : '-> Graph.Graphviz.DotAttributes.edge list
  val edge_attributes :
    PdgTypes.G.E.t * bool -> Graph.Graphviz.DotAttributes.edge list
end