Skip to content

Commit 5f8e867

Browse files
committed
chore: add atBot version of convergence lemmas, rename original lemma for disambiguation (leanprover-community#34413)
Cherry picked from leanprover-community#34055. Co-authored-by: sgouezel <sebastien.gouezel@univ-rennes1.fr>
1 parent c605a8b commit 5f8e867

4 files changed

Lines changed: 22 additions & 8 deletions

File tree

Mathlib/MeasureTheory/Integral/Lebesgue/DominatedConvergence.lean

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -122,7 +122,7 @@ lemma tendsto_of_lintegral_tendsto_of_monotone_aux {α : Type*} {mα : Measurabl
122122
have h_exists : ∀ᵐ a ∂μ, ∃ l, Tendsto (fun i ↦ f i a) atTop (𝓝 l) := by
123123
filter_upwards [h_bound, h_bound_finite, hf_mono] with a h_le h_fin h_mono
124124
have h_tendsto : Tendsto (fun i ↦ f i a) atTop atTop ∨
125-
∃ l, Tendsto (fun i ↦ f i a) atTop (𝓝 l) := tendsto_of_monotone h_mono
125+
∃ l, Tendsto (fun i ↦ f i a) atTop (𝓝 l) := tendsto_atTop_of_monotone h_mono
126126
rcases h_tendsto with h_absurd | h_tendsto
127127
· rw [tendsto_atTop_atTop_iff_of_monotone h_mono] at h_absurd
128128
obtain ⟨i, hi⟩ := h_absurd (F a + 1)
@@ -203,7 +203,7 @@ lemma tendsto_of_lintegral_tendsto_of_antitone {α : Type*} {mα : MeasurableSpa
203203
filter_upwards [h_bound] with a ha using ha 0
204204
have h_exists : ∀ᵐ a ∂μ, ∃ l, Tendsto (fun i ↦ f i a) atTop (𝓝 l) := by
205205
filter_upwards [hf_mono] with a h_mono
206-
rcases _root_.tendsto_of_antitone h_mono with h | h
206+
rcases _root_.tendsto_atTop_of_antitone h_mono with h | h
207207
· refine ⟨0, h.mono_right ?_⟩
208208
rw [OrderBot.atBot_eq]
209209
exact pure_le_nhds _

Mathlib/Probability/Kernel/IonescuTulcea/Traj.lean

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -393,7 +393,7 @@ theorem trajContent_tendsto_zero {A : ℕ → Set (Π n, X n)}
393393
exact lmarginalPartialTraj_mono _ _ (χ_anti hmn) _
394394
-- Therefore it converges to some function `lₖ`.
395395
have this k x : ∃ l, Tendsto (fun n ↦ lmarginalPartialTraj κ k (a n) (χ n) x) atTop (𝓝 l) := by
396-
obtain h | h := tendsto_of_antitone (anti_lma k x)
396+
obtain h | h := tendsto_atTop_of_antitone (anti_lma k x)
397397
· rw [OrderBot.atBot_eq] at h
398398
exact ⟨0, h.mono_right <| pure_le_nhds 0
399399
· exact h

Mathlib/Topology/Algebra/InfiniteSum/ENNReal.lean

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -384,7 +384,7 @@ theorem not_summable_iff_tendsto_nat_atTop {f : ℕ → ℝ≥0} :
384384
¬Summable f ↔ Tendsto (fun n : ℕ => ∑ i ∈ Finset.range n, f i) atTop atTop := by
385385
constructor
386386
· intro h
387-
refine ((tendsto_of_monotone ?_).resolve_right h).comp ?_
387+
refine ((tendsto_atTop_of_monotone ?_).resolve_right h).comp ?_
388388
exacts [Finset.sum_mono_set _, tendsto_finset_range]
389389
· rintro hnat ⟨r, hr⟩
390390
exact not_tendsto_nhds_of_tendsto_atTop hnat _ (hasSum_iff_tendsto_nat.1 hr)

Mathlib/Topology/Order/MonotoneConvergence.lean

Lines changed: 18 additions & 4 deletions
Original file line numberDiff line numberDiff line change
@@ -197,25 +197,39 @@ instance Pi.infConvergenceClass' {ι : Type*} [Preorder α] [TopologicalSpace α
197197
[InfConvergenceClass α] : InfConvergenceClass (ι → α) :=
198198
Pi.infConvergenceClass
199199

200-
theorem tendsto_of_monotone {ι α : Type*} [Preorder ι] [TopologicalSpace α]
200+
theorem tendsto_atTop_of_monotone {ι α : Type*} [Preorder ι] [TopologicalSpace α]
201201
[ConditionallyCompleteLinearOrder α] [OrderTopology α] {f : ι → α} (h_mono : Monotone f) :
202202
Tendsto f atTop atTop ∨ ∃ l, Tendsto f atTop (𝓝 l) := by
203203
classical
204204
exact if H : BddAbove (range f) then Or.inr ⟨_, tendsto_atTop_ciSup h_mono H⟩
205205
else Or.inl <| tendsto_atTop_atTop_of_monotone' h_mono H
206206

207-
theorem tendsto_of_antitone {ι α : Type*} [Preorder ι] [TopologicalSpace α]
207+
@[deprecated (since := "2026-01-22")] alias tendsto_of_monotone := tendsto_atTop_of_monotone
208+
209+
theorem tendsto_atTop_of_antitone {ι α : Type*} [Preorder ι] [TopologicalSpace α]
208210
[ConditionallyCompleteLinearOrder α] [OrderTopology α] {f : ι → α} (h_mono : Antitone f) :
209211
Tendsto f atTop atBot ∨ ∃ l, Tendsto f atTop (𝓝 l) :=
210-
@tendsto_of_monotone ι αᵒᵈ _ _ _ _ _ h_mono
212+
tendsto_atTop_of_monotone (α := αᵒᵈ) h_mono
213+
214+
@[deprecated (since := "2026-01-22")] alias tendsto_of_antitone := tendsto_atTop_of_antitone
215+
216+
theorem tendsto_atBot_of_monotone {ι α : Type*} [Preorder ι] [TopologicalSpace α]
217+
[ConditionallyCompleteLinearOrder α] [OrderTopology α] {f : ι → α} (h_mono : Monotone f) :
218+
Tendsto f atBot atBot ∨ ∃ l, Tendsto f atBot (𝓝 l) :=
219+
tendsto_atTop_of_monotone (ι := ιᵒᵈ) (α := αᵒᵈ) h_mono.dual
220+
221+
theorem tendsto_atBot_of_antitone {ι α : Type*} [Preorder ι] [TopologicalSpace α]
222+
[ConditionallyCompleteLinearOrder α] [OrderTopology α] {f : ι → α} (h_mono : Antitone f) :
223+
Tendsto f atBot atTop ∨ ∃ l, Tendsto f atBot (𝓝 l) :=
224+
tendsto_atTop_of_antitone (ι := ιᵒᵈ) (α := αᵒᵈ) h_mono.dual
211225

212226
theorem tendsto_iff_tendsto_subseq_of_monotone {ι₁ ι₂ α : Type*} [SemilatticeSup ι₁] [Preorder ι₂]
213227
[Nonempty ι₁] [TopologicalSpace α] [ConditionallyCompleteLinearOrder α] [OrderTopology α]
214228
[NoMaxOrder α] {f : ι₂ → α} {φ : ι₁ → ι₂} {l : α} (hf : Monotone f)
215229
(hg : Tendsto φ atTop atTop) : Tendsto f atTop (𝓝 l) ↔ Tendsto (f ∘ φ) atTop (𝓝 l) := by
216230
constructor <;> intro h
217231
· exact h.comp hg
218-
· rcases tendsto_of_monotone hf with (h' | ⟨l', hl'⟩)
232+
· rcases tendsto_atTop_of_monotone hf with (h' | ⟨l', hl'⟩)
219233
· exact (not_tendsto_atTop_of_tendsto_nhds h (h'.comp hg)).elim
220234
· rwa [tendsto_nhds_unique h (hl'.comp hg)]
221235

0 commit comments

Comments
 (0)