Sha.blocks: def of bend-collections-laws-crypto@1.0.0.0
Import: import bend-collections-laws-crypto@1.0.0.0/spec/crypto/sha.bend as Sha
Lines 145-151 of bend-collections-laws-crypto@1.0.0.0/spec/crypto/sha.bend: https://jend.leeeet.dev/read.txt?path=bend-collections-laws-crypto@1.0.0.0/spec/crypto/sha.bend&start_line=145&end_line=151

import Base
import bend-collections-laws-crypto@1.0.0.0/src/crypto/sha/state.bend as Types

def blocks(prepared: List<&2, List<&2, U32>>, +ks: List<&2, U32>) -> Types.State -> Types.State:
  match prepared:
    case Nil{}:
      s => s
    case block <> rest:
      next = blocks(rest, ks)
      s => next(compress(block, ks, s))

Uses (4):
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=List
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=U32
  https://jend.leeeet.dev/definition.txt?path=bend-collections-laws-crypto@1.0.0.0/spec/crypto/sha.bend&name=compress
  https://jend.leeeet.dev/definition.txt?path=bend-collections-laws-crypto@1.0.0.0/src/crypto/sha/state.bend&name=State