law to_nat_mul.m

lawful-words@0.1.0.0 · proof_u32.bend:417

import Base

417law to_nat_mul.m:
418  for +a: U32
419  for +b: U32
420  for +m: Nat
421  for +hm: {Nat.pow(2n, 32n) == m : Nat}
422  {U32.to_nat(U32.mul(a, b)) == Nat.mod(Nat.mul(U32.to_nat(a), U32.to_nat(b)), m) : Nat}