MPE Home Metamath Proof Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >  climcndslem2 Structured version   Visualization version   GIF version

Theorem climcndslem2 16019
Description: Lemma for climcnds 16020: bound the condensed series by the original series. (Contributed by Mario Carneiro, 18-Jul-2014.) (Proof shortened by AV, 10-Jul-2022.)
Hypotheses
Ref Expression
climcnds.1 ((𝜑 ∧ 𝑘 ∈ ℕ) → (𝐹‘𝑘) ∈ ℝ)
climcnds.2 ((𝜑 ∧ 𝑘 ∈ ℕ) → 0 ≤ (𝐹‘𝑘))
climcnds.3 ((𝜑 ∧ 𝑘 ∈ ℕ) → (𝐹‘(𝑘 + 1)) ≤ (𝐹‘𝑘))
climcnds.4 ((𝜑 ∧ 𝑛 ∈ ℕ0) → (𝐺‘𝑛) = ((2↑𝑛) · (𝐹‘(2↑𝑛))))
Assertion
Ref Expression
climcndslem2 ((𝜑 ∧ 𝑁 ∈ ℕ) → (seq1( + , 𝐺)‘𝑁) ≤ (2 · (seq1( + , 𝐹)‘(2↑𝑁))))
Distinct variable groups:   𝑘,𝑛,𝐹   𝑘,𝐺,𝑛   𝜑,𝑘,𝑛
Allowed substitution hints:   𝑁(𝑘, 𝑛)

