def h16

bend-collections-laws-math@1.0.0.0 · proofs/math/typed/w64mul.bend:65

import Base
import bend-collections-laws-math@1.0.0.0/proofs/lib/word.bend as WD
import bend-collections-laws-math@1.0.0.0/proofs/math/u64/u64div.bend as PD

65def h16(+one: Nat, +h1: {one == 1n : Nat}, +c: U32, +pc: {c == U32{WD.pw(32n, 16n)} : U32}) -> {v(c) == WD.sc(16n, one) : Nat}:
66  PD.pow32(16n, {==}, one, h1, c, pc)