law word_mul_wrap

bend-osdev-u32@0.1.0.0 · LAWS.bend:460

import Base
import bend-osdev-u32@0.1.0.0/u32.bend as U

460law word_mul_wrap:
461  for +n: Nat
462  for +a: Word(n)
463  for +b: Word(n)
464  {Nat.add(Word.to_nat(n, Word.mul(n, a, b)), U.U32Nat.dbl(n, U.U32Nat.high(n, Nat.mul(Word.to_nat(n, a), Word.to_nat(n, b))))) == Nat.mul(Word.to_nat(n, a), Word.to_nat(n, b)) : Nat}