module type G =Minimal signature for computing the minimal separatorssig..end
type t
module V:Sig.COMPARABLE
val succ : t -> V.t -> V.t listval iter_succ : (V.t -> unit) -> t -> V.t -> unitval fold_succ : (V.t -> 'a -> 'a) -> t -> V.t -> 'a -> 'aval iter_vertex : (V.t -> unit) -> t -> unitval fold_vertex : (V.t -> 'a -> 'a) -> t -> 'a -> 'a