fact: Hypothesis Hr: forall x y, reflect (kernel fv x y) (r x y).
imports: Coq(Morphisms RelationClasses) mathcomp(all_ssreflect) GraphTheory(edone finite_quotient preliminaries bij) GraphTheory(equiv digraph setoid_bigop structures)