proposition: Lemma decB_fromSuccNat n m : decB (n:=n) #(m.+1) = #m.
proof: Proof. destruct n => //. apply toZp_inj. autorewrite with ZpHom. rewrite -(addn1 m) GRing.natrD. by rewrite GRing.addrK. Qed.
imports: HB(structures) mathcomp.ssreflect.ssreflect mathcomp(ssrfun ssrbool eqtype ssrnat seq fintype tuple zmodp div) ssrextra.tuple ssrextra.nat spec spec.properties operations mathcomp(ssralg)