functor (Tree : Graph.Graphviz.GraphWithDotAttrs) ->
functor
(TreeManipulation : sig val is_ghost_node : Tree.V.t -> bool end) ->
sig
val from_tree :
[> `widget ] Gtk.obj ->
Tree.t -> Tree.V.t -> XDot.Make(Tree).graph_layout
end