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