sig type t module E : Sig.HASHABLE val fold_edges_e : (E.t -> 'a -> 'a) -> Gmap.E_SRC.t -> 'a -> 'a end