I.1-G
include G
type t
module V : Sig.COMPARABLE
val succ : t -> V.t -> V.t list
val iter_succ : ( V.t -> unit ) -> t -> V.t -> unit
val fold_succ : ( V.t -> 'a -> 'a ) -> t -> V.t -> 'a -> 'a
val iter_vertex : ( V.t -> unit ) -> t -> unit
val fold_vertex : ( V.t -> 'a -> 'a ) -> t -> 'a -> 'a
module Mark : Sig.MARK with type graph = t and type vertex = V.t