def z2

bend-collections-laws-math@1.0.0.0 · proofs/math/typed/f64bits.bend:163

import Base
import bend-collections-laws-math@1.0.0.0/spec/lib/common.bend as C
import bend-collections-laws-math@1.0.0.0/proofs/math/typed/width.bend as WW

163def z2(+a: Nat, +k: Nat, +b: Nat) -> {Nat.is_eq(Nat.add(a, C.shift(k, b)), 0n) == Bool.and(Nat.is_eq(a, 0n), Nat.is_eq(b, 0n)) : Bool}:
164  match a:
165    case 0n:
166      WW.shift_eq0(k, b)
167    case 1n+ +ap:
168      {==}