change (⟨Int.ofNat (n + 1), 0⟩ : ℤα) = (⟨Int.ofNat n + 1, 0⟩ : ℤα)
a b c : ℤα
n : ℕ
⊢ natCast (n + 1) = add (natCast n) one
a b c : ℤα
n : ℕ
⊢ { z := Int.ofNat (n + 1), w := 0 } = { z := Int.ofNat n + 1, w := 0 }