Metamath Proof Explorer


Theorem rge0scvg

Description: Implication of convergence for a nonnegative series. This could be used to shorten prmreclem6 . (Contributed by Thierry Arnoux, 28-Jul-2017)

Ref Expression
Assertion rge0scvg ⊢ F : ℕ ⟶ 0 +∞ ∧ seq 1 + F ∈ dom ⁡ ⇝ → sup ran ⁡ seq 1 + F ℝ < ∈ ℝ

Proof

Step Hyp Ref Expression
1 nnuz ⊢ ℕ = ℤ ≥ 1
2 1zzd ⊢ F : ℕ ⟶ 0 +∞ → 1 ∈ ℤ
3 rge0ssre ⊢ 0 +∞ ⊆ ℝ
4 fss ⊢ F : ℕ ⟶ 0 +∞ ∧ 0 +∞ ⊆ ℝ → F : ℕ ⟶ ℝ
5 3 4 mpan2 ⊢ F : ℕ ⟶ 0 +∞ → F : ℕ ⟶ ℝ
6 5 ffvelcdmda ⊢ F : ℕ ⟶ 0 +∞ ∧ j ∈ ℕ → F ⁡ j ∈ ℝ
7 1 2 6 serfre ⊢ F : ℕ ⟶ 0 +∞ → seq 1 + F : ℕ ⟶ ℝ
8 7 frnd ⊢ F : ℕ ⟶ 0 +∞ → ran ⁡ seq 1 + F ⊆ ℝ
9 8 adantr ⊢ F : ℕ ⟶ 0 +∞ ∧ seq 1 + F ∈ dom ⁡ ⇝ → ran ⁡ seq 1 + F ⊆ ℝ
10 1nn ⊢ 1 ∈ ℕ
11 fdm ⊢ seq 1 + F : ℕ ⟶ ℝ → dom ⁡ seq 1 + F = ℕ
12 10 11 eleqtrrid ⊢ seq 1 + F : ℕ ⟶ ℝ → 1 ∈ dom ⁡ seq 1 + F
13 ne0i ⊢ 1 ∈ dom ⁡ seq 1 + F → dom ⁡ seq 1 + F ≠ ∅
14 dm0rn0 ⊢ dom ⁡ seq 1 + F = ∅ ↔ ran ⁡ seq 1 + F = ∅
15 14 necon3bii ⊢ dom ⁡ seq 1 + F ≠ ∅ ↔ ran ⁡ seq 1 + F ≠ ∅
16 13 15 sylib ⊢ 1 ∈ dom ⁡ seq 1 + F → ran ⁡ seq 1 + F ≠ ∅
17 7 12 16 3syl ⊢ F : ℕ ⟶ 0 +∞ → ran ⁡ seq 1 + F ≠ ∅
18 17 adantr ⊢ F : ℕ ⟶ 0 +∞ ∧ seq 1 + F ∈ dom ⁡ ⇝ → ran ⁡ seq 1 + F ≠ ∅
19 1zzd ⊢ F : ℕ ⟶ 0 +∞ ∧ seq 1 + F ∈ dom ⁡ ⇝ → 1 ∈ ℤ
20 climdm ⊢ seq 1 + F ∈ dom ⁡ ⇝ ↔ seq 1 + F ⇝ ⇝ ⁡ seq 1 + F
21 20 bilani ⊢ F : ℕ ⟶ 0 +∞ ∧ seq 1 + F ∈ dom ⁡ ⇝ → seq 1 + F ⇝ ⇝ ⁡ seq 1 + F
22 7 adantr ⊢ F : ℕ ⟶ 0 +∞ ∧ seq 1 + F ∈ dom ⁡ ⇝ → seq 1 + F : ℕ ⟶ ℝ
23 22 ffvelcdmda ⊢ F : ℕ ⟶ 0 +∞ ∧ seq 1 + F ∈ dom ⁡ ⇝ ∧ k ∈ ℕ → seq 1 + F ⁡ k ∈ ℝ
24 1 19 21 23 climrecl ⊢ F : ℕ ⟶ 0 +∞ ∧ seq 1 + F ∈ dom ⁡ ⇝ → ⇝ ⁡ seq 1 + F ∈ ℝ
25 simpr ⊢ F : ℕ ⟶ 0 +∞ ∧ seq 1 + F ∈ dom ⁡ ⇝ ∧ k ∈ ℕ → k ∈ ℕ
26 21 adantr ⊢ F : ℕ ⟶ 0 +∞ ∧ seq 1 + F ∈ dom ⁡ ⇝ ∧ k ∈ ℕ → seq 1 + F ⇝ ⇝ ⁡ seq 1 + F
27 simplll ⊢ F : ℕ ⟶ 0 +∞ ∧ seq 1 + F ∈ dom ⁡ ⇝ ∧ k ∈ ℕ ∧ j ∈ ℕ → F : ℕ ⟶ 0 +∞
28 ffvelcdm ⊢ F : ℕ ⟶ 0 +∞ ∧ j ∈ ℕ → F ⁡ j ∈ 0 +∞
29 3 28 sselid ⊢ F : ℕ ⟶ 0 +∞ ∧ j ∈ ℕ → F ⁡ j ∈ ℝ
30 27 29 sylancom ⊢ F : ℕ ⟶ 0 +∞ ∧ seq 1 + F ∈ dom ⁡ ⇝ ∧ k ∈ ℕ ∧ j ∈ ℕ → F ⁡ j ∈ ℝ
31 elrege0 ⊢ F ⁡ j ∈ 0 +∞ ↔ F ⁡ j ∈ ℝ ∧ 0 ≤ F ⁡ j
32 31 simprbi ⊢ F ⁡ j ∈ 0 +∞ → 0 ≤ F ⁡ j
33 28 32 syl ⊢ F : ℕ ⟶ 0 +∞ ∧ j ∈ ℕ → 0 ≤ F ⁡ j
34 33 adantlr ⊢ F : ℕ ⟶ 0 +∞ ∧ seq 1 + F ∈ dom ⁡ ⇝ ∧ j ∈ ℕ → 0 ≤ F ⁡ j
35 34 adantlr ⊢ F : ℕ ⟶ 0 +∞ ∧ seq 1 + F ∈ dom ⁡ ⇝ ∧ k ∈ ℕ ∧ j ∈ ℕ → 0 ≤ F ⁡ j
36 1 25 26 30 35 climserle ⊢ F : ℕ ⟶ 0 +∞ ∧ seq 1 + F ∈ dom ⁡ ⇝ ∧ k ∈ ℕ → seq 1 + F ⁡ k ≤ ⇝ ⁡ seq 1 + F
37 36 ralrimiva ⊢ F : ℕ ⟶ 0 +∞ ∧ seq 1 + F ∈ dom ⁡ ⇝ → ∀ k ∈ ℕ seq 1 + F ⁡ k ≤ ⇝ ⁡ seq 1 + F
38 brralrspcev ⊢ ⇝ ⁡ seq 1 + F ∈ ℝ ∧ ∀ k ∈ ℕ seq 1 + F ⁡ k ≤ ⇝ ⁡ seq 1 + F → ∃ x ∈ ℝ ∀ k ∈ ℕ seq 1 + F ⁡ k ≤ x
39 24 37 38 syl2anc ⊢ F : ℕ ⟶ 0 +∞ ∧ seq 1 + F ∈ dom ⁡ ⇝ → ∃ x ∈ ℝ ∀ k ∈ ℕ seq 1 + F ⁡ k ≤ x
40 ffn ⊢ seq 1 + F : ℕ ⟶ ℝ → seq 1 + F Fn ℕ
41 breq1 ⊢ z = seq 1 + F ⁡ k → z ≤ x ↔ seq 1 + F ⁡ k ≤ x
42 41 ralrn ⊢ seq 1 + F Fn ℕ → ∀ z ∈ ran ⁡ seq 1 + F z ≤ x ↔ ∀ k ∈ ℕ seq 1 + F ⁡ k ≤ x
43 7 40 42 3syl ⊢ F : ℕ ⟶ 0 +∞ → ∀ z ∈ ran ⁡ seq 1 + F z ≤ x ↔ ∀ k ∈ ℕ seq 1 + F ⁡ k ≤ x
44 43 rexbidv ⊢ F : ℕ ⟶ 0 +∞ → ∃ x ∈ ℝ ∀ z ∈ ran ⁡ seq 1 + F z ≤ x ↔ ∃ x ∈ ℝ ∀ k ∈ ℕ seq 1 + F ⁡ k ≤ x
45 44 adantr ⊢ F : ℕ ⟶ 0 +∞ ∧ seq 1 + F ∈ dom ⁡ ⇝ → ∃ x ∈ ℝ ∀ z ∈ ran ⁡ seq 1 + F z ≤ x ↔ ∃ x ∈ ℝ ∀ k ∈ ℕ seq 1 + F ⁡ k ≤ x
46 39 45 mpbird ⊢ F : ℕ ⟶ 0 +∞ ∧ seq 1 + F ∈ dom ⁡ ⇝ → ∃ x ∈ ℝ ∀ z ∈ ran ⁡ seq 1 + F z ≤ x
47 suprcl ⊢ ran ⁡ seq 1 + F ⊆ ℝ ∧ ran ⁡ seq 1 + F ≠ ∅ ∧ ∃ x ∈ ℝ ∀ z ∈ ran ⁡ seq 1 + F z ≤ x → sup ran ⁡ seq 1 + F ℝ < ∈ ℝ
48 9 18 46 47 syl3anc ⊢ F : ℕ ⟶ 0 +∞ ∧ seq 1 + F ∈ dom ⁡ ⇝ → sup ran ⁡ seq 1 + F ℝ < ∈ ℝ