module Printer: sig
.. end
type
t = Reason_graph.Reason.Set.t
module V: sig
.. end
module E: sig
.. end
val iter_vertex : (Reason_graph.NS.elt -> unit) -> Reason_graph.Reason.Set.t -> unit
val iter_edges_e : (Reason_graph.Reason.Set.elt -> unit) -> Reason_graph.Reason.Set.t -> unit
val vertex_name : PdgTypes.Node.t -> string
val graph_attributes : 'a -> [> `Label of string ] list
val default_vertex_attributes : 'a -> [> `Style of [> `Filled ] ] list
val default_edge_attributes : 'a -> 'b list
val vertex_attributes : PdgTypes.Node.t -> [> `Label of string ] list
val edge_attributes : 'a * 'b * Reason_graph.reason_type ->
[> `Color of int | `Label of string ] list
val get_subgraph : PdgTypes.Node.t -> Graph.Graphviz.DotAttributes.subgraph option