proposition: Lemma OneCToZ_wones: forall sz : nat, OneCToZ (wones sz) = 0.
proof: Proof. unfold OneCToZ. destruct sz; [reflexivity|]. rewrite wmsb_wones, wnot_wones_wzero, wordToN_wzero. reflexivity. Qed.
imports: Fiat.Common.Coq__8_4__8_5__Compat List Bedrock.Word Coq.ZArith.ZArith Coq.micromega.Psatz NArith NArithRing ZArith ZArithRing Program Coq.micromega.Psatz