Graphviz.Neato
module X : sig ... end
val set_command : string -> unit
exception Error of string
val handle_error : ('a -> 'b) -> 'a -> 'b
val fprint_graph : Format.formatter -> X.t -> unit
val output_graph : out_channel -> X.t -> unit