fact: CoInductive pi_spec (T : finType) (e : equiv_rel T) (x : T) : T -> Type := PiSpec : forall y : T, x = y %[mod e] -> pi_spec e x y.
imports: HB(structures) Coq(Setoid CMorphisms) mathcomp(all_ssreflect) GraphTheory(preliminaries bij)