functor (G : Graph.Graphviz.GraphWithDotAttrs) ->
sig
type cluster = string
class model :
(G.vertex, G.edge, DGraphModel.Make.cluster) XDot.graph_layout ->
G.t -> [G.vertex, G.edge, DGraphModel.Make.cluster] abstract_model
val from_graph :
?cmd:string -> ?tmp_name:string -> G.t -> DGraphModel.Make.model
end