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

Theorem geomulcvg 15224
Description: The geometric series converges even if it is multiplied by 𝑘 to result in the larger series 𝑘 · 𝐴𝑘. (Contributed by Mario Carneiro, 27-Mar-2015.)
Hypothesis
Ref Expression
geomulcvg.1 𝐹 = (𝑘 ∈ ℕ0 ↦ (𝑘 · (𝐴𝑘)))
Assertion
Ref Expression
geomulcvg ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → seq0( + , 𝐹) ∈ dom ⇝ )
Distinct variable group:   𝐴,𝑘
Allowed substitution hint:   𝐹(𝑘)

Proof of Theorem geomulcvg
Dummy variables 𝑚 𝑛 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 geomulcvg.1 . . . . . . 7 𝐹 = (𝑘 ∈ ℕ0 ↦ (𝑘 · (𝐴𝑘)))
2 elnn0 11887 . . . . . . . . 9 (𝑘 ∈ ℕ0 ↔ (𝑘 ∈ ℕ ∨ 𝑘 = 0))
3 simpr 488 . . . . . . . . . . . . . 14 (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝐴 = 0) → 𝐴 = 0)
43oveq1d 7150 . . . . . . . . . . . . 13 (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝐴 = 0) → (𝐴𝑘) = (0↑𝑘))
5 0exp 13460 . . . . . . . . . . . . 13 (𝑘 ∈ ℕ → (0↑𝑘) = 0)
64, 5sylan9eq 2853 . . . . . . . . . . . 12 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝐴 = 0) ∧ 𝑘 ∈ ℕ) → (𝐴𝑘) = 0)
76oveq2d 7151 . . . . . . . . . . 11 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝐴 = 0) ∧ 𝑘 ∈ ℕ) → (𝑘 · (𝐴𝑘)) = (𝑘 · 0))
8 nncn 11633 . . . . . . . . . . . . 13 (𝑘 ∈ ℕ → 𝑘 ∈ ℂ)
98adantl 485 . . . . . . . . . . . 12 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝐴 = 0) ∧ 𝑘 ∈ ℕ) → 𝑘 ∈ ℂ)
109mul01d 10828 . . . . . . . . . . 11 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝐴 = 0) ∧ 𝑘 ∈ ℕ) → (𝑘 · 0) = 0)
117, 10eqtrd 2833 . . . . . . . . . 10 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝐴 = 0) ∧ 𝑘 ∈ ℕ) → (𝑘 · (𝐴𝑘)) = 0)
12 simpr 488 . . . . . . . . . . . 12 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝐴 = 0) ∧ 𝑘 = 0) → 𝑘 = 0)
1312oveq1d 7150 . . . . . . . . . . 11 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝐴 = 0) ∧ 𝑘 = 0) → (𝑘 · (𝐴𝑘)) = (0 · (𝐴𝑘)))
14 simplll 774 . . . . . . . . . . . . 13 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝐴 = 0) ∧ 𝑘 = 0) → 𝐴 ∈ ℂ)
15 0nn0 11900 . . . . . . . . . . . . . 14 0 ∈ ℕ0
1612, 15eqeltrdi 2898 . . . . . . . . . . . . 13 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝐴 = 0) ∧ 𝑘 = 0) → 𝑘 ∈ ℕ0)
1714, 16expcld 13506 . . . . . . . . . . . 12 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝐴 = 0) ∧ 𝑘 = 0) → (𝐴𝑘) ∈ ℂ)
1817mul02d 10827 . . . . . . . . . . 11 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝐴 = 0) ∧ 𝑘 = 0) → (0 · (𝐴𝑘)) = 0)
1913, 18eqtrd 2833 . . . . . . . . . 10 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝐴 = 0) ∧ 𝑘 = 0) → (𝑘 · (𝐴𝑘)) = 0)
2011, 19jaodan 955 . . . . . . . . 9 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝐴 = 0) ∧ (𝑘 ∈ ℕ ∨ 𝑘 = 0)) → (𝑘 · (𝐴𝑘)) = 0)
212, 20sylan2b 596 . . . . . . . 8 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝐴 = 0) ∧ 𝑘 ∈ ℕ0) → (𝑘 · (𝐴𝑘)) = 0)
2221mpteq2dva 5125 . . . . . . 7 (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝐴 = 0) → (𝑘 ∈ ℕ0 ↦ (𝑘 · (𝐴𝑘))) = (𝑘 ∈ ℕ0 ↦ 0))
231, 22syl5eq 2845 . . . . . 6 (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝐴 = 0) → 𝐹 = (𝑘 ∈ ℕ0 ↦ 0))
24 fconstmpt 5578 . . . . . . 7 (ℕ0 × {0}) = (𝑘 ∈ ℕ0 ↦ 0)
25 nn0uz 12268 . . . . . . . 8 0 = (ℤ‘0)
2625xpeq1i 5545 . . . . . . 7 (ℕ0 × {0}) = ((ℤ‘0) × {0})
2724, 26eqtr3i 2823 . . . . . 6 (𝑘 ∈ ℕ0 ↦ 0) = ((ℤ‘0) × {0})
2823, 27eqtrdi 2849 . . . . 5 (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝐴 = 0) → 𝐹 = ((ℤ‘0) × {0}))
2928seqeq3d 13372 . . . 4 (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝐴 = 0) → seq0( + , 𝐹) = seq0( + , ((ℤ‘0) × {0})))
30 0z 11980 . . . . 5 0 ∈ ℤ
31 serclim0 14926 . . . . 5 (0 ∈ ℤ → seq0( + , ((ℤ‘0) × {0})) ⇝ 0)
3230, 31ax-mp 5 . . . 4 seq0( + , ((ℤ‘0) × {0})) ⇝ 0
3329, 32eqbrtrdi 5069 . . 3 (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝐴 = 0) → seq0( + , 𝐹) ⇝ 0)
34 seqex 13366 . . . 4 seq0( + , 𝐹) ∈ V
35 c0ex 10624 . . . 4 0 ∈ V
3634, 35breldm 5741 . . 3 (seq0( + , 𝐹) ⇝ 0 → seq0( + , 𝐹) ∈ dom ⇝ )
3733, 36syl 17 . 2 (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝐴 = 0) → seq0( + , 𝐹) ∈ dom ⇝ )
38 1red 10631 . . . 4 (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝐴 ≠ 0) → 1 ∈ ℝ)
39 abscl 14630 . . . . . . . . 9 (𝐴 ∈ ℂ → (abs‘𝐴) ∈ ℝ)
4039adantr 484 . . . . . . . 8 ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → (abs‘𝐴) ∈ ℝ)
41 peano2re 10802 . . . . . . . 8 ((abs‘𝐴) ∈ ℝ → ((abs‘𝐴) + 1) ∈ ℝ)
4240, 41syl 17 . . . . . . 7 ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → ((abs‘𝐴) + 1) ∈ ℝ)
4342rehalfcld 11872 . . . . . 6 ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → (((abs‘𝐴) + 1) / 2) ∈ ℝ)
4443adantr 484 . . . . 5 (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝐴 ≠ 0) → (((abs‘𝐴) + 1) / 2) ∈ ℝ)
45 absrpcl 14640 . . . . . 6 ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0) → (abs‘𝐴) ∈ ℝ+)
4645adantlr 714 . . . . 5 (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝐴 ≠ 0) → (abs‘𝐴) ∈ ℝ+)
4744, 46rerpdivcld 12450 . . . 4 (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝐴 ≠ 0) → ((((abs‘𝐴) + 1) / 2) / (abs‘𝐴)) ∈ ℝ)
4840recnd 10658 . . . . . . . 8 ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → (abs‘𝐴) ∈ ℂ)
4948mulid2d 10648 . . . . . . 7 ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → (1 · (abs‘𝐴)) = (abs‘𝐴))
50 simpr 488 . . . . . . . 8 ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → (abs‘𝐴) < 1)
51 1re 10630 . . . . . . . . 9 1 ∈ ℝ
52 avglt1 11863 . . . . . . . . 9 (((abs‘𝐴) ∈ ℝ ∧ 1 ∈ ℝ) → ((abs‘𝐴) < 1 ↔ (abs‘𝐴) < (((abs‘𝐴) + 1) / 2)))
5340, 51, 52sylancl 589 . . . . . . . 8 ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → ((abs‘𝐴) < 1 ↔ (abs‘𝐴) < (((abs‘𝐴) + 1) / 2)))
5450, 53mpbid 235 . . . . . . 7 ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → (abs‘𝐴) < (((abs‘𝐴) + 1) / 2))
5549, 54eqbrtrd 5052 . . . . . 6 ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → (1 · (abs‘𝐴)) < (((abs‘𝐴) + 1) / 2))
5655adantr 484 . . . . 5 (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝐴 ≠ 0) → (1 · (abs‘𝐴)) < (((abs‘𝐴) + 1) / 2))
5738, 44, 46ltmuldivd 12466 . . . . 5 (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝐴 ≠ 0) → ((1 · (abs‘𝐴)) < (((abs‘𝐴) + 1) / 2) ↔ 1 < ((((abs‘𝐴) + 1) / 2) / (abs‘𝐴))))
5856, 57mpbid 235 . . . 4 (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝐴 ≠ 0) → 1 < ((((abs‘𝐴) + 1) / 2) / (abs‘𝐴)))
59 expmulnbnd 13592 . . . 4 ((1 ∈ ℝ ∧ ((((abs‘𝐴) + 1) / 2) / (abs‘𝐴)) ∈ ℝ ∧ 1 < ((((abs‘𝐴) + 1) / 2) / (abs‘𝐴))) → ∃𝑛 ∈ ℕ0𝑘 ∈ (ℤ𝑛)(1 · 𝑘) < (((((abs‘𝐴) + 1) / 2) / (abs‘𝐴))↑𝑘))
6038, 47, 58, 59syl3anc 1368 . . 3 (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝐴 ≠ 0) → ∃𝑛 ∈ ℕ0𝑘 ∈ (ℤ𝑛)(1 · 𝑘) < (((((abs‘𝐴) + 1) / 2) / (abs‘𝐴))↑𝑘))
61 eluznn0 12305 . . . . . . . 8 ((𝑛 ∈ ℕ0𝑘 ∈ (ℤ𝑛)) → 𝑘 ∈ ℕ0)
62 nn0cn 11895 . . . . . . . . . . . 12 (𝑘 ∈ ℕ0𝑘 ∈ ℂ)
6362adantl 485 . . . . . . . . . . 11 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝐴 ≠ 0) ∧ 𝑘 ∈ ℕ0) → 𝑘 ∈ ℂ)
6463mulid2d 10648 . . . . . . . . . 10 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝐴 ≠ 0) ∧ 𝑘 ∈ ℕ0) → (1 · 𝑘) = 𝑘)
6543recnd 10658 . . . . . . . . . . . 12 ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → (((abs‘𝐴) + 1) / 2) ∈ ℂ)
6665ad2antrr 725 . . . . . . . . . . 11 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝐴 ≠ 0) ∧ 𝑘 ∈ ℕ0) → (((abs‘𝐴) + 1) / 2) ∈ ℂ)
6748ad2antrr 725 . . . . . . . . . . 11 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝐴 ≠ 0) ∧ 𝑘 ∈ ℕ0) → (abs‘𝐴) ∈ ℂ)
6846adantr 484 . . . . . . . . . . . 12 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝐴 ≠ 0) ∧ 𝑘 ∈ ℕ0) → (abs‘𝐴) ∈ ℝ+)
6968rpne0d 12424 . . . . . . . . . . 11 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝐴 ≠ 0) ∧ 𝑘 ∈ ℕ0) → (abs‘𝐴) ≠ 0)
70 simpr 488 . . . . . . . . . . 11 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝐴 ≠ 0) ∧ 𝑘 ∈ ℕ0) → 𝑘 ∈ ℕ0)
7166, 67, 69, 70expdivd 13520 . . . . . . . . . 10 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝐴 ≠ 0) ∧ 𝑘 ∈ ℕ0) → (((((abs‘𝐴) + 1) / 2) / (abs‘𝐴))↑𝑘) = (((((abs‘𝐴) + 1) / 2)↑𝑘) / ((abs‘𝐴)↑𝑘)))
7264, 71breq12d 5043 . . . . . . . . 9 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝐴 ≠ 0) ∧ 𝑘 ∈ ℕ0) → ((1 · 𝑘) < (((((abs‘𝐴) + 1) / 2) / (abs‘𝐴))↑𝑘) ↔ 𝑘 < (((((abs‘𝐴) + 1) / 2)↑𝑘) / ((abs‘𝐴)↑𝑘))))
73 nn0re 11894 . . . . . . . . . . 11 (𝑘 ∈ ℕ0𝑘 ∈ ℝ)
7473adantl 485 . . . . . . . . . 10 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝐴 ≠ 0) ∧ 𝑘 ∈ ℕ0) → 𝑘 ∈ ℝ)
75 reexpcl 13442 . . . . . . . . . . 11 (((((abs‘𝐴) + 1) / 2) ∈ ℝ ∧ 𝑘 ∈ ℕ0) → ((((abs‘𝐴) + 1) / 2)↑𝑘) ∈ ℝ)
7644, 75sylan 583 . . . . . . . . . 10 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝐴 ≠ 0) ∧ 𝑘 ∈ ℕ0) → ((((abs‘𝐴) + 1) / 2)↑𝑘) ∈ ℝ)
7740adantr 484 . . . . . . . . . . 11 (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝐴 ≠ 0) → (abs‘𝐴) ∈ ℝ)
78 reexpcl 13442 . . . . . . . . . . 11 (((abs‘𝐴) ∈ ℝ ∧ 𝑘 ∈ ℕ0) → ((abs‘𝐴)↑𝑘) ∈ ℝ)
7977, 78sylan 583 . . . . . . . . . 10 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝐴 ≠ 0) ∧ 𝑘 ∈ ℕ0) → ((abs‘𝐴)↑𝑘) ∈ ℝ)
8077adantr 484 . . . . . . . . . . 11 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝐴 ≠ 0) ∧ 𝑘 ∈ ℕ0) → (abs‘𝐴) ∈ ℝ)
81 nn0z 11993 . . . . . . . . . . . 12 (𝑘 ∈ ℕ0𝑘 ∈ ℤ)
8281adantl 485 . . . . . . . . . . 11 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝐴 ≠ 0) ∧ 𝑘 ∈ ℕ0) → 𝑘 ∈ ℤ)
8368rpgt0d 12422 . . . . . . . . . . 11 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝐴 ≠ 0) ∧ 𝑘 ∈ ℕ0) → 0 < (abs‘𝐴))
84 expgt0 13458 . . . . . . . . . . 11 (((abs‘𝐴) ∈ ℝ ∧ 𝑘 ∈ ℤ ∧ 0 < (abs‘𝐴)) → 0 < ((abs‘𝐴)↑𝑘))
8580, 82, 83, 84syl3anc 1368 . . . . . . . . . 10 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝐴 ≠ 0) ∧ 𝑘 ∈ ℕ0) → 0 < ((abs‘𝐴)↑𝑘))
86 ltmuldiv 11502 . . . . . . . . . 10 ((𝑘 ∈ ℝ ∧ ((((abs‘𝐴) + 1) / 2)↑𝑘) ∈ ℝ ∧ (((abs‘𝐴)↑𝑘) ∈ ℝ ∧ 0 < ((abs‘𝐴)↑𝑘))) → ((𝑘 · ((abs‘𝐴)↑𝑘)) < ((((abs‘𝐴) + 1) / 2)↑𝑘) ↔ 𝑘 < (((((abs‘𝐴) + 1) / 2)↑𝑘) / ((abs‘𝐴)↑𝑘))))
8774, 76, 79, 85, 86syl112anc 1371 . . . . . . . . 9 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝐴 ≠ 0) ∧ 𝑘 ∈ ℕ0) → ((𝑘 · ((abs‘𝐴)↑𝑘)) < ((((abs‘𝐴) + 1) / 2)↑𝑘) ↔ 𝑘 < (((((abs‘𝐴) + 1) / 2)↑𝑘) / ((abs‘𝐴)↑𝑘))))
8872, 87bitr4d 285 . . . . . . . 8 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝐴 ≠ 0) ∧ 𝑘 ∈ ℕ0) → ((1 · 𝑘) < (((((abs‘𝐴) + 1) / 2) / (abs‘𝐴))↑𝑘) ↔ (𝑘 · ((abs‘𝐴)↑𝑘)) < ((((abs‘𝐴) + 1) / 2)↑𝑘)))
8961, 88sylan2 595 . . . . . . 7 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝐴 ≠ 0) ∧ (𝑛 ∈ ℕ0𝑘 ∈ (ℤ𝑛))) → ((1 · 𝑘) < (((((abs‘𝐴) + 1) / 2) / (abs‘𝐴))↑𝑘) ↔ (𝑘 · ((abs‘𝐴)↑𝑘)) < ((((abs‘𝐴) + 1) / 2)↑𝑘)))
9089anassrs 471 . . . . . 6 (((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝐴 ≠ 0) ∧ 𝑛 ∈ ℕ0) ∧ 𝑘 ∈ (ℤ𝑛)) → ((1 · 𝑘) < (((((abs‘𝐴) + 1) / 2) / (abs‘𝐴))↑𝑘) ↔ (𝑘 · ((abs‘𝐴)↑𝑘)) < ((((abs‘𝐴) + 1) / 2)↑𝑘)))
9190ralbidva 3161 . . . . 5 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝐴 ≠ 0) ∧ 𝑛 ∈ ℕ0) → (∀𝑘 ∈ (ℤ𝑛)(1 · 𝑘) < (((((abs‘𝐴) + 1) / 2) / (abs‘𝐴))↑𝑘) ↔ ∀𝑘 ∈ (ℤ𝑛)(𝑘 · ((abs‘𝐴)↑𝑘)) < ((((abs‘𝐴) + 1) / 2)↑𝑘)))
92 simprl 770 . . . . . . . 8 (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ (𝑛 ∈ ℕ0 ∧ ∀𝑘 ∈ (ℤ𝑛)(𝑘 · ((abs‘𝐴)↑𝑘)) < ((((abs‘𝐴) + 1) / 2)↑𝑘))) → 𝑛 ∈ ℕ0)
93 oveq2 7143 . . . . . . . . . . 11 (𝑘 = 𝑚 → ((((abs‘𝐴) + 1) / 2)↑𝑘) = ((((abs‘𝐴) + 1) / 2)↑𝑚))
94 eqid 2798 . . . . . . . . . . 11 (𝑘 ∈ ℕ0 ↦ ((((abs‘𝐴) + 1) / 2)↑𝑘)) = (𝑘 ∈ ℕ0 ↦ ((((abs‘𝐴) + 1) / 2)↑𝑘))
95 ovex 7168 . . . . . . . . . . 11 ((((abs‘𝐴) + 1) / 2)↑𝑚) ∈ V
9693, 94, 95fvmpt 6745 . . . . . . . . . 10 (𝑚 ∈ ℕ0 → ((𝑘 ∈ ℕ0 ↦ ((((abs‘𝐴) + 1) / 2)↑𝑘))‘𝑚) = ((((abs‘𝐴) + 1) / 2)↑𝑚))
9796adantl 485 . . . . . . . . 9 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ (𝑛 ∈ ℕ0 ∧ ∀𝑘 ∈ (ℤ𝑛)(𝑘 · ((abs‘𝐴)↑𝑘)) < ((((abs‘𝐴) + 1) / 2)↑𝑘))) ∧ 𝑚 ∈ ℕ0) → ((𝑘 ∈ ℕ0 ↦ ((((abs‘𝐴) + 1) / 2)↑𝑘))‘𝑚) = ((((abs‘𝐴) + 1) / 2)↑𝑚))
9843ad2antrr 725 . . . . . . . . . 10 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ (𝑛 ∈ ℕ0 ∧ ∀𝑘 ∈ (ℤ𝑛)(𝑘 · ((abs‘𝐴)↑𝑘)) < ((((abs‘𝐴) + 1) / 2)↑𝑘))) ∧ 𝑚 ∈ ℕ0) → (((abs‘𝐴) + 1) / 2) ∈ ℝ)
99 simpr 488 . . . . . . . . . 10 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ (𝑛 ∈ ℕ0 ∧ ∀𝑘 ∈ (ℤ𝑛)(𝑘 · ((abs‘𝐴)↑𝑘)) < ((((abs‘𝐴) + 1) / 2)↑𝑘))) ∧ 𝑚 ∈ ℕ0) → 𝑚 ∈ ℕ0)
10098, 99reexpcld 13523 . . . . . . . . 9 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ (𝑛 ∈ ℕ0 ∧ ∀𝑘 ∈ (ℤ𝑛)(𝑘 · ((abs‘𝐴)↑𝑘)) < ((((abs‘𝐴) + 1) / 2)↑𝑘))) ∧ 𝑚 ∈ ℕ0) → ((((abs‘𝐴) + 1) / 2)↑𝑚) ∈ ℝ)
10197, 100eqeltrd 2890 . . . . . . . 8 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ (𝑛 ∈ ℕ0 ∧ ∀𝑘 ∈ (ℤ𝑛)(𝑘 · ((abs‘𝐴)↑𝑘)) < ((((abs‘𝐴) + 1) / 2)↑𝑘))) ∧ 𝑚 ∈ ℕ0) → ((𝑘 ∈ ℕ0 ↦ ((((abs‘𝐴) + 1) / 2)↑𝑘))‘𝑚) ∈ ℝ)
102 id 22 . . . . . . . . . . . 12 (𝑘 = 𝑚𝑘 = 𝑚)
103 oveq2 7143 . . . . . . . . . . . 12 (𝑘 = 𝑚 → (𝐴𝑘) = (𝐴𝑚))
104102, 103oveq12d 7153 . . . . . . . . . . 11 (𝑘 = 𝑚 → (𝑘 · (𝐴𝑘)) = (𝑚 · (𝐴𝑚)))
105 ovex 7168 . . . . . . . . . . 11 (𝑚 · (𝐴𝑚)) ∈ V
106104, 1, 105fvmpt 6745 . . . . . . . . . 10 (𝑚 ∈ ℕ0 → (𝐹𝑚) = (𝑚 · (𝐴𝑚)))
107106adantl 485 . . . . . . . . 9 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ (𝑛 ∈ ℕ0 ∧ ∀𝑘 ∈ (ℤ𝑛)(𝑘 · ((abs‘𝐴)↑𝑘)) < ((((abs‘𝐴) + 1) / 2)↑𝑘))) ∧ 𝑚 ∈ ℕ0) → (𝐹𝑚) = (𝑚 · (𝐴𝑚)))
108 nn0cn 11895 . . . . . . . . . . 11 (𝑚 ∈ ℕ0𝑚 ∈ ℂ)
109108adantl 485 . . . . . . . . . 10 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ (𝑛 ∈ ℕ0 ∧ ∀𝑘 ∈ (ℤ𝑛)(𝑘 · ((abs‘𝐴)↑𝑘)) < ((((abs‘𝐴) + 1) / 2)↑𝑘))) ∧ 𝑚 ∈ ℕ0) → 𝑚 ∈ ℂ)
110 expcl 13443 . . . . . . . . . . 11 ((𝐴 ∈ ℂ ∧ 𝑚 ∈ ℕ0) → (𝐴𝑚) ∈ ℂ)
111110ad4ant14 751 . . . . . . . . . 10 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ (𝑛 ∈ ℕ0 ∧ ∀𝑘 ∈ (ℤ𝑛)(𝑘 · ((abs‘𝐴)↑𝑘)) < ((((abs‘𝐴) + 1) / 2)↑𝑘))) ∧ 𝑚 ∈ ℕ0) → (𝐴𝑚) ∈ ℂ)
112109, 111mulcld 10650 . . . . . . . . 9 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ (𝑛 ∈ ℕ0 ∧ ∀𝑘 ∈ (ℤ𝑛)(𝑘 · ((abs‘𝐴)↑𝑘)) < ((((abs‘𝐴) + 1) / 2)↑𝑘))) ∧ 𝑚 ∈ ℕ0) → (𝑚 · (𝐴𝑚)) ∈ ℂ)
113107, 112eqeltrd 2890 . . . . . . . 8 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ (𝑛 ∈ ℕ0 ∧ ∀𝑘 ∈ (ℤ𝑛)(𝑘 · ((abs‘𝐴)↑𝑘)) < ((((abs‘𝐴) + 1) / 2)↑𝑘))) ∧ 𝑚 ∈ ℕ0) → (𝐹𝑚) ∈ ℂ)
114 0red 10633 . . . . . . . . . . . . . 14 ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → 0 ∈ ℝ)
115 absge0 14639 . . . . . . . . . . . . . . . 16 (𝐴 ∈ ℂ → 0 ≤ (abs‘𝐴))
116115adantr 484 . . . . . . . . . . . . . . 15 ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → 0 ≤ (abs‘𝐴))
117114, 40, 43, 116, 54lelttrd 10787 . . . . . . . . . . . . . 14 ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → 0 < (((abs‘𝐴) + 1) / 2))
118114, 43, 117ltled 10777 . . . . . . . . . . . . 13 ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → 0 ≤ (((abs‘𝐴) + 1) / 2))
11943, 118absidd 14774 . . . . . . . . . . . 12 ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → (abs‘(((abs‘𝐴) + 1) / 2)) = (((abs‘𝐴) + 1) / 2))
120 avglt2 11864 . . . . . . . . . . . . . 14 (((abs‘𝐴) ∈ ℝ ∧ 1 ∈ ℝ) → ((abs‘𝐴) < 1 ↔ (((abs‘𝐴) + 1) / 2) < 1))
12140, 51, 120sylancl 589 . . . . . . . . . . . . 13 ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → ((abs‘𝐴) < 1 ↔ (((abs‘𝐴) + 1) / 2) < 1))
12250, 121mpbid 235 . . . . . . . . . . . 12 ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → (((abs‘𝐴) + 1) / 2) < 1)
123119, 122eqbrtrd 5052 . . . . . . . . . . 11 ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → (abs‘(((abs‘𝐴) + 1) / 2)) < 1)
124 oveq2 7143 . . . . . . . . . . . . 13 (𝑘 = 𝑛 → ((((abs‘𝐴) + 1) / 2)↑𝑘) = ((((abs‘𝐴) + 1) / 2)↑𝑛))
125 ovex 7168 . . . . . . . . . . . . 13 ((((abs‘𝐴) + 1) / 2)↑𝑛) ∈ V
126124, 94, 125fvmpt 6745 . . . . . . . . . . . 12 (𝑛 ∈ ℕ0 → ((𝑘 ∈ ℕ0 ↦ ((((abs‘𝐴) + 1) / 2)↑𝑘))‘𝑛) = ((((abs‘𝐴) + 1) / 2)↑𝑛))
127126adantl 485 . . . . . . . . . . 11 (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑛 ∈ ℕ0) → ((𝑘 ∈ ℕ0 ↦ ((((abs‘𝐴) + 1) / 2)↑𝑘))‘𝑛) = ((((abs‘𝐴) + 1) / 2)↑𝑛))
12865, 123, 127geolim 15218 . . . . . . . . . 10 ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → seq0( + , (𝑘 ∈ ℕ0 ↦ ((((abs‘𝐴) + 1) / 2)↑𝑘))) ⇝ (1 / (1 − (((abs‘𝐴) + 1) / 2))))
129 seqex 13366 . . . . . . . . . . 11 seq0( + , (𝑘 ∈ ℕ0 ↦ ((((abs‘𝐴) + 1) / 2)↑𝑘))) ∈ V
130 ovex 7168 . . . . . . . . . . 11 (1 / (1 − (((abs‘𝐴) + 1) / 2))) ∈ V
131129, 130breldm 5741 . . . . . . . . . 10 (seq0( + , (𝑘 ∈ ℕ0 ↦ ((((abs‘𝐴) + 1) / 2)↑𝑘))) ⇝ (1 / (1 − (((abs‘𝐴) + 1) / 2))) → seq0( + , (𝑘 ∈ ℕ0 ↦ ((((abs‘𝐴) + 1) / 2)↑𝑘))) ∈ dom ⇝ )
132128, 131syl 17 . . . . . . . . 9 ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → seq0( + , (𝑘 ∈ ℕ0 ↦ ((((abs‘𝐴) + 1) / 2)↑𝑘))) ∈ dom ⇝ )
133132adantr 484 . . . . . . . 8 (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ (𝑛 ∈ ℕ0 ∧ ∀𝑘 ∈ (ℤ𝑛)(𝑘 · ((abs‘𝐴)↑𝑘)) < ((((abs‘𝐴) + 1) / 2)↑𝑘))) → seq0( + , (𝑘 ∈ ℕ0 ↦ ((((abs‘𝐴) + 1) / 2)↑𝑘))) ∈ dom ⇝ )
134 1red 10631 . . . . . . . 8 (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ (𝑛 ∈ ℕ0 ∧ ∀𝑘 ∈ (ℤ𝑛)(𝑘 · ((abs‘𝐴)↑𝑘)) < ((((abs‘𝐴) + 1) / 2)↑𝑘))) → 1 ∈ ℝ)
135 eluznn0 12305 . . . . . . . . . . . . . 14 ((𝑛 ∈ ℕ0𝑚 ∈ (ℤ𝑛)) → 𝑚 ∈ ℕ0)
13692, 135sylan 583 . . . . . . . . . . . . 13 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ (𝑛 ∈ ℕ0 ∧ ∀𝑘 ∈ (ℤ𝑛)(𝑘 · ((abs‘𝐴)↑𝑘)) < ((((abs‘𝐴) + 1) / 2)↑𝑘))) ∧ 𝑚 ∈ (ℤ𝑛)) → 𝑚 ∈ ℕ0)
137136nn0red 11944 . . . . . . . . . . . 12 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ (𝑛 ∈ ℕ0 ∧ ∀𝑘 ∈ (ℤ𝑛)(𝑘 · ((abs‘𝐴)↑𝑘)) < ((((abs‘𝐴) + 1) / 2)↑𝑘))) ∧ 𝑚 ∈ (ℤ𝑛)) → 𝑚 ∈ ℝ)
138 simplll 774 . . . . . . . . . . . . . 14 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ (𝑛 ∈ ℕ0 ∧ ∀𝑘 ∈ (ℤ𝑛)(𝑘 · ((abs‘𝐴)↑𝑘)) < ((((abs‘𝐴) + 1) / 2)↑𝑘))) ∧ 𝑚 ∈ (ℤ𝑛)) → 𝐴 ∈ ℂ)
139138abscld 14788 . . . . . . . . . . . . 13 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ (𝑛 ∈ ℕ0 ∧ ∀𝑘 ∈ (ℤ𝑛)(𝑘 · ((abs‘𝐴)↑𝑘)) < ((((abs‘𝐴) + 1) / 2)↑𝑘))) ∧ 𝑚 ∈ (ℤ𝑛)) → (abs‘𝐴) ∈ ℝ)
140139, 136reexpcld 13523 . . . . . . . . . . . 12 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ (𝑛 ∈ ℕ0 ∧ ∀𝑘 ∈ (ℤ𝑛)(𝑘 · ((abs‘𝐴)↑𝑘)) < ((((abs‘𝐴) + 1) / 2)↑𝑘))) ∧ 𝑚 ∈ (ℤ𝑛)) → ((abs‘𝐴)↑𝑚) ∈ ℝ)
141137, 140remulcld 10660 . . . . . . . . . . 11 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ (𝑛 ∈ ℕ0 ∧ ∀𝑘 ∈ (ℤ𝑛)(𝑘 · ((abs‘𝐴)↑𝑘)) < ((((abs‘𝐴) + 1) / 2)↑𝑘))) ∧ 𝑚 ∈ (ℤ𝑛)) → (𝑚 · ((abs‘𝐴)↑𝑚)) ∈ ℝ)
142136, 100syldan 594 . . . . . . . . . . 11 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ (𝑛 ∈ ℕ0 ∧ ∀𝑘 ∈ (ℤ𝑛)(𝑘 · ((abs‘𝐴)↑𝑘)) < ((((abs‘𝐴) + 1) / 2)↑𝑘))) ∧ 𝑚 ∈ (ℤ𝑛)) → ((((abs‘𝐴) + 1) / 2)↑𝑚) ∈ ℝ)
143 simprr 772 . . . . . . . . . . . 12 (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ (𝑛 ∈ ℕ0 ∧ ∀𝑘 ∈ (ℤ𝑛)(𝑘 · ((abs‘𝐴)↑𝑘)) < ((((abs‘𝐴) + 1) / 2)↑𝑘))) → ∀𝑘 ∈ (ℤ𝑛)(𝑘 · ((abs‘𝐴)↑𝑘)) < ((((abs‘𝐴) + 1) / 2)↑𝑘))
144 oveq2 7143 . . . . . . . . . . . . . . 15 (𝑘 = 𝑚 → ((abs‘𝐴)↑𝑘) = ((abs‘𝐴)↑𝑚))
145102, 144oveq12d 7153 . . . . . . . . . . . . . 14 (𝑘 = 𝑚 → (𝑘 · ((abs‘𝐴)↑𝑘)) = (𝑚 · ((abs‘𝐴)↑𝑚)))
146145, 93breq12d 5043 . . . . . . . . . . . . 13 (𝑘 = 𝑚 → ((𝑘 · ((abs‘𝐴)↑𝑘)) < ((((abs‘𝐴) + 1) / 2)↑𝑘) ↔ (𝑚 · ((abs‘𝐴)↑𝑚)) < ((((abs‘𝐴) + 1) / 2)↑𝑚)))
147146rspccva 3570 . . . . . . . . . . . 12 ((∀𝑘 ∈ (ℤ𝑛)(𝑘 · ((abs‘𝐴)↑𝑘)) < ((((abs‘𝐴) + 1) / 2)↑𝑘) ∧ 𝑚 ∈ (ℤ𝑛)) → (𝑚 · ((abs‘𝐴)↑𝑚)) < ((((abs‘𝐴) + 1) / 2)↑𝑚))
148143, 147sylan 583 . . . . . . . . . . 11 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ (𝑛 ∈ ℕ0 ∧ ∀𝑘 ∈ (ℤ𝑛)(𝑘 · ((abs‘𝐴)↑𝑘)) < ((((abs‘𝐴) + 1) / 2)↑𝑘))) ∧ 𝑚 ∈ (ℤ𝑛)) → (𝑚 · ((abs‘𝐴)↑𝑚)) < ((((abs‘𝐴) + 1) / 2)↑𝑚))
149141, 142, 148ltled 10777 . . . . . . . . . 10 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ (𝑛 ∈ ℕ0 ∧ ∀𝑘 ∈ (ℤ𝑛)(𝑘 · ((abs‘𝐴)↑𝑘)) < ((((abs‘𝐴) + 1) / 2)↑𝑘))) ∧ 𝑚 ∈ (ℤ𝑛)) → (𝑚 · ((abs‘𝐴)↑𝑚)) ≤ ((((abs‘𝐴) + 1) / 2)↑𝑚))
150136nn0cnd 11945 . . . . . . . . . . . 12 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ (𝑛 ∈ ℕ0 ∧ ∀𝑘 ∈ (ℤ𝑛)(𝑘 · ((abs‘𝐴)↑𝑘)) < ((((abs‘𝐴) + 1) / 2)↑𝑘))) ∧ 𝑚 ∈ (ℤ𝑛)) → 𝑚 ∈ ℂ)
151138, 136expcld 13506 . . . . . . . . . . . 12 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ (𝑛 ∈ ℕ0 ∧ ∀𝑘 ∈ (ℤ𝑛)(𝑘 · ((abs‘𝐴)↑𝑘)) < ((((abs‘𝐴) + 1) / 2)↑𝑘))) ∧ 𝑚 ∈ (ℤ𝑛)) → (𝐴𝑚) ∈ ℂ)
152150, 151absmuld 14806 . . . . . . . . . . 11 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ (𝑛 ∈ ℕ0 ∧ ∀𝑘 ∈ (ℤ𝑛)(𝑘 · ((abs‘𝐴)↑𝑘)) < ((((abs‘𝐴) + 1) / 2)↑𝑘))) ∧ 𝑚 ∈ (ℤ𝑛)) → (abs‘(𝑚 · (𝐴𝑚))) = ((abs‘𝑚) · (abs‘(𝐴𝑚))))
153136nn0ge0d 11946 . . . . . . . . . . . . 13 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ (𝑛 ∈ ℕ0 ∧ ∀𝑘 ∈ (ℤ𝑛)(𝑘 · ((abs‘𝐴)↑𝑘)) < ((((abs‘𝐴) + 1) / 2)↑𝑘))) ∧ 𝑚 ∈ (ℤ𝑛)) → 0 ≤ 𝑚)
154137, 153absidd 14774 . . . . . . . . . . . 12 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ (𝑛 ∈ ℕ0 ∧ ∀𝑘 ∈ (ℤ𝑛)(𝑘 · ((abs‘𝐴)↑𝑘)) < ((((abs‘𝐴) + 1) / 2)↑𝑘))) ∧ 𝑚 ∈ (ℤ𝑛)) → (abs‘𝑚) = 𝑚)
155138, 136absexpd 14804 . . . . . . . . . . . 12 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ (𝑛 ∈ ℕ0 ∧ ∀𝑘 ∈ (ℤ𝑛)(𝑘 · ((abs‘𝐴)↑𝑘)) < ((((abs‘𝐴) + 1) / 2)↑𝑘))) ∧ 𝑚 ∈ (ℤ𝑛)) → (abs‘(𝐴𝑚)) = ((abs‘𝐴)↑𝑚))
156154, 155oveq12d 7153 . . . . . . . . . . 11 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ (𝑛 ∈ ℕ0 ∧ ∀𝑘 ∈ (ℤ𝑛)(𝑘 · ((abs‘𝐴)↑𝑘)) < ((((abs‘𝐴) + 1) / 2)↑𝑘))) ∧ 𝑚 ∈ (ℤ𝑛)) → ((abs‘𝑚) · (abs‘(𝐴𝑚))) = (𝑚 · ((abs‘𝐴)↑𝑚)))
157152, 156eqtrd 2833 . . . . . . . . . 10 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ (𝑛 ∈ ℕ0 ∧ ∀𝑘 ∈ (ℤ𝑛)(𝑘 · ((abs‘𝐴)↑𝑘)) < ((((abs‘𝐴) + 1) / 2)↑𝑘))) ∧ 𝑚 ∈ (ℤ𝑛)) → (abs‘(𝑚 · (𝐴𝑚))) = (𝑚 · ((abs‘𝐴)↑𝑚)))
158142recnd 10658 . . . . . . . . . . 11 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ (𝑛 ∈ ℕ0 ∧ ∀𝑘 ∈ (ℤ𝑛)(𝑘 · ((abs‘𝐴)↑𝑘)) < ((((abs‘𝐴) + 1) / 2)↑𝑘))) ∧ 𝑚 ∈ (ℤ𝑛)) → ((((abs‘𝐴) + 1) / 2)↑𝑚) ∈ ℂ)
159158mulid2d 10648 . . . . . . . . . 10 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ (𝑛 ∈ ℕ0 ∧ ∀𝑘 ∈ (ℤ𝑛)(𝑘 · ((abs‘𝐴)↑𝑘)) < ((((abs‘𝐴) + 1) / 2)↑𝑘))) ∧ 𝑚 ∈ (ℤ𝑛)) → (1 · ((((abs‘𝐴) + 1) / 2)↑𝑚)) = ((((abs‘𝐴) + 1) / 2)↑𝑚))
160149, 157, 1593brtr4d 5062 . . . . . . . . 9 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ (𝑛 ∈ ℕ0 ∧ ∀𝑘 ∈ (ℤ𝑛)(𝑘 · ((abs‘𝐴)↑𝑘)) < ((((abs‘𝐴) + 1) / 2)↑𝑘))) ∧ 𝑚 ∈ (ℤ𝑛)) → (abs‘(𝑚 · (𝐴𝑚))) ≤ (1 · ((((abs‘𝐴) + 1) / 2)↑𝑚)))
161136, 106syl 17 . . . . . . . . . 10 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ (𝑛 ∈ ℕ0 ∧ ∀𝑘 ∈ (ℤ𝑛)(𝑘 · ((abs‘𝐴)↑𝑘)) < ((((abs‘𝐴) + 1) / 2)↑𝑘))) ∧ 𝑚 ∈ (ℤ𝑛)) → (𝐹𝑚) = (𝑚 · (𝐴𝑚)))
162161fveq2d 6649 . . . . . . . . 9 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ (𝑛 ∈ ℕ0 ∧ ∀𝑘 ∈ (ℤ𝑛)(𝑘 · ((abs‘𝐴)↑𝑘)) < ((((abs‘𝐴) + 1) / 2)↑𝑘))) ∧ 𝑚 ∈ (ℤ𝑛)) → (abs‘(𝐹𝑚)) = (abs‘(𝑚 · (𝐴𝑚))))
163136, 96syl 17 . . . . . . . . . 10 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ (𝑛 ∈ ℕ0 ∧ ∀𝑘 ∈ (ℤ𝑛)(𝑘 · ((abs‘𝐴)↑𝑘)) < ((((abs‘𝐴) + 1) / 2)↑𝑘))) ∧ 𝑚 ∈ (ℤ𝑛)) → ((𝑘 ∈ ℕ0 ↦ ((((abs‘𝐴) + 1) / 2)↑𝑘))‘𝑚) = ((((abs‘𝐴) + 1) / 2)↑𝑚))
164163oveq2d 7151 . . . . . . . . 9 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ (𝑛 ∈ ℕ0 ∧ ∀𝑘 ∈ (ℤ𝑛)(𝑘 · ((abs‘𝐴)↑𝑘)) < ((((abs‘𝐴) + 1) / 2)↑𝑘))) ∧ 𝑚 ∈ (ℤ𝑛)) → (1 · ((𝑘 ∈ ℕ0 ↦ ((((abs‘𝐴) + 1) / 2)↑𝑘))‘𝑚)) = (1 · ((((abs‘𝐴) + 1) / 2)↑𝑚)))
165160, 162, 1643brtr4d 5062 . . . . . . . 8 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ (𝑛 ∈ ℕ0 ∧ ∀𝑘 ∈ (ℤ𝑛)(𝑘 · ((abs‘𝐴)↑𝑘)) < ((((abs‘𝐴) + 1) / 2)↑𝑘))) ∧ 𝑚 ∈ (ℤ𝑛)) → (abs‘(𝐹𝑚)) ≤ (1 · ((𝑘 ∈ ℕ0 ↦ ((((abs‘𝐴) + 1) / 2)↑𝑘))‘𝑚)))
16625, 92, 101, 113, 133, 134, 165cvgcmpce 15165 . . . . . . 7 (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ (𝑛 ∈ ℕ0 ∧ ∀𝑘 ∈ (ℤ𝑛)(𝑘 · ((abs‘𝐴)↑𝑘)) < ((((abs‘𝐴) + 1) / 2)↑𝑘))) → seq0( + , 𝐹) ∈ dom ⇝ )
167166expr 460 . . . . . 6 (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑛 ∈ ℕ0) → (∀𝑘 ∈ (ℤ𝑛)(𝑘 · ((abs‘𝐴)↑𝑘)) < ((((abs‘𝐴) + 1) / 2)↑𝑘) → seq0( + , 𝐹) ∈ dom ⇝ ))
168167adantlr 714 . . . . 5 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝐴 ≠ 0) ∧ 𝑛 ∈ ℕ0) → (∀𝑘 ∈ (ℤ𝑛)(𝑘 · ((abs‘𝐴)↑𝑘)) < ((((abs‘𝐴) + 1) / 2)↑𝑘) → seq0( + , 𝐹) ∈ dom ⇝ ))
16991, 168sylbid 243 . . . 4 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝐴 ≠ 0) ∧ 𝑛 ∈ ℕ0) → (∀𝑘 ∈ (ℤ𝑛)(1 · 𝑘) < (((((abs‘𝐴) + 1) / 2) / (abs‘𝐴))↑𝑘) → seq0( + , 𝐹) ∈ dom ⇝ ))
170169rexlimdva 3243 . . 3 (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝐴 ≠ 0) → (∃𝑛 ∈ ℕ0𝑘 ∈ (ℤ𝑛)(1 · 𝑘) < (((((abs‘𝐴) + 1) / 2) / (abs‘𝐴))↑𝑘) → seq0( + , 𝐹) ∈ dom ⇝ ))
17160, 170mpd 15 . 2 (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝐴 ≠ 0) → seq0( + , 𝐹) ∈ dom ⇝ )
17237, 171pm2.61dane 3074 1 ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → seq0( + , 𝐹) ∈ dom ⇝ )
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 209  wa 399  wo 844   = wceq 1538  wcel 2111  wne 2987  wral 3106  wrex 3107  {csn 4525   class class class wbr 5030  cmpt 5110   × cxp 5517  dom cdm 5519  cfv 6324  (class class class)co 7135  cc 10524  cr 10525  0cc0 10526  1c1 10527   + caddc 10529   · cmul 10531   < clt 10664  cle 10665  cmin 10859   / cdiv 11286  cn 11625  2c2 11680  0cn0 11885  cz 11969  cuz 12231  +crp 12377  seqcseq 13364  cexp 13425  abscabs 14585  cli 14833
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 2113  ax-9 2121  ax-10 2142  ax-11 2158  ax-12 2175  ax-ext 2770  ax-rep 5154  ax-sep 5167  ax-nul 5174  ax-pow 5231  ax-pr 5295  ax-un 7441  ax-inf2 9088  ax-cnex 10582  ax-resscn 10583  ax-1cn 10584  ax-icn 10585  ax-addcl 10586  ax-addrcl 10587  ax-mulcl 10588  ax-mulrcl 10589  ax-mulcom 10590  ax-addass 10591  ax-mulass 10592  ax-distr 10593  ax-i2m1 10594  ax-1ne0 10595  ax-1rid 10596  ax-rnegex 10597  ax-rrecex 10598  ax-cnre 10599  ax-pre-lttri 10600  ax-pre-lttrn 10601  ax-pre-ltadd 10602  ax-pre-mulgt0 10603  ax-pre-sup 10604  ax-addf 10605  ax-mulf 10606
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 2598  df-eu 2629  df-clab 2777  df-cleq 2791  df-clel 2870  df-nfc 2938  df-ne 2988  df-nel 3092  df-ral 3111  df-rex 3112  df-reu 3113  df-rmo 3114  df-rab 3115  df-v 3443  df-sbc 3721  df-csb 3829  df-dif 3884  df-un 3886  df-in 3888  df-ss 3898  df-pss 3900  df-nul 4244  df-if 4426  df-pw 4499  df-sn 4526  df-pr 4528  df-tp 4530  df-op 4532  df-uni 4801  df-int 4839  df-iun 4883  df-br 5031  df-opab 5093  df-mpt 5111  df-tr 5137  df-id 5425  df-eprel 5430  df-po 5438  df-so 5439  df-fr 5478  df-se 5479  df-we 5480  df-xp 5525  df-rel 5526  df-cnv 5527  df-co 5528  df-dm 5529  df-rn 5530  df-res 5531  df-ima 5532  df-pred 6116  df-ord 6162  df-on 6163  df-lim 6164  df-suc 6165  df-iota 6283  df-fun 6326  df-fn 6327  df-f 6328  df-f1 6329  df-fo 6330  df-f1o 6331  df-fv 6332  df-isom 6333  df-riota 7093  df-ov 7138  df-oprab 7139  df-mpo 7140  df-om 7561  df-1st 7671  df-2nd 7672  df-wrecs 7930  df-recs 7991  df-rdg 8029  df-1o 8085  df-oadd 8089  df-er 8272  df-pm 8392  df-en 8493  df-dom 8494  df-sdom 8495  df-fin 8496  df-sup 8890  df-inf 8891  df-oi 8958  df-card 9352  df-pnf 10666  df-mnf 10667  df-xr 10668  df-ltxr 10669  df-le 10670  df-sub 10861  df-neg 10862  df-div 11287  df-nn 11626  df-2 11688  df-3 11689  df-n0 11886  df-z 11970  df-uz 12232  df-rp 12378  df-ico 12732  df-fz 12886  df-fzo 13029  df-fl 13157  df-seq 13365  df-exp 13426  df-hash 13687  df-cj 14450  df-re 14451  df-im 14452  df-sqrt 14586  df-abs 14587  df-limsup 14820  df-clim 14837  df-rlim 14838  df-sum 15035
This theorem is referenced by:  radcnvlem1  25008
  Copyright terms: Public domain W3C validator