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

Theorem climcndslem2 14526
Description: Lemma for climcnds 14527: bound the condensed series by the original series. (Contributed by Mario Carneiro, 18-Jul-2014.)
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 6158 . . . . 5 (𝑥 = 1 → (seq1( + , 𝐺)‘𝑥) = (seq1( + , 𝐺)‘1))
2 oveq2 6623 . . . . . . . 8 (𝑥 = 1 → (2↑𝑥) = (2↑1))
3 2cn 11051 . . . . . . . . 9 2 ∈ ℂ
4 exp1 12822 . . . . . . . . 9 (2 ∈ ℂ → (2↑1) = 2)
53, 4ax-mp 5 . . . . . . . 8 (2↑1) = 2
62, 5syl6eq 2671 . . . . . . 7 (𝑥 = 1 → (2↑𝑥) = 2)
76fveq2d 6162 . . . . . 6 (𝑥 = 1 → (seq1( + , 𝐹)‘(2↑𝑥)) = (seq1( + , 𝐹)‘2))
87oveq2d 6631 . . . . 5 (𝑥 = 1 → (2 · (seq1( + , 𝐹)‘(2↑𝑥))) = (2 · (seq1( + , 𝐹)‘2)))
91, 8breq12d 4636 . . . 4 (𝑥 = 1 → ((seq1( + , 𝐺)‘𝑥) ≤ (2 · (seq1( + , 𝐹)‘(2↑𝑥))) ↔ (seq1( + , 𝐺)‘1) ≤ (2 · (seq1( + , 𝐹)‘2))))
109imbi2d 330 . . 3 (𝑥 = 1 → ((𝜑 → (seq1( + , 𝐺)‘𝑥) ≤ (2 · (seq1( + , 𝐹)‘(2↑𝑥)))) ↔ (𝜑 → (seq1( + , 𝐺)‘1) ≤ (2 · (seq1( + , 𝐹)‘2)))))
11 fveq2 6158 . . . . 5 (𝑥 = 𝑗 → (seq1( + , 𝐺)‘𝑥) = (seq1( + , 𝐺)‘𝑗))
12 oveq2 6623 . . . . . . 7 (𝑥 = 𝑗 → (2↑𝑥) = (2↑𝑗))
1312fveq2d 6162 . . . . . 6 (𝑥 = 𝑗 → (seq1( + , 𝐹)‘(2↑𝑥)) = (seq1( + , 𝐹)‘(2↑𝑗)))
1413oveq2d 6631 . . . . 5 (𝑥 = 𝑗 → (2 · (seq1( + , 𝐹)‘(2↑𝑥))) = (2 · (seq1( + , 𝐹)‘(2↑𝑗))))
1511, 14breq12d 4636 . . . 4 (𝑥 = 𝑗 → ((seq1( + , 𝐺)‘𝑥) ≤ (2 · (seq1( + , 𝐹)‘(2↑𝑥))) ↔ (seq1( + , 𝐺)‘𝑗) ≤ (2 · (seq1( + , 𝐹)‘(2↑𝑗)))))
1615imbi2d 330 . . 3 (𝑥 = 𝑗 → ((𝜑 → (seq1( + , 𝐺)‘𝑥) ≤ (2 · (seq1( + , 𝐹)‘(2↑𝑥)))) ↔ (𝜑 → (seq1( + , 𝐺)‘𝑗) ≤ (2 · (seq1( + , 𝐹)‘(2↑𝑗))))))
17 fveq2 6158 . . . . 5 (𝑥 = (𝑗 + 1) → (seq1( + , 𝐺)‘𝑥) = (seq1( + , 𝐺)‘(𝑗 + 1)))
18 oveq2 6623 . . . . . . 7 (𝑥 = (𝑗 + 1) → (2↑𝑥) = (2↑(𝑗 + 1)))
1918fveq2d 6162 . . . . . 6 (𝑥 = (𝑗 + 1) → (seq1( + , 𝐹)‘(2↑𝑥)) = (seq1( + , 𝐹)‘(2↑(𝑗 + 1))))
2019oveq2d 6631 . . . . 5 (𝑥 = (𝑗 + 1) → (2 · (seq1( + , 𝐹)‘(2↑𝑥))) = (2 · (seq1( + , 𝐹)‘(2↑(𝑗 + 1)))))
2117, 20breq12d 4636 . . . 4 (𝑥 = (𝑗 + 1) → ((seq1( + , 𝐺)‘𝑥) ≤ (2 · (seq1( + , 𝐹)‘(2↑𝑥))) ↔ (seq1( + , 𝐺)‘(𝑗 + 1)) ≤ (2 · (seq1( + , 𝐹)‘(2↑(𝑗 + 1))))))
2221imbi2d 330 . . 3 (𝑥 = (𝑗 + 1) → ((𝜑 → (seq1( + , 𝐺)‘𝑥) ≤ (2 · (seq1( + , 𝐹)‘(2↑𝑥)))) ↔ (𝜑 → (seq1( + , 𝐺)‘(𝑗 + 1)) ≤ (2 · (seq1( + , 𝐹)‘(2↑(𝑗 + 1)))))))
23 fveq2 6158 . . . . 5 (𝑥 = 𝑁 → (seq1( + , 𝐺)‘𝑥) = (seq1( + , 𝐺)‘𝑁))
24 oveq2 6623 . . . . . . 7 (𝑥 = 𝑁 → (2↑𝑥) = (2↑𝑁))
2524fveq2d 6162 . . . . . 6 (𝑥 = 𝑁 → (seq1( + , 𝐹)‘(2↑𝑥)) = (seq1( + , 𝐹)‘(2↑𝑁)))
2625oveq2d 6631 . . . . 5 (𝑥 = 𝑁 → (2 · (seq1( + , 𝐹)‘(2↑𝑥))) = (2 · (seq1( + , 𝐹)‘(2↑𝑁))))
2723, 26breq12d 4636 . . . 4 (𝑥 = 𝑁 → ((seq1( + , 𝐺)‘𝑥) ≤ (2 · (seq1( + , 𝐹)‘(2↑𝑥))) ↔ (seq1( + , 𝐺)‘𝑁) ≤ (2 · (seq1( + , 𝐹)‘(2↑𝑁)))))
2827imbi2d 330 . . 3 (𝑥 = 𝑁 → ((𝜑 → (seq1( + , 𝐺)‘𝑥) ≤ (2 · (seq1( + , 𝐹)‘(2↑𝑥)))) ↔ (𝜑 → (seq1( + , 𝐺)‘𝑁) ≤ (2 · (seq1( + , 𝐹)‘(2↑𝑁))))))
29 1nn 10991 . . . . . . 7 1 ∈ ℕ
30 climcnds.2 . . . . . . . 8 ((𝜑𝑘 ∈ ℕ) → 0 ≤ (𝐹𝑘))
3130ralrimiva 2962 . . . . . . 7 (𝜑 → ∀𝑘 ∈ ℕ 0 ≤ (𝐹𝑘))
32 fveq2 6158 . . . . . . . . 9 (𝑘 = 1 → (𝐹𝑘) = (𝐹‘1))
3332breq2d 4635 . . . . . . . 8 (𝑘 = 1 → (0 ≤ (𝐹𝑘) ↔ 0 ≤ (𝐹‘1)))
3433rspcv 3295 . . . . . . 7 (1 ∈ ℕ → (∀𝑘 ∈ ℕ 0 ≤ (𝐹𝑘) → 0 ≤ (𝐹‘1)))
3529, 31, 34mpsyl 68 . . . . . 6 (𝜑 → 0 ≤ (𝐹‘1))
36 2nn 11145 . . . . . . . 8 2 ∈ ℕ
37 climcnds.1 . . . . . . . . 9 ((𝜑𝑘 ∈ ℕ) → (𝐹𝑘) ∈ ℝ)
3837ralrimiva 2962 . . . . . . . 8 (𝜑 → ∀𝑘 ∈ ℕ (𝐹𝑘) ∈ ℝ)
39 fveq2 6158 . . . . . . . . . 10 (𝑘 = 2 → (𝐹𝑘) = (𝐹‘2))
4039eleq1d 2683 . . . . . . . . 9 (𝑘 = 2 → ((𝐹𝑘) ∈ ℝ ↔ (𝐹‘2) ∈ ℝ))
4140rspcv 3295 . . . . . . . 8 (2 ∈ ℕ → (∀𝑘 ∈ ℕ (𝐹𝑘) ∈ ℝ → (𝐹‘2) ∈ ℝ))
4236, 38, 41mpsyl 68 . . . . . . 7 (𝜑 → (𝐹‘2) ∈ ℝ)
4332eleq1d 2683 . . . . . . . . 9 (𝑘 = 1 → ((𝐹𝑘) ∈ ℝ ↔ (𝐹‘1) ∈ ℝ))
4443rspcv 3295 . . . . . . . 8 (1 ∈ ℕ → (∀𝑘 ∈ ℕ (𝐹𝑘) ∈ ℝ → (𝐹‘1) ∈ ℝ))
4529, 38, 44mpsyl 68 . . . . . . 7 (𝜑 → (𝐹‘1) ∈ ℝ)
4642, 45addge02d 10576 . . . . . 6 (𝜑 → (0 ≤ (𝐹‘1) ↔ (𝐹‘2) ≤ ((𝐹‘1) + (𝐹‘2))))
4735, 46mpbid 222 . . . . 5 (𝜑 → (𝐹‘2) ≤ ((𝐹‘1) + (𝐹‘2)))
4845, 42readdcld 10029 . . . . . 6 (𝜑 → ((𝐹‘1) + (𝐹‘2)) ∈ ℝ)
49 2re 11050 . . . . . . . 8 2 ∈ ℝ
50 2pos 11072 . . . . . . . 8 0 < 2
5149, 50pm3.2i 471 . . . . . . 7 (2 ∈ ℝ ∧ 0 < 2)
5251a1i 11 . . . . . 6 (𝜑 → (2 ∈ ℝ ∧ 0 < 2))
53 lemul2 10836 . . . . . 6 (((𝐹‘2) ∈ ℝ ∧ ((𝐹‘1) + (𝐹‘2)) ∈ ℝ ∧ (2 ∈ ℝ ∧ 0 < 2)) → ((𝐹‘2) ≤ ((𝐹‘1) + (𝐹‘2)) ↔ (2 · (𝐹‘2)) ≤ (2 · ((𝐹‘1) + (𝐹‘2)))))
5442, 48, 52, 53syl3anc 1323 . . . . 5 (𝜑 → ((𝐹‘2) ≤ ((𝐹‘1) + (𝐹‘2)) ↔ (2 · (𝐹‘2)) ≤ (2 · ((𝐹‘1) + (𝐹‘2)))))
5547, 54mpbid 222 . . . 4 (𝜑 → (2 · (𝐹‘2)) ≤ (2 · ((𝐹‘1) + (𝐹‘2))))
56 1z 11367 . . . . 5 1 ∈ ℤ
57 1nn0 11268 . . . . . 6 1 ∈ ℕ0
58 climcnds.4 . . . . . . 7 ((𝜑𝑛 ∈ ℕ0) → (𝐺𝑛) = ((2↑𝑛) · (𝐹‘(2↑𝑛))))
5958ralrimiva 2962 . . . . . 6 (𝜑 → ∀𝑛 ∈ ℕ0 (𝐺𝑛) = ((2↑𝑛) · (𝐹‘(2↑𝑛))))
60 fveq2 6158 . . . . . . . 8 (𝑛 = 1 → (𝐺𝑛) = (𝐺‘1))
61 oveq2 6623 . . . . . . . . . 10 (𝑛 = 1 → (2↑𝑛) = (2↑1))
6261, 5syl6eq 2671 . . . . . . . . 9 (𝑛 = 1 → (2↑𝑛) = 2)
6362fveq2d 6162 . . . . . . . . 9 (𝑛 = 1 → (𝐹‘(2↑𝑛)) = (𝐹‘2))
6462, 63oveq12d 6633 . . . . . . . 8 (𝑛 = 1 → ((2↑𝑛) · (𝐹‘(2↑𝑛))) = (2 · (𝐹‘2)))
6560, 64eqeq12d 2636 . . . . . . 7 (𝑛 = 1 → ((𝐺𝑛) = ((2↑𝑛) · (𝐹‘(2↑𝑛))) ↔ (𝐺‘1) = (2 · (𝐹‘2))))
6665rspcv 3295 . . . . . 6 (1 ∈ ℕ0 → (∀𝑛 ∈ ℕ0 (𝐺𝑛) = ((2↑𝑛) · (𝐹‘(2↑𝑛))) → (𝐺‘1) = (2 · (𝐹‘2))))
6757, 59, 66mpsyl 68 . . . . 5 (𝜑 → (𝐺‘1) = (2 · (𝐹‘2)))
6856, 67seq1i 12771 . . . 4 (𝜑 → (seq1( + , 𝐺)‘1) = (2 · (𝐹‘2)))
69 nnuz 11683 . . . . . 6 ℕ = (ℤ‘1)
70 df-2 11039 . . . . . 6 2 = (1 + 1)
71 eqidd 2622 . . . . . . 7 (𝜑 → (𝐹‘1) = (𝐹‘1))
7256, 71seq1i 12771 . . . . . 6 (𝜑 → (seq1( + , 𝐹)‘1) = (𝐹‘1))
73 eqidd 2622 . . . . . 6 (𝜑 → (𝐹‘2) = (𝐹‘2))
7469, 29, 70, 72, 73seqp1i 12773 . . . . 5 (𝜑 → (seq1( + , 𝐹)‘2) = ((𝐹‘1) + (𝐹‘2)))
7574oveq2d 6631 . . . 4 (𝜑 → (2 · (seq1( + , 𝐹)‘2)) = (2 · ((𝐹‘1) + (𝐹‘2))))
7655, 68, 753brtr4d 4655 . . 3 (𝜑 → (seq1( + , 𝐺)‘1) ≤ (2 · (seq1( + , 𝐹)‘2)))
77 peano2nn 10992 . . . . . . . . . . . 12 (𝑗 ∈ ℕ → (𝑗 + 1) ∈ ℕ)
7877adantl 482 . . . . . . . . . . 11 ((𝜑𝑗 ∈ ℕ) → (𝑗 + 1) ∈ ℕ)
7978nnnn0d 11311 . . . . . . . . . 10 ((𝜑𝑗 ∈ ℕ) → (𝑗 + 1) ∈ ℕ0)
8059adantr 481 . . . . . . . . . 10 ((𝜑𝑗 ∈ ℕ) → ∀𝑛 ∈ ℕ0 (𝐺𝑛) = ((2↑𝑛) · (𝐹‘(2↑𝑛))))
81 fveq2 6158 . . . . . . . . . . . 12 (𝑛 = (𝑗 + 1) → (𝐺𝑛) = (𝐺‘(𝑗 + 1)))
82 oveq2 6623 . . . . . . . . . . . . 13 (𝑛 = (𝑗 + 1) → (2↑𝑛) = (2↑(𝑗 + 1)))
8382fveq2d 6162 . . . . . . . . . . . . 13 (𝑛 = (𝑗 + 1) → (𝐹‘(2↑𝑛)) = (𝐹‘(2↑(𝑗 + 1))))
8482, 83oveq12d 6633 . . . . . . . . . . . 12 (𝑛 = (𝑗 + 1) → ((2↑𝑛) · (𝐹‘(2↑𝑛))) = ((2↑(𝑗 + 1)) · (𝐹‘(2↑(𝑗 + 1)))))
8581, 84eqeq12d 2636 . . . . . . . . . . 11 (𝑛 = (𝑗 + 1) → ((𝐺𝑛) = ((2↑𝑛) · (𝐹‘(2↑𝑛))) ↔ (𝐺‘(𝑗 + 1)) = ((2↑(𝑗 + 1)) · (𝐹‘(2↑(𝑗 + 1))))))
8685rspcv 3295 . . . . . . . . . 10 ((𝑗 + 1) ∈ ℕ0 → (∀𝑛 ∈ ℕ0 (𝐺𝑛) = ((2↑𝑛) · (𝐹‘(2↑𝑛))) → (𝐺‘(𝑗 + 1)) = ((2↑(𝑗 + 1)) · (𝐹‘(2↑(𝑗 + 1))))))
8779, 80, 86sylc 65 . . . . . . . . 9 ((𝜑𝑗 ∈ ℕ) → (𝐺‘(𝑗 + 1)) = ((2↑(𝑗 + 1)) · (𝐹‘(2↑(𝑗 + 1)))))
88 nnnn0 11259 . . . . . . . . . . . . 13 (𝑗 ∈ ℕ → 𝑗 ∈ ℕ0)
8988adantl 482 . . . . . . . . . . . 12 ((𝜑𝑗 ∈ ℕ) → 𝑗 ∈ ℕ0)
90 expp1 12823 . . . . . . . . . . . 12 ((2 ∈ ℂ ∧ 𝑗 ∈ ℕ0) → (2↑(𝑗 + 1)) = ((2↑𝑗) · 2))
913, 89, 90sylancr 694 . . . . . . . . . . 11 ((𝜑𝑗 ∈ ℕ) → (2↑(𝑗 + 1)) = ((2↑𝑗) · 2))
92 nnexpcl 12829 . . . . . . . . . . . . . . 15 ((2 ∈ ℕ ∧ 𝑗 ∈ ℕ0) → (2↑𝑗) ∈ ℕ)
9336, 88, 92sylancr 694 . . . . . . . . . . . . . 14 (𝑗 ∈ ℕ → (2↑𝑗) ∈ ℕ)
9493adantl 482 . . . . . . . . . . . . 13 ((𝜑𝑗 ∈ ℕ) → (2↑𝑗) ∈ ℕ)
9594nncnd 10996 . . . . . . . . . . . 12 ((𝜑𝑗 ∈ ℕ) → (2↑𝑗) ∈ ℂ)
96 mulcom 9982 . . . . . . . . . . . 12 (((2↑𝑗) ∈ ℂ ∧ 2 ∈ ℂ) → ((2↑𝑗) · 2) = (2 · (2↑𝑗)))
9795, 3, 96sylancl 693 . . . . . . . . . . 11 ((𝜑𝑗 ∈ ℕ) → ((2↑𝑗) · 2) = (2 · (2↑𝑗)))
9891, 97eqtrd 2655 . . . . . . . . . 10 ((𝜑𝑗 ∈ ℕ) → (2↑(𝑗 + 1)) = (2 · (2↑𝑗)))
9998oveq1d 6630 . . . . . . . . 9 ((𝜑𝑗 ∈ ℕ) → ((2↑(𝑗 + 1)) · (𝐹‘(2↑(𝑗 + 1)))) = ((2 · (2↑𝑗)) · (𝐹‘(2↑(𝑗 + 1)))))
1003a1i 11 . . . . . . . . . 10 ((𝜑𝑗 ∈ ℕ) → 2 ∈ ℂ)
101 nnexpcl 12829 . . . . . . . . . . . . 13 ((2 ∈ ℕ ∧ (𝑗 + 1) ∈ ℕ0) → (2↑(𝑗 + 1)) ∈ ℕ)
10236, 79, 101sylancr 694 . . . . . . . . . . . 12 ((𝜑𝑗 ∈ ℕ) → (2↑(𝑗 + 1)) ∈ ℕ)
10338adantr 481 . . . . . . . . . . . 12 ((𝜑𝑗 ∈ ℕ) → ∀𝑘 ∈ ℕ (𝐹𝑘) ∈ ℝ)
104 fveq2 6158 . . . . . . . . . . . . . 14 (𝑘 = (2↑(𝑗 + 1)) → (𝐹𝑘) = (𝐹‘(2↑(𝑗 + 1))))
105104eleq1d 2683 . . . . . . . . . . . . 13 (𝑘 = (2↑(𝑗 + 1)) → ((𝐹𝑘) ∈ ℝ ↔ (𝐹‘(2↑(𝑗 + 1))) ∈ ℝ))
106105rspcv 3295 . . . . . . . . . . . 12 ((2↑(𝑗 + 1)) ∈ ℕ → (∀𝑘 ∈ ℕ (𝐹𝑘) ∈ ℝ → (𝐹‘(2↑(𝑗 + 1))) ∈ ℝ))
107102, 103, 106sylc 65 . . . . . . . . . . 11 ((𝜑𝑗 ∈ ℕ) → (𝐹‘(2↑(𝑗 + 1))) ∈ ℝ)
108107recnd 10028 . . . . . . . . . 10 ((𝜑𝑗 ∈ ℕ) → (𝐹‘(2↑(𝑗 + 1))) ∈ ℂ)
109100, 95, 108mulassd 10023 . . . . . . . . 9 ((𝜑𝑗 ∈ ℕ) → ((2 · (2↑𝑗)) · (𝐹‘(2↑(𝑗 + 1)))) = (2 · ((2↑𝑗) · (𝐹‘(2↑(𝑗 + 1))))))
11087, 99, 1093eqtrd 2659 . . . . . . . 8 ((𝜑𝑗 ∈ ℕ) → (𝐺‘(𝑗 + 1)) = (2 · ((2↑𝑗) · (𝐹‘(2↑(𝑗 + 1))))))
11194nnnn0d 11311 . . . . . . . . . . . . . . 15 ((𝜑𝑗 ∈ ℕ) → (2↑𝑗) ∈ ℕ0)
112 hashfz1 13090 . . . . . . . . . . . . . . 15 ((2↑𝑗) ∈ ℕ0 → (#‘(1...(2↑𝑗))) = (2↑𝑗))
113111, 112syl 17 . . . . . . . . . . . . . 14 ((𝜑𝑗 ∈ ℕ) → (#‘(1...(2↑𝑗))) = (2↑𝑗))
114113, 95eqeltrd 2698 . . . . . . . . . . . . 13 ((𝜑𝑗 ∈ ℕ) → (#‘(1...(2↑𝑗))) ∈ ℂ)
115 fzfid 12728 . . . . . . . . . . . . . . 15 ((𝜑𝑗 ∈ ℕ) → (((2↑𝑗) + 1)...(2↑(𝑗 + 1))) ∈ Fin)
116 hashcl 13103 . . . . . . . . . . . . . . 15 ((((2↑𝑗) + 1)...(2↑(𝑗 + 1))) ∈ Fin → (#‘(((2↑𝑗) + 1)...(2↑(𝑗 + 1)))) ∈ ℕ0)
117115, 116syl 17 . . . . . . . . . . . . . 14 ((𝜑𝑗 ∈ ℕ) → (#‘(((2↑𝑗) + 1)...(2↑(𝑗 + 1)))) ∈ ℕ0)
118117nn0cnd 11313 . . . . . . . . . . . . 13 ((𝜑𝑗 ∈ ℕ) → (#‘(((2↑𝑗) + 1)...(2↑(𝑗 + 1)))) ∈ ℂ)
119 simpr 477 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑗 ∈ ℕ) → 𝑗 ∈ ℕ)
120119nnzd 11441 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑗 ∈ ℕ) → 𝑗 ∈ ℤ)
121 uzid 11662 . . . . . . . . . . . . . . . . . 18 (𝑗 ∈ ℤ → 𝑗 ∈ (ℤ𝑗))
122 peano2uz 11701 . . . . . . . . . . . . . . . . . 18 (𝑗 ∈ (ℤ𝑗) → (𝑗 + 1) ∈ (ℤ𝑗))
123 1le2 11201 . . . . . . . . . . . . . . . . . . 19 1 ≤ 2
124 leexp2a 12872 . . . . . . . . . . . . . . . . . . 19 ((2 ∈ ℝ ∧ 1 ≤ 2 ∧ (𝑗 + 1) ∈ (ℤ𝑗)) → (2↑𝑗) ≤ (2↑(𝑗 + 1)))
12549, 123, 124mp3an12 1411 . . . . . . . . . . . . . . . . . 18 ((𝑗 + 1) ∈ (ℤ𝑗) → (2↑𝑗) ≤ (2↑(𝑗 + 1)))
126120, 121, 122, 1254syl 19 . . . . . . . . . . . . . . . . 17 ((𝜑𝑗 ∈ ℕ) → (2↑𝑗) ≤ (2↑(𝑗 + 1)))
12794, 69syl6eleq 2708 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑗 ∈ ℕ) → (2↑𝑗) ∈ (ℤ‘1))
128102nnzd 11441 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑗 ∈ ℕ) → (2↑(𝑗 + 1)) ∈ ℤ)
129 elfz5 12292 . . . . . . . . . . . . . . . . . 18 (((2↑𝑗) ∈ (ℤ‘1) ∧ (2↑(𝑗 + 1)) ∈ ℤ) → ((2↑𝑗) ∈ (1...(2↑(𝑗 + 1))) ↔ (2↑𝑗) ≤ (2↑(𝑗 + 1))))
130127, 128, 129syl2anc 692 . . . . . . . . . . . . . . . . 17 ((𝜑𝑗 ∈ ℕ) → ((2↑𝑗) ∈ (1...(2↑(𝑗 + 1))) ↔ (2↑𝑗) ≤ (2↑(𝑗 + 1))))
131126, 130mpbird 247 . . . . . . . . . . . . . . . 16 ((𝜑𝑗 ∈ ℕ) → (2↑𝑗) ∈ (1...(2↑(𝑗 + 1))))
132 fzsplit 12325 . . . . . . . . . . . . . . . 16 ((2↑𝑗) ∈ (1...(2↑(𝑗 + 1))) → (1...(2↑(𝑗 + 1))) = ((1...(2↑𝑗)) ∪ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))))
133131, 132syl 17 . . . . . . . . . . . . . . 15 ((𝜑𝑗 ∈ ℕ) → (1...(2↑(𝑗 + 1))) = ((1...(2↑𝑗)) ∪ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))))
134133fveq2d 6162 . . . . . . . . . . . . . 14 ((𝜑𝑗 ∈ ℕ) → (#‘(1...(2↑(𝑗 + 1)))) = (#‘((1...(2↑𝑗)) ∪ (((2↑𝑗) + 1)...(2↑(𝑗 + 1))))))
13595times2d 11236 . . . . . . . . . . . . . . . 16 ((𝜑𝑗 ∈ ℕ) → ((2↑𝑗) · 2) = ((2↑𝑗) + (2↑𝑗)))
13691, 135eqtrd 2655 . . . . . . . . . . . . . . 15 ((𝜑𝑗 ∈ ℕ) → (2↑(𝑗 + 1)) = ((2↑𝑗) + (2↑𝑗)))
137102nnnn0d 11311 . . . . . . . . . . . . . . . 16 ((𝜑𝑗 ∈ ℕ) → (2↑(𝑗 + 1)) ∈ ℕ0)
138 hashfz1 13090 . . . . . . . . . . . . . . . 16 ((2↑(𝑗 + 1)) ∈ ℕ0 → (#‘(1...(2↑(𝑗 + 1)))) = (2↑(𝑗 + 1)))
139137, 138syl 17 . . . . . . . . . . . . . . 15 ((𝜑𝑗 ∈ ℕ) → (#‘(1...(2↑(𝑗 + 1)))) = (2↑(𝑗 + 1)))
140113oveq1d 6630 . . . . . . . . . . . . . . 15 ((𝜑𝑗 ∈ ℕ) → ((#‘(1...(2↑𝑗))) + (2↑𝑗)) = ((2↑𝑗) + (2↑𝑗)))
141136, 139, 1403eqtr4d 2665 . . . . . . . . . . . . . 14 ((𝜑𝑗 ∈ ℕ) → (#‘(1...(2↑(𝑗 + 1)))) = ((#‘(1...(2↑𝑗))) + (2↑𝑗)))
142 fzfid 12728 . . . . . . . . . . . . . . 15 ((𝜑𝑗 ∈ ℕ) → (1...(2↑𝑗)) ∈ Fin)
14394nnred 10995 . . . . . . . . . . . . . . . . 17 ((𝜑𝑗 ∈ ℕ) → (2↑𝑗) ∈ ℝ)
144143ltp1d 10914 . . . . . . . . . . . . . . . 16 ((𝜑𝑗 ∈ ℕ) → (2↑𝑗) < ((2↑𝑗) + 1))
145 fzdisj 12326 . . . . . . . . . . . . . . . 16 ((2↑𝑗) < ((2↑𝑗) + 1) → ((1...(2↑𝑗)) ∩ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))) = ∅)
146144, 145syl 17 . . . . . . . . . . . . . . 15 ((𝜑𝑗 ∈ ℕ) → ((1...(2↑𝑗)) ∩ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))) = ∅)
147 hashun 13127 . . . . . . . . . . . . . . 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))))))
148142, 115, 146, 147syl3anc 1323 . . . . . . . . . . . . . 14 ((𝜑𝑗 ∈ ℕ) → (#‘((1...(2↑𝑗)) ∪ (((2↑𝑗) + 1)...(2↑(𝑗 + 1))))) = ((#‘(1...(2↑𝑗))) + (#‘(((2↑𝑗) + 1)...(2↑(𝑗 + 1))))))
149134, 141, 1483eqtr3d 2663 . . . . . . . . . . . . 13 ((𝜑𝑗 ∈ ℕ) → ((#‘(1...(2↑𝑗))) + (2↑𝑗)) = ((#‘(1...(2↑𝑗))) + (#‘(((2↑𝑗) + 1)...(2↑(𝑗 + 1))))))
150114, 95, 118, 149addcanad 10201 . . . . . . . . . . . 12 ((𝜑𝑗 ∈ ℕ) → (2↑𝑗) = (#‘(((2↑𝑗) + 1)...(2↑(𝑗 + 1)))))
151150oveq1d 6630 . . . . . . . . . . 11 ((𝜑𝑗 ∈ ℕ) → ((2↑𝑗) · (𝐹‘(2↑(𝑗 + 1)))) = ((#‘(((2↑𝑗) + 1)...(2↑(𝑗 + 1)))) · (𝐹‘(2↑(𝑗 + 1)))))
152 fsumconst 14469 . . . . . . . . . . . 12 (((((2↑𝑗) + 1)...(2↑(𝑗 + 1))) ∈ Fin ∧ (𝐹‘(2↑(𝑗 + 1))) ∈ ℂ) → Σ𝑘 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))(𝐹‘(2↑(𝑗 + 1))) = ((#‘(((2↑𝑗) + 1)...(2↑(𝑗 + 1)))) · (𝐹‘(2↑(𝑗 + 1)))))
153115, 108, 152syl2anc 692 . . . . . . . . . . 11 ((𝜑𝑗 ∈ ℕ) → Σ𝑘 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))(𝐹‘(2↑(𝑗 + 1))) = ((#‘(((2↑𝑗) + 1)...(2↑(𝑗 + 1)))) · (𝐹‘(2↑(𝑗 + 1)))))
154151, 153eqtr4d 2658 . . . . . . . . . 10 ((𝜑𝑗 ∈ ℕ) → ((2↑𝑗) · (𝐹‘(2↑(𝑗 + 1)))) = Σ𝑘 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))(𝐹‘(2↑(𝑗 + 1))))
155107adantr 481 . . . . . . . . . . 11 (((𝜑𝑗 ∈ ℕ) ∧ 𝑘 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))) → (𝐹‘(2↑(𝑗 + 1))) ∈ ℝ)
156 simpl 473 . . . . . . . . . . . . 13 ((𝜑𝑗 ∈ ℕ) → 𝜑)
157156adantr 481 . . . . . . . . . . . 12 (((𝜑𝑗 ∈ ℕ) ∧ 𝑘 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))) → 𝜑)
158 peano2nn 10992 . . . . . . . . . . . . . 14 ((2↑𝑗) ∈ ℕ → ((2↑𝑗) + 1) ∈ ℕ)
15994, 158syl 17 . . . . . . . . . . . . 13 ((𝜑𝑗 ∈ ℕ) → ((2↑𝑗) + 1) ∈ ℕ)
160 elfzuz 12296 . . . . . . . . . . . . 13 (𝑘 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1))) → 𝑘 ∈ (ℤ‘((2↑𝑗) + 1)))
161 eluznn 11718 . . . . . . . . . . . . 13 ((((2↑𝑗) + 1) ∈ ℕ ∧ 𝑘 ∈ (ℤ‘((2↑𝑗) + 1))) → 𝑘 ∈ ℕ)
162159, 160, 161syl2an 494 . . . . . . . . . . . 12 (((𝜑𝑗 ∈ ℕ) ∧ 𝑘 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))) → 𝑘 ∈ ℕ)
163157, 162, 37syl2anc 692 . . . . . . . . . . 11 (((𝜑𝑗 ∈ ℕ) ∧ 𝑘 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))) → (𝐹𝑘) ∈ ℝ)
164 elfzuz3 12297 . . . . . . . . . . . . . . 15 (𝑛 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1))) → (2↑(𝑗 + 1)) ∈ (ℤ𝑛))
165164adantl 482 . . . . . . . . . . . . . 14 (((𝜑𝑗 ∈ ℕ) ∧ 𝑛 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))) → (2↑(𝑗 + 1)) ∈ (ℤ𝑛))
166 simplll 797 . . . . . . . . . . . . . . 15 ((((𝜑𝑗 ∈ ℕ) ∧ 𝑛 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))) ∧ 𝑘 ∈ (𝑛...(2↑(𝑗 + 1)))) → 𝜑)
167 elfzuz 12296 . . . . . . . . . . . . . . . . 17 (𝑛 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1))) → 𝑛 ∈ (ℤ‘((2↑𝑗) + 1)))
168 eluznn 11718 . . . . . . . . . . . . . . . . 17 ((((2↑𝑗) + 1) ∈ ℕ ∧ 𝑛 ∈ (ℤ‘((2↑𝑗) + 1))) → 𝑛 ∈ ℕ)
169159, 167, 168syl2an 494 . . . . . . . . . . . . . . . 16 (((𝜑𝑗 ∈ ℕ) ∧ 𝑛 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))) → 𝑛 ∈ ℕ)
170 elfzuz 12296 . . . . . . . . . . . . . . . 16 (𝑘 ∈ (𝑛...(2↑(𝑗 + 1))) → 𝑘 ∈ (ℤ𝑛))
171 eluznn 11718 . . . . . . . . . . . . . . . 16 ((𝑛 ∈ ℕ ∧ 𝑘 ∈ (ℤ𝑛)) → 𝑘 ∈ ℕ)
172169, 170, 171syl2an 494 . . . . . . . . . . . . . . 15 ((((𝜑𝑗 ∈ ℕ) ∧ 𝑛 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))) ∧ 𝑘 ∈ (𝑛...(2↑(𝑗 + 1)))) → 𝑘 ∈ ℕ)
173166, 172, 37syl2anc 692 . . . . . . . . . . . . . 14 ((((𝜑𝑗 ∈ ℕ) ∧ 𝑛 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))) ∧ 𝑘 ∈ (𝑛...(2↑(𝑗 + 1)))) → (𝐹𝑘) ∈ ℝ)
174 simplll 797 . . . . . . . . . . . . . . 15 ((((𝜑𝑗 ∈ ℕ) ∧ 𝑛 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))) ∧ 𝑘 ∈ (𝑛...((2↑(𝑗 + 1)) − 1))) → 𝜑)
175 elfzuz 12296 . . . . . . . . . . . . . . . 16 (𝑘 ∈ (𝑛...((2↑(𝑗 + 1)) − 1)) → 𝑘 ∈ (ℤ𝑛))
176169, 175, 171syl2an 494 . . . . . . . . . . . . . . 15 ((((𝜑𝑗 ∈ ℕ) ∧ 𝑛 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))) ∧ 𝑘 ∈ (𝑛...((2↑(𝑗 + 1)) − 1))) → 𝑘 ∈ ℕ)
177 climcnds.3 . . . . . . . . . . . . . . 15 ((𝜑𝑘 ∈ ℕ) → (𝐹‘(𝑘 + 1)) ≤ (𝐹𝑘))
178174, 176, 177syl2anc 692 . . . . . . . . . . . . . 14 ((((𝜑𝑗 ∈ ℕ) ∧ 𝑛 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))) ∧ 𝑘 ∈ (𝑛...((2↑(𝑗 + 1)) − 1))) → (𝐹‘(𝑘 + 1)) ≤ (𝐹𝑘))
179165, 173, 178monoord2 12788 . . . . . . . . . . . . 13 (((𝜑𝑗 ∈ ℕ) ∧ 𝑛 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))) → (𝐹‘(2↑(𝑗 + 1))) ≤ (𝐹𝑛))
180179ralrimiva 2962 . . . . . . . . . . . 12 ((𝜑𝑗 ∈ ℕ) → ∀𝑛 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))(𝐹‘(2↑(𝑗 + 1))) ≤ (𝐹𝑛))
181 fveq2 6158 . . . . . . . . . . . . . 14 (𝑛 = 𝑘 → (𝐹𝑛) = (𝐹𝑘))
182181breq2d 4635 . . . . . . . . . . . . 13 (𝑛 = 𝑘 → ((𝐹‘(2↑(𝑗 + 1))) ≤ (𝐹𝑛) ↔ (𝐹‘(2↑(𝑗 + 1))) ≤ (𝐹𝑘)))
183182rspccva 3298 . . . . . . . . . . . 12 ((∀𝑛 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))(𝐹‘(2↑(𝑗 + 1))) ≤ (𝐹𝑛) ∧ 𝑘 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))) → (𝐹‘(2↑(𝑗 + 1))) ≤ (𝐹𝑘))
184180, 183sylan 488 . . . . . . . . . . 11 (((𝜑𝑗 ∈ ℕ) ∧ 𝑘 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))) → (𝐹‘(2↑(𝑗 + 1))) ≤ (𝐹𝑘))
185115, 155, 163, 184fsumle 14477 . . . . . . . . . 10 ((𝜑𝑗 ∈ ℕ) → Σ𝑘 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))(𝐹‘(2↑(𝑗 + 1))) ≤ Σ𝑘 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))(𝐹𝑘))
186154, 185eqbrtrd 4645 . . . . . . . . 9 ((𝜑𝑗 ∈ ℕ) → ((2↑𝑗) · (𝐹‘(2↑(𝑗 + 1)))) ≤ Σ𝑘 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))(𝐹𝑘))
187143, 107remulcld 10030 . . . . . . . . . 10 ((𝜑𝑗 ∈ ℕ) → ((2↑𝑗) · (𝐹‘(2↑(𝑗 + 1)))) ∈ ℝ)
188115, 163fsumrecl 14414 . . . . . . . . . 10 ((𝜑𝑗 ∈ ℕ) → Σ𝑘 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))(𝐹𝑘) ∈ ℝ)
18951a1i 11 . . . . . . . . . 10 ((𝜑𝑗 ∈ ℕ) → (2 ∈ ℝ ∧ 0 < 2))
190 lemul2 10836 . . . . . . . . . 10 ((((2↑𝑗) · (𝐹‘(2↑(𝑗 + 1)))) ∈ ℝ ∧ Σ𝑘 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))(𝐹𝑘) ∈ ℝ ∧ (2 ∈ ℝ ∧ 0 < 2)) → (((2↑𝑗) · (𝐹‘(2↑(𝑗 + 1)))) ≤ Σ𝑘 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))(𝐹𝑘) ↔ (2 · ((2↑𝑗) · (𝐹‘(2↑(𝑗 + 1))))) ≤ (2 · Σ𝑘 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))(𝐹𝑘))))
191187, 188, 189, 190syl3anc 1323 . . . . . . . . 9 ((𝜑𝑗 ∈ ℕ) → (((2↑𝑗) · (𝐹‘(2↑(𝑗 + 1)))) ≤ Σ𝑘 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))(𝐹𝑘) ↔ (2 · ((2↑𝑗) · (𝐹‘(2↑(𝑗 + 1))))) ≤ (2 · Σ𝑘 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))(𝐹𝑘))))
192186, 191mpbid 222 . . . . . . . 8 ((𝜑𝑗 ∈ ℕ) → (2 · ((2↑𝑗) · (𝐹‘(2↑(𝑗 + 1))))) ≤ (2 · Σ𝑘 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))(𝐹𝑘)))
193110, 192eqbrtrd 4645 . . . . . . 7 ((𝜑𝑗 ∈ ℕ) → (𝐺‘(𝑗 + 1)) ≤ (2 · Σ𝑘 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))(𝐹𝑘)))
194 1zzd 11368 . . . . . . . . . 10 (𝜑 → 1 ∈ ℤ)
195 nnnn0 11259 . . . . . . . . . . 11 (𝑛 ∈ ℕ → 𝑛 ∈ ℕ0)
196 simpr 477 . . . . . . . . . . . . . . 15 ((𝜑𝑛 ∈ ℕ0) → 𝑛 ∈ ℕ0)
197 nnexpcl 12829 . . . . . . . . . . . . . . 15 ((2 ∈ ℕ ∧ 𝑛 ∈ ℕ0) → (2↑𝑛) ∈ ℕ)
19836, 196, 197sylancr 694 . . . . . . . . . . . . . 14 ((𝜑𝑛 ∈ ℕ0) → (2↑𝑛) ∈ ℕ)
199198nnred 10995 . . . . . . . . . . . . 13 ((𝜑𝑛 ∈ ℕ0) → (2↑𝑛) ∈ ℝ)
20038adantr 481 . . . . . . . . . . . . . 14 ((𝜑𝑛 ∈ ℕ0) → ∀𝑘 ∈ ℕ (𝐹𝑘) ∈ ℝ)
201 fveq2 6158 . . . . . . . . . . . . . . . 16 (𝑘 = (2↑𝑛) → (𝐹𝑘) = (𝐹‘(2↑𝑛)))
202201eleq1d 2683 . . . . . . . . . . . . . . 15 (𝑘 = (2↑𝑛) → ((𝐹𝑘) ∈ ℝ ↔ (𝐹‘(2↑𝑛)) ∈ ℝ))
203202rspcv 3295 . . . . . . . . . . . . . 14 ((2↑𝑛) ∈ ℕ → (∀𝑘 ∈ ℕ (𝐹𝑘) ∈ ℝ → (𝐹‘(2↑𝑛)) ∈ ℝ))
204198, 200, 203sylc 65 . . . . . . . . . . . . 13 ((𝜑𝑛 ∈ ℕ0) → (𝐹‘(2↑𝑛)) ∈ ℝ)
205199, 204remulcld 10030 . . . . . . . . . . . 12 ((𝜑𝑛 ∈ ℕ0) → ((2↑𝑛) · (𝐹‘(2↑𝑛))) ∈ ℝ)
20658, 205eqeltrd 2698 . . . . . . . . . . 11 ((𝜑𝑛 ∈ ℕ0) → (𝐺𝑛) ∈ ℝ)
207195, 206sylan2 491 . . . . . . . . . 10 ((𝜑𝑛 ∈ ℕ) → (𝐺𝑛) ∈ ℝ)
20869, 194, 207serfre 12786 . . . . . . . . 9 (𝜑 → seq1( + , 𝐺):ℕ⟶ℝ)
209208ffvelrnda 6325 . . . . . . . 8 ((𝜑𝑗 ∈ ℕ) → (seq1( + , 𝐺)‘𝑗) ∈ ℝ)
210207ralrimiva 2962 . . . . . . . . . 10 (𝜑 → ∀𝑛 ∈ ℕ (𝐺𝑛) ∈ ℝ)
211210adantr 481 . . . . . . . . 9 ((𝜑𝑗 ∈ ℕ) → ∀𝑛 ∈ ℕ (𝐺𝑛) ∈ ℝ)
21281eleq1d 2683 . . . . . . . . . 10 (𝑛 = (𝑗 + 1) → ((𝐺𝑛) ∈ ℝ ↔ (𝐺‘(𝑗 + 1)) ∈ ℝ))
213212rspcv 3295 . . . . . . . . 9 ((𝑗 + 1) ∈ ℕ → (∀𝑛 ∈ ℕ (𝐺𝑛) ∈ ℝ → (𝐺‘(𝑗 + 1)) ∈ ℝ))
21478, 211, 213sylc 65 . . . . . . . 8 ((𝜑𝑗 ∈ ℕ) → (𝐺‘(𝑗 + 1)) ∈ ℝ)
21569, 194, 37serfre 12786 . . . . . . . . . 10 (𝜑 → seq1( + , 𝐹):ℕ⟶ℝ)
216 ffvelrn 6323 . . . . . . . . . 10 ((seq1( + , 𝐹):ℕ⟶ℝ ∧ (2↑𝑗) ∈ ℕ) → (seq1( + , 𝐹)‘(2↑𝑗)) ∈ ℝ)
217215, 93, 216syl2an 494 . . . . . . . . 9 ((𝜑𝑗 ∈ ℕ) → (seq1( + , 𝐹)‘(2↑𝑗)) ∈ ℝ)
218 remulcl 9981 . . . . . . . . 9 ((2 ∈ ℝ ∧ (seq1( + , 𝐹)‘(2↑𝑗)) ∈ ℝ) → (2 · (seq1( + , 𝐹)‘(2↑𝑗))) ∈ ℝ)
21949, 217, 218sylancr 694 . . . . . . . 8 ((𝜑𝑗 ∈ ℕ) → (2 · (seq1( + , 𝐹)‘(2↑𝑗))) ∈ ℝ)
220 remulcl 9981 . . . . . . . . 9 ((2 ∈ ℝ ∧ Σ𝑘 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))(𝐹𝑘) ∈ ℝ) → (2 · Σ𝑘 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))(𝐹𝑘)) ∈ ℝ)
22149, 188, 220sylancr 694 . . . . . . . 8 ((𝜑𝑗 ∈ ℕ) → (2 · Σ𝑘 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))(𝐹𝑘)) ∈ ℝ)
222 le2add 10470 . . . . . . . 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)))(𝐹𝑘)))))
223209, 214, 219, 221, 222syl22anc 1324 . . . . . . 7 ((𝜑𝑗 ∈ ℕ) → (((seq1( + , 𝐺)‘𝑗) ≤ (2 · (seq1( + , 𝐹)‘(2↑𝑗))) ∧ (𝐺‘(𝑗 + 1)) ≤ (2 · Σ𝑘 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))(𝐹𝑘))) → ((seq1( + , 𝐺)‘𝑗) + (𝐺‘(𝑗 + 1))) ≤ ((2 · (seq1( + , 𝐹)‘(2↑𝑗))) + (2 · Σ𝑘 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))(𝐹𝑘)))))
224193, 223mpan2d 709 . . . . . 6 ((𝜑𝑗 ∈ ℕ) → ((seq1( + , 𝐺)‘𝑗) ≤ (2 · (seq1( + , 𝐹)‘(2↑𝑗))) → ((seq1( + , 𝐺)‘𝑗) + (𝐺‘(𝑗 + 1))) ≤ ((2 · (seq1( + , 𝐹)‘(2↑𝑗))) + (2 · Σ𝑘 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))(𝐹𝑘)))))
225119, 69syl6eleq 2708 . . . . . . . 8 ((𝜑𝑗 ∈ ℕ) → 𝑗 ∈ (ℤ‘1))
226 seqp1 12772 . . . . . . . 8 (𝑗 ∈ (ℤ‘1) → (seq1( + , 𝐺)‘(𝑗 + 1)) = ((seq1( + , 𝐺)‘𝑗) + (𝐺‘(𝑗 + 1))))
227225, 226syl 17 . . . . . . 7 ((𝜑𝑗 ∈ ℕ) → (seq1( + , 𝐺)‘(𝑗 + 1)) = ((seq1( + , 𝐺)‘𝑗) + (𝐺‘(𝑗 + 1))))
228 fzfid 12728 . . . . . . . . . . 11 ((𝜑𝑗 ∈ ℕ) → (1...(2↑(𝑗 + 1))) ∈ Fin)
229 elfznn 12328 . . . . . . . . . . . 12 (𝑘 ∈ (1...(2↑(𝑗 + 1))) → 𝑘 ∈ ℕ)
23037recnd 10028 . . . . . . . . . . . 12 ((𝜑𝑘 ∈ ℕ) → (𝐹𝑘) ∈ ℂ)
231156, 229, 230syl2an 494 . . . . . . . . . . 11 (((𝜑𝑗 ∈ ℕ) ∧ 𝑘 ∈ (1...(2↑(𝑗 + 1)))) → (𝐹𝑘) ∈ ℂ)
232146, 133, 228, 231fsumsplit 14420 . . . . . . . . . 10 ((𝜑𝑗 ∈ ℕ) → Σ𝑘 ∈ (1...(2↑(𝑗 + 1)))(𝐹𝑘) = (Σ𝑘 ∈ (1...(2↑𝑗))(𝐹𝑘) + Σ𝑘 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))(𝐹𝑘)))
233 eqidd 2622 . . . . . . . . . . 11 (((𝜑𝑗 ∈ ℕ) ∧ 𝑘 ∈ (1...(2↑(𝑗 + 1)))) → (𝐹𝑘) = (𝐹𝑘))
234102, 69syl6eleq 2708 . . . . . . . . . . 11 ((𝜑𝑗 ∈ ℕ) → (2↑(𝑗 + 1)) ∈ (ℤ‘1))
235233, 234, 231fsumser 14410 . . . . . . . . . 10 ((𝜑𝑗 ∈ ℕ) → Σ𝑘 ∈ (1...(2↑(𝑗 + 1)))(𝐹𝑘) = (seq1( + , 𝐹)‘(2↑(𝑗 + 1))))
236 eqidd 2622 . . . . . . . . . . . 12 (((𝜑𝑗 ∈ ℕ) ∧ 𝑘 ∈ (1...(2↑𝑗))) → (𝐹𝑘) = (𝐹𝑘))
237 elfznn 12328 . . . . . . . . . . . . 13 (𝑘 ∈ (1...(2↑𝑗)) → 𝑘 ∈ ℕ)
238156, 237, 230syl2an 494 . . . . . . . . . . . 12 (((𝜑𝑗 ∈ ℕ) ∧ 𝑘 ∈ (1...(2↑𝑗))) → (𝐹𝑘) ∈ ℂ)
239236, 127, 238fsumser 14410 . . . . . . . . . . 11 ((𝜑𝑗 ∈ ℕ) → Σ𝑘 ∈ (1...(2↑𝑗))(𝐹𝑘) = (seq1( + , 𝐹)‘(2↑𝑗)))
240239oveq1d 6630 . . . . . . . . . 10 ((𝜑𝑗 ∈ ℕ) → (Σ𝑘 ∈ (1...(2↑𝑗))(𝐹𝑘) + Σ𝑘 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))(𝐹𝑘)) = ((seq1( + , 𝐹)‘(2↑𝑗)) + Σ𝑘 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))(𝐹𝑘)))
241232, 235, 2403eqtr3d 2663 . . . . . . . . 9 ((𝜑𝑗 ∈ ℕ) → (seq1( + , 𝐹)‘(2↑(𝑗 + 1))) = ((seq1( + , 𝐹)‘(2↑𝑗)) + Σ𝑘 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))(𝐹𝑘)))
242241oveq2d 6631 . . . . . . . 8 ((𝜑𝑗 ∈ ℕ) → (2 · (seq1( + , 𝐹)‘(2↑(𝑗 + 1)))) = (2 · ((seq1( + , 𝐹)‘(2↑𝑗)) + Σ𝑘 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))(𝐹𝑘))))
243217recnd 10028 . . . . . . . . 9 ((𝜑𝑗 ∈ ℕ) → (seq1( + , 𝐹)‘(2↑𝑗)) ∈ ℂ)
244188recnd 10028 . . . . . . . . 9 ((𝜑𝑗 ∈ ℕ) → Σ𝑘 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))(𝐹𝑘) ∈ ℂ)
245100, 243, 244adddid 10024 . . . . . . . 8 ((𝜑𝑗 ∈ ℕ) → (2 · ((seq1( + , 𝐹)‘(2↑𝑗)) + Σ𝑘 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))(𝐹𝑘))) = ((2 · (seq1( + , 𝐹)‘(2↑𝑗))) + (2 · Σ𝑘 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))(𝐹𝑘))))
246242, 245eqtrd 2655 . . . . . . 7 ((𝜑𝑗 ∈ ℕ) → (2 · (seq1( + , 𝐹)‘(2↑(𝑗 + 1)))) = ((2 · (seq1( + , 𝐹)‘(2↑𝑗))) + (2 · Σ𝑘 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))(𝐹𝑘))))
247227, 246breq12d 4636 . . . . . 6 ((𝜑𝑗 ∈ ℕ) → ((seq1( + , 𝐺)‘(𝑗 + 1)) ≤ (2 · (seq1( + , 𝐹)‘(2↑(𝑗 + 1)))) ↔ ((seq1( + , 𝐺)‘𝑗) + (𝐺‘(𝑗 + 1))) ≤ ((2 · (seq1( + , 𝐹)‘(2↑𝑗))) + (2 · Σ𝑘 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))(𝐹𝑘)))))
248224, 247sylibrd 249 . . . . 5 ((𝜑𝑗 ∈ ℕ) → ((seq1( + , 𝐺)‘𝑗) ≤ (2 · (seq1( + , 𝐹)‘(2↑𝑗))) → (seq1( + , 𝐺)‘(𝑗 + 1)) ≤ (2 · (seq1( + , 𝐹)‘(2↑(𝑗 + 1))))))
249248expcom 451 . . . 4 (𝑗 ∈ ℕ → (𝜑 → ((seq1( + , 𝐺)‘𝑗) ≤ (2 · (seq1( + , 𝐹)‘(2↑𝑗))) → (seq1( + , 𝐺)‘(𝑗 + 1)) ≤ (2 · (seq1( + , 𝐹)‘(2↑(𝑗 + 1)))))))
250249a2d 29 . . 3 (𝑗 ∈ ℕ → ((𝜑 → (seq1( + , 𝐺)‘𝑗) ≤ (2 · (seq1( + , 𝐹)‘(2↑𝑗)))) → (𝜑 → (seq1( + , 𝐺)‘(𝑗 + 1)) ≤ (2 · (seq1( + , 𝐹)‘(2↑(𝑗 + 1)))))))
25110, 16, 22, 28, 76, 250nnind 10998 . 2 (𝑁 ∈ ℕ → (𝜑 → (seq1( + , 𝐺)‘𝑁) ≤ (2 · (seq1( + , 𝐹)‘(2↑𝑁)))))
252251impcom 446 1 ((𝜑𝑁 ∈ ℕ) → (seq1( + , 𝐺)‘𝑁) ≤ (2 · (seq1( + , 𝐹)‘(2↑𝑁))))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 196  wa 384   = wceq 1480  wcel 1987  wral 2908  cun 3558  cin 3559  c0 3897   class class class wbr 4623  wf 5853  cfv 5857  (class class class)co 6615  Fincfn 7915  cc 9894  cr 9895  0cc0 9896  1c1 9897   + caddc 9899   · cmul 9901   < clt 10034  cle 10035  cmin 10226  cn 10980  2c2 11030  0cn0 11252  cz 11337  cuz 11647  ...cfz 12284  seqcseq 12757  cexp 12816  #chash 13073  Σcsu 14366
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1719  ax-4 1734  ax-5 1836  ax-6 1885  ax-7 1932  ax-8 1989  ax-9 1996  ax-10 2016  ax-11 2031  ax-12 2044  ax-13 2245  ax-ext 2601  ax-rep 4741  ax-sep 4751  ax-nul 4759  ax-pow 4813  ax-pr 4877  ax-un 6914  ax-inf2 8498  ax-cnex 9952  ax-resscn 9953  ax-1cn 9954  ax-icn 9955  ax-addcl 9956  ax-addrcl 9957  ax-mulcl 9958  ax-mulrcl 9959  ax-mulcom 9960  ax-addass 9961  ax-mulass 9962  ax-distr 9963  ax-i2m1 9964  ax-1ne0 9965  ax-1rid 9966  ax-rnegex 9967  ax-rrecex 9968  ax-cnre 9969  ax-pre-lttri 9970  ax-pre-lttrn 9971  ax-pre-ltadd 9972  ax-pre-mulgt0 9973  ax-pre-sup 9974
This theorem depends on definitions:  df-bi 197  df-or 385  df-an 386  df-3or 1037  df-3an 1038  df-tru 1483  df-fal 1486  df-ex 1702  df-nf 1707  df-sb 1878  df-eu 2473  df-mo 2474  df-clab 2608  df-cleq 2614  df-clel 2617  df-nfc 2750  df-ne 2791  df-nel 2894  df-ral 2913  df-rex 2914  df-reu 2915  df-rmo 2916  df-rab 2917  df-v 3192  df-sbc 3423  df-csb 3520  df-dif 3563  df-un 3565  df-in 3567  df-ss 3574  df-pss 3576  df-nul 3898  df-if 4065  df-pw 4138  df-sn 4156  df-pr 4158  df-tp 4160  df-op 4162  df-uni 4410  df-int 4448  df-iun 4494  df-br 4624  df-opab 4684  df-mpt 4685  df-tr 4723  df-eprel 4995  df-id 4999  df-po 5005  df-so 5006  df-fr 5043  df-se 5044  df-we 5045  df-xp 5090  df-rel 5091  df-cnv 5092  df-co 5093  df-dm 5094  df-rn 5095  df-res 5096  df-ima 5097  df-pred 5649  df-ord 5695  df-on 5696  df-lim 5697  df-suc 5698  df-iota 5820  df-fun 5859  df-fn 5860  df-f 5861  df-f1 5862  df-fo 5863  df-f1o 5864  df-fv 5865  df-isom 5866  df-riota 6576  df-ov 6618  df-oprab 6619  df-mpt2 6620  df-om 7028  df-1st 7128  df-2nd 7129  df-wrecs 7367  df-recs 7428  df-rdg 7466  df-1o 7520  df-oadd 7524  df-er 7702  df-en 7916  df-dom 7917  df-sdom 7918  df-fin 7919  df-sup 8308  df-oi 8375  df-card 8725  df-cda 8950  df-pnf 10036  df-mnf 10037  df-xr 10038  df-ltxr 10039  df-le 10040  df-sub 10228  df-neg 10229  df-div 10645  df-nn 10981  df-2 11039  df-3 11040  df-n0 11253  df-z 11338  df-uz 11648  df-rp 11793  df-ico 12139  df-fz 12285  df-fzo 12423  df-seq 12758  df-exp 12817  df-hash 13074  df-cj 13789  df-re 13790  df-im 13791  df-sqrt 13925  df-abs 13926  df-clim 14169  df-sum 14367
This theorem is referenced by:  climcnds  14527
  Copyright terms: Public domain W3C validator