law word_or_split

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

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

555law word_or_split:
556  for +n: Nat
557  for +a: Word(n)
558  for +b: Word(n)
559  for +k: Nat
560  for +q: Nat
561  for e: {Word.to_nat(n, a) == U.U32Nat.dbl(k, q) : Nat}
562  for h: {Nat.is_lt(Word.to_nat(n, b), U.U32Nat.dbl(k, 1n)) == True{} : Bool}
563  {Word.to_nat(n, Word.or(n, a, b)) == Nat.add(Word.to_nat(n, a), Word.to_nat(n, b)) : Nat}