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

Theorem climcndslem2 15200
Description: Lemma for climcnds 15201: 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 6649 . . . . 5 (𝑥 = 1 → (seq1( + , 𝐺)‘𝑥) = (seq1( + , 𝐺)‘1))
2 oveq2 7147 . . . . . . . 8 (𝑥 = 1 → (2↑𝑥) = (2↑1))
3 2cn 11704 . . . . . . . . 9 2 ∈ ℂ
4 exp1 13435 . . . . . . . . 9 (2 ∈ ℂ → (2↑1) = 2)
53, 4ax-mp 5 . . . . . . . 8 (2↑1) = 2
62, 5eqtrdi 2852 . . . . . . 7 (𝑥 = 1 → (2↑𝑥) = 2)
76fveq2d 6653 . . . . . 6 (𝑥 = 1 → (seq1( + , 𝐹)‘(2↑𝑥)) = (seq1( + , 𝐹)‘2))
87oveq2d 7155 . . . . 5 (𝑥 = 1 → (2 · (seq1( + , 𝐹)‘(2↑𝑥))) = (2 · (seq1( + , 𝐹)‘2)))
91, 8breq12d 5046 . . . 4 (𝑥 = 1 → ((seq1( + , 𝐺)‘𝑥) ≤ (2 · (seq1( + , 𝐹)‘(2↑𝑥))) ↔ (seq1( + , 𝐺)‘1) ≤ (2 · (seq1( + , 𝐹)‘2))))
109imbi2d 344 . . 3 (𝑥 = 1 → ((𝜑 → (seq1( + , 𝐺)‘𝑥) ≤ (2 · (seq1( + , 𝐹)‘(2↑𝑥)))) ↔ (𝜑 → (seq1( + , 𝐺)‘1) ≤ (2 · (seq1( + , 𝐹)‘2)))))
11 fveq2 6649 . . . . 5 (𝑥 = 𝑗 → (seq1( + , 𝐺)‘𝑥) = (seq1( + , 𝐺)‘𝑗))
12 oveq2 7147 . . . . . . 7 (𝑥 = 𝑗 → (2↑𝑥) = (2↑𝑗))
1312fveq2d 6653 . . . . . 6 (𝑥 = 𝑗 → (seq1( + , 𝐹)‘(2↑𝑥)) = (seq1( + , 𝐹)‘(2↑𝑗)))
1413oveq2d 7155 . . . . 5 (𝑥 = 𝑗 → (2 · (seq1( + , 𝐹)‘(2↑𝑥))) = (2 · (seq1( + , 𝐹)‘(2↑𝑗))))
1511, 14breq12d 5046 . . . 4 (𝑥 = 𝑗 → ((seq1( + , 𝐺)‘𝑥) ≤ (2 · (seq1( + , 𝐹)‘(2↑𝑥))) ↔ (seq1( + , 𝐺)‘𝑗) ≤ (2 · (seq1( + , 𝐹)‘(2↑𝑗)))))
1615imbi2d 344 . . 3 (𝑥 = 𝑗 → ((𝜑 → (seq1( + , 𝐺)‘𝑥) ≤ (2 · (seq1( + , 𝐹)‘(2↑𝑥)))) ↔ (𝜑 → (seq1( + , 𝐺)‘𝑗) ≤ (2 · (seq1( + , 𝐹)‘(2↑𝑗))))))
17 fveq2 6649 . . . . 5 (𝑥 = (𝑗 + 1) → (seq1( + , 𝐺)‘𝑥) = (seq1( + , 𝐺)‘(𝑗 + 1)))
18 oveq2 7147 . . . . . . 7 (𝑥 = (𝑗 + 1) → (2↑𝑥) = (2↑(𝑗 + 1)))
1918fveq2d 6653 . . . . . 6 (𝑥 = (𝑗 + 1) → (seq1( + , 𝐹)‘(2↑𝑥)) = (seq1( + , 𝐹)‘(2↑(𝑗 + 1))))
2019oveq2d 7155 . . . . 5 (𝑥 = (𝑗 + 1) → (2 · (seq1( + , 𝐹)‘(2↑𝑥))) = (2 · (seq1( + , 𝐹)‘(2↑(𝑗 + 1)))))
2117, 20breq12d 5046 . . . 4 (𝑥 = (𝑗 + 1) → ((seq1( + , 𝐺)‘𝑥) ≤ (2 · (seq1( + , 𝐹)‘(2↑𝑥))) ↔ (seq1( + , 𝐺)‘(𝑗 + 1)) ≤ (2 · (seq1( + , 𝐹)‘(2↑(𝑗 + 1))))))
2221imbi2d 344 . . 3 (𝑥 = (𝑗 + 1) → ((𝜑 → (seq1( + , 𝐺)‘𝑥) ≤ (2 · (seq1( + , 𝐹)‘(2↑𝑥)))) ↔ (𝜑 → (seq1( + , 𝐺)‘(𝑗 + 1)) ≤ (2 · (seq1( + , 𝐹)‘(2↑(𝑗 + 1)))))))
23 fveq2 6649 . . . . 5 (𝑥 = 𝑁 → (seq1( + , 𝐺)‘𝑥) = (seq1( + , 𝐺)‘𝑁))
24 oveq2 7147 . . . . . . 7 (𝑥 = 𝑁 → (2↑𝑥) = (2↑𝑁))
2524fveq2d 6653 . . . . . 6 (𝑥 = 𝑁 → (seq1( + , 𝐹)‘(2↑𝑥)) = (seq1( + , 𝐹)‘(2↑𝑁)))
2625oveq2d 7155 . . . . 5 (𝑥 = 𝑁 → (2 · (seq1( + , 𝐹)‘(2↑𝑥))) = (2 · (seq1( + , 𝐹)‘(2↑𝑁))))
2723, 26breq12d 5046 . . . 4 (𝑥 = 𝑁 → ((seq1( + , 𝐺)‘𝑥) ≤ (2 · (seq1( + , 𝐹)‘(2↑𝑥))) ↔ (seq1( + , 𝐺)‘𝑁) ≤ (2 · (seq1( + , 𝐹)‘(2↑𝑁)))))
2827imbi2d 344 . . 3 (𝑥 = 𝑁 → ((𝜑 → (seq1( + , 𝐺)‘𝑥) ≤ (2 · (seq1( + , 𝐹)‘(2↑𝑥)))) ↔ (𝜑 → (seq1( + , 𝐺)‘𝑁) ≤ (2 · (seq1( + , 𝐹)‘(2↑𝑁))))))
29 fveq2 6649 . . . . . . . 8 (𝑘 = 1 → (𝐹𝑘) = (𝐹‘1))
3029breq2d 5045 . . . . . . 7 (𝑘 = 1 → (0 ≤ (𝐹𝑘) ↔ 0 ≤ (𝐹‘1)))
31 climcnds.2 . . . . . . . 8 ((𝜑𝑘 ∈ ℕ) → 0 ≤ (𝐹𝑘))
3231ralrimiva 3152 . . . . . . 7 (𝜑 → ∀𝑘 ∈ ℕ 0 ≤ (𝐹𝑘))
33 1nn 11640 . . . . . . . 8 1 ∈ ℕ
3433a1i 11 . . . . . . 7 (𝜑 → 1 ∈ ℕ)
3530, 32, 34rspcdva 3576 . . . . . 6 (𝜑 → 0 ≤ (𝐹‘1))
36 fveq2 6649 . . . . . . . . 9 (𝑘 = 2 → (𝐹𝑘) = (𝐹‘2))
3736eleq1d 2877 . . . . . . . 8 (𝑘 = 2 → ((𝐹𝑘) ∈ ℝ ↔ (𝐹‘2) ∈ ℝ))
38 climcnds.1 . . . . . . . . 9 ((𝜑𝑘 ∈ ℕ) → (𝐹𝑘) ∈ ℝ)
3938ralrimiva 3152 . . . . . . . 8 (𝜑 → ∀𝑘 ∈ ℕ (𝐹𝑘) ∈ ℝ)
40 2nn 11702 . . . . . . . . 9 2 ∈ ℕ
4140a1i 11 . . . . . . . 8 (𝜑 → 2 ∈ ℕ)
4237, 39, 41rspcdva 3576 . . . . . . 7 (𝜑 → (𝐹‘2) ∈ ℝ)
4329eleq1d 2877 . . . . . . . 8 (𝑘 = 1 → ((𝐹𝑘) ∈ ℝ ↔ (𝐹‘1) ∈ ℝ))
4443, 39, 34rspcdva 3576 . . . . . . 7 (𝜑 → (𝐹‘1) ∈ ℝ)
4542, 44addge02d 11222 . . . . . 6 (𝜑 → (0 ≤ (𝐹‘1) ↔ (𝐹‘2) ≤ ((𝐹‘1) + (𝐹‘2))))
4635, 45mpbid 235 . . . . 5 (𝜑 → (𝐹‘2) ≤ ((𝐹‘1) + (𝐹‘2)))
4744, 42readdcld 10663 . . . . . 6 (𝜑 → ((𝐹‘1) + (𝐹‘2)) ∈ ℝ)
4841nnrpd 12421 . . . . . 6 (𝜑 → 2 ∈ ℝ+)
4942, 47, 48lemul2d 12467 . . . . 5 (𝜑 → ((𝐹‘2) ≤ ((𝐹‘1) + (𝐹‘2)) ↔ (2 · (𝐹‘2)) ≤ (2 · ((𝐹‘1) + (𝐹‘2)))))
5046, 49mpbid 235 . . . 4 (𝜑 → (2 · (𝐹‘2)) ≤ (2 · ((𝐹‘1) + (𝐹‘2))))
51 1z 12004 . . . . 5 1 ∈ ℤ
52 fveq2 6649 . . . . . . 7 (𝑛 = 1 → (𝐺𝑛) = (𝐺‘1))
53 oveq2 7147 . . . . . . . . 9 (𝑛 = 1 → (2↑𝑛) = (2↑1))
5453, 5eqtrdi 2852 . . . . . . . 8 (𝑛 = 1 → (2↑𝑛) = 2)
5554fveq2d 6653 . . . . . . . 8 (𝑛 = 1 → (𝐹‘(2↑𝑛)) = (𝐹‘2))
5654, 55oveq12d 7157 . . . . . . 7 (𝑛 = 1 → ((2↑𝑛) · (𝐹‘(2↑𝑛))) = (2 · (𝐹‘2)))
5752, 56eqeq12d 2817 . . . . . 6 (𝑛 = 1 → ((𝐺𝑛) = ((2↑𝑛) · (𝐹‘(2↑𝑛))) ↔ (𝐺‘1) = (2 · (𝐹‘2))))
58 climcnds.4 . . . . . . 7 ((𝜑𝑛 ∈ ℕ0) → (𝐺𝑛) = ((2↑𝑛) · (𝐹‘(2↑𝑛))))
5958ralrimiva 3152 . . . . . 6 (𝜑 → ∀𝑛 ∈ ℕ0 (𝐺𝑛) = ((2↑𝑛) · (𝐹‘(2↑𝑛))))
60 1nn0 11905 . . . . . . 7 1 ∈ ℕ0
6160a1i 11 . . . . . 6 (𝜑 → 1 ∈ ℕ0)
6257, 59, 61rspcdva 3576 . . . . 5 (𝜑 → (𝐺‘1) = (2 · (𝐹‘2)))
6351, 62seq1i 13382 . . . 4 (𝜑 → (seq1( + , 𝐺)‘1) = (2 · (𝐹‘2)))
64 nnuz 12273 . . . . . 6 ℕ = (ℤ‘1)
65 df-2 11692 . . . . . 6 2 = (1 + 1)
66 eqidd 2802 . . . . . . 7 (𝜑 → (𝐹‘1) = (𝐹‘1))
6751, 66seq1i 13382 . . . . . 6 (𝜑 → (seq1( + , 𝐹)‘1) = (𝐹‘1))
68 eqidd 2802 . . . . . 6 (𝜑 → (𝐹‘2) = (𝐹‘2))
6964, 34, 65, 67, 68seqp1d 13385 . . . . 5 (𝜑 → (seq1( + , 𝐹)‘2) = ((𝐹‘1) + (𝐹‘2)))
7069oveq2d 7155 . . . 4 (𝜑 → (2 · (seq1( + , 𝐹)‘2)) = (2 · ((𝐹‘1) + (𝐹‘2))))
7150, 63, 703brtr4d 5065 . . 3 (𝜑 → (seq1( + , 𝐺)‘1) ≤ (2 · (seq1( + , 𝐹)‘2)))
72 fveq2 6649 . . . . . . . . . . 11 (𝑛 = (𝑗 + 1) → (𝐺𝑛) = (𝐺‘(𝑗 + 1)))
73 oveq2 7147 . . . . . . . . . . . 12 (𝑛 = (𝑗 + 1) → (2↑𝑛) = (2↑(𝑗 + 1)))
7473fveq2d 6653 . . . . . . . . . . . 12 (𝑛 = (𝑗 + 1) → (𝐹‘(2↑𝑛)) = (𝐹‘(2↑(𝑗 + 1))))
7573, 74oveq12d 7157 . . . . . . . . . . 11 (𝑛 = (𝑗 + 1) → ((2↑𝑛) · (𝐹‘(2↑𝑛))) = ((2↑(𝑗 + 1)) · (𝐹‘(2↑(𝑗 + 1)))))
7672, 75eqeq12d 2817 . . . . . . . . . 10 (𝑛 = (𝑗 + 1) → ((𝐺𝑛) = ((2↑𝑛) · (𝐹‘(2↑𝑛))) ↔ (𝐺‘(𝑗 + 1)) = ((2↑(𝑗 + 1)) · (𝐹‘(2↑(𝑗 + 1))))))
7759adantr 484 . . . . . . . . . 10 ((𝜑𝑗 ∈ ℕ) → ∀𝑛 ∈ ℕ0 (𝐺𝑛) = ((2↑𝑛) · (𝐹‘(2↑𝑛))))
78 peano2nn 11641 . . . . . . . . . . . 12 (𝑗 ∈ ℕ → (𝑗 + 1) ∈ ℕ)
7978adantl 485 . . . . . . . . . . 11 ((𝜑𝑗 ∈ ℕ) → (𝑗 + 1) ∈ ℕ)
8079nnnn0d 11947 . . . . . . . . . 10 ((𝜑𝑗 ∈ ℕ) → (𝑗 + 1) ∈ ℕ0)
8176, 77, 80rspcdva 3576 . . . . . . . . 9 ((𝜑𝑗 ∈ ℕ) → (𝐺‘(𝑗 + 1)) = ((2↑(𝑗 + 1)) · (𝐹‘(2↑(𝑗 + 1)))))
82 nnnn0 11896 . . . . . . . . . . . . 13 (𝑗 ∈ ℕ → 𝑗 ∈ ℕ0)
8382adantl 485 . . . . . . . . . . . 12 ((𝜑𝑗 ∈ ℕ) → 𝑗 ∈ ℕ0)
84 expp1 13436 . . . . . . . . . . . 12 ((2 ∈ ℂ ∧ 𝑗 ∈ ℕ0) → (2↑(𝑗 + 1)) = ((2↑𝑗) · 2))
853, 83, 84sylancr 590 . . . . . . . . . . 11 ((𝜑𝑗 ∈ ℕ) → (2↑(𝑗 + 1)) = ((2↑𝑗) · 2))
86 nnexpcl 13442 . . . . . . . . . . . . . . 15 ((2 ∈ ℕ ∧ 𝑗 ∈ ℕ0) → (2↑𝑗) ∈ ℕ)
8740, 82, 86sylancr 590 . . . . . . . . . . . . . 14 (𝑗 ∈ ℕ → (2↑𝑗) ∈ ℕ)
8887adantl 485 . . . . . . . . . . . . 13 ((𝜑𝑗 ∈ ℕ) → (2↑𝑗) ∈ ℕ)
8988nncnd 11645 . . . . . . . . . . . 12 ((𝜑𝑗 ∈ ℕ) → (2↑𝑗) ∈ ℂ)
90 mulcom 10616 . . . . . . . . . . . 12 (((2↑𝑗) ∈ ℂ ∧ 2 ∈ ℂ) → ((2↑𝑗) · 2) = (2 · (2↑𝑗)))
9189, 3, 90sylancl 589 . . . . . . . . . . 11 ((𝜑𝑗 ∈ ℕ) → ((2↑𝑗) · 2) = (2 · (2↑𝑗)))
9285, 91eqtrd 2836 . . . . . . . . . 10 ((𝜑𝑗 ∈ ℕ) → (2↑(𝑗 + 1)) = (2 · (2↑𝑗)))
9392oveq1d 7154 . . . . . . . . 9 ((𝜑𝑗 ∈ ℕ) → ((2↑(𝑗 + 1)) · (𝐹‘(2↑(𝑗 + 1)))) = ((2 · (2↑𝑗)) · (𝐹‘(2↑(𝑗 + 1)))))
943a1i 11 . . . . . . . . . 10 ((𝜑𝑗 ∈ ℕ) → 2 ∈ ℂ)
95 fveq2 6649 . . . . . . . . . . . . 13 (𝑘 = (2↑(𝑗 + 1)) → (𝐹𝑘) = (𝐹‘(2↑(𝑗 + 1))))
9695eleq1d 2877 . . . . . . . . . . . 12 (𝑘 = (2↑(𝑗 + 1)) → ((𝐹𝑘) ∈ ℝ ↔ (𝐹‘(2↑(𝑗 + 1))) ∈ ℝ))
9739adantr 484 . . . . . . . . . . . 12 ((𝜑𝑗 ∈ ℕ) → ∀𝑘 ∈ ℕ (𝐹𝑘) ∈ ℝ)
98 nnexpcl 13442 . . . . . . . . . . . . 13 ((2 ∈ ℕ ∧ (𝑗 + 1) ∈ ℕ0) → (2↑(𝑗 + 1)) ∈ ℕ)
9940, 80, 98sylancr 590 . . . . . . . . . . . 12 ((𝜑𝑗 ∈ ℕ) → (2↑(𝑗 + 1)) ∈ ℕ)
10096, 97, 99rspcdva 3576 . . . . . . . . . . 11 ((𝜑𝑗 ∈ ℕ) → (𝐹‘(2↑(𝑗 + 1))) ∈ ℝ)
101100recnd 10662 . . . . . . . . . 10 ((𝜑𝑗 ∈ ℕ) → (𝐹‘(2↑(𝑗 + 1))) ∈ ℂ)
10294, 89, 101mulassd 10657 . . . . . . . . 9 ((𝜑𝑗 ∈ ℕ) → ((2 · (2↑𝑗)) · (𝐹‘(2↑(𝑗 + 1)))) = (2 · ((2↑𝑗) · (𝐹‘(2↑(𝑗 + 1))))))
10381, 93, 1023eqtrd 2840 . . . . . . . 8 ((𝜑𝑗 ∈ ℕ) → (𝐺‘(𝑗 + 1)) = (2 · ((2↑𝑗) · (𝐹‘(2↑(𝑗 + 1))))))
10488nnnn0d 11947 . . . . . . . . . . . . . . 15 ((𝜑𝑗 ∈ ℕ) → (2↑𝑗) ∈ ℕ0)
105 hashfz1 13706 . . . . . . . . . . . . . . 15 ((2↑𝑗) ∈ ℕ0 → (♯‘(1...(2↑𝑗))) = (2↑𝑗))
106104, 105syl 17 . . . . . . . . . . . . . 14 ((𝜑𝑗 ∈ ℕ) → (♯‘(1...(2↑𝑗))) = (2↑𝑗))
107106, 89eqeltrd 2893 . . . . . . . . . . . . 13 ((𝜑𝑗 ∈ ℕ) → (♯‘(1...(2↑𝑗))) ∈ ℂ)
108 fzfid 13340 . . . . . . . . . . . . . . 15 ((𝜑𝑗 ∈ ℕ) → (((2↑𝑗) + 1)...(2↑(𝑗 + 1))) ∈ Fin)
109 hashcl 13717 . . . . . . . . . . . . . . 15 ((((2↑𝑗) + 1)...(2↑(𝑗 + 1))) ∈ Fin → (♯‘(((2↑𝑗) + 1)...(2↑(𝑗 + 1)))) ∈ ℕ0)
110108, 109syl 17 . . . . . . . . . . . . . 14 ((𝜑𝑗 ∈ ℕ) → (♯‘(((2↑𝑗) + 1)...(2↑(𝑗 + 1)))) ∈ ℕ0)
111110nn0cnd 11949 . . . . . . . . . . . . 13 ((𝜑𝑗 ∈ ℕ) → (♯‘(((2↑𝑗) + 1)...(2↑(𝑗 + 1)))) ∈ ℂ)
112 simpr 488 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑗 ∈ ℕ) → 𝑗 ∈ ℕ)
113112nnzd 12078 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑗 ∈ ℕ) → 𝑗 ∈ ℤ)
114 uzid 12250 . . . . . . . . . . . . . . . . . 18 (𝑗 ∈ ℤ → 𝑗 ∈ (ℤ𝑗))
115 peano2uz 12293 . . . . . . . . . . . . . . . . . 18 (𝑗 ∈ (ℤ𝑗) → (𝑗 + 1) ∈ (ℤ𝑗))
116 2re 11703 . . . . . . . . . . . . . . . . . . 19 2 ∈ ℝ
117 1le2 11838 . . . . . . . . . . . . . . . . . . 19 1 ≤ 2
118 leexp2a 13536 . . . . . . . . . . . . . . . . . . 19 ((2 ∈ ℝ ∧ 1 ≤ 2 ∧ (𝑗 + 1) ∈ (ℤ𝑗)) → (2↑𝑗) ≤ (2↑(𝑗 + 1)))
119116, 117, 118mp3an12 1448 . . . . . . . . . . . . . . . . . 18 ((𝑗 + 1) ∈ (ℤ𝑗) → (2↑𝑗) ≤ (2↑(𝑗 + 1)))
120113, 114, 115, 1194syl 19 . . . . . . . . . . . . . . . . 17 ((𝜑𝑗 ∈ ℕ) → (2↑𝑗) ≤ (2↑(𝑗 + 1)))
12188, 64eleqtrdi 2903 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑗 ∈ ℕ) → (2↑𝑗) ∈ (ℤ‘1))
12299nnzd 12078 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑗 ∈ ℕ) → (2↑(𝑗 + 1)) ∈ ℤ)
123 elfz5 12898 . . . . . . . . . . . . . . . . . 18 (((2↑𝑗) ∈ (ℤ‘1) ∧ (2↑(𝑗 + 1)) ∈ ℤ) → ((2↑𝑗) ∈ (1...(2↑(𝑗 + 1))) ↔ (2↑𝑗) ≤ (2↑(𝑗 + 1))))
124121, 122, 123syl2anc 587 . . . . . . . . . . . . . . . . 17 ((𝜑𝑗 ∈ ℕ) → ((2↑𝑗) ∈ (1...(2↑(𝑗 + 1))) ↔ (2↑𝑗) ≤ (2↑(𝑗 + 1))))
125120, 124mpbird 260 . . . . . . . . . . . . . . . 16 ((𝜑𝑗 ∈ ℕ) → (2↑𝑗) ∈ (1...(2↑(𝑗 + 1))))
126 fzsplit 12932 . . . . . . . . . . . . . . . 16 ((2↑𝑗) ∈ (1...(2↑(𝑗 + 1))) → (1...(2↑(𝑗 + 1))) = ((1...(2↑𝑗)) ∪ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))))
127125, 126syl 17 . . . . . . . . . . . . . . 15 ((𝜑𝑗 ∈ ℕ) → (1...(2↑(𝑗 + 1))) = ((1...(2↑𝑗)) ∪ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))))
128127fveq2d 6653 . . . . . . . . . . . . . 14 ((𝜑𝑗 ∈ ℕ) → (♯‘(1...(2↑(𝑗 + 1)))) = (♯‘((1...(2↑𝑗)) ∪ (((2↑𝑗) + 1)...(2↑(𝑗 + 1))))))
12989times2d 11873 . . . . . . . . . . . . . . . 16 ((𝜑𝑗 ∈ ℕ) → ((2↑𝑗) · 2) = ((2↑𝑗) + (2↑𝑗)))
13085, 129eqtrd 2836 . . . . . . . . . . . . . . 15 ((𝜑𝑗 ∈ ℕ) → (2↑(𝑗 + 1)) = ((2↑𝑗) + (2↑𝑗)))
13199nnnn0d 11947 . . . . . . . . . . . . . . . 16 ((𝜑𝑗 ∈ ℕ) → (2↑(𝑗 + 1)) ∈ ℕ0)
132 hashfz1 13706 . . . . . . . . . . . . . . . 16 ((2↑(𝑗 + 1)) ∈ ℕ0 → (♯‘(1...(2↑(𝑗 + 1)))) = (2↑(𝑗 + 1)))
133131, 132syl 17 . . . . . . . . . . . . . . 15 ((𝜑𝑗 ∈ ℕ) → (♯‘(1...(2↑(𝑗 + 1)))) = (2↑(𝑗 + 1)))
134106oveq1d 7154 . . . . . . . . . . . . . . 15 ((𝜑𝑗 ∈ ℕ) → ((♯‘(1...(2↑𝑗))) + (2↑𝑗)) = ((2↑𝑗) + (2↑𝑗)))
135130, 133, 1343eqtr4d 2846 . . . . . . . . . . . . . 14 ((𝜑𝑗 ∈ ℕ) → (♯‘(1...(2↑(𝑗 + 1)))) = ((♯‘(1...(2↑𝑗))) + (2↑𝑗)))
136 fzfid 13340 . . . . . . . . . . . . . . 15 ((𝜑𝑗 ∈ ℕ) → (1...(2↑𝑗)) ∈ Fin)
13788nnred 11644 . . . . . . . . . . . . . . . . 17 ((𝜑𝑗 ∈ ℕ) → (2↑𝑗) ∈ ℝ)
138137ltp1d 11563 . . . . . . . . . . . . . . . 16 ((𝜑𝑗 ∈ ℕ) → (2↑𝑗) < ((2↑𝑗) + 1))
139 fzdisj 12933 . . . . . . . . . . . . . . . 16 ((2↑𝑗) < ((2↑𝑗) + 1) → ((1...(2↑𝑗)) ∩ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))) = ∅)
140138, 139syl 17 . . . . . . . . . . . . . . 15 ((𝜑𝑗 ∈ ℕ) → ((1...(2↑𝑗)) ∩ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))) = ∅)
141 hashun 13743 . . . . . . . . . . . . . . 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 1368 . . . . . . . . . . . . . 14 ((𝜑𝑗 ∈ ℕ) → (♯‘((1...(2↑𝑗)) ∪ (((2↑𝑗) + 1)...(2↑(𝑗 + 1))))) = ((♯‘(1...(2↑𝑗))) + (♯‘(((2↑𝑗) + 1)...(2↑(𝑗 + 1))))))
143128, 135, 1423eqtr3d 2844 . . . . . . . . . . . . 13 ((𝜑𝑗 ∈ ℕ) → ((♯‘(1...(2↑𝑗))) + (2↑𝑗)) = ((♯‘(1...(2↑𝑗))) + (♯‘(((2↑𝑗) + 1)...(2↑(𝑗 + 1))))))
144107, 89, 111, 143addcanad 10838 . . . . . . . . . . . 12 ((𝜑𝑗 ∈ ℕ) → (2↑𝑗) = (♯‘(((2↑𝑗) + 1)...(2↑(𝑗 + 1)))))
145144oveq1d 7154 . . . . . . . . . . 11 ((𝜑𝑗 ∈ ℕ) → ((2↑𝑗) · (𝐹‘(2↑(𝑗 + 1)))) = ((♯‘(((2↑𝑗) + 1)...(2↑(𝑗 + 1)))) · (𝐹‘(2↑(𝑗 + 1)))))
146 fsumconst 15140 . . . . . . . . . . . 12 (((((2↑𝑗) + 1)...(2↑(𝑗 + 1))) ∈ Fin ∧ (𝐹‘(2↑(𝑗 + 1))) ∈ ℂ) → Σ𝑘 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))(𝐹‘(2↑(𝑗 + 1))) = ((♯‘(((2↑𝑗) + 1)...(2↑(𝑗 + 1)))) · (𝐹‘(2↑(𝑗 + 1)))))
147108, 101, 146syl2anc 587 . . . . . . . . . . 11 ((𝜑𝑗 ∈ ℕ) → Σ𝑘 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))(𝐹‘(2↑(𝑗 + 1))) = ((♯‘(((2↑𝑗) + 1)...(2↑(𝑗 + 1)))) · (𝐹‘(2↑(𝑗 + 1)))))
148145, 147eqtr4d 2839 . . . . . . . . . 10 ((𝜑𝑗 ∈ ℕ) → ((2↑𝑗) · (𝐹‘(2↑(𝑗 + 1)))) = Σ𝑘 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))(𝐹‘(2↑(𝑗 + 1))))
149100adantr 484 . . . . . . . . . . 11 (((𝜑𝑗 ∈ ℕ) ∧ 𝑘 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))) → (𝐹‘(2↑(𝑗 + 1))) ∈ ℝ)
150 simpl 486 . . . . . . . . . . . 12 ((𝜑𝑗 ∈ ℕ) → 𝜑)
151 peano2nn 11641 . . . . . . . . . . . . . 14 ((2↑𝑗) ∈ ℕ → ((2↑𝑗) + 1) ∈ ℕ)
15288, 151syl 17 . . . . . . . . . . . . 13 ((𝜑𝑗 ∈ ℕ) → ((2↑𝑗) + 1) ∈ ℕ)
153 elfzuz 12902 . . . . . . . . . . . . 13 (𝑘 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1))) → 𝑘 ∈ (ℤ‘((2↑𝑗) + 1)))
154 eluznn 12310 . . . . . . . . . . . . 13 ((((2↑𝑗) + 1) ∈ ℕ ∧ 𝑘 ∈ (ℤ‘((2↑𝑗) + 1))) → 𝑘 ∈ ℕ)
155152, 153, 154syl2an 598 . . . . . . . . . . . 12 (((𝜑𝑗 ∈ ℕ) ∧ 𝑘 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))) → 𝑘 ∈ ℕ)
156150, 155, 38syl2an2r 684 . . . . . . . . . . 11 (((𝜑𝑗 ∈ ℕ) ∧ 𝑘 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))) → (𝐹𝑘) ∈ ℝ)
157 elfzuz3 12903 . . . . . . . . . . . . . . 15 (𝑛 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1))) → (2↑(𝑗 + 1)) ∈ (ℤ𝑛))
158157adantl 485 . . . . . . . . . . . . . 14 (((𝜑𝑗 ∈ ℕ) ∧ 𝑛 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))) → (2↑(𝑗 + 1)) ∈ (ℤ𝑛))
159 simplll 774 . . . . . . . . . . . . . . 15 ((((𝜑𝑗 ∈ ℕ) ∧ 𝑛 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))) ∧ 𝑘 ∈ (𝑛...(2↑(𝑗 + 1)))) → 𝜑)
160 elfzuz 12902 . . . . . . . . . . . . . . . . 17 (𝑛 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1))) → 𝑛 ∈ (ℤ‘((2↑𝑗) + 1)))
161 eluznn 12310 . . . . . . . . . . . . . . . . 17 ((((2↑𝑗) + 1) ∈ ℕ ∧ 𝑛 ∈ (ℤ‘((2↑𝑗) + 1))) → 𝑛 ∈ ℕ)
162152, 160, 161syl2an 598 . . . . . . . . . . . . . . . 16 (((𝜑𝑗 ∈ ℕ) ∧ 𝑛 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))) → 𝑛 ∈ ℕ)
163 elfzuz 12902 . . . . . . . . . . . . . . . 16 (𝑘 ∈ (𝑛...(2↑(𝑗 + 1))) → 𝑘 ∈ (ℤ𝑛))
164 eluznn 12310 . . . . . . . . . . . . . . . 16 ((𝑛 ∈ ℕ ∧ 𝑘 ∈ (ℤ𝑛)) → 𝑘 ∈ ℕ)
165162, 163, 164syl2an 598 . . . . . . . . . . . . . . 15 ((((𝜑𝑗 ∈ ℕ) ∧ 𝑛 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))) ∧ 𝑘 ∈ (𝑛...(2↑(𝑗 + 1)))) → 𝑘 ∈ ℕ)
166159, 165, 38syl2anc 587 . . . . . . . . . . . . . 14 ((((𝜑𝑗 ∈ ℕ) ∧ 𝑛 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))) ∧ 𝑘 ∈ (𝑛...(2↑(𝑗 + 1)))) → (𝐹𝑘) ∈ ℝ)
167 simplll 774 . . . . . . . . . . . . . . 15 ((((𝜑𝑗 ∈ ℕ) ∧ 𝑛 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))) ∧ 𝑘 ∈ (𝑛...((2↑(𝑗 + 1)) − 1))) → 𝜑)
168 elfzuz 12902 . . . . . . . . . . . . . . . 16 (𝑘 ∈ (𝑛...((2↑(𝑗 + 1)) − 1)) → 𝑘 ∈ (ℤ𝑛))
169162, 168, 164syl2an 598 . . . . . . . . . . . . . . 15 ((((𝜑𝑗 ∈ ℕ) ∧ 𝑛 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))) ∧ 𝑘 ∈ (𝑛...((2↑(𝑗 + 1)) − 1))) → 𝑘 ∈ ℕ)
170 climcnds.3 . . . . . . . . . . . . . . 15 ((𝜑𝑘 ∈ ℕ) → (𝐹‘(𝑘 + 1)) ≤ (𝐹𝑘))
171167, 169, 170syl2anc 587 . . . . . . . . . . . . . 14 ((((𝜑𝑗 ∈ ℕ) ∧ 𝑛 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))) ∧ 𝑘 ∈ (𝑛...((2↑(𝑗 + 1)) − 1))) → (𝐹‘(𝑘 + 1)) ≤ (𝐹𝑘))
172158, 166, 171monoord2 13401 . . . . . . . . . . . . 13 (((𝜑𝑗 ∈ ℕ) ∧ 𝑛 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))) → (𝐹‘(2↑(𝑗 + 1))) ≤ (𝐹𝑛))
173172ralrimiva 3152 . . . . . . . . . . . 12 ((𝜑𝑗 ∈ ℕ) → ∀𝑛 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))(𝐹‘(2↑(𝑗 + 1))) ≤ (𝐹𝑛))
174 fveq2 6649 . . . . . . . . . . . . . 14 (𝑛 = 𝑘 → (𝐹𝑛) = (𝐹𝑘))
175174breq2d 5045 . . . . . . . . . . . . 13 (𝑛 = 𝑘 → ((𝐹‘(2↑(𝑗 + 1))) ≤ (𝐹𝑛) ↔ (𝐹‘(2↑(𝑗 + 1))) ≤ (𝐹𝑘)))
176175rspccva 3573 . . . . . . . . . . . 12 ((∀𝑛 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))(𝐹‘(2↑(𝑗 + 1))) ≤ (𝐹𝑛) ∧ 𝑘 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))) → (𝐹‘(2↑(𝑗 + 1))) ≤ (𝐹𝑘))
177173, 176sylan 583 . . . . . . . . . . 11 (((𝜑𝑗 ∈ ℕ) ∧ 𝑘 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))) → (𝐹‘(2↑(𝑗 + 1))) ≤ (𝐹𝑘))
178108, 149, 156, 177fsumle 15149 . . . . . . . . . 10 ((𝜑𝑗 ∈ ℕ) → Σ𝑘 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))(𝐹‘(2↑(𝑗 + 1))) ≤ Σ𝑘 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))(𝐹𝑘))
179148, 178eqbrtrd 5055 . . . . . . . . 9 ((𝜑𝑗 ∈ ℕ) → ((2↑𝑗) · (𝐹‘(2↑(𝑗 + 1)))) ≤ Σ𝑘 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))(𝐹𝑘))
180137, 100remulcld 10664 . . . . . . . . . 10 ((𝜑𝑗 ∈ ℕ) → ((2↑𝑗) · (𝐹‘(2↑(𝑗 + 1)))) ∈ ℝ)
181108, 156fsumrecl 15086 . . . . . . . . . 10 ((𝜑𝑗 ∈ ℕ) → Σ𝑘 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))(𝐹𝑘) ∈ ℝ)
182 2rp 12386 . . . . . . . . . . 11 2 ∈ ℝ+
183182a1i 11 . . . . . . . . . 10 ((𝜑𝑗 ∈ ℕ) → 2 ∈ ℝ+)
184180, 181, 183lemul2d 12467 . . . . . . . . 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 5055 . . . . . . 7 ((𝜑𝑗 ∈ ℕ) → (𝐺‘(𝑗 + 1)) ≤ (2 · Σ𝑘 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))(𝐹𝑘)))
187 1zzd 12005 . . . . . . . . . 10 (𝜑 → 1 ∈ ℤ)
188 nnnn0 11896 . . . . . . . . . . 11 (𝑛 ∈ ℕ → 𝑛 ∈ ℕ0)
189 simpr 488 . . . . . . . . . . . . . . 15 ((𝜑𝑛 ∈ ℕ0) → 𝑛 ∈ ℕ0)
190 nnexpcl 13442 . . . . . . . . . . . . . . 15 ((2 ∈ ℕ ∧ 𝑛 ∈ ℕ0) → (2↑𝑛) ∈ ℕ)
19140, 189, 190sylancr 590 . . . . . . . . . . . . . 14 ((𝜑𝑛 ∈ ℕ0) → (2↑𝑛) ∈ ℕ)
192191nnred 11644 . . . . . . . . . . . . 13 ((𝜑𝑛 ∈ ℕ0) → (2↑𝑛) ∈ ℝ)
193 fveq2 6649 . . . . . . . . . . . . . . 15 (𝑘 = (2↑𝑛) → (𝐹𝑘) = (𝐹‘(2↑𝑛)))
194193eleq1d 2877 . . . . . . . . . . . . . 14 (𝑘 = (2↑𝑛) → ((𝐹𝑘) ∈ ℝ ↔ (𝐹‘(2↑𝑛)) ∈ ℝ))
19539adantr 484 . . . . . . . . . . . . . 14 ((𝜑𝑛 ∈ ℕ0) → ∀𝑘 ∈ ℕ (𝐹𝑘) ∈ ℝ)
196194, 195, 191rspcdva 3576 . . . . . . . . . . . . 13 ((𝜑𝑛 ∈ ℕ0) → (𝐹‘(2↑𝑛)) ∈ ℝ)
197192, 196remulcld 10664 . . . . . . . . . . . 12 ((𝜑𝑛 ∈ ℕ0) → ((2↑𝑛) · (𝐹‘(2↑𝑛))) ∈ ℝ)
19858, 197eqeltrd 2893 . . . . . . . . . . 11 ((𝜑𝑛 ∈ ℕ0) → (𝐺𝑛) ∈ ℝ)
199188, 198sylan2 595 . . . . . . . . . 10 ((𝜑𝑛 ∈ ℕ) → (𝐺𝑛) ∈ ℝ)
20064, 187, 199serfre 13399 . . . . . . . . 9 (𝜑 → seq1( + , 𝐺):ℕ⟶ℝ)
201200ffvelrnda 6832 . . . . . . . 8 ((𝜑𝑗 ∈ ℕ) → (seq1( + , 𝐺)‘𝑗) ∈ ℝ)
20272eleq1d 2877 . . . . . . . . 9 (𝑛 = (𝑗 + 1) → ((𝐺𝑛) ∈ ℝ ↔ (𝐺‘(𝑗 + 1)) ∈ ℝ))
203199ralrimiva 3152 . . . . . . . . . 10 (𝜑 → ∀𝑛 ∈ ℕ (𝐺𝑛) ∈ ℝ)
204203adantr 484 . . . . . . . . 9 ((𝜑𝑗 ∈ ℕ) → ∀𝑛 ∈ ℕ (𝐺𝑛) ∈ ℝ)
205202, 204, 79rspcdva 3576 . . . . . . . 8 ((𝜑𝑗 ∈ ℕ) → (𝐺‘(𝑗 + 1)) ∈ ℝ)
20664, 187, 38serfre 13399 . . . . . . . . . 10 (𝜑 → seq1( + , 𝐹):ℕ⟶ℝ)
207 ffvelrn 6830 . . . . . . . . . 10 ((seq1( + , 𝐹):ℕ⟶ℝ ∧ (2↑𝑗) ∈ ℕ) → (seq1( + , 𝐹)‘(2↑𝑗)) ∈ ℝ)
208206, 87, 207syl2an 598 . . . . . . . . 9 ((𝜑𝑗 ∈ ℕ) → (seq1( + , 𝐹)‘(2↑𝑗)) ∈ ℝ)
209 remulcl 10615 . . . . . . . . 9 ((2 ∈ ℝ ∧ (seq1( + , 𝐹)‘(2↑𝑗)) ∈ ℝ) → (2 · (seq1( + , 𝐹)‘(2↑𝑗))) ∈ ℝ)
210116, 208, 209sylancr 590 . . . . . . . 8 ((𝜑𝑗 ∈ ℕ) → (2 · (seq1( + , 𝐹)‘(2↑𝑗))) ∈ ℝ)
211 remulcl 10615 . . . . . . . . 9 ((2 ∈ ℝ ∧ Σ𝑘 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))(𝐹𝑘) ∈ ℝ) → (2 · Σ𝑘 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))(𝐹𝑘)) ∈ ℝ)
212116, 181, 211sylancr 590 . . . . . . . 8 ((𝜑𝑗 ∈ ℕ) → (2 · Σ𝑘 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))(𝐹𝑘)) ∈ ℝ)
213 le2add 11115 . . . . . . . 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 837 . . . . . . 7 ((𝜑𝑗 ∈ ℕ) → (((seq1( + , 𝐺)‘𝑗) ≤ (2 · (seq1( + , 𝐹)‘(2↑𝑗))) ∧ (𝐺‘(𝑗 + 1)) ≤ (2 · Σ𝑘 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))(𝐹𝑘))) → ((seq1( + , 𝐺)‘𝑗) + (𝐺‘(𝑗 + 1))) ≤ ((2 · (seq1( + , 𝐹)‘(2↑𝑗))) + (2 · Σ𝑘 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))(𝐹𝑘)))))
215186, 214mpan2d 693 . . . . . 6 ((𝜑𝑗 ∈ ℕ) → ((seq1( + , 𝐺)‘𝑗) ≤ (2 · (seq1( + , 𝐹)‘(2↑𝑗))) → ((seq1( + , 𝐺)‘𝑗) + (𝐺‘(𝑗 + 1))) ≤ ((2 · (seq1( + , 𝐹)‘(2↑𝑗))) + (2 · Σ𝑘 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))(𝐹𝑘)))))
216112, 64eleqtrdi 2903 . . . . . . . 8 ((𝜑𝑗 ∈ ℕ) → 𝑗 ∈ (ℤ‘1))
217 seqp1 13383 . . . . . . . 8 (𝑗 ∈ (ℤ‘1) → (seq1( + , 𝐺)‘(𝑗 + 1)) = ((seq1( + , 𝐺)‘𝑗) + (𝐺‘(𝑗 + 1))))
218216, 217syl 17 . . . . . . 7 ((𝜑𝑗 ∈ ℕ) → (seq1( + , 𝐺)‘(𝑗 + 1)) = ((seq1( + , 𝐺)‘𝑗) + (𝐺‘(𝑗 + 1))))
219 fzfid 13340 . . . . . . . . . . 11 ((𝜑𝑗 ∈ ℕ) → (1...(2↑(𝑗 + 1))) ∈ Fin)
220 elfznn 12935 . . . . . . . . . . . 12 (𝑘 ∈ (1...(2↑(𝑗 + 1))) → 𝑘 ∈ ℕ)
22138recnd 10662 . . . . . . . . . . . 12 ((𝜑𝑘 ∈ ℕ) → (𝐹𝑘) ∈ ℂ)
222150, 220, 221syl2an 598 . . . . . . . . . . 11 (((𝜑𝑗 ∈ ℕ) ∧ 𝑘 ∈ (1...(2↑(𝑗 + 1)))) → (𝐹𝑘) ∈ ℂ)
223140, 127, 219, 222fsumsplit 15092 . . . . . . . . . 10 ((𝜑𝑗 ∈ ℕ) → Σ𝑘 ∈ (1...(2↑(𝑗 + 1)))(𝐹𝑘) = (Σ𝑘 ∈ (1...(2↑𝑗))(𝐹𝑘) + Σ𝑘 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))(𝐹𝑘)))
224 eqidd 2802 . . . . . . . . . . 11 (((𝜑𝑗 ∈ ℕ) ∧ 𝑘 ∈ (1...(2↑(𝑗 + 1)))) → (𝐹𝑘) = (𝐹𝑘))
22599, 64eleqtrdi 2903 . . . . . . . . . . 11 ((𝜑𝑗 ∈ ℕ) → (2↑(𝑗 + 1)) ∈ (ℤ‘1))
226224, 225, 222fsumser 15082 . . . . . . . . . 10 ((𝜑𝑗 ∈ ℕ) → Σ𝑘 ∈ (1...(2↑(𝑗 + 1)))(𝐹𝑘) = (seq1( + , 𝐹)‘(2↑(𝑗 + 1))))
227 eqidd 2802 . . . . . . . . . . . 12 (((𝜑𝑗 ∈ ℕ) ∧ 𝑘 ∈ (1...(2↑𝑗))) → (𝐹𝑘) = (𝐹𝑘))
228 elfznn 12935 . . . . . . . . . . . . 13 (𝑘 ∈ (1...(2↑𝑗)) → 𝑘 ∈ ℕ)
229150, 228, 221syl2an 598 . . . . . . . . . . . 12 (((𝜑𝑗 ∈ ℕ) ∧ 𝑘 ∈ (1...(2↑𝑗))) → (𝐹𝑘) ∈ ℂ)
230227, 121, 229fsumser 15082 . . . . . . . . . . 11 ((𝜑𝑗 ∈ ℕ) → Σ𝑘 ∈ (1...(2↑𝑗))(𝐹𝑘) = (seq1( + , 𝐹)‘(2↑𝑗)))
231230oveq1d 7154 . . . . . . . . . 10 ((𝜑𝑗 ∈ ℕ) → (Σ𝑘 ∈ (1...(2↑𝑗))(𝐹𝑘) + Σ𝑘 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))(𝐹𝑘)) = ((seq1( + , 𝐹)‘(2↑𝑗)) + Σ𝑘 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))(𝐹𝑘)))
232223, 226, 2313eqtr3d 2844 . . . . . . . . 9 ((𝜑𝑗 ∈ ℕ) → (seq1( + , 𝐹)‘(2↑(𝑗 + 1))) = ((seq1( + , 𝐹)‘(2↑𝑗)) + Σ𝑘 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))(𝐹𝑘)))
233232oveq2d 7155 . . . . . . . 8 ((𝜑𝑗 ∈ ℕ) → (2 · (seq1( + , 𝐹)‘(2↑(𝑗 + 1)))) = (2 · ((seq1( + , 𝐹)‘(2↑𝑗)) + Σ𝑘 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))(𝐹𝑘))))
234208recnd 10662 . . . . . . . . 9 ((𝜑𝑗 ∈ ℕ) → (seq1( + , 𝐹)‘(2↑𝑗)) ∈ ℂ)
235181recnd 10662 . . . . . . . . 9 ((𝜑𝑗 ∈ ℕ) → Σ𝑘 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))(𝐹𝑘) ∈ ℂ)
23694, 234, 235adddid 10658 . . . . . . . 8 ((𝜑𝑗 ∈ ℕ) → (2 · ((seq1( + , 𝐹)‘(2↑𝑗)) + Σ𝑘 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))(𝐹𝑘))) = ((2 · (seq1( + , 𝐹)‘(2↑𝑗))) + (2 · Σ𝑘 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))(𝐹𝑘))))
237233, 236eqtrd 2836 . . . . . . 7 ((𝜑𝑗 ∈ ℕ) → (2 · (seq1( + , 𝐹)‘(2↑(𝑗 + 1)))) = ((2 · (seq1( + , 𝐹)‘(2↑𝑗))) + (2 · Σ𝑘 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))(𝐹𝑘))))
238218, 237breq12d 5046 . . . . . 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 417 . . . 4 (𝑗 ∈ ℕ → (𝜑 → ((seq1( + , 𝐺)‘𝑗) ≤ (2 · (seq1( + , 𝐹)‘(2↑𝑗))) → (seq1( + , 𝐺)‘(𝑗 + 1)) ≤ (2 · (seq1( + , 𝐹)‘(2↑(𝑗 + 1)))))))
241240a2d 29 . . 3 (𝑗 ∈ ℕ → ((𝜑 → (seq1( + , 𝐺)‘𝑗) ≤ (2 · (seq1( + , 𝐹)‘(2↑𝑗)))) → (𝜑 → (seq1( + , 𝐺)‘(𝑗 + 1)) ≤ (2 · (seq1( + , 𝐹)‘(2↑(𝑗 + 1)))))))
24210, 16, 22, 28, 71, 241nnind 11647 . 2 (𝑁 ∈ ℕ → (𝜑 → (seq1( + , 𝐺)‘𝑁) ≤ (2 · (seq1( + , 𝐹)‘(2↑𝑁)))))
243242impcom 411 1 ((𝜑𝑁 ∈ ℕ) → (seq1( + , 𝐺)‘𝑁) ≤ (2 · (seq1( + , 𝐹)‘(2↑𝑁))))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 209  wa 399   = wceq 1538  wcel 2112  wral 3109  cun 3882  cin 3883  c0 4246   class class class wbr 5033  wf 6324  cfv 6328  (class class class)co 7139  Fincfn 8496  cc 10528  cr 10529  0cc0 10530  1c1 10531   + caddc 10533   · cmul 10535   < clt 10668  cle 10669  cmin 10863  cn 11629  2c2 11684  0cn0 11889  cz 11973  cuz 12235  +crp 12381  ...cfz 12889  seqcseq 13368  cexp 13429  chash 13690  Σcsu 15037
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1797  ax-4 1811  ax-5 1911  ax-6 1970  ax-7 2015  ax-8 2114  ax-9 2122  ax-10 2143  ax-11 2159  ax-12 2176  ax-ext 2773  ax-rep 5157  ax-sep 5170  ax-nul 5177  ax-pow 5234  ax-pr 5298  ax-un 7445  ax-inf2 9092  ax-cnex 10586  ax-resscn 10587  ax-1cn 10588  ax-icn 10589  ax-addcl 10590  ax-addrcl 10591  ax-mulcl 10592  ax-mulrcl 10593  ax-mulcom 10594  ax-addass 10595  ax-mulass 10596  ax-distr 10597  ax-i2m1 10598  ax-1ne0 10599  ax-1rid 10600  ax-rnegex 10601  ax-rrecex 10602  ax-cnre 10603  ax-pre-lttri 10604  ax-pre-lttrn 10605  ax-pre-ltadd 10606  ax-pre-mulgt0 10607  ax-pre-sup 10608
This theorem depends on definitions:  df-bi 210  df-an 400  df-or 845  df-3or 1085  df-3an 1086  df-tru 1541  df-fal 1551  df-ex 1782  df-nf 1786  df-sb 2070  df-mo 2601  df-eu 2632  df-clab 2780  df-cleq 2794  df-clel 2873  df-nfc 2941  df-ne 2991  df-nel 3095  df-ral 3114  df-rex 3115  df-reu 3116  df-rmo 3117  df-rab 3118  df-v 3446  df-sbc 3724  df-csb 3832  df-dif 3887  df-un 3889  df-in 3891  df-ss 3901  df-pss 3903  df-nul 4247  df-if 4429  df-pw 4502  df-sn 4529  df-pr 4531  df-tp 4533  df-op 4535  df-uni 4804  df-int 4842  df-iun 4886  df-br 5034  df-opab 5096  df-mpt 5114  df-tr 5140  df-id 5428  df-eprel 5433  df-po 5442  df-so 5443  df-fr 5482  df-se 5483  df-we 5484  df-xp 5529  df-rel 5530  df-cnv 5531  df-co 5532  df-dm 5533  df-rn 5534  df-res 5535  df-ima 5536  df-pred 6120  df-ord 6166  df-on 6167  df-lim 6168  df-suc 6169  df-iota 6287  df-fun 6330  df-fn 6331  df-f 6332  df-f1 6333  df-fo 6334  df-f1o 6335  df-fv 6336  df-isom 6337  df-riota 7097  df-ov 7142  df-oprab 7143  df-mpo 7144  df-om 7565  df-1st 7675  df-2nd 7676  df-wrecs 7934  df-recs 7995  df-rdg 8033  df-1o 8089  df-oadd 8093  df-er 8276  df-en 8497  df-dom 8498  df-sdom 8499  df-fin 8500  df-sup 8894  df-oi 8962  df-dju 9318  df-card 9356  df-pnf 10670  df-mnf 10671  df-xr 10672  df-ltxr 10673  df-le 10674  df-sub 10865  df-neg 10866  df-div 11291  df-nn 11630  df-2 11692  df-3 11693  df-n0 11890  df-z 11974  df-uz 12236  df-rp 12382  df-ico 12736  df-fz 12890  df-fzo 13033  df-seq 13369  df-exp 13430  df-hash 13691  df-cj 14453  df-re 14454  df-im 14455  df-sqrt 14589  df-abs 14590  df-clim 14840  df-sum 15038
This theorem is referenced by:  climcnds  15201
  Copyright terms: Public domain W3C validator