fact: Definition int_of_Z (m : Znp) : int := match m with | Zpos p => p%:Z | Zneg p => -(val p)%:Z end.
imports: mathcomp(ssreflect ssrfun ssrbool eqtype ssrnat div seq) mathcomp(path choice fintype tuple finset bigop order) mathcomp(ssralg zmodp ssrnum ssrint) CoqEAL(hrel param refinements pos)