simp
a✝ b c : ℤα
n : ℕ
a : ℤα
⊢ { z := Int.negSucc n * a.z, w := Int.negSucc n * a.w } =
    { z := -(Int.ofNat (Nat.succ n) * a.z), w := -(Int.ofNat (Nat.succ n) * a.w) }
a✝ b c : ℤα
n : ℕ
a : ℤα
⊢ Int.negSucc n * a.z = -((↑n + 1) * a.z) ∧ Int.negSucc n * a.w = -((↑n + 1) * a.w)