fact: Record post_dfs (roots : {set V}) (e e' : env) (m : nat) := PostDfs { post_invariants : invariants e'; post_subenv : subenv e e'; post_white : white e' = white e :\: \bigcup_(x in roots) wreach e x; post_num : m = \min_(y in \bigcup_(x in roots) wreach e x) @inord infty (num e' y); }.
imports: mathcomp(all_ssreflect) bigmin extra