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