def wv.q0

bend-osdev-word64@0.1.1.0 · proof_value.bend:291

import bend-osdev-word64@0.1.1.0/proof_value.bend as ProofValue

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

291def wv.q0(+n: Nat) -> {wv.Q(n, 0n) == 0n : Nat}:
292  Equal.trans(Nat, U.U32Nat.dbl(n, U.U32Nat.dbl(n, 0n)), U.U32Nat.dbl(n, 0n), 0n, Equal.cong(Nat, Nat, v => U.U32Nat.dbl(n, v), U.U32Nat.dbl(n, 0n), 0n, UL.dbl_zero(n)), UL.dbl_zero(n))

Uses (6)

Used by (3)