def wr.t5

bend-osdev-word64@0.1.1.0 · PROOF_text.bend:160

import bend-osdev-word64@0.1.1.0/PROOF_text.bend as PROOFText
import Base
import bend-osdev-u32@0.1.0.0/u32.bend as U
import bend-osdev-u32@0.1.0.0/LAWS.bend as UL

160def wr.t5(+x0: Nat) -> {U.U32Nat.dbl(x0, 10n) == Nat.mul(U.U32Nat.dbl(x0, 1n), 10n) : Nat}:
161  %Equal.sym(Nat, Nat.mul(10n, 1n), Nat.mul(1n, 10n), Equal.sym(Nat, Nat.mul(1n, 10n), Nat.mul(10n, 1n), UL.nat_mul_comm(1n, 10n))) : {U.U32Nat.dbl(x0, _) == Nat.mul(U.U32Nat.dbl(x0, 1n), 10n) : Nat}
162  %Equal.sym(Nat, U.U32Nat.dbl(x0, Nat.mul(1n, 10n)), Nat.mul(U.U32Nat.dbl(x0, 1n), 10n), Equal.sym(Nat, Nat.mul(U.U32Nat.dbl(x0, 1n), 10n), U.U32Nat.dbl(x0, Nat.mul(1n, 10n)), UL.dbl_mul_l(x0, 1n, 10n))) : {_ == Nat.mul(U.U32Nat.dbl(x0, 1n), 10n) : Nat}
163  {==}

Uses (6)

Used by (1)