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

Theorem climcndslem2 15816
Description: Lemma for climcnds 15817: 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 6858 . . . . 5 (𝑥 = 1 → (seq1( + , 𝐺)‘𝑥) = (seq1( + , 𝐺)‘1))
2 oveq2 7395 . . . . . . . 8 (𝑥 = 1 → (2↑𝑥) = (2↑1))
3 2cn 12261 . . . . . . . . 9 2 ∈ ℂ
4 exp1 14032 . . . . . . . . 9 (2 ∈ ℂ → (2↑1) = 2)
53, 4ax-mp 5 . . . . . . . 8 (2↑1) = 2
62, 5eqtrdi 2780 . . . . . . 7 (𝑥 = 1 → (2↑𝑥) = 2)
76fveq2d 6862 . . . . . 6 (𝑥 = 1 → (seq1( + , 𝐹)‘(2↑𝑥)) = (seq1( + , 𝐹)‘2))
87oveq2d 7403 . . . . 5 (𝑥 = 1 → (2 · (seq1( + , 𝐹)‘(2↑𝑥))) = (2 · (seq1( + , 𝐹)‘2)))
91, 8breq12d 5120 . . . 4 (𝑥 = 1 → ((seq1( + , 𝐺)‘𝑥) ≤ (2 · (seq1( + , 𝐹)‘(2↑𝑥))) ↔ (seq1( + , 𝐺)‘1) ≤ (2 · (seq1( + , 𝐹)‘2))))
109imbi2d 340 . . 3 (𝑥 = 1 → ((𝜑 → (seq1( + , 𝐺)‘𝑥) ≤ (2 · (seq1( + , 𝐹)‘(2↑𝑥)))) ↔ (𝜑 → (seq1( + , 𝐺)‘1) ≤ (2 · (seq1( + , 𝐹)‘2)))))
11 fveq2 6858 . . . . 5 (𝑥 = 𝑗 → (seq1( + , 𝐺)‘𝑥) = (seq1( + , 𝐺)‘𝑗))
12 oveq2 7395 . . . . . . 7 (𝑥 = 𝑗 → (2↑𝑥) = (2↑𝑗))
1312fveq2d 6862 . . . . . 6 (𝑥 = 𝑗 → (seq1( + , 𝐹)‘(2↑𝑥)) = (seq1( + , 𝐹)‘(2↑𝑗)))
1413oveq2d 7403 . . . . 5 (𝑥 = 𝑗 → (2 · (seq1( + , 𝐹)‘(2↑𝑥))) = (2 · (seq1( + , 𝐹)‘(2↑𝑗))))
1511, 14breq12d 5120 . . . 4 (𝑥 = 𝑗 → ((seq1( + , 𝐺)‘𝑥) ≤ (2 · (seq1( + , 𝐹)‘(2↑𝑥))) ↔ (seq1( + , 𝐺)‘𝑗) ≤ (2 · (seq1( + , 𝐹)‘(2↑𝑗)))))
1615imbi2d 340 . . 3 (𝑥 = 𝑗 → ((𝜑 → (seq1( + , 𝐺)‘𝑥) ≤ (2 · (seq1( + , 𝐹)‘(2↑𝑥)))) ↔ (𝜑 → (seq1( + , 𝐺)‘𝑗) ≤ (2 · (seq1( + , 𝐹)‘(2↑𝑗))))))
17 fveq2 6858 . . . . 5 (𝑥 = (𝑗 + 1) → (seq1( + , 𝐺)‘𝑥) = (seq1( + , 𝐺)‘(𝑗 + 1)))
18 oveq2 7395 . . . . . . 7 (𝑥 = (𝑗 + 1) → (2↑𝑥) = (2↑(𝑗 + 1)))
1918fveq2d 6862 . . . . . 6 (𝑥 = (𝑗 + 1) → (seq1( + , 𝐹)‘(2↑𝑥)) = (seq1( + , 𝐹)‘(2↑(𝑗 + 1))))
2019oveq2d 7403 . . . . 5 (𝑥 = (𝑗 + 1) → (2 · (seq1( + , 𝐹)‘(2↑𝑥))) = (2 · (seq1( + , 𝐹)‘(2↑(𝑗 + 1)))))
2117, 20breq12d 5120 . . . 4 (𝑥 = (𝑗 + 1) → ((seq1( + , 𝐺)‘𝑥) ≤ (2 · (seq1( + , 𝐹)‘(2↑𝑥))) ↔ (seq1( + , 𝐺)‘(𝑗 + 1)) ≤ (2 · (seq1( + , 𝐹)‘(2↑(𝑗 + 1))))))
2221imbi2d 340 . . 3 (𝑥 = (𝑗 + 1) → ((𝜑 → (seq1( + , 𝐺)‘𝑥) ≤ (2 · (seq1( + , 𝐹)‘(2↑𝑥)))) ↔ (𝜑 → (seq1( + , 𝐺)‘(𝑗 + 1)) ≤ (2 · (seq1( + , 𝐹)‘(2↑(𝑗 + 1)))))))
23 fveq2 6858 . . . . 5 (𝑥 = 𝑁 → (seq1( + , 𝐺)‘𝑥) = (seq1( + , 𝐺)‘𝑁))
24 oveq2 7395 . . . . . . 7 (𝑥 = 𝑁 → (2↑𝑥) = (2↑𝑁))
2524fveq2d 6862 . . . . . 6 (𝑥 = 𝑁 → (seq1( + , 𝐹)‘(2↑𝑥)) = (seq1( + , 𝐹)‘(2↑𝑁)))
2625oveq2d 7403 . . . . 5 (𝑥 = 𝑁 → (2 · (seq1( + , 𝐹)‘(2↑𝑥))) = (2 · (seq1( + , 𝐹)‘(2↑𝑁))))
2723, 26breq12d 5120 . . . 4 (𝑥 = 𝑁 → ((seq1( + , 𝐺)‘𝑥) ≤ (2 · (seq1( + , 𝐹)‘(2↑𝑥))) ↔ (seq1( + , 𝐺)‘𝑁) ≤ (2 · (seq1( + , 𝐹)‘(2↑𝑁)))))
2827imbi2d 340 . . 3 (𝑥 = 𝑁 → ((𝜑 → (seq1( + , 𝐺)‘𝑥) ≤ (2 · (seq1( + , 𝐹)‘(2↑𝑥)))) ↔ (𝜑 → (seq1( + , 𝐺)‘𝑁) ≤ (2 · (seq1( + , 𝐹)‘(2↑𝑁))))))
29 fveq2 6858 . . . . . . . 8 (𝑘 = 1 → (𝐹𝑘) = (𝐹‘1))
3029breq2d 5119 . . . . . . 7 (𝑘 = 1 → (0 ≤ (𝐹𝑘) ↔ 0 ≤ (𝐹‘1)))
31 climcnds.2 . . . . . . . 8 ((𝜑𝑘 ∈ ℕ) → 0 ≤ (𝐹𝑘))
3231ralrimiva 3125 . . . . . . 7 (𝜑 → ∀𝑘 ∈ ℕ 0 ≤ (𝐹𝑘))
33 1nn 12197 . . . . . . . 8 1 ∈ ℕ
3433a1i 11 . . . . . . 7 (𝜑 → 1 ∈ ℕ)
3530, 32, 34rspcdva 3589 . . . . . 6 (𝜑 → 0 ≤ (𝐹‘1))
36 fveq2 6858 . . . . . . . . 9 (𝑘 = 2 → (𝐹𝑘) = (𝐹‘2))
3736eleq1d 2813 . . . . . . . 8 (𝑘 = 2 → ((𝐹𝑘) ∈ ℝ ↔ (𝐹‘2) ∈ ℝ))
38 climcnds.1 . . . . . . . . 9 ((𝜑𝑘 ∈ ℕ) → (𝐹𝑘) ∈ ℝ)
3938ralrimiva 3125 . . . . . . . 8 (𝜑 → ∀𝑘 ∈ ℕ (𝐹𝑘) ∈ ℝ)
40 2nn 12259 . . . . . . . . 9 2 ∈ ℕ
4140a1i 11 . . . . . . . 8 (𝜑 → 2 ∈ ℕ)
4237, 39, 41rspcdva 3589 . . . . . . 7 (𝜑 → (𝐹‘2) ∈ ℝ)
4329eleq1d 2813 . . . . . . . 8 (𝑘 = 1 → ((𝐹𝑘) ∈ ℝ ↔ (𝐹‘1) ∈ ℝ))
4443, 39, 34rspcdva 3589 . . . . . . 7 (𝜑 → (𝐹‘1) ∈ ℝ)
4542, 44addge02d 11767 . . . . . 6 (𝜑 → (0 ≤ (𝐹‘1) ↔ (𝐹‘2) ≤ ((𝐹‘1) + (𝐹‘2))))
4635, 45mpbid 232 . . . . 5 (𝜑 → (𝐹‘2) ≤ ((𝐹‘1) + (𝐹‘2)))
4744, 42readdcld 11203 . . . . . 6 (𝜑 → ((𝐹‘1) + (𝐹‘2)) ∈ ℝ)
4841nnrpd 12993 . . . . . 6 (𝜑 → 2 ∈ ℝ+)
4942, 47, 48lemul2d 13039 . . . . 5 (𝜑 → ((𝐹‘2) ≤ ((𝐹‘1) + (𝐹‘2)) ↔ (2 · (𝐹‘2)) ≤ (2 · ((𝐹‘1) + (𝐹‘2)))))
5046, 49mpbid 232 . . . 4 (𝜑 → (2 · (𝐹‘2)) ≤ (2 · ((𝐹‘1) + (𝐹‘2))))
51 1z 12563 . . . . 5 1 ∈ ℤ
52 fveq2 6858 . . . . . . 7 (𝑛 = 1 → (𝐺𝑛) = (𝐺‘1))
53 oveq2 7395 . . . . . . . . 9 (𝑛 = 1 → (2↑𝑛) = (2↑1))
5453, 5eqtrdi 2780 . . . . . . . 8 (𝑛 = 1 → (2↑𝑛) = 2)
5554fveq2d 6862 . . . . . . . 8 (𝑛 = 1 → (𝐹‘(2↑𝑛)) = (𝐹‘2))
5654, 55oveq12d 7405 . . . . . . 7 (𝑛 = 1 → ((2↑𝑛) · (𝐹‘(2↑𝑛))) = (2 · (𝐹‘2)))
5752, 56eqeq12d 2745 . . . . . 6 (𝑛 = 1 → ((𝐺𝑛) = ((2↑𝑛) · (𝐹‘(2↑𝑛))) ↔ (𝐺‘1) = (2 · (𝐹‘2))))
58 climcnds.4 . . . . . . 7 ((𝜑𝑛 ∈ ℕ0) → (𝐺𝑛) = ((2↑𝑛) · (𝐹‘(2↑𝑛))))
5958ralrimiva 3125 . . . . . 6 (𝜑 → ∀𝑛 ∈ ℕ0 (𝐺𝑛) = ((2↑𝑛) · (𝐹‘(2↑𝑛))))
60 1nn0 12458 . . . . . . 7 1 ∈ ℕ0
6160a1i 11 . . . . . 6 (𝜑 → 1 ∈ ℕ0)
6257, 59, 61rspcdva 3589 . . . . 5 (𝜑 → (𝐺‘1) = (2 · (𝐹‘2)))
6351, 62seq1i 13980 . . . 4 (𝜑 → (seq1( + , 𝐺)‘1) = (2 · (𝐹‘2)))
64 nnuz 12836 . . . . . 6 ℕ = (ℤ‘1)
65 df-2 12249 . . . . . 6 2 = (1 + 1)
66 eqidd 2730 . . . . . . 7 (𝜑 → (𝐹‘1) = (𝐹‘1))
6751, 66seq1i 13980 . . . . . 6 (𝜑 → (seq1( + , 𝐹)‘1) = (𝐹‘1))
68 eqidd 2730 . . . . . 6 (𝜑 → (𝐹‘2) = (𝐹‘2))
6964, 34, 65, 67, 68seqp1d 13983 . . . . 5 (𝜑 → (seq1( + , 𝐹)‘2) = ((𝐹‘1) + (𝐹‘2)))
7069oveq2d 7403 . . . 4 (𝜑 → (2 · (seq1( + , 𝐹)‘2)) = (2 · ((𝐹‘1) + (𝐹‘2))))
7150, 63, 703brtr4d 5139 . . 3 (𝜑 → (seq1( + , 𝐺)‘1) ≤ (2 · (seq1( + , 𝐹)‘2)))
72 fveq2 6858 . . . . . . . . . . 11 (𝑛 = (𝑗 + 1) → (𝐺𝑛) = (𝐺‘(𝑗 + 1)))
73 oveq2 7395 . . . . . . . . . . . 12 (𝑛 = (𝑗 + 1) → (2↑𝑛) = (2↑(𝑗 + 1)))
7473fveq2d 6862 . . . . . . . . . . . 12 (𝑛 = (𝑗 + 1) → (𝐹‘(2↑𝑛)) = (𝐹‘(2↑(𝑗 + 1))))
7573, 74oveq12d 7405 . . . . . . . . . . 11 (𝑛 = (𝑗 + 1) → ((2↑𝑛) · (𝐹‘(2↑𝑛))) = ((2↑(𝑗 + 1)) · (𝐹‘(2↑(𝑗 + 1)))))
7672, 75eqeq12d 2745 . . . . . . . . . 10 (𝑛 = (𝑗 + 1) → ((𝐺𝑛) = ((2↑𝑛) · (𝐹‘(2↑𝑛))) ↔ (𝐺‘(𝑗 + 1)) = ((2↑(𝑗 + 1)) · (𝐹‘(2↑(𝑗 + 1))))))
7759adantr 480 . . . . . . . . . 10 ((𝜑𝑗 ∈ ℕ) → ∀𝑛 ∈ ℕ0 (𝐺𝑛) = ((2↑𝑛) · (𝐹‘(2↑𝑛))))
78 peano2nn 12198 . . . . . . . . . . . 12 (𝑗 ∈ ℕ → (𝑗 + 1) ∈ ℕ)
7978adantl 481 . . . . . . . . . . 11 ((𝜑𝑗 ∈ ℕ) → (𝑗 + 1) ∈ ℕ)
8079nnnn0d 12503 . . . . . . . . . 10 ((𝜑𝑗 ∈ ℕ) → (𝑗 + 1) ∈ ℕ0)
8176, 77, 80rspcdva 3589 . . . . . . . . 9 ((𝜑𝑗 ∈ ℕ) → (𝐺‘(𝑗 + 1)) = ((2↑(𝑗 + 1)) · (𝐹‘(2↑(𝑗 + 1)))))
82 nnnn0 12449 . . . . . . . . . . . . 13 (𝑗 ∈ ℕ → 𝑗 ∈ ℕ0)
8382adantl 481 . . . . . . . . . . . 12 ((𝜑𝑗 ∈ ℕ) → 𝑗 ∈ ℕ0)
84 expp1 14033 . . . . . . . . . . . 12 ((2 ∈ ℂ ∧ 𝑗 ∈ ℕ0) → (2↑(𝑗 + 1)) = ((2↑𝑗) · 2))
853, 83, 84sylancr 587 . . . . . . . . . . 11 ((𝜑𝑗 ∈ ℕ) → (2↑(𝑗 + 1)) = ((2↑𝑗) · 2))
86 nnexpcl 14039 . . . . . . . . . . . . . . 15 ((2 ∈ ℕ ∧ 𝑗 ∈ ℕ0) → (2↑𝑗) ∈ ℕ)
8740, 82, 86sylancr 587 . . . . . . . . . . . . . 14 (𝑗 ∈ ℕ → (2↑𝑗) ∈ ℕ)
8887adantl 481 . . . . . . . . . . . . 13 ((𝜑𝑗 ∈ ℕ) → (2↑𝑗) ∈ ℕ)
8988nncnd 12202 . . . . . . . . . . . 12 ((𝜑𝑗 ∈ ℕ) → (2↑𝑗) ∈ ℂ)
90 mulcom 11154 . . . . . . . . . . . 12 (((2↑𝑗) ∈ ℂ ∧ 2 ∈ ℂ) → ((2↑𝑗) · 2) = (2 · (2↑𝑗)))
9189, 3, 90sylancl 586 . . . . . . . . . . 11 ((𝜑𝑗 ∈ ℕ) → ((2↑𝑗) · 2) = (2 · (2↑𝑗)))
9285, 91eqtrd 2764 . . . . . . . . . 10 ((𝜑𝑗 ∈ ℕ) → (2↑(𝑗 + 1)) = (2 · (2↑𝑗)))
9392oveq1d 7402 . . . . . . . . 9 ((𝜑𝑗 ∈ ℕ) → ((2↑(𝑗 + 1)) · (𝐹‘(2↑(𝑗 + 1)))) = ((2 · (2↑𝑗)) · (𝐹‘(2↑(𝑗 + 1)))))
943a1i 11 . . . . . . . . . 10 ((𝜑𝑗 ∈ ℕ) → 2 ∈ ℂ)
95 fveq2 6858 . . . . . . . . . . . . 13 (𝑘 = (2↑(𝑗 + 1)) → (𝐹𝑘) = (𝐹‘(2↑(𝑗 + 1))))
9695eleq1d 2813 . . . . . . . . . . . 12 (𝑘 = (2↑(𝑗 + 1)) → ((𝐹𝑘) ∈ ℝ ↔ (𝐹‘(2↑(𝑗 + 1))) ∈ ℝ))
9739adantr 480 . . . . . . . . . . . 12 ((𝜑𝑗 ∈ ℕ) → ∀𝑘 ∈ ℕ (𝐹𝑘) ∈ ℝ)
98 nnexpcl 14039 . . . . . . . . . . . . 13 ((2 ∈ ℕ ∧ (𝑗 + 1) ∈ ℕ0) → (2↑(𝑗 + 1)) ∈ ℕ)
9940, 80, 98sylancr 587 . . . . . . . . . . . 12 ((𝜑𝑗 ∈ ℕ) → (2↑(𝑗 + 1)) ∈ ℕ)
10096, 97, 99rspcdva 3589 . . . . . . . . . . 11 ((𝜑𝑗 ∈ ℕ) → (𝐹‘(2↑(𝑗 + 1))) ∈ ℝ)
101100recnd 11202 . . . . . . . . . 10 ((𝜑𝑗 ∈ ℕ) → (𝐹‘(2↑(𝑗 + 1))) ∈ ℂ)
10294, 89, 101mulassd 11197 . . . . . . . . 9 ((𝜑𝑗 ∈ ℕ) → ((2 · (2↑𝑗)) · (𝐹‘(2↑(𝑗 + 1)))) = (2 · ((2↑𝑗) · (𝐹‘(2↑(𝑗 + 1))))))
10381, 93, 1023eqtrd 2768 . . . . . . . 8 ((𝜑𝑗 ∈ ℕ) → (𝐺‘(𝑗 + 1)) = (2 · ((2↑𝑗) · (𝐹‘(2↑(𝑗 + 1))))))
10488nnnn0d 12503 . . . . . . . . . . . . . . 15 ((𝜑𝑗 ∈ ℕ) → (2↑𝑗) ∈ ℕ0)
105 hashfz1 14311 . . . . . . . . . . . . . . 15 ((2↑𝑗) ∈ ℕ0 → (♯‘(1...(2↑𝑗))) = (2↑𝑗))
106104, 105syl 17 . . . . . . . . . . . . . 14 ((𝜑𝑗 ∈ ℕ) → (♯‘(1...(2↑𝑗))) = (2↑𝑗))
107106, 89eqeltrd 2828 . . . . . . . . . . . . 13 ((𝜑𝑗 ∈ ℕ) → (♯‘(1...(2↑𝑗))) ∈ ℂ)
108 fzfid 13938 . . . . . . . . . . . . . . 15 ((𝜑𝑗 ∈ ℕ) → (((2↑𝑗) + 1)...(2↑(𝑗 + 1))) ∈ Fin)
109 hashcl 14321 . . . . . . . . . . . . . . 15 ((((2↑𝑗) + 1)...(2↑(𝑗 + 1))) ∈ Fin → (♯‘(((2↑𝑗) + 1)...(2↑(𝑗 + 1)))) ∈ ℕ0)
110108, 109syl 17 . . . . . . . . . . . . . 14 ((𝜑𝑗 ∈ ℕ) → (♯‘(((2↑𝑗) + 1)...(2↑(𝑗 + 1)))) ∈ ℕ0)
111110nn0cnd 12505 . . . . . . . . . . . . 13 ((𝜑𝑗 ∈ ℕ) → (♯‘(((2↑𝑗) + 1)...(2↑(𝑗 + 1)))) ∈ ℂ)
112 simpr 484 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑗 ∈ ℕ) → 𝑗 ∈ ℕ)
113112nnzd 12556 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑗 ∈ ℕ) → 𝑗 ∈ ℤ)
114 uzid 12808 . . . . . . . . . . . . . . . . . 18 (𝑗 ∈ ℤ → 𝑗 ∈ (ℤ𝑗))
115 peano2uz 12860 . . . . . . . . . . . . . . . . . 18 (𝑗 ∈ (ℤ𝑗) → (𝑗 + 1) ∈ (ℤ𝑗))
116 2re 12260 . . . . . . . . . . . . . . . . . . 19 2 ∈ ℝ
117 1le2 12390 . . . . . . . . . . . . . . . . . . 19 1 ≤ 2
118 leexp2a 14137 . . . . . . . . . . . . . . . . . . 19 ((2 ∈ ℝ ∧ 1 ≤ 2 ∧ (𝑗 + 1) ∈ (ℤ𝑗)) → (2↑𝑗) ≤ (2↑(𝑗 + 1)))
119116, 117, 118mp3an12 1453 . . . . . . . . . . . . . . . . . 18 ((𝑗 + 1) ∈ (ℤ𝑗) → (2↑𝑗) ≤ (2↑(𝑗 + 1)))
120113, 114, 115, 1194syl 19 . . . . . . . . . . . . . . . . 17 ((𝜑𝑗 ∈ ℕ) → (2↑𝑗) ≤ (2↑(𝑗 + 1)))
12188, 64eleqtrdi 2838 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑗 ∈ ℕ) → (2↑𝑗) ∈ (ℤ‘1))
12299nnzd 12556 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑗 ∈ ℕ) → (2↑(𝑗 + 1)) ∈ ℤ)
123 elfz5 13477 . . . . . . . . . . . . . . . . . 18 (((2↑𝑗) ∈ (ℤ‘1) ∧ (2↑(𝑗 + 1)) ∈ ℤ) → ((2↑𝑗) ∈ (1...(2↑(𝑗 + 1))) ↔ (2↑𝑗) ≤ (2↑(𝑗 + 1))))
124121, 122, 123syl2anc 584 . . . . . . . . . . . . . . . . 17 ((𝜑𝑗 ∈ ℕ) → ((2↑𝑗) ∈ (1...(2↑(𝑗 + 1))) ↔ (2↑𝑗) ≤ (2↑(𝑗 + 1))))
125120, 124mpbird 257 . . . . . . . . . . . . . . . 16 ((𝜑𝑗 ∈ ℕ) → (2↑𝑗) ∈ (1...(2↑(𝑗 + 1))))
126 fzsplit 13511 . . . . . . . . . . . . . . . 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 6862 . . . . . . . . . . . . . 14 ((𝜑𝑗 ∈ ℕ) → (♯‘(1...(2↑(𝑗 + 1)))) = (♯‘((1...(2↑𝑗)) ∪ (((2↑𝑗) + 1)...(2↑(𝑗 + 1))))))
12989times2d 12426 . . . . . . . . . . . . . . . 16 ((𝜑𝑗 ∈ ℕ) → ((2↑𝑗) · 2) = ((2↑𝑗) + (2↑𝑗)))
13085, 129eqtrd 2764 . . . . . . . . . . . . . . 15 ((𝜑𝑗 ∈ ℕ) → (2↑(𝑗 + 1)) = ((2↑𝑗) + (2↑𝑗)))
13199nnnn0d 12503 . . . . . . . . . . . . . . . 16 ((𝜑𝑗 ∈ ℕ) → (2↑(𝑗 + 1)) ∈ ℕ0)
132 hashfz1 14311 . . . . . . . . . . . . . . . 16 ((2↑(𝑗 + 1)) ∈ ℕ0 → (♯‘(1...(2↑(𝑗 + 1)))) = (2↑(𝑗 + 1)))
133131, 132syl 17 . . . . . . . . . . . . . . 15 ((𝜑𝑗 ∈ ℕ) → (♯‘(1...(2↑(𝑗 + 1)))) = (2↑(𝑗 + 1)))
134106oveq1d 7402 . . . . . . . . . . . . . . 15 ((𝜑𝑗 ∈ ℕ) → ((♯‘(1...(2↑𝑗))) + (2↑𝑗)) = ((2↑𝑗) + (2↑𝑗)))
135130, 133, 1343eqtr4d 2774 . . . . . . . . . . . . . 14 ((𝜑𝑗 ∈ ℕ) → (♯‘(1...(2↑(𝑗 + 1)))) = ((♯‘(1...(2↑𝑗))) + (2↑𝑗)))
136 fzfid 13938 . . . . . . . . . . . . . . 15 ((𝜑𝑗 ∈ ℕ) → (1...(2↑𝑗)) ∈ Fin)
13788nnred 12201 . . . . . . . . . . . . . . . . 17 ((𝜑𝑗 ∈ ℕ) → (2↑𝑗) ∈ ℝ)
138137ltp1d 12113 . . . . . . . . . . . . . . . 16 ((𝜑𝑗 ∈ ℕ) → (2↑𝑗) < ((2↑𝑗) + 1))
139 fzdisj 13512 . . . . . . . . . . . . . . . 16 ((2↑𝑗) < ((2↑𝑗) + 1) → ((1...(2↑𝑗)) ∩ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))) = ∅)
140138, 139syl 17 . . . . . . . . . . . . . . 15 ((𝜑𝑗 ∈ ℕ) → ((1...(2↑𝑗)) ∩ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))) = ∅)
141 hashun 14347 . . . . . . . . . . . . . . 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 1373 . . . . . . . . . . . . . 14 ((𝜑𝑗 ∈ ℕ) → (♯‘((1...(2↑𝑗)) ∪ (((2↑𝑗) + 1)...(2↑(𝑗 + 1))))) = ((♯‘(1...(2↑𝑗))) + (♯‘(((2↑𝑗) + 1)...(2↑(𝑗 + 1))))))
143128, 135, 1423eqtr3d 2772 . . . . . . . . . . . . 13 ((𝜑𝑗 ∈ ℕ) → ((♯‘(1...(2↑𝑗))) + (2↑𝑗)) = ((♯‘(1...(2↑𝑗))) + (♯‘(((2↑𝑗) + 1)...(2↑(𝑗 + 1))))))
144107, 89, 111, 143addcanad 11379 . . . . . . . . . . . 12 ((𝜑𝑗 ∈ ℕ) → (2↑𝑗) = (♯‘(((2↑𝑗) + 1)...(2↑(𝑗 + 1)))))
145144oveq1d 7402 . . . . . . . . . . 11 ((𝜑𝑗 ∈ ℕ) → ((2↑𝑗) · (𝐹‘(2↑(𝑗 + 1)))) = ((♯‘(((2↑𝑗) + 1)...(2↑(𝑗 + 1)))) · (𝐹‘(2↑(𝑗 + 1)))))
146 fsumconst 15756 . . . . . . . . . . . 12 (((((2↑𝑗) + 1)...(2↑(𝑗 + 1))) ∈ Fin ∧ (𝐹‘(2↑(𝑗 + 1))) ∈ ℂ) → Σ𝑘 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))(𝐹‘(2↑(𝑗 + 1))) = ((♯‘(((2↑𝑗) + 1)...(2↑(𝑗 + 1)))) · (𝐹‘(2↑(𝑗 + 1)))))
147108, 101, 146syl2anc 584 . . . . . . . . . . 11 ((𝜑𝑗 ∈ ℕ) → Σ𝑘 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))(𝐹‘(2↑(𝑗 + 1))) = ((♯‘(((2↑𝑗) + 1)...(2↑(𝑗 + 1)))) · (𝐹‘(2↑(𝑗 + 1)))))
148145, 147eqtr4d 2767 . . . . . . . . . 10 ((𝜑𝑗 ∈ ℕ) → ((2↑𝑗) · (𝐹‘(2↑(𝑗 + 1)))) = Σ𝑘 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))(𝐹‘(2↑(𝑗 + 1))))
149100adantr 480 . . . . . . . . . . 11 (((𝜑𝑗 ∈ ℕ) ∧ 𝑘 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))) → (𝐹‘(2↑(𝑗 + 1))) ∈ ℝ)
150 simpl 482 . . . . . . . . . . . 12 ((𝜑𝑗 ∈ ℕ) → 𝜑)
151 peano2nn 12198 . . . . . . . . . . . . . 14 ((2↑𝑗) ∈ ℕ → ((2↑𝑗) + 1) ∈ ℕ)
15288, 151syl 17 . . . . . . . . . . . . 13 ((𝜑𝑗 ∈ ℕ) → ((2↑𝑗) + 1) ∈ ℕ)
153 elfzuz 13481 . . . . . . . . . . . . 13 (𝑘 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1))) → 𝑘 ∈ (ℤ‘((2↑𝑗) + 1)))
154 eluznn 12877 . . . . . . . . . . . . 13 ((((2↑𝑗) + 1) ∈ ℕ ∧ 𝑘 ∈ (ℤ‘((2↑𝑗) + 1))) → 𝑘 ∈ ℕ)
155152, 153, 154syl2an 596 . . . . . . . . . . . 12 (((𝜑𝑗 ∈ ℕ) ∧ 𝑘 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))) → 𝑘 ∈ ℕ)
156150, 155, 38syl2an2r 685 . . . . . . . . . . 11 (((𝜑𝑗 ∈ ℕ) ∧ 𝑘 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))) → (𝐹𝑘) ∈ ℝ)
157 elfzuz3 13482 . . . . . . . . . . . . . . 15 (𝑛 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1))) → (2↑(𝑗 + 1)) ∈ (ℤ𝑛))
158157adantl 481 . . . . . . . . . . . . . 14 (((𝜑𝑗 ∈ ℕ) ∧ 𝑛 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))) → (2↑(𝑗 + 1)) ∈ (ℤ𝑛))
159 simplll 774 . . . . . . . . . . . . . . 15 ((((𝜑𝑗 ∈ ℕ) ∧ 𝑛 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))) ∧ 𝑘 ∈ (𝑛...(2↑(𝑗 + 1)))) → 𝜑)
160 elfzuz 13481 . . . . . . . . . . . . . . . . 17 (𝑛 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1))) → 𝑛 ∈ (ℤ‘((2↑𝑗) + 1)))
161 eluznn 12877 . . . . . . . . . . . . . . . . 17 ((((2↑𝑗) + 1) ∈ ℕ ∧ 𝑛 ∈ (ℤ‘((2↑𝑗) + 1))) → 𝑛 ∈ ℕ)
162152, 160, 161syl2an 596 . . . . . . . . . . . . . . . 16 (((𝜑𝑗 ∈ ℕ) ∧ 𝑛 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))) → 𝑛 ∈ ℕ)
163 elfzuz 13481 . . . . . . . . . . . . . . . 16 (𝑘 ∈ (𝑛...(2↑(𝑗 + 1))) → 𝑘 ∈ (ℤ𝑛))
164 eluznn 12877 . . . . . . . . . . . . . . . 16 ((𝑛 ∈ ℕ ∧ 𝑘 ∈ (ℤ𝑛)) → 𝑘 ∈ ℕ)
165162, 163, 164syl2an 596 . . . . . . . . . . . . . . 15 ((((𝜑𝑗 ∈ ℕ) ∧ 𝑛 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))) ∧ 𝑘 ∈ (𝑛...(2↑(𝑗 + 1)))) → 𝑘 ∈ ℕ)
166159, 165, 38syl2anc 584 . . . . . . . . . . . . . 14 ((((𝜑𝑗 ∈ ℕ) ∧ 𝑛 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))) ∧ 𝑘 ∈ (𝑛...(2↑(𝑗 + 1)))) → (𝐹𝑘) ∈ ℝ)
167 simplll 774 . . . . . . . . . . . . . . 15 ((((𝜑𝑗 ∈ ℕ) ∧ 𝑛 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))) ∧ 𝑘 ∈ (𝑛...((2↑(𝑗 + 1)) − 1))) → 𝜑)
168 elfzuz 13481 . . . . . . . . . . . . . . . 16 (𝑘 ∈ (𝑛...((2↑(𝑗 + 1)) − 1)) → 𝑘 ∈ (ℤ𝑛))
169162, 168, 164syl2an 596 . . . . . . . . . . . . . . 15 ((((𝜑𝑗 ∈ ℕ) ∧ 𝑛 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))) ∧ 𝑘 ∈ (𝑛...((2↑(𝑗 + 1)) − 1))) → 𝑘 ∈ ℕ)
170 climcnds.3 . . . . . . . . . . . . . . 15 ((𝜑𝑘 ∈ ℕ) → (𝐹‘(𝑘 + 1)) ≤ (𝐹𝑘))
171167, 169, 170syl2anc 584 . . . . . . . . . . . . . 14 ((((𝜑𝑗 ∈ ℕ) ∧ 𝑛 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))) ∧ 𝑘 ∈ (𝑛...((2↑(𝑗 + 1)) − 1))) → (𝐹‘(𝑘 + 1)) ≤ (𝐹𝑘))
172158, 166, 171monoord2 13998 . . . . . . . . . . . . 13 (((𝜑𝑗 ∈ ℕ) ∧ 𝑛 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))) → (𝐹‘(2↑(𝑗 + 1))) ≤ (𝐹𝑛))
173172ralrimiva 3125 . . . . . . . . . . . 12 ((𝜑𝑗 ∈ ℕ) → ∀𝑛 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))(𝐹‘(2↑(𝑗 + 1))) ≤ (𝐹𝑛))
174 fveq2 6858 . . . . . . . . . . . . . 14 (𝑛 = 𝑘 → (𝐹𝑛) = (𝐹𝑘))
175174breq2d 5119 . . . . . . . . . . . . 13 (𝑛 = 𝑘 → ((𝐹‘(2↑(𝑗 + 1))) ≤ (𝐹𝑛) ↔ (𝐹‘(2↑(𝑗 + 1))) ≤ (𝐹𝑘)))
176175rspccva 3587 . . . . . . . . . . . 12 ((∀𝑛 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))(𝐹‘(2↑(𝑗 + 1))) ≤ (𝐹𝑛) ∧ 𝑘 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))) → (𝐹‘(2↑(𝑗 + 1))) ≤ (𝐹𝑘))
177173, 176sylan 580 . . . . . . . . . . 11 (((𝜑𝑗 ∈ ℕ) ∧ 𝑘 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))) → (𝐹‘(2↑(𝑗 + 1))) ≤ (𝐹𝑘))
178108, 149, 156, 177fsumle 15765 . . . . . . . . . 10 ((𝜑𝑗 ∈ ℕ) → Σ𝑘 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))(𝐹‘(2↑(𝑗 + 1))) ≤ Σ𝑘 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))(𝐹𝑘))
179148, 178eqbrtrd 5129 . . . . . . . . 9 ((𝜑𝑗 ∈ ℕ) → ((2↑𝑗) · (𝐹‘(2↑(𝑗 + 1)))) ≤ Σ𝑘 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))(𝐹𝑘))
180137, 100remulcld 11204 . . . . . . . . . 10 ((𝜑𝑗 ∈ ℕ) → ((2↑𝑗) · (𝐹‘(2↑(𝑗 + 1)))) ∈ ℝ)
181108, 156fsumrecl 15700 . . . . . . . . . 10 ((𝜑𝑗 ∈ ℕ) → Σ𝑘 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))(𝐹𝑘) ∈ ℝ)
182 2rp 12956 . . . . . . . . . . 11 2 ∈ ℝ+
183182a1i 11 . . . . . . . . . 10 ((𝜑𝑗 ∈ ℕ) → 2 ∈ ℝ+)
184180, 181, 183lemul2d 13039 . . . . . . . . 9 ((𝜑𝑗 ∈ ℕ) → (((2↑𝑗) · (𝐹‘(2↑(𝑗 + 1)))) ≤ Σ𝑘 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))(𝐹𝑘) ↔ (2 · ((2↑𝑗) · (𝐹‘(2↑(𝑗 + 1))))) ≤ (2 · Σ𝑘 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))(𝐹𝑘))))
185179, 184mpbid 232 . . . . . . . 8 ((𝜑𝑗 ∈ ℕ) → (2 · ((2↑𝑗) · (𝐹‘(2↑(𝑗 + 1))))) ≤ (2 · Σ𝑘 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))(𝐹𝑘)))
186103, 185eqbrtrd 5129 . . . . . . 7 ((𝜑𝑗 ∈ ℕ) → (𝐺‘(𝑗 + 1)) ≤ (2 · Σ𝑘 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))(𝐹𝑘)))
187 1zzd 12564 . . . . . . . . . 10 (𝜑 → 1 ∈ ℤ)
188 nnnn0 12449 . . . . . . . . . . 11 (𝑛 ∈ ℕ → 𝑛 ∈ ℕ0)
189 simpr 484 . . . . . . . . . . . . . . 15 ((𝜑𝑛 ∈ ℕ0) → 𝑛 ∈ ℕ0)
190 nnexpcl 14039 . . . . . . . . . . . . . . 15 ((2 ∈ ℕ ∧ 𝑛 ∈ ℕ0) → (2↑𝑛) ∈ ℕ)
19140, 189, 190sylancr 587 . . . . . . . . . . . . . 14 ((𝜑𝑛 ∈ ℕ0) → (2↑𝑛) ∈ ℕ)
192191nnred 12201 . . . . . . . . . . . . 13 ((𝜑𝑛 ∈ ℕ0) → (2↑𝑛) ∈ ℝ)
193 fveq2 6858 . . . . . . . . . . . . . . 15 (𝑘 = (2↑𝑛) → (𝐹𝑘) = (𝐹‘(2↑𝑛)))
194193eleq1d 2813 . . . . . . . . . . . . . 14 (𝑘 = (2↑𝑛) → ((𝐹𝑘) ∈ ℝ ↔ (𝐹‘(2↑𝑛)) ∈ ℝ))
19539adantr 480 . . . . . . . . . . . . . 14 ((𝜑𝑛 ∈ ℕ0) → ∀𝑘 ∈ ℕ (𝐹𝑘) ∈ ℝ)
196194, 195, 191rspcdva 3589 . . . . . . . . . . . . 13 ((𝜑𝑛 ∈ ℕ0) → (𝐹‘(2↑𝑛)) ∈ ℝ)
197192, 196remulcld 11204 . . . . . . . . . . . 12 ((𝜑𝑛 ∈ ℕ0) → ((2↑𝑛) · (𝐹‘(2↑𝑛))) ∈ ℝ)
19858, 197eqeltrd 2828 . . . . . . . . . . 11 ((𝜑𝑛 ∈ ℕ0) → (𝐺𝑛) ∈ ℝ)
199188, 198sylan2 593 . . . . . . . . . 10 ((𝜑𝑛 ∈ ℕ) → (𝐺𝑛) ∈ ℝ)
20064, 187, 199serfre 13996 . . . . . . . . 9 (𝜑 → seq1( + , 𝐺):ℕ⟶ℝ)
201200ffvelcdmda 7056 . . . . . . . 8 ((𝜑𝑗 ∈ ℕ) → (seq1( + , 𝐺)‘𝑗) ∈ ℝ)
20272eleq1d 2813 . . . . . . . . 9 (𝑛 = (𝑗 + 1) → ((𝐺𝑛) ∈ ℝ ↔ (𝐺‘(𝑗 + 1)) ∈ ℝ))
203199ralrimiva 3125 . . . . . . . . . 10 (𝜑 → ∀𝑛 ∈ ℕ (𝐺𝑛) ∈ ℝ)
204203adantr 480 . . . . . . . . 9 ((𝜑𝑗 ∈ ℕ) → ∀𝑛 ∈ ℕ (𝐺𝑛) ∈ ℝ)
205202, 204, 79rspcdva 3589 . . . . . . . 8 ((𝜑𝑗 ∈ ℕ) → (𝐺‘(𝑗 + 1)) ∈ ℝ)
20664, 187, 38serfre 13996 . . . . . . . . . 10 (𝜑 → seq1( + , 𝐹):ℕ⟶ℝ)
207 ffvelcdm 7053 . . . . . . . . . 10 ((seq1( + , 𝐹):ℕ⟶ℝ ∧ (2↑𝑗) ∈ ℕ) → (seq1( + , 𝐹)‘(2↑𝑗)) ∈ ℝ)
208206, 87, 207syl2an 596 . . . . . . . . 9 ((𝜑𝑗 ∈ ℕ) → (seq1( + , 𝐹)‘(2↑𝑗)) ∈ ℝ)
209 remulcl 11153 . . . . . . . . 9 ((2 ∈ ℝ ∧ (seq1( + , 𝐹)‘(2↑𝑗)) ∈ ℝ) → (2 · (seq1( + , 𝐹)‘(2↑𝑗))) ∈ ℝ)
210116, 208, 209sylancr 587 . . . . . . . 8 ((𝜑𝑗 ∈ ℕ) → (2 · (seq1( + , 𝐹)‘(2↑𝑗))) ∈ ℝ)
211 remulcl 11153 . . . . . . . . 9 ((2 ∈ ℝ ∧ Σ𝑘 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))(𝐹𝑘) ∈ ℝ) → (2 · Σ𝑘 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))(𝐹𝑘)) ∈ ℝ)
212116, 181, 211sylancr 587 . . . . . . . 8 ((𝜑𝑗 ∈ ℕ) → (2 · Σ𝑘 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))(𝐹𝑘)) ∈ ℝ)
213 le2add 11660 . . . . . . . 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 838 . . . . . . 7 ((𝜑𝑗 ∈ ℕ) → (((seq1( + , 𝐺)‘𝑗) ≤ (2 · (seq1( + , 𝐹)‘(2↑𝑗))) ∧ (𝐺‘(𝑗 + 1)) ≤ (2 · Σ𝑘 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))(𝐹𝑘))) → ((seq1( + , 𝐺)‘𝑗) + (𝐺‘(𝑗 + 1))) ≤ ((2 · (seq1( + , 𝐹)‘(2↑𝑗))) + (2 · Σ𝑘 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))(𝐹𝑘)))))
215186, 214mpan2d 694 . . . . . 6 ((𝜑𝑗 ∈ ℕ) → ((seq1( + , 𝐺)‘𝑗) ≤ (2 · (seq1( + , 𝐹)‘(2↑𝑗))) → ((seq1( + , 𝐺)‘𝑗) + (𝐺‘(𝑗 + 1))) ≤ ((2 · (seq1( + , 𝐹)‘(2↑𝑗))) + (2 · Σ𝑘 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))(𝐹𝑘)))))
216112, 64eleqtrdi 2838 . . . . . . . 8 ((𝜑𝑗 ∈ ℕ) → 𝑗 ∈ (ℤ‘1))
217 seqp1 13981 . . . . . . . 8 (𝑗 ∈ (ℤ‘1) → (seq1( + , 𝐺)‘(𝑗 + 1)) = ((seq1( + , 𝐺)‘𝑗) + (𝐺‘(𝑗 + 1))))
218216, 217syl 17 . . . . . . 7 ((𝜑𝑗 ∈ ℕ) → (seq1( + , 𝐺)‘(𝑗 + 1)) = ((seq1( + , 𝐺)‘𝑗) + (𝐺‘(𝑗 + 1))))
219 fzfid 13938 . . . . . . . . . . 11 ((𝜑𝑗 ∈ ℕ) → (1...(2↑(𝑗 + 1))) ∈ Fin)
220 elfznn 13514 . . . . . . . . . . . 12 (𝑘 ∈ (1...(2↑(𝑗 + 1))) → 𝑘 ∈ ℕ)
22138recnd 11202 . . . . . . . . . . . 12 ((𝜑𝑘 ∈ ℕ) → (𝐹𝑘) ∈ ℂ)
222150, 220, 221syl2an 596 . . . . . . . . . . 11 (((𝜑𝑗 ∈ ℕ) ∧ 𝑘 ∈ (1...(2↑(𝑗 + 1)))) → (𝐹𝑘) ∈ ℂ)
223140, 127, 219, 222fsumsplit 15707 . . . . . . . . . 10 ((𝜑𝑗 ∈ ℕ) → Σ𝑘 ∈ (1...(2↑(𝑗 + 1)))(𝐹𝑘) = (Σ𝑘 ∈ (1...(2↑𝑗))(𝐹𝑘) + Σ𝑘 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))(𝐹𝑘)))
224 eqidd 2730 . . . . . . . . . . 11 (((𝜑𝑗 ∈ ℕ) ∧ 𝑘 ∈ (1...(2↑(𝑗 + 1)))) → (𝐹𝑘) = (𝐹𝑘))
22599, 64eleqtrdi 2838 . . . . . . . . . . 11 ((𝜑𝑗 ∈ ℕ) → (2↑(𝑗 + 1)) ∈ (ℤ‘1))
226224, 225, 222fsumser 15696 . . . . . . . . . 10 ((𝜑𝑗 ∈ ℕ) → Σ𝑘 ∈ (1...(2↑(𝑗 + 1)))(𝐹𝑘) = (seq1( + , 𝐹)‘(2↑(𝑗 + 1))))
227 eqidd 2730 . . . . . . . . . . . 12 (((𝜑𝑗 ∈ ℕ) ∧ 𝑘 ∈ (1...(2↑𝑗))) → (𝐹𝑘) = (𝐹𝑘))
228 elfznn 13514 . . . . . . . . . . . . 13 (𝑘 ∈ (1...(2↑𝑗)) → 𝑘 ∈ ℕ)
229150, 228, 221syl2an 596 . . . . . . . . . . . 12 (((𝜑𝑗 ∈ ℕ) ∧ 𝑘 ∈ (1...(2↑𝑗))) → (𝐹𝑘) ∈ ℂ)
230227, 121, 229fsumser 15696 . . . . . . . . . . 11 ((𝜑𝑗 ∈ ℕ) → Σ𝑘 ∈ (1...(2↑𝑗))(𝐹𝑘) = (seq1( + , 𝐹)‘(2↑𝑗)))
231230oveq1d 7402 . . . . . . . . . 10 ((𝜑𝑗 ∈ ℕ) → (Σ𝑘 ∈ (1...(2↑𝑗))(𝐹𝑘) + Σ𝑘 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))(𝐹𝑘)) = ((seq1( + , 𝐹)‘(2↑𝑗)) + Σ𝑘 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))(𝐹𝑘)))
232223, 226, 2313eqtr3d 2772 . . . . . . . . 9 ((𝜑𝑗 ∈ ℕ) → (seq1( + , 𝐹)‘(2↑(𝑗 + 1))) = ((seq1( + , 𝐹)‘(2↑𝑗)) + Σ𝑘 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))(𝐹𝑘)))
233232oveq2d 7403 . . . . . . . 8 ((𝜑𝑗 ∈ ℕ) → (2 · (seq1( + , 𝐹)‘(2↑(𝑗 + 1)))) = (2 · ((seq1( + , 𝐹)‘(2↑𝑗)) + Σ𝑘 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))(𝐹𝑘))))
234208recnd 11202 . . . . . . . . 9 ((𝜑𝑗 ∈ ℕ) → (seq1( + , 𝐹)‘(2↑𝑗)) ∈ ℂ)
235181recnd 11202 . . . . . . . . 9 ((𝜑𝑗 ∈ ℕ) → Σ𝑘 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))(𝐹𝑘) ∈ ℂ)
23694, 234, 235adddid 11198 . . . . . . . 8 ((𝜑𝑗 ∈ ℕ) → (2 · ((seq1( + , 𝐹)‘(2↑𝑗)) + Σ𝑘 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))(𝐹𝑘))) = ((2 · (seq1( + , 𝐹)‘(2↑𝑗))) + (2 · Σ𝑘 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))(𝐹𝑘))))
237233, 236eqtrd 2764 . . . . . . 7 ((𝜑𝑗 ∈ ℕ) → (2 · (seq1( + , 𝐹)‘(2↑(𝑗 + 1)))) = ((2 · (seq1( + , 𝐹)‘(2↑𝑗))) + (2 · Σ𝑘 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))(𝐹𝑘))))
238218, 237breq12d 5120 . . . . . 6 ((𝜑𝑗 ∈ ℕ) → ((seq1( + , 𝐺)‘(𝑗 + 1)) ≤ (2 · (seq1( + , 𝐹)‘(2↑(𝑗 + 1)))) ↔ ((seq1( + , 𝐺)‘𝑗) + (𝐺‘(𝑗 + 1))) ≤ ((2 · (seq1( + , 𝐹)‘(2↑𝑗))) + (2 · Σ𝑘 ∈ (((2↑𝑗) + 1)...(2↑(𝑗 + 1)))(𝐹𝑘)))))
239215, 238sylibrd 259 . . . . 5 ((𝜑𝑗 ∈ ℕ) → ((seq1( + , 𝐺)‘𝑗) ≤ (2 · (seq1( + , 𝐹)‘(2↑𝑗))) → (seq1( + , 𝐺)‘(𝑗 + 1)) ≤ (2 · (seq1( + , 𝐹)‘(2↑(𝑗 + 1))))))
240239expcom 413 . . . 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 12204 . 2 (𝑁 ∈ ℕ → (𝜑 → (seq1( + , 𝐺)‘𝑁) ≤ (2 · (seq1( + , 𝐹)‘(2↑𝑁)))))
243242impcom 407 1 ((𝜑𝑁 ∈ ℕ) → (seq1( + , 𝐺)‘𝑁) ≤ (2 · (seq1( + , 𝐹)‘(2↑𝑁))))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 206  wa 395   = wceq 1540  wcel 2109  wral 3044  cun 3912  cin 3913  c0 4296   class class class wbr 5107  wf 6507  cfv 6511  (class class class)co 7387  Fincfn 8918  cc 11066  cr 11067  0cc0 11068  1c1 11069   + caddc 11071   · cmul 11073   < clt 11208  cle 11209  cmin 11405  cn 12186  2c2 12241  0cn0 12442  cz 12529  cuz 12793  +crp 12951  ...cfz 13468  seqcseq 13966  cexp 14026  chash 14295  Σcsu 15652
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1795  ax-4 1809  ax-5 1910  ax-6 1967  ax-7 2008  ax-8 2111  ax-9 2119  ax-10 2142  ax-11 2158  ax-12 2178  ax-ext 2701  ax-rep 5234  ax-sep 5251  ax-nul 5261  ax-pow 5320  ax-pr 5387  ax-un 7711  ax-inf2 9594  ax-cnex 11124  ax-resscn 11125  ax-1cn 11126  ax-icn 11127  ax-addcl 11128  ax-addrcl 11129  ax-mulcl 11130  ax-mulrcl 11131  ax-mulcom 11132  ax-addass 11133  ax-mulass 11134  ax-distr 11135  ax-i2m1 11136  ax-1ne0 11137  ax-1rid 11138  ax-rnegex 11139  ax-rrecex 11140  ax-cnre 11141  ax-pre-lttri 11142  ax-pre-lttrn 11143  ax-pre-ltadd 11144  ax-pre-mulgt0 11145  ax-pre-sup 11146
This theorem depends on definitions:  df-bi 207  df-an 396  df-or 848  df-3or 1087  df-3an 1088  df-tru 1543  df-fal 1553  df-ex 1780  df-nf 1784  df-sb 2066  df-mo 2533  df-eu 2562  df-clab 2708  df-cleq 2721  df-clel 2803  df-nfc 2878  df-ne 2926  df-nel 3030  df-ral 3045  df-rex 3054  df-rmo 3354  df-reu 3355  df-rab 3406  df-v 3449  df-sbc 3754  df-csb 3863  df-dif 3917  df-un 3919  df-in 3921  df-ss 3931  df-pss 3934  df-nul 4297  df-if 4489  df-pw 4565  df-sn 4590  df-pr 4592  df-op 4596  df-uni 4872  df-int 4911  df-iun 4957  df-br 5108  df-opab 5170  df-mpt 5189  df-tr 5215  df-id 5533  df-eprel 5538  df-po 5546  df-so 5547  df-fr 5591  df-se 5592  df-we 5593  df-xp 5644  df-rel 5645  df-cnv 5646  df-co 5647  df-dm 5648  df-rn 5649  df-res 5650  df-ima 5651  df-pred 6274  df-ord 6335  df-on 6336  df-lim 6337  df-suc 6338  df-iota 6464  df-fun 6513  df-fn 6514  df-f 6515  df-f1 6516  df-fo 6517  df-f1o 6518  df-fv 6519  df-isom 6520  df-riota 7344  df-ov 7390  df-oprab 7391  df-mpo 7392  df-om 7843  df-1st 7968  df-2nd 7969  df-frecs 8260  df-wrecs 8291  df-recs 8340  df-rdg 8378  df-1o 8434  df-oadd 8438  df-er 8671  df-en 8919  df-dom 8920  df-sdom 8921  df-fin 8922  df-sup 9393  df-oi 9463  df-dju 9854  df-card 9892  df-pnf 11210  df-mnf 11211  df-xr 11212  df-ltxr 11213  df-le 11214  df-sub 11407  df-neg 11408  df-div 11836  df-nn 12187  df-2 12249  df-3 12250  df-n0 12443  df-z 12530  df-uz 12794  df-rp 12952  df-ico 13312  df-fz 13469  df-fzo 13616  df-seq 13967  df-exp 14027  df-hash 14296  df-cj 15065  df-re 15066  df-im 15067  df-sqrt 15201  df-abs 15202  df-clim 15454  df-sum 15653
This theorem is referenced by:  climcnds  15817
  Copyright terms: Public domain W3C validator