have : 1 ≃ sgn a := Rel.symm (sgn_positive.mp ‹Positive a›)
ℕ : Type
inst✝⁵ : Natural ℕ
ℤ : Type
inst✝⁴ : Core ℤ
inst✝³ : Addition ℤ
inst✝² : Multiplication ℤ
inst✝¹ : Negation ℤ
inst✝ : Sign ℤ
a : ℤ
x✝ : Nonzero a
this : Positive a ∨ Negative a
h✝ : Positive a
⊢ Sqrt1 (sgn a)
ℕ : Type
inst✝⁵ : Natural ℕ
ℤ : Type
inst✝⁴ : Core ℤ
inst✝³ : Addition ℤ
inst✝² : Multiplication ℤ
inst✝¹ : Negation ℤ
inst✝ : Sign ℤ
a : ℤ
x✝ : Nonzero a
this✝ : Positive a ∨ Negative a
h✝ : Positive a
this : 1 ≃ sgn a
⊢ Sqrt1 (sgn a)