Keccak.partial: def of bend-collections@1.0.0.0
Import: import bend-collections@1.0.0.0/src/crypto/keccak/keccak.bend as Keccak
Lines 150-157 of bend-collections@1.0.0.0/src/crypto/keccak/keccak.bend: https://jend.leeeet.dev/read.txt?path=bend-collections@1.0.0.0/src/crypto/keccak/keccak.bend&start_line=150&end_line=157

import Base

# Little-endian Keccak pad10*1, domain suffix 0x01.
def partial(w: U32, delta: Nat) -> U32:
  match delta:
    case 0n: 1
    case 1n: U32.or(U32.and(w,255),256)
    case 2n: U32.or(U32.and(w,65535),65536)
    case 3n: U32.or(U32.and(w,16777215),16777216)
    case _: w

Uses (4):
  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=Base/base.bend&name=U32.and
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=U32.or