fact: Fixpoint Vector_checksum_bound n {sz} (bytes :ByteBuffer.t sz) acc : W16 := match n, bytes with | 0, _ => acc | _, Vector.nil => acc | S 0, Vector.cons x _ _ => add_bytes_into_checksum x (wzero _) acc | _, Vector.cons x _ Vector.nil => add_bytes_into_checksum x (wzero _) acc | S (S n'), Vector.cons x _ (Vector.cons y _ t) => (Vector_checksum_bound n' t (add_bytes_into_checksum x y acc)) end%nat.
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 AlignedByteString Permutation