def length_octets

bend-collections-laws-crypto@1.0.0.0 · src/crypto/sha/core.bend:196

import Base

196def length_octets(count: Nat, +n: Nat, acc: List<&2, U32>) -> List<&2, U32>:
197  match count:
198    case 0n:
199      acc
200    case 1n+p:
201      length_octets(p, Nat.div(n, 256n), U32.from_nat(Nat.mod(n, 256n)) <> acc)