Michael.HsMichael.compress: def of bend-osdev-hashes@0.1.0.0
Import: import bend-osdev-hashes@0.1.0.0/michael.bend as Michael
Lines 41-47 of bend-osdev-hashes@0.1.0.0/michael.bend: https://jend.leeeet.dev/read.txt?path=bend-osdev-hashes@0.1.0.0/michael.bend&start_line=41&end_line=47

import Base
import bend-osdev-hashes@0.1.0.0/hashes.bend as Hs

# One four-byte word (any other length leaves the value unchanged)
def HsMichael.compress(lr: Hs.HsW2, blk: List<&2, U32>) -> Hs.HsW2:
  match blk:
    case [b0, b1, b2, b3]:
      hs.michael.word(lr, Hs.hs.le(b0, b1, b2, b3))
    case _:
      lr

Uses (5):
  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-osdev-hashes@0.1.0.0/hashes.bend&name=HsW2
  https://jend.leeeet.dev/definition.txt?path=bend-osdev-hashes@0.1.0.0/hashes.bend&name=hs.le
  https://jend.leeeet.dev/definition.txt?path=bend-osdev-hashes@0.1.0.0/michael.bend&name=hs.michael.word