Proof of Theorem climcndslem2
Dummy variables 𝑗 𝑥 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 fveq2 6885 . . . . 5 (𝑥 = 1 → (seq1( + , 𝐺)‘𝑥) = (seq1( + , 𝐺)‘1))
2 oveq2 7428 . . . . . . . 8 (𝑥 = 1 → (2↑𝑥) = (2↑1))
3 2cn 12418 . . . . . . . . 9 2 ∈ ℂ
4 exp1 14210 . . . . . . . . 9 (2 ∈ ℂ → (2↑1) = 2)
53, 4ax-mp 5 . . . . . . . 8 (2↑1) = 2
62, 5eqtrdi 2811 . . . . . . 7 (𝑥 = 1 → (2↑𝑥) = 2)
76fveq2d 6889 . . . . . 6 (𝑥 = 1 → (seq1( + , 𝐹)‘(2↑𝑥)) = (seq1( + , 𝐹)‘2))
87oveq2d 7436 . . . . 5 (𝑥 = 1 → (2 · (seq1( + , 𝐹)‘(2↑𝑥))) = (2 · (seq1( + , 𝐹)‘2)))
91, 8breq12d 5115 . . . 4 (𝑥 = 1 → ((seq1( + , 𝐺)‘𝑥) ≤ (2 · (seq1( + , 𝐹)‘(2↑𝑥))) ↔ (seq1( + , 𝐺)‘1) ≤ (2 · (seq1( + , 𝐹)‘2))))
109imbi2d 343 . . 3 (𝑥 = 1 → ((𝜑 → (seq1( + , 𝐺)‘𝑥) ≤ (2 · (seq1( + , 𝐹)‘(2↑𝑥)))) ↔ (𝜑 → (seq1( + , 𝐺)‘1) ≤ (2 · (seq1( + , 𝐹)‘2)))))
11 fveq2 6885 . . . . 5 (𝑥 = 𝑗 → (seq1( + , 𝐺)‘𝑥) = (seq1( + , 𝐺)‘𝑗))
12 oveq2 7428 . . . . . . 7 (𝑥 = 𝑗 → (2↑𝑥) = (2↑𝑗))
1312fveq2d 6889 . . . . . 6 (𝑥 = 𝑗 → (seq1( + , 𝐹)‘(2↑𝑥)) = (seq1( + , 𝐹)‘(2↑𝑗)))
1413oveq2d 7436 . . . . 5 (𝑥 = 𝑗 → (2 · (seq1( + , 𝐹)‘(2↑𝑥))) = (2 · (seq1( + , 𝐹)‘(2↑𝑗))))
1511, 14breq12d 5115 . . . 4 (𝑥 = 𝑗 → ((seq1( + , 𝐺)‘𝑥) ≤ (2 · (seq1( + , 𝐹)‘(2↑𝑥))) ↔ (seq1( + , 𝐺)‘𝑗) ≤ (2 · (seq1( + , 𝐹)‘(2↑𝑗)))))
1615imbi2d 343 . . 3 (𝑥 = 𝑗 → ((𝜑 → (seq1( + , 𝐺)‘𝑥) ≤ (2 · (seq1( + , 𝐹)‘(2↑𝑥)))) ↔ (𝜑 → (seq1( + , 𝐺)‘𝑗) ≤ (2 · (seq1( + , 𝐹)‘(2↑𝑗))))))
17 fveq2 6885 . . . . 5 (𝑥 = (𝑗 + 1) → (seq1( + , 𝐺)‘𝑥) = (seq1( + , 𝐺)‘(𝑗 + 1)))
18 oveq2 7428 . . . . . . 7 (𝑥 = (𝑗 + 1) → (2↑𝑥) = (2↑(𝑗 + 1)))
1918fveq2d 6889 . . . . . 6 (𝑥 = (𝑗 + 1) → (seq1( + , 𝐹)‘(2↑𝑥)) = (seq1( + , 𝐹)‘(2↑(𝑗 + 1))))
2019oveq2d 7436 . . . . 5 (𝑥 = (𝑗 + 1) → (2 · (seq1( + , 𝐹)‘(2↑𝑥))) = (2 · (seq1( + , 𝐹)‘(2↑(𝑗 + 1)))))
2117, 20breq12d 5115 . . . 4 (𝑥 = (𝑗 + 1) → ((seq1( + , 𝐺)‘𝑥) ≤ (2 · (seq1( + , 𝐹)‘(2↑𝑥))) ↔ (seq1( + , 𝐺)‘(𝑗 + 1)) ≤ (2 · (seq1( + , 𝐹)‘(2↑(𝑗 + 1))))))
2221imbi2d 343 . . 3 (𝑥 = (𝑗 + 1) → ((𝜑 → (seq1( + , 𝐺)‘𝑥) ≤ (2 · (seq1( + , 𝐹)‘(2↑𝑥)))) ↔ (𝜑 → (seq1( + , 𝐺)‘(𝑗 + 1)) ≤ (2 · (seq1( + , 𝐹)‘(2↑(𝑗 + 1)))))))
23 fveq2 6885 . . . . 5 (𝑥 = 𝑁 → (seq1( + , 𝐺)‘𝑥) = (seq1( + , 𝐺)‘𝑁))
24 oveq2 7428 . . . . . . 7 (𝑥 = 𝑁 → (2↑𝑥) = (2↑𝑁))
2524fveq2d 6889 . . . . . 6 (𝑥 = 𝑁 → (seq1( + , 𝐹)‘(2↑𝑥)) = (seq1( + , 𝐹)‘(2↑𝑁)))
2625oveq2d 7436 . . . . 5 (𝑥 = 𝑁 → (2 · (seq1( + , 𝐹)‘(2↑𝑥))) = (2 · (seq1( + , 𝐹)‘(2↑𝑁))))
2723, 26breq12d 5115 . . . 4 (𝑥 = 𝑁 → ((seq1( + , 𝐺)‘𝑥) ≤ (2 · (seq1( + , 𝐹)‘(2↑𝑥))) ↔ (seq1( + , 𝐺)‘𝑁) ≤ (2 · (seq1( + , 𝐹)‘(2↑𝑁)))))
2827imbi2d 343 . . 3 (𝑥 = 𝑁 → ((𝜑 → (seq1( + , 𝐺)‘𝑥) ≤ (2 · (seq1( + , 𝐹)‘(2↑𝑥)))) ↔ (𝜑 → (seq1( + , 𝐺)‘𝑁) ≤ (2 · (seq1( + , 𝐹)‘(2↑𝑁))))))
29 fveq2 6885 . . . . . . . 8 (𝑘 = 1 → (𝐹‘𝑘) = (𝐹‘1))
3029breq2d 5114 . . . . . . 7 (𝑘 = 1 → (0 ≤ (𝐹‘𝑘) ↔ 0 ≤ (𝐹‘1)))
31 climcnds.2 . . . . . . . 8 ((𝜑 ∧ 𝑘 ∈ ℕ) → 0 ≤ (𝐹‘𝑘))
3231ralrimiva 3154 . . . . . . 7 (𝜑 → ∀𝑘 ∈ ℕ 0 ≤ (𝐹‘𝑘))
33 1nn 12346 . . . . . . . 8 1 ∈ ℕ
3433a1i 11 . . . . . . 7 (𝜑 → 1 ∈ ℕ)
3530, 32, 34rspcdva 3577 . . . . . 6 (𝜑 → 0 ≤ (𝐹‘1))
36 fveq2 6885 . . . . . . . . 9 (𝑘 = 2 → (𝐹‘𝑘) = (𝐹‘2))
3736eleq1d 2845 . . . . . . . 8 (𝑘 = 2 → ((𝐹‘𝑘) ∈ ℝ ↔ (𝐹‘2) ∈ ℝ))
38 climcnds.1 . . . . . . . . 9 ((𝜑 ∧ 𝑘 ∈ ℕ) → (𝐹‘𝑘) ∈ ℝ)
3938ralrimiva 3154 . . . . . . . 8 (𝜑 → ∀𝑘 ∈ ℕ (𝐹‘𝑘) ∈ ℝ)
40 2nn 12416 . . . . . . . . 9 2 ∈ ℕ
4140a1i 11 . . . . . . . 8 (𝜑 → 2 ∈ ℕ)
4237, 39, 41rspcdva 3577 . . . . . . 7 (𝜑 → (𝐹‘2) ∈ ℝ)
4329eleq1d 2845 . . . . . . . 8 (𝑘 = 1 → ((𝐹‘𝑘) ∈ ℝ ↔ (𝐹‘1) ∈ ℝ))
4443, 39, 34rspcdva 3577 . . . . . . 7 (𝜑 → (𝐹‘1) ∈ ℝ)
4542, 44addge02d 11905 . . . . . 6 (𝜑 → (0 ≤ (𝐹‘1) ↔ (𝐹‘2) ≤ ((𝐹‘1) + (𝐹‘2))))
4635, 45mpbid 235 . . . . 5 (𝜑 → (𝐹‘2) ≤ ((𝐹‘1) + (𝐹‘2)))
4744, 42readdcld 11338 . . . . . 6 (𝜑 → ((𝐹‘1) + (𝐹‘2)) ∈ ℝ)
4841nnrpd 13162 . . . . . 6 (𝜑 → 2 ∈ ℝ+)
4942, 47, 48lemul2d 13208 . . . . 5 (𝜑 → ((𝐹‘2) ≤ ((𝐹‘1) + (𝐹‘2)) ↔ (2 · (𝐹‘2)) ≤ (2 · ((𝐹‘1) + (𝐹‘2)))))
5046, 49mpbid 235 . . . 4 (𝜑 → (2 · (𝐹‘2)) ≤ (2 · ((𝐹‘1) + (𝐹‘2))))
51 1z 12726 . . . . 5 1 ∈ ℤ
52 fveq2 6885 . . . . . . 7 (𝑛 = 1 → (𝐺‘𝑛) = (𝐺‘1))
53 oveq2 7428 . . . . . . . . 9 (𝑛 = 1 → (2↑𝑛) = (2↑1))
5453, 5eqtrdi 2811 . . . . . . . 8 (𝑛 = 1 → (2↑𝑛) = 2)
5554fveq2d 6889 . . . . . . . 8 (𝑛 = 1 → (𝐹‘(2↑𝑛)) = (𝐹‘2))
5654, 55oveq12d 7438 . . . . . . 7 (𝑛 = 1 → ((2↑𝑛) · (𝐹‘(2↑𝑛))) = (2 · (𝐹‘2)))
5752, 56eqeq12d 2776 . . . . . 6 (𝑛 = 1 → ((𝐺‘𝑛) = ((2↑𝑛) · (𝐹‘(2↑𝑛))) ↔ (𝐺‘1) = (2 · (𝐹‘2))))
58 climcnds.4 . . . . . . 7 ((𝜑 ∧ 𝑛 ∈ ℕ0) → (𝐺‘𝑛) = ((2↑𝑛) · (𝐹‘(2↑𝑛))))
5958ralrimiva 3154 . . . . . 6 (𝜑 → ∀𝑛 ∈ ℕ0 (𝐺‘𝑛) = ((2↑𝑛) · (𝐹‘(2↑𝑛))))
60 1nn0 12622 . . . . . . 7 1 ∈ ℕ0
6160a1i 11 . . . . . 6 (𝜑 → 1 ∈ ℕ0)
6257, 59, 61rspcdva 3577 . . . . 5 (𝜑 → (𝐺‘1) = (2 · (𝐹‘2)))
6351, 62seq1i 14158 . . . 4 (𝜑 → (seq1( + , 𝐺)‘1) = (2 · (𝐹‘2)))
64 nnuz 13004 . . . . . 6 ℕ = (ℤ≥‘1)
65 df-2 12405 . . . . . 6 2 = (1 + 1)
66 eqidd 2761 . . . . . . 7 (𝜑 → (𝐹‘1) = (𝐹‘1))
6751, 66seq1i 14158 . . . . . 6 (𝜑 → (seq1( + , 𝐹)‘1) = (𝐹‘1))
68 eqidd 2761 . . . . . 6 (𝜑 → (𝐹‘2) = (𝐹‘2))
6964, 34, 65, 67, 68seqp1d 14161 . . . . 5 (𝜑 → (seq1( + , 𝐹)‘2) = ((𝐹‘1) + (𝐹‘2)))
7069oveq2d 7436 . . . 4 (𝜑 → (2 · (seq1( + , 𝐹)‘2)) = (2 · ((𝐹‘1) + (𝐹‘2))))
7150, 63, 703brtr4d 5136 . . 3 (𝜑 → (seq1( + , 𝐺)‘1) ≤ (2 · (seq1( + , 𝐹)‘2)))
72 fveq2 6885 . . . . . . . . . . 11 (𝑛 = (𝑗 + 1) → (𝐺‘𝑛) = (𝐺‘(𝑗 + 1)))
73 oveq2 7428 . . . . . . . . . . . 12 (𝑛 = (𝑗 + 1) → (2↑𝑛) = (2↑(𝑗 + 1)))
7473fveq2d 6889 . . . . . . . . . . . 12 (𝑛 = (𝑗 + 1) → (𝐹‘(2↑𝑛)) = (𝐹‘(2↑(𝑗 + 1))))
7573, 74oveq12d 7438 . . . . . . . . . . 11 (𝑛 = (𝑗 + 1) → ((2↑𝑛) · (𝐹‘(2↑𝑛))) = ((2↑(𝑗 + 1)) · (𝐹‘(2↑(𝑗 + 1)))))
7672, 75eqeq12d 2776 . . . . . . . . . 10 (𝑛 = (𝑗 + 1) → ((𝐺‘𝑛) = ((2↑𝑛) · (𝐹‘(2↑𝑛))) ↔ (𝐺‘(𝑗 + 1)) = ((2↑(𝑗 + 1)) · (𝐹‘(2↑(𝑗 + 1))))))
7759adantr 486 . . . . . . . . . 10 ((𝜑 ∧ 𝑗 ∈ ℕ) → ∀𝑛 ∈ ℕ0 (𝐺‘𝑛) = ((2↑𝑛) · (𝐹‘(2↑𝑛))))
78 peano2nn 12347 . . . . . . . . . . . 12 (𝑗 ∈ ℕ → (𝑗 + 1) ∈ ℕ)
7978adantl 487 . . . . . . . . . . 11 ((𝜑 ∧ 𝑗 ∈ ℕ) → (𝑗 + 1) ∈ ℕ)
8079nnnn0d 12667 . . . . . . . . . 10 ((𝜑 ∧ 𝑗 ∈ ℕ) → (𝑗 + 1) ∈ ℕ0)
8176, 77, 80rspcdva 3577 . . . . . . . . 9 ((𝜑 ∧ 𝑗 ∈ ℕ) → (𝐺‘(𝑗 + 1)) = ((2↑(𝑗 + 1)) · (𝐹‘(2↑(𝑗 + 1)))))
82 nnnn0 12613 . . . . . . . . . . . . 13 (𝑗 ∈ ℕ → 𝑗 ∈ ℕ0)
8382adantl 487 . . . . . . . . . . . 12 ((𝜑 ∧ 𝑗 ∈ ℕ) → 𝑗 ∈ ℕ0)
84 expp1 14211 . . . . . . . . . . . 12 ((2 ∈ ℂ ∧ 𝑗 ∈ ℕ0) → (2↑(𝑗 + 1)) = ((2↑𝑗) · 2))
853, 83, 84sylancr 599 . . . . . . . . . . 11 ((𝜑 ∧ 𝑗 ∈ ℕ) → (2↑(𝑗 + 1)) = ((2↑𝑗) · 2))
86 nnexpcl 14217 . . . . . . . . . . . . . . 15 ((2 ∈ ℕ ∧ 𝑗 ∈ ℕ0) → (2↑𝑗) ∈ ℕ)
8740, 82, 86sylancr 599 . . . . . . . . . . . . . 14 (𝑗 ∈ ℕ → (2↑𝑗) ∈ ℕ)
8887adantl 487 . . . . . . . . . . . . 13 ((𝜑 ∧ 𝑗 ∈ ℕ) → (2↑𝑗) ∈ ℕ)
8988nncnd 12351 . . . . . . . . . . . 12 ((𝜑 ∧ 𝑗 ∈ ℕ) → (2↑𝑗) ∈ ℂ)
90 mulcom 11286 . . . . . . . . . . . 12 (((2↑𝑗) ∈ ℂ ∧ 2 ∈ ℂ) → ((2↑𝑗) · 2) = (2 · (2↑𝑗)))
9189, 3, 90sylancl 598 . . . . . . . . . . 11 ((𝜑 ∧ 𝑗 ∈ ℕ) → ((2↑𝑗) · 2) = (2 · (2↑𝑗)))
9285, 91eqtrd 2795 . . . . . . . . . 10 ((𝜑 ∧ 𝑗 ∈ ℕ) → (2↑(𝑗 + 1)) = (2 · (2↑𝑗)))
9392oveq1d 7435 . . . . . . . . 9 ((𝜑 ∧ 𝑗 ∈ ℕ) → ((2↑(𝑗 + 1)) · (𝐹‘(2↑(𝑗 + 1)))) = ((2 · (2↑𝑗)) · (𝐹‘(2↑(𝑗 + 1)))))
943a1i 11 . . . . . . . . . 10 ((𝜑 ∧ 𝑗 ∈ ℕ) → 2 ∈ ℂ)
95 fveq2 6885 . . . . . . . . . . . . 13 (𝑘 = (2↑(𝑗 + 1)) → (𝐹‘𝑘) = (𝐹‘(2↑(𝑗 + 1))))
9695eleq1d 2845 . . . . . . . . . . . 12 (𝑘 = (2↑(𝑗 + 1)) → ((𝐹‘𝑘) ∈ ℝ ↔ (𝐹‘(2↑(𝑗 + 1))) ∈ ℝ))
9739adantr 486 . . . . . . . . . . . 12 ((𝜑 ∧ 𝑗 ∈ ℕ) → ∀𝑘 ∈ ℕ (𝐹‘𝑘) ∈ ℝ)
98 nnexpcl 14217 . . . . . . . . . . . . 13 ((2 ∈ ℕ ∧ (𝑗 + 1) ∈ ℕ0) → (2↑(𝑗 + 1)) ∈ ℕ)
9940, 80, 98sylancr 599 . . . . . . . . . . . 12 ((𝜑 ∧ 𝑗 ∈ ℕ) → (2↑(𝑗 + 1)) ∈ ℕ)
10096, 97, 99rspcdva 3577 . . . . . . . . . . 11 ((𝜑 ∧ 𝑗 ∈ ℕ) → (𝐹‘(2↑(𝑗 + 1))) ∈ ℝ)
101100recnd 11337 . . . . . . . . . 10 ((𝜑 ∧ 𝑗 ∈ ℕ) → (𝐹‘(2↑(𝑗 + 1))) ∈ ℂ)
10294, 89, 101mulassd 11332 . . . . . . . . 9 ((𝜑 ∧ 𝑗 ∈ ℕ) → ((2 · (2↑𝑗)) · (𝐹‘(2↑(𝑗 + 1)))) = (2 · ((2↑𝑗) · (𝐹‘(2↑(𝑗 + 1))))))
10381, 93, 1023eqtrd 2799 . . . . . . . 8 ((𝜑 ∧ 𝑗 ∈ ℕ) → (𝐺‘(𝑗 + 1)) = (2 · ((2↑𝑗) · (𝐹‘(2↑(𝑗 + 1))))))
10488nnnn0d 12667 . . . . . . . . . . . . . . 15 ((𝜑 ∧ 𝑗 ∈ ℕ) → (2↑𝑗) ∈ ℕ0)
105 hashfz1 14490 . . . . . . . . . . . . . . 15 ((2↑𝑗) ∈ ℕ0 → (♯‘(1...(2↑𝑗))) = (2↑𝑗))
106104, 105syl 18 . . . . . . . . . . . . . 14 ((𝜑 ∧ 𝑗 ∈ ℕ) → (♯‘(1...(2↑𝑗))) = (2↑𝑗))
107106, 89eqeltrd 2860 . . . . . . . . . . . . 13 ((𝜑 ∧ 𝑗 ∈ ℕ) → (♯‘(1...(2↑𝑗))) ∈ ℂ)
108 fzfid 14116 . . . . . . . . . . . . . . 15 ((𝜑 ∧ 𝑗 ∈ ℕ) → (((2↑𝑗) + 1)...(2↑(𝑗 + 1))) ∈ Fin)
109 hashcl 14500 . . . . . . . . . . . . . . 15 ((((2↑𝑗) + 1)...(2↑(𝑗 + 1))) ∈ Fin → (♯‘(((2↑𝑗) + 1)...(2↑(𝑗 + 1)))) ∈ ℕ0)
110108, 109syl 18 . . . . . . . . . . . . . 14 ((𝜑 ∧ 𝑗 ∈ ℕ) → (♯‘(((2↑𝑗) + 1)...(2↑(𝑗 + 1)))) ∈ ℕ0)
111110nn0cnd 12669 . . . . . . . . . . . . 13 ((𝜑 ∧ 𝑗 ∈ ℕ) → (♯‘(((2↑𝑗) + 1)...(2↑(𝑗 + 1)))) ∈ ℂ)
112 simpr 490 . . . . . . . . . . . . . . . . . . 19 ((𝜑 ∧ 𝑗 ∈ ℕ) → 𝑗 ∈ ℕ)
113112nnzd 12719 . . . . . . . . . . . . . . . . . 18 ((𝜑 ∧ 𝑗 ∈ ℕ) → 𝑗 ∈ ℤ)
114 uzid 12980 . . . . . . . . . . . . . . . . . 18 (𝑗 ∈ ℤ → 𝑗 ∈ (ℤ≥‘𝑗))
115 peano2uz 13028 . . . . . . . . . . . . . . . . . 18 (𝑗 ∈ (ℤ≥‘𝑗) → (𝑗 + 1) ∈ (ℤ≥‘𝑗))
116 2re 12417 . . . . . . . . . . . . . . . . . . 19 2 ∈ ℝ
117 1le2 12554 . . . . . . . . . . . . . . . . . . 19 1 ≤ 2
118 leexp2a 14315 . . . . . . . . . . . . . . . . . . 19 ((2 ∈ ℝ ∧ 1 ≤ 2 ∧ (𝑗 + 1) ∈ (ℤ≥‘𝑗)) → (2↑𝑗) ≤ (2↑(𝑗 + 1)))
119116, 117, 118mp3an12 1480 . . . . . . . . . . . . . . . . . 18 ((𝑗 + 1) ∈ (ℤ≥‘𝑗) → (2↑𝑗) ≤ (2↑(𝑗 + 1)))
120113, 114, 115, 1194syl 20 . . . . . . . . . . . . . . . . 17 ((𝜑 ∧ 𝑗 ∈ ℕ) → (2↑𝑗) ≤ (2↑(𝑗 + 1)))
12188, 64eleqtrdi 2870 . . . . . . . . . . . . . . . . . 18 ((𝜑 ∧ 𝑗 ∈ ℕ) → (2↑𝑗) ∈ (ℤ≥‘1))
12299nnzd 12719 . . . . . . . . . . . . . . . . . 18 ((𝜑 ∧ 𝑗 ∈ ℕ) → (2↑(𝑗 + 1)) ∈ ℤ)
123 elfz5 13648 . . . . . . . . . . . . . . . . . 18 (((2↑𝑗) ∈ (ℤ≥‘1) ∧ (2↑(𝑗 + 1)) ∈ ℤ) → ((2↑𝑗) ∈ (1...(2↑(𝑗 + 1))) ↔ (2↑𝑗) ≤ (2↑(𝑗 + 1))))
124121, 122, 123syl2anc 596 . . . . . . . . . . . . . . . . 17 ((𝜑 ∧ 𝑗 ∈ ℕ) → ((2↑𝑗) ∈ (1...(2↑(𝑗 + 1))) ↔ (2↑𝑗) ≤ (2↑(𝑗 + 1))))
125120, 124mpbird 260 . . . . . . . . . . . . . . . 16 ((𝜑 ∧ 𝑗 ∈ ℕ) → (2↑𝑗) ∈ (1...(2↑(𝑗 + 1))))
126 fzsplit 13684 . . . . . . . . . . . . . . . 16 ((2↑𝑗) ∈ (1...(2↑(𝑗 + 1))) → (1...(2↑(𝑗 + 1))) = ((1...(2↑𝑗)) ∪ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))))
127125, 126syl 18 . . . . . . . . . . . . . . 15 ((𝜑 ∧ 𝑗 ∈ ℕ) → (1...(2↑(𝑗 + 1))) = ((1...(2↑𝑗)) ∪ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))))
128127fveq2d 6889 . . . . . . . . . . . . . 14 ((𝜑 ∧ 𝑗 ∈ ℕ) → (♯‘(1...(2↑(𝑗 + 1)))) = (♯‘((1...(2↑𝑗)) ∪ (((2↑𝑗) + 1)...(2↑(𝑗 + 1))))))
12989times2d 12590 . . . . . . . . . . . . . . . 16 ((𝜑 ∧ 𝑗 ∈ ℕ) → ((2↑𝑗) · 2) = ((2↑𝑗) + (2↑𝑗)))
13085, 129eqtrd 2795 . . . . . . . . . . . . . . 15 ((𝜑 ∧ 𝑗 ∈ ℕ) → (2↑(𝑗 + 1)) = ((2↑𝑗) + (2↑𝑗)))
13199nnnn0d 12667 . . . . . . . . . . . . . . . 16 ((𝜑 ∧ 𝑗 ∈ ℕ) → (2↑(𝑗 + 1)) ∈ ℕ0)
132 hashfz1 14490 . . . . . . . . . . . . . . . 16 ((2↑(𝑗 + 1)) ∈ ℕ0 → (♯‘(1...(2↑(𝑗 + 1)))) = (2↑(𝑗 + 1)))
133131, 132syl 18 . . . . . . . . . . . . . . 15 ((𝜑 ∧ 𝑗 ∈ ℕ) → (♯‘(1...(2↑(𝑗 + 1)))) = (2↑(𝑗 + 1)))
134106oveq1d 7435 . . . . . . . . . . . . . . 15 ((𝜑 ∧ 𝑗 ∈ ℕ) → ((♯‘(1...(2↑𝑗))) + (2↑𝑗)) = ((2↑𝑗) + (2↑𝑗)))
135130, 133, 1343eqtr4d 2805 . . . . . . . . . . . . . 14 ((𝜑 ∧ 𝑗 ∈ ℕ) → (♯‘(1...(2↑(𝑗 + 1)))) = ((♯‘(1...(2↑𝑗))) + (2↑𝑗)))
136 fzfid 14116 . . . . . . . . . . . . . . 15 ((𝜑 ∧ 𝑗 ∈ ℕ) → (1...(2↑𝑗)) ∈ Fin)
13788nnred 12350 . . . . . . . . . . . . . . . . 17 ((𝜑 ∧ 𝑗 ∈ ℕ) → (2↑𝑗) ∈ ℝ)
138137ltp1d 12247 . . . . . . . . . . . . . . . 16 ((𝜑 ∧ 𝑗 ∈ ℕ) → (2↑𝑗) < ((2↑𝑗) + 1))
139 fzdisj 13685 . . . . . . . . . . . . . . . 16 ((2↑𝑗) < ((2↑𝑗) + 1) → ((1...(2↑𝑗)) ∩ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))) = ∅)
140138, 139syl 18 . . . . . . . . . . . . . . 15 ((𝜑 ∧ 𝑗 ∈ ℕ) → ((1...(2↑𝑗)) ∩ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))) = ∅)
141 hashun 14526 . . . . . . . . . . . . . . 15 (((1...(2↑𝑗)) ∈ Fin ∧ (((2↑𝑗) + 1)...(2↑(𝑗 + 1))) ∈ Fin ∧ ((1...(2↑𝑗)) ∩ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))) = ∅) → (♯‘((1...(2↑𝑗)) ∪ (((2↑𝑗) + 1)...(2↑(𝑗 + 1))))) = ((♯‘(1...(2↑𝑗))) + (♯‘(((2↑𝑗) + 1)...(2↑(𝑗 + 1))))))
142136, 108, 140, 141syl3anc 1398 . . . . . . . . . . . . . 14 ((𝜑 ∧ 𝑗 ∈ ℕ) → (♯‘((1...(2↑𝑗)) ∪ (((2↑𝑗) + 1)...(2↑(𝑗 + 1))))) = ((♯‘(1...(2↑𝑗))) + (♯‘(((2↑𝑗) + 1)...(2↑(𝑗 + 1))))))
143128, 135, 1423eqtr3d 2803 . . . . . . . . . . . . 13 ((𝜑 ∧ 𝑗 ∈ ℕ) → ((♯‘(1...(2↑𝑗))) + (2↑𝑗)) = ((♯‘(1...(2↑𝑗))) + (♯‘(((2↑𝑗) + 1)...(2↑(𝑗 + 1))))))
144107, 89, 111, 143addcanad 11515 . . . . . . . . . . . 12 ((𝜑 ∧ 𝑗 ∈ ℕ) → (2↑𝑗) = (♯‘(((2↑𝑗) + 1)...(2↑(𝑗 + 1)))))
145144oveq1d 7435 . . . . . . . . . . 11 ((𝜑 ∧ 𝑗 ∈ ℕ) → ((2↑𝑗) · (𝐹‘(2↑(𝑗 + 1)))) = ((♯‘(((2↑𝑗) + 1)...(2↑(𝑗 + 1)))) · (𝐹‘(2↑(𝑗 + 1)))))
146 fsumconst 15956 . . . . . . . . . . . 12 (((((2↑𝑗) + 1)...(2↑(𝑗 + 1))) ∈ Fin ∧ (𝐹‘(2↑(𝑗 + 1))) ∈ ℂ) → Σ𝑘 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))(𝐹‘(2↑(𝑗 + 1))) = ((♯‘(((2↑𝑗) + 1)...(2↑(𝑗 + 1)))) · (𝐹‘(2↑(𝑗 + 1)))))
147108, 101, 146syl2anc 596 . . . . . . . . . . 11 ((𝜑 ∧ 𝑗 ∈ ℕ) → Σ𝑘 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))(𝐹‘(2↑(𝑗 + 1))) = ((♯‘(((2↑𝑗) + 1)...(2↑(𝑗 + 1)))) · (𝐹‘(2↑(𝑗 + 1)))))
148145, 147eqtr4d 2798 . . . . . . . . . 10 ((𝜑 ∧ 𝑗 ∈ ℕ) → ((2↑𝑗) · (𝐹‘(2↑(𝑗 + 1)))) = Σ𝑘 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))(𝐹‘(2↑(𝑗 + 1))))
149100adantr 486 . . . . . . . . . . 11 (((𝜑 ∧ 𝑗 ∈ ℕ) ∧ 𝑘 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))) → (𝐹‘(2↑(𝑗 + 1))) ∈ ℝ)
150 simpl 488 . . . . . . . . . . . 12 ((𝜑 ∧ 𝑗 ∈ ℕ) → 𝜑)
151 peano2nn 12347 . . . . . . . . . . . . . 14 ((2↑𝑗) ∈ ℕ → ((2↑𝑗) + 1) ∈ ℕ)
15288, 151syl 18 . . . . . . . . . . . . 13 ((𝜑 ∧ 𝑗 ∈ ℕ) → ((2↑𝑗) + 1) ∈ ℕ)
153 elfzuz 13652 . . . . . . . . . . . . 13 (𝑘 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1))) → 𝑘 ∈ (ℤ≥‘((2↑𝑗) + 1)))
154 eluznn 13045 . . . . . . . . . . . . 13 ((((2↑𝑗) + 1) ∈ ℕ ∧ 𝑘 ∈ (ℤ≥‘((2↑𝑗) + 1))) → 𝑘 ∈ ℕ)
155152, 153, 154syl2an 608 . . . . . . . . . . . 12 (((𝜑 ∧ 𝑗 ∈ ℕ) ∧ 𝑘 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))) → 𝑘 ∈ ℕ)
156150, 155, 38syl2an2r 698 . . . . . . . . . . 11 (((𝜑 ∧ 𝑗 ∈ ℕ) ∧ 𝑘 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))) → (𝐹‘𝑘) ∈ ℝ)
157 elfzuz3 13653 . . . . . . . . . . . . . . 15 (𝑛 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1))) → (2↑(𝑗 + 1)) ∈ (ℤ≥‘𝑛))
158157adantl 487 . . . . . . . . . . . . . 14 (((𝜑 ∧ 𝑗 ∈ ℕ) ∧ 𝑛 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))) → (2↑(𝑗 + 1)) ∈ (ℤ≥‘𝑛))
159 simplll 787 . . . . . . . . . . . . . . 15 ((((𝜑 ∧ 𝑗 ∈ ℕ) ∧ 𝑛 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))) ∧ 𝑘 ∈ (𝑛...(2↑(𝑗 + 1)))) → 𝜑)
160 elfzuz 13652 . . . . . . . . . . . . . . . . 17 (𝑛 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1))) → 𝑛 ∈ (ℤ≥‘((2↑𝑗) + 1)))
161 eluznn 13045 . . . . . . . . . . . . . . . . 17 ((((2↑𝑗) + 1) ∈ ℕ ∧ 𝑛 ∈ (ℤ≥‘((2↑𝑗) + 1))) → 𝑛 ∈ ℕ)
162152, 160, 161syl2an 608 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ 𝑗 ∈ ℕ) ∧ 𝑛 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))) → 𝑛 ∈ ℕ)
163 elfzuz 13652 . . . . . . . . . . . . . . . 16 (𝑘 ∈ (𝑛...(2↑(𝑗 + 1))) → 𝑘 ∈ (ℤ≥‘𝑛))
164 eluznn 13045 . . . . . . . . . . . . . . . 16 ((𝑛 ∈ ℕ ∧ 𝑘 ∈ (ℤ≥‘𝑛)) → 𝑘 ∈ ℕ)
165162, 163, 164syl2an 608 . . . . . . . . . . . . . . 15 ((((𝜑 ∧ 𝑗 ∈ ℕ) ∧ 𝑛 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))) ∧ 𝑘 ∈ (𝑛...(2↑(𝑗 + 1)))) → 𝑘 ∈ ℕ)
166159, 165, 38syl2anc 596 . . . . . . . . . . . . . 14 ((((𝜑 ∧ 𝑗 ∈ ℕ) ∧ 𝑛 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))) ∧ 𝑘 ∈ (𝑛...(2↑(𝑗 + 1)))) → (𝐹‘𝑘) ∈ ℝ)
167 simplll 787 . . . . . . . . . . . . . . 15 ((((𝜑 ∧ 𝑗 ∈ ℕ) ∧ 𝑛 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))) ∧ 𝑘 ∈ (𝑛...((2↑(𝑗 + 1)) − 1))) → 𝜑)
168 elfzuz 13652 . . . . . . . . . . . . . . . 16 (𝑘 ∈ (𝑛...((2↑(𝑗 + 1)) − 1)) → 𝑘 ∈ (ℤ≥‘𝑛))
169162, 168, 164syl2an 608 . . . . . . . . . . . . . . 15 ((((𝜑 ∧ 𝑗 ∈ ℕ) ∧ 𝑛 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))) ∧ 𝑘 ∈ (𝑛...((2↑(𝑗 + 1)) − 1))) → 𝑘 ∈ ℕ)
170 climcnds.3 . . . . . . . . . . . . . . 15 ((𝜑 ∧ 𝑘 ∈ ℕ) → (𝐹‘(𝑘 + 1)) ≤ (𝐹‘𝑘))
171167, 169, 170syl2anc 596 . . . . . . . . . . . . . 14 ((((𝜑 ∧ 𝑗 ∈ ℕ) ∧ 𝑛 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))) ∧ 𝑘 ∈ (𝑛...((2↑(𝑗 + 1)) − 1))) → (𝐹‘(𝑘 + 1)) ≤ (𝐹‘𝑘))
172158, 166, 171monoord2 14176 . . . . . . . . . . . . 13 (((𝜑 ∧ 𝑗 ∈ ℕ) ∧ 𝑛 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))) → (𝐹‘(2↑(𝑗 + 1))) ≤ (𝐹‘𝑛))
173172ralrimiva 3154 . . . . . . . . . . . 12 ((𝜑 ∧ 𝑗 ∈ ℕ) → ∀𝑛 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))(𝐹‘(2↑(𝑗 + 1))) ≤ (𝐹‘𝑛))
174 fveq2 6885 . . . . . . . . . . . . . 14 (𝑛 = 𝑘 → (𝐹‘𝑛) = (𝐹‘𝑘))
175174breq2d 5114 . . . . . . . . . . . . 13 (𝑛 = 𝑘 → ((𝐹‘(2↑(𝑗 + 1))) ≤ (𝐹‘𝑛) ↔ (𝐹‘(2↑(𝑗 + 1))) ≤ (𝐹‘𝑘)))
176175rspccva 3575 . . . . . . . . . . . 12 ((∀𝑛 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))(𝐹‘(2↑(𝑗 + 1))) ≤ (𝐹‘𝑛) ∧ 𝑘 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))) → (𝐹‘(2↑(𝑗 + 1))) ≤ (𝐹‘𝑘))
177173, 176sylan 592 . . . . . . . . . . 11 (((𝜑 ∧ 𝑗 ∈ ℕ) ∧ 𝑘 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))) → (𝐹‘(2↑(𝑗 + 1))) ≤ (𝐹‘𝑘))
178108, 149, 156, 177fsumle 15966 . . . . . . . . . 10 ((𝜑 ∧ 𝑗 ∈ ℕ) → Σ𝑘 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))(𝐹‘(2↑(𝑗 + 1))) ≤ Σ𝑘 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))(𝐹‘𝑘))
179148, 178eqbrtrd 5126 . . . . . . . . 9 ((𝜑 ∧ 𝑗 ∈ ℕ) → ((2↑𝑗) · (𝐹‘(2↑(𝑗 + 1)))) ≤ Σ𝑘 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))(𝐹‘𝑘))
180137, 100remulcld 11339 . . . . . . . . . 10 ((𝜑 ∧ 𝑗 ∈ ℕ) → ((2↑𝑗) · (𝐹‘(2↑(𝑗 + 1)))) ∈ ℝ)
181108, 156fsumrecl 15900 . . . . . . . . . 10 ((𝜑 ∧ 𝑗 ∈ ℕ) → Σ𝑘 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))(𝐹‘𝑘) ∈ ℝ)
182 2rp 13125 . . . . . . . . . . 11 2 ∈ ℝ+
183182a1i 11 . . . . . . . . . 10 ((𝜑 ∧ 𝑗 ∈ ℕ) → 2 ∈ ℝ+)
184180, 181, 183lemul2d 13208 . . . . . . . . 9 ((𝜑 ∧ 𝑗 ∈ ℕ) → (((2↑𝑗) · (𝐹‘(2↑(𝑗 + 1)))) ≤ Σ𝑘 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))(𝐹‘𝑘) ↔ (2 · ((2↑𝑗) · (𝐹‘(2↑(𝑗 + 1))))) ≤ (2 · Σ𝑘 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))(𝐹‘𝑘))))
185179, 184mpbid 235 . . . . . . . 8 ((𝜑 ∧ 𝑗 ∈ ℕ) → (2 · ((2↑𝑗) · (𝐹‘(2↑(𝑗 + 1))))) ≤ (2 · Σ𝑘 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))(𝐹‘𝑘)))
186103, 185eqbrtrd 5126 . . . . . . 7 ((𝜑 ∧ 𝑗 ∈ ℕ) → (𝐺‘(𝑗 + 1)) ≤ (2 · Σ𝑘 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))(𝐹‘𝑘)))
187 1zzd 12727 . . . . . . . . . 10 (𝜑 → 1 ∈ ℤ)
188 nnnn0 12613 . . . . . . . . . . 11 (𝑛 ∈ ℕ → 𝑛 ∈ ℕ0)
189 simpr 490 . . . . . . . . . . . . . . 15 ((𝜑 ∧ 𝑛 ∈ ℕ0) → 𝑛 ∈ ℕ0)
190 nnexpcl 14217 . . . . . . . . . . . . . . 15 ((2 ∈ ℕ ∧ 𝑛 ∈ ℕ0) → (2↑𝑛) ∈ ℕ)
19140, 189, 190sylancr 599 . . . . . . . . . . . . . 14 ((𝜑 ∧ 𝑛 ∈ ℕ0) → (2↑𝑛) ∈ ℕ)
192191nnred 12350 . . . . . . . . . . . . 13 ((𝜑 ∧ 𝑛 ∈ ℕ0) → (2↑𝑛) ∈ ℝ)
193 fveq2 6885 . . . . . . . . . . . . . . 15 (𝑘 = (2↑𝑛) → (𝐹‘𝑘) = (𝐹‘(2↑𝑛)))
194193eleq1d 2845 . . . . . . . . . . . . . 14 (𝑘 = (2↑𝑛) → ((𝐹‘𝑘) ∈ ℝ ↔ (𝐹‘(2↑𝑛)) ∈ ℝ))
19539adantr 486 . . . . . . . . . . . . . 14 ((𝜑 ∧ 𝑛 ∈ ℕ0) → ∀𝑘 ∈ ℕ (𝐹‘𝑘) ∈ ℝ)
196194, 195, 191rspcdva 3577 . . . . . . . . . . . . 13 ((𝜑 ∧ 𝑛 ∈ ℕ0) → (𝐹‘(2↑𝑛)) ∈ ℝ)
197192, 196remulcld 11339 . . . . . . . . . . . 12 ((𝜑 ∧ 𝑛 ∈ ℕ0) → ((2↑𝑛) · (𝐹‘(2↑𝑛))) ∈ ℝ)
19858, 197eqeltrd 2860 . . . . . . . . . . 11 ((𝜑 ∧ 𝑛 ∈ ℕ0) → (𝐺‘𝑛) ∈ ℝ)
199188, 198sylan2 605 . . . . . . . . . 10 ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝐺‘𝑛) ∈ ℝ)
20064, 187, 199serfre 14174 . . . . . . . . 9 (𝜑 → seq1( + , 𝐺):ℕ⟶ℝ)
201200ffvelcdmda 7084 . . . . . . . 8 ((𝜑 ∧ 𝑗 ∈ ℕ) → (seq1( + , 𝐺)‘𝑗) ∈ ℝ)
20272eleq1d 2845 . . . . . . . . 9 (𝑛 = (𝑗 + 1) → ((𝐺‘𝑛) ∈ ℝ ↔ (𝐺‘(𝑗 + 1)) ∈ ℝ))
203199ralrimiva 3154 . . . . . . . . . 10 (𝜑 → ∀𝑛 ∈ ℕ (𝐺‘𝑛) ∈ ℝ)
204203adantr 486 . . . . . . . . 9 ((𝜑 ∧ 𝑗 ∈ ℕ) → ∀𝑛 ∈ ℕ (𝐺‘𝑛) ∈ ℝ)
205202, 204, 79rspcdva 3577 . . . . . . . 8 ((𝜑 ∧ 𝑗 ∈ ℕ) → (𝐺‘(𝑗 + 1)) ∈ ℝ)
20664, 187, 38serfre 14174 . . . . . . . . . 10 (𝜑 → seq1( + , 𝐹):ℕ⟶ℝ)
207 ffvelcdm 7081 . . . . . . . . . 10 ((seq1( + , 𝐹):ℕ⟶ℝ ∧ (2↑𝑗) ∈ ℕ) → (seq1( + , 𝐹)‘(2↑𝑗)) ∈ ℝ)
208206, 87, 207syl2an 608 . . . . . . . . 9 ((𝜑 ∧ 𝑗 ∈ ℕ) → (seq1( + , 𝐹)‘(2↑𝑗)) ∈ ℝ)
209 remulcl 11285 . . . . . . . . 9 ((2 ∈ ℝ ∧ (seq1( + , 𝐹)‘(2↑𝑗)) ∈ ℝ) → (2 · (seq1( + , 𝐹)‘(2↑𝑗))) ∈ ℝ)
210116, 208, 209sylancr 599 . . . . . . . 8 ((𝜑 ∧ 𝑗 ∈ ℕ) → (2 · (seq1( + , 𝐹)‘(2↑𝑗))) ∈ ℝ)
211 remulcl 11285 . . . . . . . . 9 ((2 ∈ ℝ ∧ Σ𝑘 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))(𝐹‘𝑘) ∈ ℝ) → (2 · Σ𝑘 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))(𝐹‘𝑘)) ∈ ℝ)
212116, 181, 211sylancr 599 . . . . . . . 8 ((𝜑 ∧ 𝑗 ∈ ℕ) → (2 · Σ𝑘 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))(𝐹‘𝑘)) ∈ ℝ)
213 le2add 11798 . . . . . . . 8 ((((seq1( + , 𝐺)‘𝑗) ∈ ℝ ∧ (𝐺‘(𝑗 + 1)) ∈ ℝ) ∧ ((2 · (seq1( + , 𝐹)‘(2↑𝑗))) ∈ ℝ ∧ (2 · Σ𝑘 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))(𝐹‘𝑘)) ∈ ℝ)) → (((seq1( + , 𝐺)‘𝑗) ≤ (2 · (seq1( + , 𝐹)‘(2↑𝑗))) ∧ (𝐺‘(𝑗 + 1)) ≤ (2 · Σ𝑘 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))(𝐹‘𝑘))) → ((seq1( + , 𝐺)‘𝑗) + (𝐺‘(𝑗 + 1))) ≤ ((2 · (seq1( + , 𝐹)‘(2↑𝑗))) + (2 · Σ𝑘 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))(𝐹‘𝑘)))))
214201, 205, 210, 212, 213syl22anc 852 . . . . . . 7 ((𝜑 ∧ 𝑗 ∈ ℕ) → (((seq1( + , 𝐺)‘𝑗) ≤ (2 · (seq1( + , 𝐹)‘(2↑𝑗))) ∧ (𝐺‘(𝑗 + 1)) ≤ (2 · Σ𝑘 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))(𝐹‘𝑘))) → ((seq1( + , 𝐺)‘𝑗) + (𝐺‘(𝑗 + 1))) ≤ ((2 · (seq1( + , 𝐹)‘(2↑𝑗))) + (2 · Σ𝑘 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))(𝐹‘𝑘)))))
215186, 214mpan2d 707 . . . . . 6 ((𝜑 ∧ 𝑗 ∈ ℕ) → ((seq1( + , 𝐺)‘𝑗) ≤ (2 · (seq1( + , 𝐹)‘(2↑𝑗))) → ((seq1( + , 𝐺)‘𝑗) + (𝐺‘(𝑗 + 1))) ≤ ((2 · (seq1( + , 𝐹)‘(2↑𝑗))) + (2 · Σ𝑘 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))(𝐹‘𝑘)))))
216112, 64eleqtrdi 2870 . . . . . . . 8 ((𝜑 ∧ 𝑗 ∈ ℕ) → 𝑗 ∈ (ℤ≥‘1))
217 seqp1 14159 . . . . . . . 8 (𝑗 ∈ (ℤ≥‘1) → (seq1( + , 𝐺)‘(𝑗 + 1)) = ((seq1( + , 𝐺)‘𝑗) + (𝐺‘(𝑗 + 1))))
218216, 217syl 18 . . . . . . 7 ((𝜑 ∧ 𝑗 ∈ ℕ) → (seq1( + , 𝐺)‘(𝑗 + 1)) = ((seq1( + , 𝐺)‘𝑗) + (𝐺‘(𝑗 + 1))))
219 fzfid 14116 . . . . . . . . . . 11 ((𝜑 ∧ 𝑗 ∈ ℕ) → (1...(2↑(𝑗 + 1))) ∈ Fin)
220 elfznn 13687 . . . . . . . . . . . 12 (𝑘 ∈ (1...(2↑(𝑗 + 1))) → 𝑘 ∈ ℕ)
22138recnd 11337 . . . . . . . . . . . 12 ((𝜑 ∧ 𝑘 ∈ ℕ) → (𝐹‘𝑘) ∈ ℂ)
222150, 220, 221syl2an 608 . . . . . . . . . . 11 (((𝜑 ∧ 𝑗 ∈ ℕ) ∧ 𝑘 ∈ (1...(2↑(𝑗 + 1)))) → (𝐹‘𝑘) ∈ ℂ)
223140, 127, 219, 222fsumsplit 15907 . . . . . . . . . 10 ((𝜑 ∧ 𝑗 ∈ ℕ) → Σ𝑘 ∈ (1...(2↑(𝑗 + 1)))(𝐹‘𝑘) = (Σ𝑘 ∈ (1...(2↑𝑗))(𝐹‘𝑘) + Σ𝑘 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))(𝐹‘𝑘)))
224 eqidd 2761 . . . . . . . . . . 11 (((𝜑 ∧ 𝑗 ∈ ℕ) ∧ 𝑘 ∈ (1...(2↑(𝑗 + 1)))) → (𝐹‘𝑘) = (𝐹‘𝑘))
22599, 64eleqtrdi 2870 . . . . . . . . . . 11 ((𝜑 ∧ 𝑗 ∈ ℕ) → (2↑(𝑗 + 1)) ∈ (ℤ≥‘1))
226224, 225, 222fsumser 15896 . . . . . . . . . 10 ((𝜑 ∧ 𝑗 ∈ ℕ) → Σ𝑘 ∈ (1...(2↑(𝑗 + 1)))(𝐹‘𝑘) = (seq1( + , 𝐹)‘(2↑(𝑗 + 1))))
227 eqidd 2761 . . . . . . . . . . . 12 (((𝜑 ∧ 𝑗 ∈ ℕ) ∧ 𝑘 ∈ (1...(2↑𝑗))) → (𝐹‘𝑘) = (𝐹‘𝑘))
228 elfznn 13687 . . . . . . . . . . . . 13 (𝑘 ∈ (1...(2↑𝑗)) → 𝑘 ∈ ℕ)
229150, 228, 221syl2an 608 . . . . . . . . . . . 12 (((𝜑 ∧ 𝑗 ∈ ℕ) ∧ 𝑘 ∈ (1...(2↑𝑗))) → (𝐹‘𝑘) ∈ ℂ)
230227, 121, 229fsumser 15896 . . . . . . . . . . 11 ((𝜑 ∧ 𝑗 ∈ ℕ) → Σ𝑘 ∈ (1...(2↑𝑗))(𝐹‘𝑘) = (seq1( + , 𝐹)‘(2↑𝑗)))
231230oveq1d 7435 . . . . . . . . . 10 ((𝜑 ∧ 𝑗 ∈ ℕ) → (Σ𝑘 ∈ (1...(2↑𝑗))(𝐹‘𝑘) + Σ𝑘 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))(𝐹‘𝑘)) = ((seq1( + , 𝐹)‘(2↑𝑗)) + Σ𝑘 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))(𝐹‘𝑘)))
232223, 226, 2313eqtr3d 2803 . . . . . . . . 9 ((𝜑 ∧ 𝑗 ∈ ℕ) → (seq1( + , 𝐹)‘(2↑(𝑗 + 1))) = ((seq1( + , 𝐹)‘(2↑𝑗)) + Σ𝑘 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))(𝐹‘𝑘)))
233232oveq2d 7436 . . . . . . . 8 ((𝜑 ∧ 𝑗 ∈ ℕ) → (2 · (seq1( + , 𝐹)‘(2↑(𝑗 + 1)))) = (2 · ((seq1( + , 𝐹)‘(2↑𝑗)) + Σ𝑘 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))(𝐹‘𝑘))))
234208recnd 11337 . . . . . . . . 9 ((𝜑 ∧ 𝑗 ∈ ℕ) → (seq1( + , 𝐹)‘(2↑𝑗)) ∈ ℂ)
235181recnd 11337 . . . . . . . . 9 ((𝜑 ∧ 𝑗 ∈ ℕ) → Σ𝑘 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))(𝐹‘𝑘) ∈ ℂ)
23694, 234, 235adddid 11333 . . . . . . . 8 ((𝜑 ∧ 𝑗 ∈ ℕ) → (2 · ((seq1( + , 𝐹)‘(2↑𝑗)) + Σ𝑘 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))(𝐹‘𝑘))) = ((2 · (seq1( + , 𝐹)‘(2↑𝑗))) + (2 · Σ𝑘 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))(𝐹‘𝑘))))
237233, 236eqtrd 2795 . . . . . . 7 ((𝜑 ∧ 𝑗 ∈ ℕ) → (2 · (seq1( + , 𝐹)‘(2↑(𝑗 + 1)))) = ((2 · (seq1( + , 𝐹)‘(2↑𝑗))) + (2 · Σ𝑘 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))(𝐹‘𝑘))))
238218, 237breq12d 5115 . . . . . 6 ((𝜑 ∧ 𝑗 ∈ ℕ) → ((seq1( + , 𝐺)‘(𝑗 + 1)) ≤ (2 · (seq1( + , 𝐹)‘(2↑(𝑗 + 1)))) ↔ ((seq1( + , 𝐺)‘𝑗) + (𝐺‘(𝑗 + 1))) ≤ ((2 · (seq1( + , 𝐹)‘(2↑𝑗))) + (2 · Σ𝑘 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))(𝐹‘𝑘)))))
239215, 238sylibrd 262 . . . . 5 ((𝜑 ∧ 𝑗 ∈ ℕ) → ((seq1( + , 𝐺)‘𝑗) ≤ (2 · (seq1( + , 𝐹)‘(2↑𝑗))) → (seq1( + , 𝐺)‘(𝑗 + 1)) ≤ (2 · (seq1( + , 𝐹)‘(2↑(𝑗 + 1))))))
240239expcom 419 . . . 4 (𝑗 ∈ ℕ → (𝜑 → ((seq1( + , 𝐺)‘𝑗) ≤ (2 · (seq1( + , 𝐹)‘(2↑𝑗))) → (seq1( + , 𝐺)‘(𝑗 + 1)) ≤ (2 · (seq1( + , 𝐹)‘(2↑(𝑗 + 1)))))))
241240a2d 30 . . 3 (𝑗 ∈ ℕ → ((𝜑 → (seq1( + , 𝐺)‘𝑗) ≤ (2 · (seq1( + , 𝐹)‘(2↑𝑗)))) → (𝜑 → (seq1( + , 𝐺)‘(𝑗 + 1)) ≤ (2 · (seq1( + , 𝐹)‘(2↑(𝑗 + 1)))))))
24210, 16, 22, 28, 71, 241nnind 12353 . 2 (𝑁 ∈ ℕ → (𝜑 → (seq1( + , 𝐺)‘𝑁) ≤ (2 · (seq1( + , 𝐹)‘(2↑𝑁)))))
243242impcom 413 1 ((𝜑 ∧ 𝑁 ∈ ℕ) → (seq1( + , 𝐺)‘𝑁) ≤ (2 · (seq1( + , 𝐹)‘(2↑𝑁))))
Colors of variables:    wff setvar class
This proof depends on syntax axioms:   → wi 4   ↔ wb 209   ∧ wa 401   = wceq 1569   ∈ wcel 2144  ∀wral 3076   ∩ cin 4089   ∪ cun 4149  ∅c0 4278   class class class wbr 5102  ⟶wf 6534  ‘cfv 6538  (class class class)co 7420  Fincfn 8973  ℂcc 11198  ℝcr 11199  0cc0 11200  1c1 11201   + caddc 11203   · cmul 11205   < clt 11343   ≤ cle 11344   − cmin 11541  ℕcn 12335  2c2 12397  ℕ0cn0 12606  ℤcz 12693  ℤ≥cuz 12965  ℝ+crp 13120  ...cfz 13639  seqcseq 14144  ↑cexp 14204  ♯chash 14474  Σcsu 15853
This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1827  ax-4 1841  ax-5 1942  ax-6 1999  ax-7 2040  ax-8 2146  ax-9 2154  ax-10 2177  ax-11 2193  ax-12 2212  ax-ext 2732  ax-rep 5231  ax-sep 5248  ax-nul 5259  ax-pow 5326  ax-pr 5390  ax-un 7751  ax-inf2 9642  ax-cnex 11256  ax-resscn 11257  ax-1cn 11258  ax-icn 11259  ax-addcl 11260  ax-addrcl 11261  ax-mulcl 11262  ax-mulrcl 11263  ax-mulcom 11264  ax-addass 11265  ax-mulass 11266  ax-distr 11267  ax-i2m1 11268  ax-1ne0 11269  ax-1rid 11270  ax-rnegex 11271  ax-rrecex 11272  ax-cnre 11273  ax-pre-lttri 11274  ax-pre-lttrn 11275  ax-pre-ltadd 11276  ax-pre-mulgt0 11277  ax-pre-sup 11278
This proof depends on definitions:  df-bi 210  df-an 402  df-or 862  df-3or 1104  df-3an 1105  df-tru 1572  df-fal 1582  df-ex 1812  df-nf 1816  df-sb 2099  df-mo 2564  df-eu 2594  df-clab 2739  df-cleq 2752  df-clel 2835  df-nfc 2909  df-ne 2956  df-nel 3062  df-ral 3077  df-rex 3087  df-rmo 3365  df-reu 3366  df-rab 3413  df-v 3452  df-sbc 3739  df-csb 3847  df-ss 3896  df-pss 4014  df-dif 4047  df-in 4091  df-un 4151  df-nul 4279  df-if 4482  df-pw 4558  df-sn 4584  df-pr 4586  df-op 4590  df-uni 4867  df-int 4907  df-iun 4952  df-br 5103  df-opab 5167  df-mpt 5186  df-tr 5212  df-id 5545  df-eprel 5550  df-po 5558  df-so 5559  df-fr 5603  df-se 5604  df-we 5605  df-xp 5656  df-rel 5657  df-cnv 5658  df-co 5659  df-dm 5660  df-rn 5661  df-res 5662  df-ima 5663  df-pred 6304  df-ord 6365  df-on 6366  df-lim 6367  df-suc 6368  df-iota 6494  df-fun 6540  df-fn 6541  df-f 6542  df-f1 6543  df-fo 6544  df-f1o 6545  df-fv 6546  df-isom 6547  df-riota 7377  df-ov 7423  df-oprab 7424  df-mpo 7425  df-om 7878  df-1st 8001  df-2nd 8002  df-frecs 8299  df-wrecs 8330  df-recs 8379  df-rdg 8418  df-1o 8476  df-oadd 8480  df-er 8717  df-en 8974  df-dom 8975  df-sdom 8976  df-fin 8977  df-sup 9434  df-oi 9504  df-dju 9982  df-card 10020  df-pnf 11345  df-mnf 11346  df-xr 11347  df-ltxr 11348  df-le 11349  df-sub 11543  df-neg 11544  df-div 11974  df-nn 12336  df-2 12405  df-3 12406  df-n0 12607  df-z 12694  df-uz 12966  df-rp 13121  df-ico 13482  df-fz 13640  df-fzo 13789  df-seq 14145  df-exp 14205  df-hash 14475  df-cj 15266  df-re 15267  df-im 15268  df-sqrt 15402  df-abs 15403  df-clim 15655  df-sum 15854
This theorem is used by:  climcnds  16020
  Copyright terms: Public domain W3C validator