def zeros_onto

bend-collections-laws-crypto@1.0.0.0 · proofs/crypto/sha/packed/core_model.bend:482

import Base

482def zeros_onto(z: Nat, acc: List<&2, U32>) -> List<&2, U32>:
483  match z:
484    case 0n:
485      acc
486    case 1n+p:
487      zeros_onto(p, 0 <> acc)