fact: Record wf_color e := WfEnv { wf_stack : stack e =i gray e :|: (black e :\: cover (esccs e)); wf_sccs : cover (esccs e) \subset black e; wf_uniq : uniq (stack e); }.
imports: mathcomp(all_ssreflect) bigmin extra