refine ne_of_gt (lt_of_lt_of_le zero_lt_one ?_)
case hp'
p q : ℝ≥0∞
hpq : p⁻¹ + q⁻¹ = 1
hp✝ : p ≠ ⊤
hq✝ : q ≠ ⊤
hp : 1 < p ∧ p ≠ ⊤
hq : 1 < q ∧ q ≠ ⊤
⊢ p ≠ 0
case hp'
p q : ℝ≥0∞
hpq : p⁻¹ + q⁻¹ = 1
hp✝ : p ≠ ⊤
hq✝ : q ≠ ⊤
hp : 1 < p ∧ p ≠ ⊤
hq : 1 < q ∧ q ≠ ⊤
⊢ 1 ≤ p