def multiply

stelliferous@0.0.2.0 · proofs/bounded_u32_arithmetic.bend:118

import Base
import stelliferous@0.0.2.0/proofs/word_multiplication.bend as Multiplication

118def multiply(+a: U32,+b: U32,+cap: U32,cap_ok: {U32.is_le(cap,2147483648) == True{} : Bool},h: {Nat.is_le(Nat.mul(U32.to_nat(a),U32.to_nat(b)),
119      U32.to_nat(cap)) == True{} : Bool}) -> {U32.to_nat(U32.mul(a,b)) == Nat.mul(U32.to_nat(a),U32.to_nat(b)) : Nat}:
120  Multiplication.bounded_multiply(a,b,cap,cap_ok,h)