X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=components%2Fextlib%2FgraphvizPp.mli;h=79037df7283cc717d8282d465db3f17c56980d75;hb=6a25db65c9a787daf7344e3b166b2d798b1ff1a5;hp=fa635a9719a9d18111a62cfd93b10443aa0e822b;hpb=4bc69df9d97954207ebb2df142b927676a026e45;p=helm.git

diff --git a/components/extlib/graphvizPp.mli b/components/extlib/graphvizPp.mli
index fa635a971..79037df72 100644
--- a/components/extlib/graphvizPp.mli
+++ b/components/extlib/graphvizPp.mli
@@ -31,7 +31,18 @@ type attribute = string * string  (* <key, value> pair *)
 
 module type GraphvizFormatter =
   sig
-    val header: ?name:string -> Format.formatter -> unit
+    (** @param name graph name
+     * @param graph_type type of dot graph, default value "digraph"
+     *        interesting options: "strict digraph"
+     * @param graph_attrs graph attributes
+     * @param node_attrs graph-wide node attributes
+     * @param edge_attrs graph-wide edge attributes *)
+    val header:
+      ?graph_type:string -> 
+      ?name:string -> ?graph_attrs:(attribute list) ->
+      ?node_attrs:(attribute list) -> ?edge_attrs:(attribute list) ->
+      Format.formatter ->
+        unit
     val node: string -> ?attrs:(attribute list) -> Format.formatter -> unit
     val edge:
       string -> string -> ?attrs:(attribute list) -> Format.formatter ->