sig
val is_directed : bool
type t
module V : Sig.COMPARABLE
val iter_vertex : (V.t -> unit) -> Traverse.G.t -> unit
val fold_vertex : (V.t -> 'a -> 'a) -> Traverse.G.t -> 'a -> 'a
val iter_succ : (V.t -> unit) -> Traverse.G.t -> V.t -> unit
val fold_succ : (V.t -> 'a -> 'a) -> Traverse.G.t -> V.t -> 'a -> 'a
end