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

Theorem dvradcnv 26486
Description: The radius of convergence of the (formal) derivative 𝐻 of the power series 𝐺 is at least as large as the radius of convergence of 𝐺. (In fact they are equal, but we don't have as much use for the negative side of this claim.) (Contributed by Mario Carneiro, 31-Mar-2015.)
Hypotheses
Ref Expression
dvradcnv.g 𝐺 = (𝑥 ∈ ℂ ↦ (𝑛 ∈ ℕ0 ↦ ((𝐴𝑛) · (𝑥𝑛))))
dvradcnv.r 𝑅 = sup({𝑟 ∈ ℝ ∣ seq0( + , (𝐺𝑟)) ∈ dom ⇝ }, ℝ*, < )
dvradcnv.h 𝐻 = (𝑛 ∈ ℕ0 ↦ (((𝑛 + 1) · (𝐴‘(𝑛 + 1))) · (𝑋𝑛)))
dvradcnv.a (𝜑𝐴:ℕ0⟶ℂ)
dvradcnv.x (𝜑𝑋 ∈ ℂ)
dvradcnv.l (𝜑 → (abs‘𝑋) < 𝑅)
Assertion
Ref Expression
dvradcnv (𝜑 → seq0( + , 𝐻) ∈ dom ⇝ )
Distinct variable groups:   𝑥,𝑛,𝐴   𝐺,𝑟   𝑛,𝑟,𝑋,𝑥
Allowed substitution hints:   𝜑(𝑥,𝑛,𝑟)   𝐴(𝑟)   𝑅(𝑥,𝑛,𝑟)   𝐺(𝑥,𝑛)   𝐻(𝑥,𝑛,𝑟)

Proof of Theorem dvradcnv
Dummy variables 𝑘 𝑖 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 nn0uz 12879 . 2 0 = (ℤ‘0)
2 1nn0 12499 . . 3 1 ∈ ℕ0
32a1i 11 . 2 (𝜑 → 1 ∈ ℕ0)
4 ax-1cn 11133 . . . . 5 1 ∈ ℂ
5 nn0cn 12493 . . . . . 6 (𝑘 ∈ ℕ0𝑘 ∈ ℂ)
65adantl 485 . . . . 5 ((𝜑𝑘 ∈ ℕ0) → 𝑘 ∈ ℂ)
7 nn0ex 12489 . . . . . . 7 0 ∈ V
87mptex 7209 . . . . . 6 (𝑖 ∈ ℕ0 ↦ (𝑖 · (abs‘((𝐺𝑋)‘𝑖)))) ∈ V
98shftval4 15092 . . . . 5 ((1 ∈ ℂ ∧ 𝑘 ∈ ℂ) → (((𝑖 ∈ ℕ0 ↦ (𝑖 · (abs‘((𝐺𝑋)‘𝑖)))) shift -1)‘𝑘) = ((𝑖 ∈ ℕ0 ↦ (𝑖 · (abs‘((𝐺𝑋)‘𝑖))))‘(1 + 𝑘)))
104, 6, 9sylancr 596 . . . 4 ((𝜑𝑘 ∈ ℕ0) → (((𝑖 ∈ ℕ0 ↦ (𝑖 · (abs‘((𝐺𝑋)‘𝑖)))) shift -1)‘𝑘) = ((𝑖 ∈ ℕ0 ↦ (𝑖 · (abs‘((𝐺𝑋)‘𝑖))))‘(1 + 𝑘)))
11 addcom 11371 . . . . . 6 ((1 ∈ ℂ ∧ 𝑘 ∈ ℂ) → (1 + 𝑘) = (𝑘 + 1))
124, 6, 11sylancr 596 . . . . 5 ((𝜑𝑘 ∈ ℕ0) → (1 + 𝑘) = (𝑘 + 1))
1312fveq2d 6873 . . . 4 ((𝜑𝑘 ∈ ℕ0) → ((𝑖 ∈ ℕ0 ↦ (𝑖 · (abs‘((𝐺𝑋)‘𝑖))))‘(1 + 𝑘)) = ((𝑖 ∈ ℕ0 ↦ (𝑖 · (abs‘((𝐺𝑋)‘𝑖))))‘(𝑘 + 1)))
14 peano2nn0 12523 . . . . . . 7 (𝑘 ∈ ℕ0 → (𝑘 + 1) ∈ ℕ0)
1514adantl 485 . . . . . 6 ((𝜑𝑘 ∈ ℕ0) → (𝑘 + 1) ∈ ℕ0)
16 id 22 . . . . . . . 8 (𝑖 = (𝑘 + 1) → 𝑖 = (𝑘 + 1))
17 2fveq3 6874 . . . . . . . 8 (𝑖 = (𝑘 + 1) → (abs‘((𝐺𝑋)‘𝑖)) = (abs‘((𝐺𝑋)‘(𝑘 + 1))))
1816, 17oveq12d 7416 . . . . . . 7 (𝑖 = (𝑘 + 1) → (𝑖 · (abs‘((𝐺𝑋)‘𝑖))) = ((𝑘 + 1) · (abs‘((𝐺𝑋)‘(𝑘 + 1)))))
19 eqid 2764 . . . . . . 7 (𝑖 ∈ ℕ0 ↦ (𝑖 · (abs‘((𝐺𝑋)‘𝑖)))) = (𝑖 ∈ ℕ0 ↦ (𝑖 · (abs‘((𝐺𝑋)‘𝑖))))
20 ovex 7431 . . . . . . 7 ((𝑘 + 1) · (abs‘((𝐺𝑋)‘(𝑘 + 1)))) ∈ V
2118, 19, 20fvmpt 6977 . . . . . 6 ((𝑘 + 1) ∈ ℕ0 → ((𝑖 ∈ ℕ0 ↦ (𝑖 · (abs‘((𝐺𝑋)‘𝑖))))‘(𝑘 + 1)) = ((𝑘 + 1) · (abs‘((𝐺𝑋)‘(𝑘 + 1)))))
2215, 21syl 17 . . . . 5 ((𝜑𝑘 ∈ ℕ0) → ((𝑖 ∈ ℕ0 ↦ (𝑖 · (abs‘((𝐺𝑋)‘𝑖))))‘(𝑘 + 1)) = ((𝑘 + 1) · (abs‘((𝐺𝑋)‘(𝑘 + 1)))))
23 dvradcnv.x . . . . . . . 8 (𝜑𝑋 ∈ ℂ)
24 dvradcnv.g . . . . . . . . 9 𝐺 = (𝑥 ∈ ℂ ↦ (𝑛 ∈ ℕ0 ↦ ((𝐴𝑛) · (𝑥𝑛))))
2524pserval2 26476 . . . . . . . 8 ((𝑋 ∈ ℂ ∧ (𝑘 + 1) ∈ ℕ0) → ((𝐺𝑋)‘(𝑘 + 1)) = ((𝐴‘(𝑘 + 1)) · (𝑋↑(𝑘 + 1))))
2623, 14, 25syl2an 605 . . . . . . 7 ((𝜑𝑘 ∈ ℕ0) → ((𝐺𝑋)‘(𝑘 + 1)) = ((𝐴‘(𝑘 + 1)) · (𝑋↑(𝑘 + 1))))
2726fveq2d 6873 . . . . . 6 ((𝜑𝑘 ∈ ℕ0) → (abs‘((𝐺𝑋)‘(𝑘 + 1))) = (abs‘((𝐴‘(𝑘 + 1)) · (𝑋↑(𝑘 + 1)))))
2827oveq2d 7414 . . . . 5 ((𝜑𝑘 ∈ ℕ0) → ((𝑘 + 1) · (abs‘((𝐺𝑋)‘(𝑘 + 1)))) = ((𝑘 + 1) · (abs‘((𝐴‘(𝑘 + 1)) · (𝑋↑(𝑘 + 1))))))
2922, 28eqtrd 2799 . . . 4 ((𝜑𝑘 ∈ ℕ0) → ((𝑖 ∈ ℕ0 ↦ (𝑖 · (abs‘((𝐺𝑋)‘𝑖))))‘(𝑘 + 1)) = ((𝑘 + 1) · (abs‘((𝐴‘(𝑘 + 1)) · (𝑋↑(𝑘 + 1))))))
3010, 13, 293eqtrd 2803 . . 3 ((𝜑𝑘 ∈ ℕ0) → (((𝑖 ∈ ℕ0 ↦ (𝑖 · (abs‘((𝐺𝑋)‘𝑖)))) shift -1)‘𝑘) = ((𝑘 + 1) · (abs‘((𝐴‘(𝑘 + 1)) · (𝑋↑(𝑘 + 1))))))
3115nn0red 12545 . . . 4 ((𝜑𝑘 ∈ ℕ0) → (𝑘 + 1) ∈ ℝ)
32 dvradcnv.a . . . . . . 7 (𝜑𝐴:ℕ0⟶ℂ)
33 ffvelcdm 7064 . . . . . . 7 ((𝐴:ℕ0⟶ℂ ∧ (𝑘 + 1) ∈ ℕ0) → (𝐴‘(𝑘 + 1)) ∈ ℂ)
3432, 14, 33syl2an 605 . . . . . 6 ((𝜑𝑘 ∈ ℕ0) → (𝐴‘(𝑘 + 1)) ∈ ℂ)
35 expcl 14094 . . . . . . 7 ((𝑋 ∈ ℂ ∧ (𝑘 + 1) ∈ ℕ0) → (𝑋↑(𝑘 + 1)) ∈ ℂ)
3623, 14, 35syl2an 605 . . . . . 6 ((𝜑𝑘 ∈ ℕ0) → (𝑋↑(𝑘 + 1)) ∈ ℂ)
3734, 36mulcld 11204 . . . . 5 ((𝜑𝑘 ∈ ℕ0) → ((𝐴‘(𝑘 + 1)) · (𝑋↑(𝑘 + 1))) ∈ ℂ)
3837abscld 15468 . . . 4 ((𝜑𝑘 ∈ ℕ0) → (abs‘((𝐴‘(𝑘 + 1)) · (𝑋↑(𝑘 + 1)))) ∈ ℝ)
3931, 38remulcld 11214 . . 3 ((𝜑𝑘 ∈ ℕ0) → ((𝑘 + 1) · (abs‘((𝐴‘(𝑘 + 1)) · (𝑋↑(𝑘 + 1))))) ∈ ℝ)
4030, 39eqeltrd 2864 . 2 ((𝜑𝑘 ∈ ℕ0) → (((𝑖 ∈ ℕ0 ↦ (𝑖 · (abs‘((𝐺𝑋)‘𝑖)))) shift -1)‘𝑘) ∈ ℝ)
41 oveq1 7405 . . . . . . 7 (𝑛 = 𝑘 → (𝑛 + 1) = (𝑘 + 1))
4241fveq2d 6873 . . . . . . 7 (𝑛 = 𝑘 → (𝐴‘(𝑛 + 1)) = (𝐴‘(𝑘 + 1)))
4341, 42oveq12d 7416 . . . . . 6 (𝑛 = 𝑘 → ((𝑛 + 1) · (𝐴‘(𝑛 + 1))) = ((𝑘 + 1) · (𝐴‘(𝑘 + 1))))
44 oveq2 7406 . . . . . 6 (𝑛 = 𝑘 → (𝑋𝑛) = (𝑋𝑘))
4543, 44oveq12d 7416 . . . . 5 (𝑛 = 𝑘 → (((𝑛 + 1) · (𝐴‘(𝑛 + 1))) · (𝑋𝑛)) = (((𝑘 + 1) · (𝐴‘(𝑘 + 1))) · (𝑋𝑘)))
46 dvradcnv.h . . . . 5 𝐻 = (𝑛 ∈ ℕ0 ↦ (((𝑛 + 1) · (𝐴‘(𝑛 + 1))) · (𝑋𝑛)))
47 ovex 7431 . . . . 5 (((𝑘 + 1) · (𝐴‘(𝑘 + 1))) · (𝑋𝑘)) ∈ V
4845, 46, 47fvmpt 6977 . . . 4 (𝑘 ∈ ℕ0 → (𝐻𝑘) = (((𝑘 + 1) · (𝐴‘(𝑘 + 1))) · (𝑋𝑘)))
4948adantl 485 . . 3 ((𝜑𝑘 ∈ ℕ0) → (𝐻𝑘) = (((𝑘 + 1) · (𝐴‘(𝑘 + 1))) · (𝑋𝑘)))
5015nn0cnd 12546 . . . . 5 ((𝜑𝑘 ∈ ℕ0) → (𝑘 + 1) ∈ ℂ)
5150, 34mulcld 11204 . . . 4 ((𝜑𝑘 ∈ ℕ0) → ((𝑘 + 1) · (𝐴‘(𝑘 + 1))) ∈ ℂ)
52 expcl 14094 . . . . 5 ((𝑋 ∈ ℂ ∧ 𝑘 ∈ ℕ0) → (𝑋𝑘) ∈ ℂ)
5323, 52sylan 589 . . . 4 ((𝜑𝑘 ∈ ℕ0) → (𝑋𝑘) ∈ ℂ)
5451, 53mulcld 11204 . . 3 ((𝜑𝑘 ∈ ℕ0) → (((𝑘 + 1) · (𝐴‘(𝑘 + 1))) · (𝑋𝑘)) ∈ ℂ)
5549, 54eqeltrd 2864 . 2 ((𝜑𝑘 ∈ ℕ0) → (𝐻𝑘) ∈ ℂ)
56 dvradcnv.r . . . . . . . 8 𝑅 = sup({𝑟 ∈ ℝ ∣ seq0( + , (𝐺𝑟)) ∈ dom ⇝ }, ℝ*, < )
57 dvradcnv.l . . . . . . . 8 (𝜑 → (abs‘𝑋) < 𝑅)
58 id 22 . . . . . . . . . 10 (𝑖 = 𝑘𝑖 = 𝑘)
59 2fveq3 6874 . . . . . . . . . 10 (𝑖 = 𝑘 → (abs‘((𝐺𝑋)‘𝑖)) = (abs‘((𝐺𝑋)‘𝑘)))
6058, 59oveq12d 7416 . . . . . . . . 9 (𝑖 = 𝑘 → (𝑖 · (abs‘((𝐺𝑋)‘𝑖))) = (𝑘 · (abs‘((𝐺𝑋)‘𝑘))))
6160cbvmptv 5206 . . . . . . . 8 (𝑖 ∈ ℕ0 ↦ (𝑖 · (abs‘((𝐺𝑋)‘𝑖)))) = (𝑘 ∈ ℕ0 ↦ (𝑘 · (abs‘((𝐺𝑋)‘𝑘))))
6224, 32, 56, 23, 57, 61radcnvlt1 26483 . . . . . . 7 (𝜑 → (seq0( + , (𝑖 ∈ ℕ0 ↦ (𝑖 · (abs‘((𝐺𝑋)‘𝑖))))) ∈ dom ⇝ ∧ seq0( + , (abs ∘ (𝐺𝑋))) ∈ dom ⇝ ))
6362simpld 498 . . . . . 6 (𝜑 → seq0( + , (𝑖 ∈ ℕ0 ↦ (𝑖 · (abs‘((𝐺𝑋)‘𝑖))))) ∈ dom ⇝ )
64 climdm 15583 . . . . . 6 (seq0( + , (𝑖 ∈ ℕ0 ↦ (𝑖 · (abs‘((𝐺𝑋)‘𝑖))))) ∈ dom ⇝ ↔ seq0( + , (𝑖 ∈ ℕ0 ↦ (𝑖 · (abs‘((𝐺𝑋)‘𝑖))))) ⇝ ( ⇝ ‘seq0( + , (𝑖 ∈ ℕ0 ↦ (𝑖 · (abs‘((𝐺𝑋)‘𝑖)))))))
6563, 64sylib 220 . . . . 5 (𝜑 → seq0( + , (𝑖 ∈ ℕ0 ↦ (𝑖 · (abs‘((𝐺𝑋)‘𝑖))))) ⇝ ( ⇝ ‘seq0( + , (𝑖 ∈ ℕ0 ↦ (𝑖 · (abs‘((𝐺𝑋)‘𝑖)))))))
66 0z 12581 . . . . . 6 0 ∈ ℤ
67 neg1z 12609 . . . . . 6 -1 ∈ ℤ
688isershft 15693 . . . . . 6 ((0 ∈ ℤ ∧ -1 ∈ ℤ) → (seq0( + , (𝑖 ∈ ℕ0 ↦ (𝑖 · (abs‘((𝐺𝑋)‘𝑖))))) ⇝ ( ⇝ ‘seq0( + , (𝑖 ∈ ℕ0 ↦ (𝑖 · (abs‘((𝐺𝑋)‘𝑖)))))) ↔ seq(0 + -1)( + , ((𝑖 ∈ ℕ0 ↦ (𝑖 · (abs‘((𝐺𝑋)‘𝑖)))) shift -1)) ⇝ ( ⇝ ‘seq0( + , (𝑖 ∈ ℕ0 ↦ (𝑖 · (abs‘((𝐺𝑋)‘𝑖))))))))
6966, 67, 68mp2an 702 . . . . 5 (seq0( + , (𝑖 ∈ ℕ0 ↦ (𝑖 · (abs‘((𝐺𝑋)‘𝑖))))) ⇝ ( ⇝ ‘seq0( + , (𝑖 ∈ ℕ0 ↦ (𝑖 · (abs‘((𝐺𝑋)‘𝑖)))))) ↔ seq(0 + -1)( + , ((𝑖 ∈ ℕ0 ↦ (𝑖 · (abs‘((𝐺𝑋)‘𝑖)))) shift -1)) ⇝ ( ⇝ ‘seq0( + , (𝑖 ∈ ℕ0 ↦ (𝑖 · (abs‘((𝐺𝑋)‘𝑖)))))))
7065, 69sylib 220 . . . 4 (𝜑 → seq(0 + -1)( + , ((𝑖 ∈ ℕ0 ↦ (𝑖 · (abs‘((𝐺𝑋)‘𝑖)))) shift -1)) ⇝ ( ⇝ ‘seq0( + , (𝑖 ∈ ℕ0 ↦ (𝑖 · (abs‘((𝐺𝑋)‘𝑖)))))))
71 seqex 14018 . . . . 5 seq(0 + -1)( + , ((𝑖 ∈ ℕ0 ↦ (𝑖 · (abs‘((𝐺𝑋)‘𝑖)))) shift -1)) ∈ V
72 fvex 6882 . . . . 5 ( ⇝ ‘seq0( + , (𝑖 ∈ ℕ0 ↦ (𝑖 · (abs‘((𝐺𝑋)‘𝑖)))))) ∈ V
7371, 72breldm 5886 . . . 4 (seq(0 + -1)( + , ((𝑖 ∈ ℕ0 ↦ (𝑖 · (abs‘((𝐺𝑋)‘𝑖)))) shift -1)) ⇝ ( ⇝ ‘seq0( + , (𝑖 ∈ ℕ0 ↦ (𝑖 · (abs‘((𝐺𝑋)‘𝑖)))))) → seq(0 + -1)( + , ((𝑖 ∈ ℕ0 ↦ (𝑖 · (abs‘((𝐺𝑋)‘𝑖)))) shift -1)) ∈ dom ⇝ )
7470, 73syl 17 . . 3 (𝜑 → seq(0 + -1)( + , ((𝑖 ∈ ℕ0 ↦ (𝑖 · (abs‘((𝐺𝑋)‘𝑖)))) shift -1)) ∈ dom ⇝ )
75 eqid 2764 . . . 4 (ℤ‘(0 + -1)) = (ℤ‘(0 + -1))
76 neg1cn 12182 . . . . . . . 8 -1 ∈ ℂ
7776addlidi 11373 . . . . . . 7 (0 + -1) = -1
78 0le1 11712 . . . . . . . 8 0 ≤ 1
79 1re 11183 . . . . . . . . 9 1 ∈ ℝ
80 le0neg2 11698 . . . . . . . . 9 (1 ∈ ℝ → (0 ≤ 1 ↔ -1 ≤ 0))
8179, 80ax-mp 5 . . . . . . . 8 (0 ≤ 1 ↔ -1 ≤ 0)
8278, 81mpbi 232 . . . . . . 7 -1 ≤ 0
8377, 82eqbrtri 5123 . . . . . 6 (0 + -1) ≤ 0
8477, 67eqeltri 2860 . . . . . . 7 (0 + -1) ∈ ℤ
8584eluz1i 12849 . . . . . 6 (0 ∈ (ℤ‘(0 + -1)) ↔ (0 ∈ ℤ ∧ (0 + -1) ≤ 0))
8666, 83, 85mpbir2an 721 . . . . 5 0 ∈ (ℤ‘(0 + -1))
8786a1i 11 . . . 4 (𝜑 → 0 ∈ (ℤ‘(0 + -1)))
88 eluzelcn 12853 . . . . . . 7 (𝑘 ∈ (ℤ‘(0 + -1)) → 𝑘 ∈ ℂ)
8988adantl 485 . . . . . 6 ((𝜑𝑘 ∈ (ℤ‘(0 + -1))) → 𝑘 ∈ ℂ)
904, 89, 9sylancr 596 . . . . 5 ((𝜑𝑘 ∈ (ℤ‘(0 + -1))) → (((𝑖 ∈ ℕ0 ↦ (𝑖 · (abs‘((𝐺𝑋)‘𝑖)))) shift -1)‘𝑘) = ((𝑖 ∈ ℕ0 ↦ (𝑖 · (abs‘((𝐺𝑋)‘𝑖))))‘(1 + 𝑘)))
91 nn0re 12492 . . . . . . . . . 10 (𝑖 ∈ ℕ0𝑖 ∈ ℝ)
9291adantl 485 . . . . . . . . 9 ((𝜑𝑖 ∈ ℕ0) → 𝑖 ∈ ℝ)
9324, 32, 23psergf 26477 . . . . . . . . . . 11 (𝜑 → (𝐺𝑋):ℕ0⟶ℂ)
9493ffvelcdmda 7067 . . . . . . . . . 10 ((𝜑𝑖 ∈ ℕ0) → ((𝐺𝑋)‘𝑖) ∈ ℂ)
9594abscld 15468 . . . . . . . . 9 ((𝜑𝑖 ∈ ℕ0) → (abs‘((𝐺𝑋)‘𝑖)) ∈ ℝ)
9692, 95remulcld 11214 . . . . . . . 8 ((𝜑𝑖 ∈ ℕ0) → (𝑖 · (abs‘((𝐺𝑋)‘𝑖))) ∈ ℝ)
9796recnd 11212 . . . . . . 7 ((𝜑𝑖 ∈ ℕ0) → (𝑖 · (abs‘((𝐺𝑋)‘𝑖))) ∈ ℂ)
9897fmpttd 7098 . . . . . 6 (𝜑 → (𝑖 ∈ ℕ0 ↦ (𝑖 · (abs‘((𝐺𝑋)‘𝑖)))):ℕ0⟶ℂ)
994, 88, 11sylancr 596 . . . . . . 7 (𝑘 ∈ (ℤ‘(0 + -1)) → (1 + 𝑘) = (𝑘 + 1))
100 eluzp1p1 12869 . . . . . . . 8 (𝑘 ∈ (ℤ‘(0 + -1)) → (𝑘 + 1) ∈ (ℤ‘((0 + -1) + 1)))
10177oveq1i 7408 . . . . . . . . . . 11 ((0 + -1) + 1) = (-1 + 1)
102 1pneg1e0 12337 . . . . . . . . . . . 12 (1 + -1) = 0
1034, 76, 102addcomli 11377 . . . . . . . . . . 11 (-1 + 1) = 0
104101, 103eqtri 2787 . . . . . . . . . 10 ((0 + -1) + 1) = 0
105104fveq2i 6872 . . . . . . . . 9 (ℤ‘((0 + -1) + 1)) = (ℤ‘0)
1061, 105eqtr4i 2790 . . . . . . . 8 0 = (ℤ‘((0 + -1) + 1))
107100, 106eleqtrrdi 2875 . . . . . . 7 (𝑘 ∈ (ℤ‘(0 + -1)) → (𝑘 + 1) ∈ ℕ0)
10899, 107eqeltrd 2864 . . . . . 6 (𝑘 ∈ (ℤ‘(0 + -1)) → (1 + 𝑘) ∈ ℕ0)
109 ffvelcdm 7064 . . . . . 6 (((𝑖 ∈ ℕ0 ↦ (𝑖 · (abs‘((𝐺𝑋)‘𝑖)))):ℕ0⟶ℂ ∧ (1 + 𝑘) ∈ ℕ0) → ((𝑖 ∈ ℕ0 ↦ (𝑖 · (abs‘((𝐺𝑋)‘𝑖))))‘(1 + 𝑘)) ∈ ℂ)
11098, 108, 109syl2an 605 . . . . 5 ((𝜑𝑘 ∈ (ℤ‘(0 + -1))) → ((𝑖 ∈ ℕ0 ↦ (𝑖 · (abs‘((𝐺𝑋)‘𝑖))))‘(1 + 𝑘)) ∈ ℂ)
11190, 110eqeltrd 2864 . . . 4 ((𝜑𝑘 ∈ (ℤ‘(0 + -1))) → (((𝑖 ∈ ℕ0 ↦ (𝑖 · (abs‘((𝐺𝑋)‘𝑖)))) shift -1)‘𝑘) ∈ ℂ)
11275, 87, 111iserex 15686 . . 3 (𝜑 → (seq(0 + -1)( + , ((𝑖 ∈ ℕ0 ↦ (𝑖 · (abs‘((𝐺𝑋)‘𝑖)))) shift -1)) ∈ dom ⇝ ↔ seq0( + , ((𝑖 ∈ ℕ0 ↦ (𝑖 · (abs‘((𝐺𝑋)‘𝑖)))) shift -1)) ∈ dom ⇝ ))
11374, 112mpbid 234 . 2 (𝜑 → seq0( + , ((𝑖 ∈ ℕ0 ↦ (𝑖 · (abs‘((𝐺𝑋)‘𝑖)))) shift -1)) ∈ dom ⇝ )
114 1red 11184 . . 3 ((𝜑𝑋 = 0) → 1 ∈ ℝ)
115 neqne 2967 . . . . 5 𝑋 = 0 → 𝑋 ≠ 0)
116 absrpcl 15317 . . . . 5 ((𝑋 ∈ ℂ ∧ 𝑋 ≠ 0) → (abs‘𝑋) ∈ ℝ+)
11723, 115, 116syl2an 605 . . . 4 ((𝜑 ∧ ¬ 𝑋 = 0) → (abs‘𝑋) ∈ ℝ+)
118117rprecred 13050 . . 3 ((𝜑 ∧ ¬ 𝑋 = 0) → (1 / (abs‘𝑋)) ∈ ℝ)
119114, 118ifclda 4518 . 2 (𝜑 → if(𝑋 = 0, 1, (1 / (abs‘𝑋))) ∈ ℝ)
120 oveq1 7405 . . . . 5 (1 = if(𝑋 = 0, 1, (1 / (abs‘𝑋))) → (1 · ((𝑘 + 1) · (abs‘((𝐴‘(𝑘 + 1)) · (𝑋↑(𝑘 + 1)))))) = (if(𝑋 = 0, 1, (1 / (abs‘𝑋))) · ((𝑘 + 1) · (abs‘((𝐴‘(𝑘 + 1)) · (𝑋↑(𝑘 + 1)))))))
121120breq2d 5114 . . . 4 (1 = if(𝑋 = 0, 1, (1 / (abs‘𝑋))) → ((abs‘(((𝑘 + 1) · (𝐴‘(𝑘 + 1))) · (𝑋𝑘))) ≤ (1 · ((𝑘 + 1) · (abs‘((𝐴‘(𝑘 + 1)) · (𝑋↑(𝑘 + 1)))))) ↔ (abs‘(((𝑘 + 1) · (𝐴‘(𝑘 + 1))) · (𝑋𝑘))) ≤ (if(𝑋 = 0, 1, (1 / (abs‘𝑋))) · ((𝑘 + 1) · (abs‘((𝐴‘(𝑘 + 1)) · (𝑋↑(𝑘 + 1))))))))
122 oveq1 7405 . . . . 5 ((1 / (abs‘𝑋)) = if(𝑋 = 0, 1, (1 / (abs‘𝑋))) → ((1 / (abs‘𝑋)) · ((𝑘 + 1) · (abs‘((𝐴‘(𝑘 + 1)) · (𝑋↑(𝑘 + 1)))))) = (if(𝑋 = 0, 1, (1 / (abs‘𝑋))) · ((𝑘 + 1) · (abs‘((𝐴‘(𝑘 + 1)) · (𝑋↑(𝑘 + 1)))))))
123122breq2d 5114 . . . 4 ((1 / (abs‘𝑋)) = if(𝑋 = 0, 1, (1 / (abs‘𝑋))) → ((abs‘(((𝑘 + 1) · (𝐴‘(𝑘 + 1))) · (𝑋𝑘))) ≤ ((1 / (abs‘𝑋)) · ((𝑘 + 1) · (abs‘((𝐴‘(𝑘 + 1)) · (𝑋↑(𝑘 + 1)))))) ↔ (abs‘(((𝑘 + 1) · (𝐴‘(𝑘 + 1))) · (𝑋𝑘))) ≤ (if(𝑋 = 0, 1, (1 / (abs‘𝑋))) · ((𝑘 + 1) · (abs‘((𝐴‘(𝑘 + 1)) · (𝑋↑(𝑘 + 1))))))))
124 elnnuz 12881 . . . . . . . 8 (𝑘 ∈ ℕ ↔ 𝑘 ∈ (ℤ‘1))
125 nnnn0 12490 . . . . . . . 8 (𝑘 ∈ ℕ → 𝑘 ∈ ℕ0)
126124, 125sylbir 237 . . . . . . 7 (𝑘 ∈ (ℤ‘1) → 𝑘 ∈ ℕ0)
12715nn0ge0d 12547 . . . . . . . 8 ((𝜑𝑘 ∈ ℕ0) → 0 ≤ (𝑘 + 1))
12837absge0d 15476 . . . . . . . 8 ((𝜑𝑘 ∈ ℕ0) → 0 ≤ (abs‘((𝐴‘(𝑘 + 1)) · (𝑋↑(𝑘 + 1)))))
12931, 38, 127, 128mulge0d 11766 . . . . . . 7 ((𝜑𝑘 ∈ ℕ0) → 0 ≤ ((𝑘 + 1) · (abs‘((𝐴‘(𝑘 + 1)) · (𝑋↑(𝑘 + 1))))))
130126, 129sylan2 602 . . . . . 6 ((𝜑𝑘 ∈ (ℤ‘1)) → 0 ≤ ((𝑘 + 1) · (abs‘((𝐴‘(𝑘 + 1)) · (𝑋↑(𝑘 + 1))))))
131130adantr 484 . . . . 5 (((𝜑𝑘 ∈ (ℤ‘1)) ∧ 𝑋 = 0) → 0 ≤ ((𝑘 + 1) · (abs‘((𝐴‘(𝑘 + 1)) · (𝑋↑(𝑘 + 1))))))
132 oveq1 7405 . . . . . . . . 9 (𝑋 = 0 → (𝑋𝑘) = (0↑𝑘))
133124bilanri 510 . . . . . . . . . 10 ((𝜑𝑘 ∈ (ℤ‘1)) → 𝑘 ∈ ℕ)
1341330expd 14154 . . . . . . . . 9 ((𝜑𝑘 ∈ (ℤ‘1)) → (0↑𝑘) = 0)
135132, 134sylan9eqr 2821 . . . . . . . 8 (((𝜑𝑘 ∈ (ℤ‘1)) ∧ 𝑋 = 0) → (𝑋𝑘) = 0)
136135oveq2d 7414 . . . . . . 7 (((𝜑𝑘 ∈ (ℤ‘1)) ∧ 𝑋 = 0) → (((𝑘 + 1) · (𝐴‘(𝑘 + 1))) · (𝑋𝑘)) = (((𝑘 + 1) · (𝐴‘(𝑘 + 1))) · 0))
13751mul01d 11384 . . . . . . . . 9 ((𝜑𝑘 ∈ ℕ0) → (((𝑘 + 1) · (𝐴‘(𝑘 + 1))) · 0) = 0)
138126, 137sylan2 602 . . . . . . . 8 ((𝜑𝑘 ∈ (ℤ‘1)) → (((𝑘 + 1) · (𝐴‘(𝑘 + 1))) · 0) = 0)
139138adantr 484 . . . . . . 7 (((𝜑𝑘 ∈ (ℤ‘1)) ∧ 𝑋 = 0) → (((𝑘 + 1) · (𝐴‘(𝑘 + 1))) · 0) = 0)
140136, 139eqtrd 2799 . . . . . 6 (((𝜑𝑘 ∈ (ℤ‘1)) ∧ 𝑋 = 0) → (((𝑘 + 1) · (𝐴‘(𝑘 + 1))) · (𝑋𝑘)) = 0)
141140abs00bd 15320 . . . . 5 (((𝜑𝑘 ∈ (ℤ‘1)) ∧ 𝑋 = 0) → (abs‘(((𝑘 + 1) · (𝐴‘(𝑘 + 1))) · (𝑋𝑘))) = 0)
14239recnd 11212 . . . . . . . 8 ((𝜑𝑘 ∈ ℕ0) → ((𝑘 + 1) · (abs‘((𝐴‘(𝑘 + 1)) · (𝑋↑(𝑘 + 1))))) ∈ ℂ)
143142mullidd 11202 . . . . . . 7 ((𝜑𝑘 ∈ ℕ0) → (1 · ((𝑘 + 1) · (abs‘((𝐴‘(𝑘 + 1)) · (𝑋↑(𝑘 + 1)))))) = ((𝑘 + 1) · (abs‘((𝐴‘(𝑘 + 1)) · (𝑋↑(𝑘 + 1))))))
144126, 143sylan2 602 . . . . . 6 ((𝜑𝑘 ∈ (ℤ‘1)) → (1 · ((𝑘 + 1) · (abs‘((𝐴‘(𝑘 + 1)) · (𝑋↑(𝑘 + 1)))))) = ((𝑘 + 1) · (abs‘((𝐴‘(𝑘 + 1)) · (𝑋↑(𝑘 + 1))))))
145144adantr 484 . . . . 5 (((𝜑𝑘 ∈ (ℤ‘1)) ∧ 𝑋 = 0) → (1 · ((𝑘 + 1) · (abs‘((𝐴‘(𝑘 + 1)) · (𝑋↑(𝑘 + 1)))))) = ((𝑘 + 1) · (abs‘((𝐴‘(𝑘 + 1)) · (𝑋↑(𝑘 + 1))))))
146131, 141, 1453brtr4d 5134 . . . 4 (((𝜑𝑘 ∈ (ℤ‘1)) ∧ 𝑋 = 0) → (abs‘(((𝑘 + 1) · (𝐴‘(𝑘 + 1))) · (𝑋𝑘))) ≤ (1 · ((𝑘 + 1) · (abs‘((𝐴‘(𝑘 + 1)) · (𝑋↑(𝑘 + 1)))))))
147 df-ne 2960 . . . . 5 (𝑋 ≠ 0 ↔ ¬ 𝑋 = 0)
14854abscld 15468 . . . . . . . . 9 ((𝜑𝑘 ∈ ℕ0) → (abs‘(((𝑘 + 1) · (𝐴‘(𝑘 + 1))) · (𝑋𝑘))) ∈ ℝ)
14950, 34, 53mulassd 11207 . . . . . . . . . . 11 ((𝜑𝑘 ∈ ℕ0) → (((𝑘 + 1) · (𝐴‘(𝑘 + 1))) · (𝑋𝑘)) = ((𝑘 + 1) · ((𝐴‘(𝑘 + 1)) · (𝑋𝑘))))
150149fveq2d 6873 . . . . . . . . . 10 ((𝜑𝑘 ∈ ℕ0) → (abs‘(((𝑘 + 1) · (𝐴‘(𝑘 + 1))) · (𝑋𝑘))) = (abs‘((𝑘 + 1) · ((𝐴‘(𝑘 + 1)) · (𝑋𝑘)))))
15134, 53mulcld 11204 . . . . . . . . . . 11 ((𝜑𝑘 ∈ ℕ0) → ((𝐴‘(𝑘 + 1)) · (𝑋𝑘)) ∈ ℂ)
15250, 151absmuld 15486 . . . . . . . . . 10 ((𝜑𝑘 ∈ ℕ0) → (abs‘((𝑘 + 1) · ((𝐴‘(𝑘 + 1)) · (𝑋𝑘)))) = ((abs‘(𝑘 + 1)) · (abs‘((𝐴‘(𝑘 + 1)) · (𝑋𝑘)))))
15331, 127absidd 15452 . . . . . . . . . . 11 ((𝜑𝑘 ∈ ℕ0) → (abs‘(𝑘 + 1)) = (𝑘 + 1))
154153oveq1d 7413 . . . . . . . . . 10 ((𝜑𝑘 ∈ ℕ0) → ((abs‘(𝑘 + 1)) · (abs‘((𝐴‘(𝑘 + 1)) · (𝑋𝑘)))) = ((𝑘 + 1) · (abs‘((𝐴‘(𝑘 + 1)) · (𝑋𝑘)))))
155150, 152, 1543eqtrd 2803 . . . . . . . . 9 ((𝜑𝑘 ∈ ℕ0) → (abs‘(((𝑘 + 1) · (𝐴‘(𝑘 + 1))) · (𝑋𝑘))) = ((𝑘 + 1) · (abs‘((𝐴‘(𝑘 + 1)) · (𝑋𝑘)))))
156148, 155eqled 11288 . . . . . . . 8 ((𝜑𝑘 ∈ ℕ0) → (abs‘(((𝑘 + 1) · (𝐴‘(𝑘 + 1))) · (𝑋𝑘))) ≤ ((𝑘 + 1) · (abs‘((𝐴‘(𝑘 + 1)) · (𝑋𝑘)))))
157156adantr 484 . . . . . . 7 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑋 ≠ 0) → (abs‘(((𝑘 + 1) · (𝐴‘(𝑘 + 1))) · (𝑋𝑘))) ≤ ((𝑘 + 1) · (abs‘((𝐴‘(𝑘 + 1)) · (𝑋𝑘)))))
15823adantr 484 . . . . . . . . . . 11 ((𝜑𝑘 ∈ ℕ0) → 𝑋 ∈ ℂ)
159116rpreccld 13049 . . . . . . . . . . 11 ((𝑋 ∈ ℂ ∧ 𝑋 ≠ 0) → (1 / (abs‘𝑋)) ∈ ℝ+)
160158, 159sylan 589 . . . . . . . . . 10 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑋 ≠ 0) → (1 / (abs‘𝑋)) ∈ ℝ+)
161160rpcnd 13041 . . . . . . . . 9 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑋 ≠ 0) → (1 / (abs‘𝑋)) ∈ ℂ)
16250adantr 484 . . . . . . . . 9 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑋 ≠ 0) → (𝑘 + 1) ∈ ℂ)
16338adantr 484 . . . . . . . . . 10 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑋 ≠ 0) → (abs‘((𝐴‘(𝑘 + 1)) · (𝑋↑(𝑘 + 1)))) ∈ ℝ)
164163recnd 11212 . . . . . . . . 9 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑋 ≠ 0) → (abs‘((𝐴‘(𝑘 + 1)) · (𝑋↑(𝑘 + 1)))) ∈ ℂ)
165161, 162, 164mul12d 11394 . . . . . . . 8 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑋 ≠ 0) → ((1 / (abs‘𝑋)) · ((𝑘 + 1) · (abs‘((𝐴‘(𝑘 + 1)) · (𝑋↑(𝑘 + 1)))))) = ((𝑘 + 1) · ((1 / (abs‘𝑋)) · (abs‘((𝐴‘(𝑘 + 1)) · (𝑋↑(𝑘 + 1)))))))
16637adantr 484 . . . . . . . . . . 11 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑋 ≠ 0) → ((𝐴‘(𝑘 + 1)) · (𝑋↑(𝑘 + 1))) ∈ ℂ)
16723ad2antrr 736 . . . . . . . . . . 11 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑋 ≠ 0) → 𝑋 ∈ ℂ)
168 simpr 488 . . . . . . . . . . 11 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑋 ≠ 0) → 𝑋 ≠ 0)
169166, 167, 168absdivd 15487 . . . . . . . . . 10 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑋 ≠ 0) → (abs‘(((𝐴‘(𝑘 + 1)) · (𝑋↑(𝑘 + 1))) / 𝑋)) = ((abs‘((𝐴‘(𝑘 + 1)) · (𝑋↑(𝑘 + 1)))) / (abs‘𝑋)))
17034adantr 484 . . . . . . . . . . . . 13 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑋 ≠ 0) → (𝐴‘(𝑘 + 1)) ∈ ℂ)
17136adantr 484 . . . . . . . . . . . . 13 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑋 ≠ 0) → (𝑋↑(𝑘 + 1)) ∈ ℂ)
172170, 171, 167, 168divassd 12004 . . . . . . . . . . . 12 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑋 ≠ 0) → (((𝐴‘(𝑘 + 1)) · (𝑋↑(𝑘 + 1))) / 𝑋) = ((𝐴‘(𝑘 + 1)) · ((𝑋↑(𝑘 + 1)) / 𝑋)))
1736adantr 484 . . . . . . . . . . . . . . . 16 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑋 ≠ 0) → 𝑘 ∈ ℂ)
174 pncan 11438 . . . . . . . . . . . . . . . 16 ((𝑘 ∈ ℂ ∧ 1 ∈ ℂ) → ((𝑘 + 1) − 1) = 𝑘)
175173, 4, 174sylancl 595 . . . . . . . . . . . . . . 15 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑋 ≠ 0) → ((𝑘 + 1) − 1) = 𝑘)
176175oveq2d 7414 . . . . . . . . . . . . . 14 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑋 ≠ 0) → (𝑋↑((𝑘 + 1) − 1)) = (𝑋𝑘))
17715nn0zd 12595 . . . . . . . . . . . . . . . 16 ((𝜑𝑘 ∈ ℕ0) → (𝑘 + 1) ∈ ℤ)
178177adantr 484 . . . . . . . . . . . . . . 15 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑋 ≠ 0) → (𝑘 + 1) ∈ ℤ)
179167, 168, 178expm1d 14171 . . . . . . . . . . . . . 14 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑋 ≠ 0) → (𝑋↑((𝑘 + 1) − 1)) = ((𝑋↑(𝑘 + 1)) / 𝑋))
180176, 179eqtr3d 2801 . . . . . . . . . . . . 13 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑋 ≠ 0) → (𝑋𝑘) = ((𝑋↑(𝑘 + 1)) / 𝑋))
181180oveq2d 7414 . . . . . . . . . . . 12 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑋 ≠ 0) → ((𝐴‘(𝑘 + 1)) · (𝑋𝑘)) = ((𝐴‘(𝑘 + 1)) · ((𝑋↑(𝑘 + 1)) / 𝑋)))
182172, 181eqtr4d 2802 . . . . . . . . . . 11 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑋 ≠ 0) → (((𝐴‘(𝑘 + 1)) · (𝑋↑(𝑘 + 1))) / 𝑋) = ((𝐴‘(𝑘 + 1)) · (𝑋𝑘)))
183182fveq2d 6873 . . . . . . . . . 10 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑋 ≠ 0) → (abs‘(((𝐴‘(𝑘 + 1)) · (𝑋↑(𝑘 + 1))) / 𝑋)) = (abs‘((𝐴‘(𝑘 + 1)) · (𝑋𝑘))))
18423abscld 15468 . . . . . . . . . . . . 13 (𝜑 → (abs‘𝑋) ∈ ℝ)
185184ad2antrr 736 . . . . . . . . . . . 12 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑋 ≠ 0) → (abs‘𝑋) ∈ ℝ)
186185recnd 11212 . . . . . . . . . . 11 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑋 ≠ 0) → (abs‘𝑋) ∈ ℂ)
187158, 116sylan 589 . . . . . . . . . . . 12 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑋 ≠ 0) → (abs‘𝑋) ∈ ℝ+)
188187rpne0d 13044 . . . . . . . . . . 11 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑋 ≠ 0) → (abs‘𝑋) ≠ 0)
189164, 186, 188divrec2d 11973 . . . . . . . . . 10 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑋 ≠ 0) → ((abs‘((𝐴‘(𝑘 + 1)) · (𝑋↑(𝑘 + 1)))) / (abs‘𝑋)) = ((1 / (abs‘𝑋)) · (abs‘((𝐴‘(𝑘 + 1)) · (𝑋↑(𝑘 + 1))))))
190169, 183, 1893eqtr3rd 2808 . . . . . . . . 9 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑋 ≠ 0) → ((1 / (abs‘𝑋)) · (abs‘((𝐴‘(𝑘 + 1)) · (𝑋↑(𝑘 + 1))))) = (abs‘((𝐴‘(𝑘 + 1)) · (𝑋𝑘))))
191190oveq2d 7414 . . . . . . . 8 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑋 ≠ 0) → ((𝑘 + 1) · ((1 / (abs‘𝑋)) · (abs‘((𝐴‘(𝑘 + 1)) · (𝑋↑(𝑘 + 1)))))) = ((𝑘 + 1) · (abs‘((𝐴‘(𝑘 + 1)) · (𝑋𝑘)))))
192165, 191eqtrd 2799 . . . . . . 7 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑋 ≠ 0) → ((1 / (abs‘𝑋)) · ((𝑘 + 1) · (abs‘((𝐴‘(𝑘 + 1)) · (𝑋↑(𝑘 + 1)))))) = ((𝑘 + 1) · (abs‘((𝐴‘(𝑘 + 1)) · (𝑋𝑘)))))
193157, 192breqtrrd 5130 . . . . . 6 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑋 ≠ 0) → (abs‘(((𝑘 + 1) · (𝐴‘(𝑘 + 1))) · (𝑋𝑘))) ≤ ((1 / (abs‘𝑋)) · ((𝑘 + 1) · (abs‘((𝐴‘(𝑘 + 1)) · (𝑋↑(𝑘 + 1)))))))
194126, 193sylanl2 691 . . . . 5 (((𝜑𝑘 ∈ (ℤ‘1)) ∧ 𝑋 ≠ 0) → (abs‘(((𝑘 + 1) · (𝐴‘(𝑘 + 1))) · (𝑋𝑘))) ≤ ((1 / (abs‘𝑋)) · ((𝑘 + 1) · (abs‘((𝐴‘(𝑘 + 1)) · (𝑋↑(𝑘 + 1)))))))
195147, 194sylan2br 604 . . . 4 (((𝜑𝑘 ∈ (ℤ‘1)) ∧ ¬ 𝑋 = 0) → (abs‘(((𝑘 + 1) · (𝐴‘(𝑘 + 1))) · (𝑋𝑘))) ≤ ((1 / (abs‘𝑋)) · ((𝑘 + 1) · (abs‘((𝐴‘(𝑘 + 1)) · (𝑋↑(𝑘 + 1)))))))
196121, 123, 146, 195ifbothda 4521 . . 3 ((𝜑𝑘 ∈ (ℤ‘1)) → (abs‘(((𝑘 + 1) · (𝐴‘(𝑘 + 1))) · (𝑋𝑘))) ≤ (if(𝑋 = 0, 1, (1 / (abs‘𝑋))) · ((𝑘 + 1) · (abs‘((𝐴‘(𝑘 + 1)) · (𝑋↑(𝑘 + 1)))))))
19749fveq2d 6873 . . . 4 ((𝜑𝑘 ∈ ℕ0) → (abs‘(𝐻𝑘)) = (abs‘(((𝑘 + 1) · (𝐴‘(𝑘 + 1))) · (𝑋𝑘))))
198126, 197sylan2 602 . . 3 ((𝜑𝑘 ∈ (ℤ‘1)) → (abs‘(𝐻𝑘)) = (abs‘(((𝑘 + 1) · (𝐴‘(𝑘 + 1))) · (𝑋𝑘))))
19930oveq2d 7414 . . . 4 ((𝜑𝑘 ∈ ℕ0) → (if(𝑋 = 0, 1, (1 / (abs‘𝑋))) · (((𝑖 ∈ ℕ0 ↦ (𝑖 · (abs‘((𝐺𝑋)‘𝑖)))) shift -1)‘𝑘)) = (if(𝑋 = 0, 1, (1 / (abs‘𝑋))) · ((𝑘 + 1) · (abs‘((𝐴‘(𝑘 + 1)) · (𝑋↑(𝑘 + 1)))))))
200126, 199sylan2 602 . . 3 ((𝜑𝑘 ∈ (ℤ‘1)) → (if(𝑋 = 0, 1, (1 / (abs‘𝑋))) · (((𝑖 ∈ ℕ0 ↦ (𝑖 · (abs‘((𝐺𝑋)‘𝑖)))) shift -1)‘𝑘)) = (if(𝑋 = 0, 1, (1 / (abs‘𝑋))) · ((𝑘 + 1) · (abs‘((𝐴‘(𝑘 + 1)) · (𝑋↑(𝑘 + 1)))))))
201196, 198, 2003brtr4d 5134 . 2 ((𝜑𝑘 ∈ (ℤ‘1)) → (abs‘(𝐻𝑘)) ≤ (if(𝑋 = 0, 1, (1 / (abs‘𝑋))) · (((𝑖 ∈ ℕ0 ↦ (𝑖 · (abs‘((𝐺𝑋)‘𝑖)))) shift -1)‘𝑘)))
2021, 3, 40, 55, 113, 119, 201cvgcmpce 15848 1 (𝜑 → seq0( + , 𝐻) ∈ dom ⇝ )
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 208  wa 399   = wceq 1562  wcel 2144  wne 2959  {crab 3416  ifcif 4482   class class class wbr 5102  cmpt 5183  dom cdm 5649  ccom 5653  wf 6519  cfv 6523  (class class class)co 7398  supcsup 9388  cc 11073  cr 11074  0cc0 11075  1c1 11076   + caddc 11078   · cmul 11080  *cxr 11217   < clt 11218  cle 11219  cmin 11416  -cneg 11417   / cdiv 11846  cn 12212  0cn0 12483  cz 12570  cuz 12841  +crp 12995  seqcseq 14016  cexp 14076   shift cshi 15081  abscabs 15263  cli 15513
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1817  ax-4 1831  ax-5 1932  ax-6 1989  ax-7 2030  ax-8 2146  ax-9 2154  ax-10 2177  ax-11 2193  ax-12 2214  ax-ext 2736  ax-rep 5229  ax-sep 5248  ax-nul 5258  ax-pow 5324  ax-pr 5392  ax-un 7720  ax-inf2 9598  ax-cnex 11131  ax-resscn 11132  ax-1cn 11133  ax-icn 11134  ax-addcl 11135  ax-addrcl 11136  ax-mulcl 11137  ax-mulrcl 11138  ax-mulcom 11139  ax-addass 11140  ax-mulass 11141  ax-distr 11142  ax-i2m1 11143  ax-1ne0 11144  ax-1rid 11145  ax-rnegex 11146  ax-rrecex 11147  ax-cnre 11148  ax-pre-lttri 11149  ax-pre-lttrn 11150  ax-pre-ltadd 11151  ax-pre-mulgt0 11152  ax-pre-sup 11153
This theorem depends on definitions:  df-bi 209  df-an 400  df-or 859  df-3or 1100  df-3an 1101  df-tru 1565  df-fal 1575  df-ex 1802  df-nf 1806  df-sb 2093  df-mo 2568  df-eu 2598  df-clab 2743  df-cleq 2756  df-clel 2839  df-nfc 2913  df-ne 2960  df-nel 3064  df-ral 3079  df-rex 3089  df-rmo 3369  df-reu 3370  df-rab 3417  df-v 3458  df-sbc 3747  df-csb 3855  df-dif 3909  df-un 3911  df-in 3913  df-ss 3923  df-pss 3926  df-nul 4288  df-if 4483  df-pw 4559  df-sn 4585  df-pr 4587  df-op 4591  df-uni 4868  df-int 4908  df-iun 4953  df-br 5103  df-opab 5165  df-mpt 5184  df-tr 5210  df-id 5544  df-eprel 5549  df-po 5557  df-so 5558  df-fr 5602  df-se 5603  df-we 5604  df-xp 5655  df-rel 5656  df-cnv 5657  df-co 5658  df-dm 5659  df-rn 5660  df-res 5661  df-ima 5662  df-pred 6290  df-ord 6351  df-on 6352  df-lim 6353  df-suc 6354  df-iota 6479  df-fun 6525  df-fn 6526  df-f 6527  df-f1 6528  df-fo 6529  df-f1o 6530  df-fv 6531  df-isom 6532  df-riota 7355  df-ov 7401  df-oprab 7402  df-mpo 7403  df-om 7849  df-1st 7972  df-2nd 7973  df-frecs 8264  df-wrecs 8295  df-recs 8344  df-rdg 8383  df-1o 8439  df-er 8680  df-pm 8813  df-en 8930  df-dom 8931  df-sdom 8932  df-fin 8933  df-sup 9390  df-inf 9391  df-oi 9460  df-card 9899  df-pnf 11220  df-mnf 11221  df-xr 11222  df-ltxr 11223  df-le 11224  df-sub 11418  df-neg 11419  df-div 11847  df-nn 12213  df-2 12282  df-3 12283  df-n0 12484  df-z 12571  df-uz 12842  df-rp 12996  df-ico 13357  df-icc 13358  df-fz 13515  df-fzo 13662  df-fl 13804  df-seq 14017  df-exp 14077  df-hash 14346  df-shft 15082  df-cj 15128  df-re 15129  df-im 15130  df-sqrt 15264  df-abs 15265  df-limsup 15500  df-clim 15517  df-rlim 15518  df-sum 15716
This theorem is referenced by:  pserdvlem2  26493  dvradcnv2  44928
  Copyright terms: Public domain W3C validator