Make.1-G
type t
module V : Sig.COMPARABLE
module E : sig ... end
val fold_vertex : ( V.t -> 'a -> 'a ) -> t -> 'a -> 'a
val iter_edges_e : ( E.t -> unit ) -> t -> unit