Laws.sha256_packed_correct: law of bend-collections@1.0.0.0
Import: import bend-collections@1.0.0.0/proofs/crypto/sha/packed/laws.bend as Laws
Lines 29-33 of bend-collections@1.0.0.0/proofs/crypto/sha/packed/laws.bend: https://jend.leeeet.dev/read.txt?path=bend-collections@1.0.0.0/proofs/crypto/sha/packed/laws.bend&start_line=29&end_line=33

import Base
import bend-collections@1.0.0.0/proofs/crypto/sha/packed/legacy_model.bend as SHA
import bend-collections@1.0.0.0/spec/crypto/sha/packed.bend as PackedSpec

# A separate packed-format contract; the original list-to-FIPS theorem is unchanged.
law sha256_packed_correct:
  for words: Array<U32>
  for +byte_length: Nat
  {SHA.sha256_packed(words,byte_length) == PackedSpec.sha256(words,byte_length) : Maybe<&2,List<&2,U32>>}

Uses (8):
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Array
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=List
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Maybe
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Nat
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=U32
  https://jend.leeeet.dev/definition.txt?path=bend-collections@1.0.0.0/proofs/crypto/sha/packed/legacy_model.bend&name=sha256_packed
  https://jend.leeeet.dev/definition.txt?path=bend-collections@1.0.0.0/proofs/crypto/sha/packed/packed_proof.bend&name=sha256_correct
  https://jend.leeeet.dev/definition.txt?path=bend-collections@1.0.0.0/spec/crypto/sha/packed.bend&name=sha256