rw [← not_not (a := (n = ⊤)), ← Ne, ne_top_iff_exists]
α : Type u_1
β : Type u_2
ι : Type u_3
s : Set α
n : ℕ∞
h : ∀ (m : ℕ), ↑m < n
⊢ n = ⊤
α : Type u_1
β : Type u_2
ι : Type u_3
s : Set α
n : ℕ∞
h : ∀ (m : ℕ), ↑m < n
⊢ ¬∃ a, ↑a = n