sig val fold : (GraphDeps.V.t -> 'a -> 'a) -> GraphDeps.t -> 'a -> 'a val iter : (GraphDeps.V.t -> unit) -> GraphDeps.t -> unit end