have : Positive a := sgn_positive.mpr ‹sgn a ≃ 1›
ℕ : Type
inst✝⁶ : Natural ℕ
ℤ : Type
inst✝⁵ : Core ℤ
inst✝⁴ : Addition ℤ
inst✝³ : Multiplication ℤ
inst✝² : Negation ℤ
inst✝¹ : Sign ℤ
a : ℤ
inst✝ : Sqrt1 (sgn a)
this : sgn a ≃ 1 ∨ sgn a ≃ -1
h✝ : sgn a ≃ 1
⊢ NonzeroWithSign a (sgn a)
ℕ : Type
inst✝⁶ : Natural ℕ
ℤ : Type
inst✝⁵ : Core ℤ
inst✝⁴ : Addition ℤ
inst✝³ : Multiplication ℤ
inst✝² : Negation ℤ
inst✝¹ : Sign ℤ
a : ℤ
inst✝ : Sqrt1 (sgn a)
this✝ : sgn a ≃ 1 ∨ sgn a ≃ -1
h✝ : sgn a ≃ 1
this : Positive a
⊢ NonzeroWithSign a (sgn a)