proposition: Lemma ones_decomp n : ones n.+1 = consB true (ones n).
proof: Proof. by apply val_inj. 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