simpa using div_monotone (succ_le_iff_lt.mpr hk) ‖I‖
M : Type u_1
inst✝⁵ : Zero M
inst✝⁴ : One M
inst✝³ : Add M
inst✝² : Mul M
inst✝¹ : LT M
inst✝ : M ⊧ₘ* 𝐈𝚫₀ + 𝛀₁
L✝ A✝ U I L A : M
hU : (I # L) ^ 2 ≤ U
hIL : ‖‖I‖ ^ 2‖ ≤ ‖L‖
Ipos : 0 < I
k n : M
hk : k < ‖I‖ ^ 2
H : SeriesSegment U I L A k n
⊢ (k + 1) / ‖I‖ ≤ ‖I‖
no goals