symm
case h.refine_3.intro
s : ℕ → ℤ
hs : ∀ (i : ℕ), s i < s (i + 1)
z : ℤ
hs0 : s 0 < z
hmono : StrictMono s
S : Set ℕ := {i | z ≤ s (i + 1)}
h3 : ∃ j, j ∈ S
m : ℕ
hm1 : s m < z
hm2 : z ≤ s (m + 1)
⊢ m = Nat.find h3
case h.refine_3.intro
s : ℕ → ℤ
hs : ∀ (i : ℕ), s i < s (i + 1)
z : ℤ
hs0 : s 0 < z
hmono : StrictMono s
S : Set ℕ := {i | z ≤ s (i + 1)}
h3 : ∃ j, j ∈ S
m : ℕ
hm1 : s m < z
hm2 : z ≤ s (m + 1)
⊢ Nat.find h3 = m