have : SameSign a b :=
  SameSign.mk ‹NonzeroWithSign a 1› ‹NonzeroWithSign b 1›
ℕ : Type
inst✝⁵ : Natural ℕ
ℤ : Type
inst✝⁴ : Core ℤ
inst✝³ : Addition ℤ
inst✝² : Multiplication ℤ
inst✝¹ : Negation ℤ
inst✝ : Sign ℤ
a b : ℤ
x✝¹ : Positive a
x✝ : Positive b
this✝ : NonzeroWithSign a 1
this : NonzeroWithSign b 1
⊢ Positive (a * b)
ℕ : Type
inst✝⁵ : Natural ℕ
ℤ : Type
inst✝⁴ : Core ℤ
inst✝³ : Addition ℤ
inst✝² : Multiplication ℤ
inst✝¹ : Negation ℤ
inst✝ : Sign ℤ
a b : ℤ
x✝¹ : Positive a
x✝ : Positive b
this✝¹ : NonzeroWithSign a 1
this✝ : NonzeroWithSign b 1
this : SameSign a b
⊢ Positive (a * b)