functor (Cb : SigCb) -> sig val open_dot_file : Cb.t_env -> GnoCanvas.canvas -> ?dot_cmd:string -> string -> ViewGraph_core.t_graph val clear : GnoCanvas.canvas -> ViewGraph_core.t_graph -> unit end