Make.1-G
type t
module V : Sig.COMPARABLE
val iter_vertex : ( V.t -> unit ) -> t -> unit
val iter_succ : ( V.t -> unit ) -> t -> V.t -> unit