def to32

bend-collections-laws-math@1.0.0.0 · proofs/math/typed/fixbytes.bend:75

import Base
import bend-collections-laws-math@1.0.0.0/spec/lib/common.bend as C
import bend-collections-laws-math@1.0.0.0/proofs/math/typed/w64sh.bend as SH

75def to32(+k: Nat, +hk: {Nat.is_le(Nat.add(8n, k), 32n) == True{} : Bool}, +n: Nat, +h: {C.fits(Nat.add(8n, k), n) == True{} : Bool}) -> {C.fits(32n, n) == True{} : Bool}:
76  SH.fits_mono(Nat.add(8n, k), 32n, n, hk, h)