fact: Definition Zp_inv x := if coprime p x then inZp (egcdn x p).1 else x.
imports: HB(structures) mathcomp(ssreflect ssrfun ssrbool choice eqtype ssrnat seq div) mathcomp(fintype bigop finset prime fingroup) mathcomp(ssralg finalg countalg)