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

Theorem geomulcvg 14905
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 11544 . . . . . . . . 9 (𝑘 ∈ ℕ0 ↔ (𝑘 ∈ ℕ ∨ 𝑘 = 0))
3 simpr 477 . . . . . . . . . . . . . 14 (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝐴 = 0) → 𝐴 = 0)
43oveq1d 6861 . . . . . . . . . . . . 13 (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝐴 = 0) → (𝐴𝑘) = (0↑𝑘))
5 0exp 13107 . . . . . . . . . . . . 13 (𝑘 ∈ ℕ → (0↑𝑘) = 0)
64, 5sylan9eq 2819 . . . . . . . . . . . 12 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝐴 = 0) ∧ 𝑘 ∈ ℕ) → (𝐴𝑘) = 0)
76oveq2d 6862 . . . . . . . . . . 11 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝐴 = 0) ∧ 𝑘 ∈ ℕ) → (𝑘 · (𝐴𝑘)) = (𝑘 · 0))
8 nncn 11287 . . . . . . . . . . . . 13 (𝑘 ∈ ℕ → 𝑘 ∈ ℂ)
98adantl 473 . . . . . . . . . . . 12 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝐴 = 0) ∧ 𝑘 ∈ ℕ) → 𝑘 ∈ ℂ)
109mul01d 10493 . . . . . . . . . . 11 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝐴 = 0) ∧ 𝑘 ∈ ℕ) → (𝑘 · 0) = 0)
117, 10eqtrd 2799 . . . . . . . . . 10 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝐴 = 0) ∧ 𝑘 ∈ ℕ) → (𝑘 · (𝐴𝑘)) = 0)
12 simpr 477 . . . . . . . . . . . 12 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝐴 = 0) ∧ 𝑘 = 0) → 𝑘 = 0)
1312oveq1d 6861 . . . . . . . . . . 11 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝐴 = 0) ∧ 𝑘 = 0) → (𝑘 · (𝐴𝑘)) = (0 · (𝐴𝑘)))
14 simplll 791 . . . . . . . . . . . . 13 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝐴 = 0) ∧ 𝑘 = 0) → 𝐴 ∈ ℂ)
15 0nn0 11559 . . . . . . . . . . . . . 14 0 ∈ ℕ0
1612, 15syl6eqel 2852 . . . . . . . . . . . . 13 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝐴 = 0) ∧ 𝑘 = 0) → 𝑘 ∈ ℕ0)
1714, 16expcld 13220 . . . . . . . . . . . 12 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝐴 = 0) ∧ 𝑘 = 0) → (𝐴𝑘) ∈ ℂ)
1817mul02d 10492 . . . . . . . . . . 11 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝐴 = 0) ∧ 𝑘 = 0) → (0 · (𝐴𝑘)) = 0)
1913, 18eqtrd 2799 . . . . . . . . . 10 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝐴 = 0) ∧ 𝑘 = 0) → (𝑘 · (𝐴𝑘)) = 0)
2011, 19jaodan 980 . . . . . . . . 9 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝐴 = 0) ∧ (𝑘 ∈ ℕ ∨ 𝑘 = 0)) → (𝑘 · (𝐴𝑘)) = 0)
212, 20sylan2b 587 . . . . . . . 8 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝐴 = 0) ∧ 𝑘 ∈ ℕ0) → (𝑘 · (𝐴𝑘)) = 0)
2221mpteq2dva 4905 . . . . . . 7 (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝐴 = 0) → (𝑘 ∈ ℕ0 ↦ (𝑘 · (𝐴𝑘))) = (𝑘 ∈ ℕ0 ↦ 0))
231, 22syl5eq 2811 . . . . . 6 (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝐴 = 0) → 𝐹 = (𝑘 ∈ ℕ0 ↦ 0))
24 fconstmpt 5335 . . . . . . 7 (ℕ0 × {0}) = (𝑘 ∈ ℕ0 ↦ 0)
25 nn0uz 11927 . . . . . . . 8 0 = (ℤ‘0)
2625xpeq1i 5305 . . . . . . 7 (ℕ0 × {0}) = ((ℤ‘0) × {0})
2724, 26eqtr3i 2789 . . . . . 6 (𝑘 ∈ ℕ0 ↦ 0) = ((ℤ‘0) × {0})
2823, 27syl6eq 2815 . . . . 5 (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝐴 = 0) → 𝐹 = ((ℤ‘0) × {0}))
2928seqeq3d 13021 . . . 4 (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝐴 = 0) → seq0( + , 𝐹) = seq0( + , ((ℤ‘0) × {0})))
30 0z 11639 . . . . 5 0 ∈ ℤ
31 serclim0 14607 . . . . 5 (0 ∈ ℤ → seq0( + , ((ℤ‘0) × {0})) ⇝ 0)
3230, 31ax-mp 5 . . . 4 seq0( + , ((ℤ‘0) × {0})) ⇝ 0
3329, 32syl6eqbr 4850 . . 3 (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝐴 = 0) → seq0( + , 𝐹) ⇝ 0)
34 seqex 13015 . . . 4 seq0( + , 𝐹) ∈ V
35 c0ex 10291 . . . 4 0 ∈ V
3634, 35breldm 5499 . . 3 (seq0( + , 𝐹) ⇝ 0 → seq0( + , 𝐹) ∈ dom ⇝ )
3733, 36syl 17 . 2 (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝐴 = 0) → seq0( + , 𝐹) ∈ dom ⇝ )
38 1red 10298 . . . 4 (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝐴 ≠ 0) → 1 ∈ ℝ)
39 abscl 14317 . . . . . . . . 9 (𝐴 ∈ ℂ → (abs‘𝐴) ∈ ℝ)
4039adantr 472 . . . . . . . 8 ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → (abs‘𝐴) ∈ ℝ)
41 peano2re 10467 . . . . . . . 8 ((abs‘𝐴) ∈ ℝ → ((abs‘𝐴) + 1) ∈ ℝ)
4240, 41syl 17 . . . . . . 7 ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → ((abs‘𝐴) + 1) ∈ ℝ)
4342rehalfcld 11529 . . . . . 6 ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → (((abs‘𝐴) + 1) / 2) ∈ ℝ)
4443adantr 472 . . . . 5 (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝐴 ≠ 0) → (((abs‘𝐴) + 1) / 2) ∈ ℝ)
45 absrpcl 14327 . . . . . 6 ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0) → (abs‘𝐴) ∈ ℝ+)
4645adantlr 706 . . . . 5 (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝐴 ≠ 0) → (abs‘𝐴) ∈ ℝ+)
4744, 46rerpdivcld 12106 . . . 4 (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝐴 ≠ 0) → ((((abs‘𝐴) + 1) / 2) / (abs‘𝐴)) ∈ ℝ)
4840recnd 10326 . . . . . . . 8 ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → (abs‘𝐴) ∈ ℂ)
4948mulid2d 10316 . . . . . . 7 ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → (1 · (abs‘𝐴)) = (abs‘𝐴))
50 simpr 477 . . . . . . . 8 ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → (abs‘𝐴) < 1)
51 1re 10297 . . . . . . . . 9 1 ∈ ℝ
52 avglt1 11520 . . . . . . . . 9 (((abs‘𝐴) ∈ ℝ ∧ 1 ∈ ℝ) → ((abs‘𝐴) < 1 ↔ (abs‘𝐴) < (((abs‘𝐴) + 1) / 2)))
5340, 51, 52sylancl 580 . . . . . . . 8 ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → ((abs‘𝐴) < 1 ↔ (abs‘𝐴) < (((abs‘𝐴) + 1) / 2)))
5450, 53mpbid 223 . . . . . . 7 ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → (abs‘𝐴) < (((abs‘𝐴) + 1) / 2))
5549, 54eqbrtrd 4833 . . . . . 6 ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → (1 · (abs‘𝐴)) < (((abs‘𝐴) + 1) / 2))
5655adantr 472 . . . . 5 (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝐴 ≠ 0) → (1 · (abs‘𝐴)) < (((abs‘𝐴) + 1) / 2))
5738, 44, 46ltmuldivd 12122 . . . . 5 (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝐴 ≠ 0) → ((1 · (abs‘𝐴)) < (((abs‘𝐴) + 1) / 2) ↔ 1 < ((((abs‘𝐴) + 1) / 2) / (abs‘𝐴))))
5856, 57mpbid 223 . . . 4 (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝐴 ≠ 0) → 1 < ((((abs‘𝐴) + 1) / 2) / (abs‘𝐴)))
59 expmulnbnd 13208 . . . 4 ((1 ∈ ℝ ∧ ((((abs‘𝐴) + 1) / 2) / (abs‘𝐴)) ∈ ℝ ∧ 1 < ((((abs‘𝐴) + 1) / 2) / (abs‘𝐴))) → ∃𝑛 ∈ ℕ0𝑘 ∈ (ℤ𝑛)(1 · 𝑘) < (((((abs‘𝐴) + 1) / 2) / (abs‘𝐴))↑𝑘))
6038, 47, 58, 59syl3anc 1490 . . 3 (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝐴 ≠ 0) → ∃𝑛 ∈ ℕ0𝑘 ∈ (ℤ𝑛)(1 · 𝑘) < (((((abs‘𝐴) + 1) / 2) / (abs‘𝐴))↑𝑘))
61 eluznn0 11963 . . . . . . . 8 ((𝑛 ∈ ℕ0𝑘 ∈ (ℤ𝑛)) → 𝑘 ∈ ℕ0)
62 nn0cn 11553 . . . . . . . . . . . 12 (𝑘 ∈ ℕ0𝑘 ∈ ℂ)
6362adantl 473 . . . . . . . . . . 11 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝐴 ≠ 0) ∧ 𝑘 ∈ ℕ0) → 𝑘 ∈ ℂ)
6463mulid2d 10316 . . . . . . . . . 10 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝐴 ≠ 0) ∧ 𝑘 ∈ ℕ0) → (1 · 𝑘) = 𝑘)
6543recnd 10326 . . . . . . . . . . . 12 ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → (((abs‘𝐴) + 1) / 2) ∈ ℂ)
6665ad2antrr 717 . . . . . . . . . . 11 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝐴 ≠ 0) ∧ 𝑘 ∈ ℕ0) → (((abs‘𝐴) + 1) / 2) ∈ ℂ)
6748ad2antrr 717 . . . . . . . . . . 11 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝐴 ≠ 0) ∧ 𝑘 ∈ ℕ0) → (abs‘𝐴) ∈ ℂ)
6846adantr 472 . . . . . . . . . . . 12 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝐴 ≠ 0) ∧ 𝑘 ∈ ℕ0) → (abs‘𝐴) ∈ ℝ+)
6968rpne0d 12080 . . . . . . . . . . 11 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝐴 ≠ 0) ∧ 𝑘 ∈ ℕ0) → (abs‘𝐴) ≠ 0)
70 simpr 477 . . . . . . . . . . 11 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝐴 ≠ 0) ∧ 𝑘 ∈ ℕ0) → 𝑘 ∈ ℕ0)
7166, 67, 69, 70expdivd 13234 . . . . . . . . . 10 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝐴 ≠ 0) ∧ 𝑘 ∈ ℕ0) → (((((abs‘𝐴) + 1) / 2) / (abs‘𝐴))↑𝑘) = (((((abs‘𝐴) + 1) / 2)↑𝑘) / ((abs‘𝐴)↑𝑘)))
7264, 71breq12d 4824 . . . . . . . . 9 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝐴 ≠ 0) ∧ 𝑘 ∈ ℕ0) → ((1 · 𝑘) < (((((abs‘𝐴) + 1) / 2) / (abs‘𝐴))↑𝑘) ↔ 𝑘 < (((((abs‘𝐴) + 1) / 2)↑𝑘) / ((abs‘𝐴)↑𝑘))))
73 nn0re 11552 . . . . . . . . . . 11 (𝑘 ∈ ℕ0𝑘 ∈ ℝ)
7473adantl 473 . . . . . . . . . 10 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝐴 ≠ 0) ∧ 𝑘 ∈ ℕ0) → 𝑘 ∈ ℝ)
75 reexpcl 13089 . . . . . . . . . . 11 (((((abs‘𝐴) + 1) / 2) ∈ ℝ ∧ 𝑘 ∈ ℕ0) → ((((abs‘𝐴) + 1) / 2)↑𝑘) ∈ ℝ)
7644, 75sylan 575 . . . . . . . . . 10 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝐴 ≠ 0) ∧ 𝑘 ∈ ℕ0) → ((((abs‘𝐴) + 1) / 2)↑𝑘) ∈ ℝ)
7740adantr 472 . . . . . . . . . . 11 (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝐴 ≠ 0) → (abs‘𝐴) ∈ ℝ)
78 reexpcl 13089 . . . . . . . . . . 11 (((abs‘𝐴) ∈ ℝ ∧ 𝑘 ∈ ℕ0) → ((abs‘𝐴)↑𝑘) ∈ ℝ)
7977, 78sylan 575 . . . . . . . . . 10 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝐴 ≠ 0) ∧ 𝑘 ∈ ℕ0) → ((abs‘𝐴)↑𝑘) ∈ ℝ)
8077adantr 472 . . . . . . . . . . 11 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝐴 ≠ 0) ∧ 𝑘 ∈ ℕ0) → (abs‘𝐴) ∈ ℝ)
81 nn0z 11652 . . . . . . . . . . . 12 (𝑘 ∈ ℕ0𝑘 ∈ ℤ)
8281adantl 473 . . . . . . . . . . 11 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝐴 ≠ 0) ∧ 𝑘 ∈ ℕ0) → 𝑘 ∈ ℤ)
8368rpgt0d 12078 . . . . . . . . . . 11 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝐴 ≠ 0) ∧ 𝑘 ∈ ℕ0) → 0 < (abs‘𝐴))
84 expgt0 13105 . . . . . . . . . . 11 (((abs‘𝐴) ∈ ℝ ∧ 𝑘 ∈ ℤ ∧ 0 < (abs‘𝐴)) → 0 < ((abs‘𝐴)↑𝑘))
8580, 82, 83, 84syl3anc 1490 . . . . . . . . . 10 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝐴 ≠ 0) ∧ 𝑘 ∈ ℕ0) → 0 < ((abs‘𝐴)↑𝑘))
86 ltmuldiv 11154 . . . . . . . . . 10 ((𝑘 ∈ ℝ ∧ ((((abs‘𝐴) + 1) / 2)↑𝑘) ∈ ℝ ∧ (((abs‘𝐴)↑𝑘) ∈ ℝ ∧ 0 < ((abs‘𝐴)↑𝑘))) → ((𝑘 · ((abs‘𝐴)↑𝑘)) < ((((abs‘𝐴) + 1) / 2)↑𝑘) ↔ 𝑘 < (((((abs‘𝐴) + 1) / 2)↑𝑘) / ((abs‘𝐴)↑𝑘))))
8774, 76, 79, 85, 86syl112anc 1493 . . . . . . . . 9 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝐴 ≠ 0) ∧ 𝑘 ∈ ℕ0) → ((𝑘 · ((abs‘𝐴)↑𝑘)) < ((((abs‘𝐴) + 1) / 2)↑𝑘) ↔ 𝑘 < (((((abs‘𝐴) + 1) / 2)↑𝑘) / ((abs‘𝐴)↑𝑘))))
8872, 87bitr4d 273 . . . . . . . 8 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝐴 ≠ 0) ∧ 𝑘 ∈ ℕ0) → ((1 · 𝑘) < (((((abs‘𝐴) + 1) / 2) / (abs‘𝐴))↑𝑘) ↔ (𝑘 · ((abs‘𝐴)↑𝑘)) < ((((abs‘𝐴) + 1) / 2)↑𝑘)))
8961, 88sylan2 586 . . . . . . 7 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝐴 ≠ 0) ∧ (𝑛 ∈ ℕ0𝑘 ∈ (ℤ𝑛))) → ((1 · 𝑘) < (((((abs‘𝐴) + 1) / 2) / (abs‘𝐴))↑𝑘) ↔ (𝑘 · ((abs‘𝐴)↑𝑘)) < ((((abs‘𝐴) + 1) / 2)↑𝑘)))
9089anassrs 459 . . . . . 6 (((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝐴 ≠ 0) ∧ 𝑛 ∈ ℕ0) ∧ 𝑘 ∈ (ℤ𝑛)) → ((1 · 𝑘) < (((((abs‘𝐴) + 1) / 2) / (abs‘𝐴))↑𝑘) ↔ (𝑘 · ((abs‘𝐴)↑𝑘)) < ((((abs‘𝐴) + 1) / 2)↑𝑘)))
9190ralbidva 3132 . . . . 5 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝐴 ≠ 0) ∧ 𝑛 ∈ ℕ0) → (∀𝑘 ∈ (ℤ𝑛)(1 · 𝑘) < (((((abs‘𝐴) + 1) / 2) / (abs‘𝐴))↑𝑘) ↔ ∀𝑘 ∈ (ℤ𝑛)(𝑘 · ((abs‘𝐴)↑𝑘)) < ((((abs‘𝐴) + 1) / 2)↑𝑘)))
92 simprl 787 . . . . . . . 8 (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ (𝑛 ∈ ℕ0 ∧ ∀𝑘 ∈ (ℤ𝑛)(𝑘 · ((abs‘𝐴)↑𝑘)) < ((((abs‘𝐴) + 1) / 2)↑𝑘))) → 𝑛 ∈ ℕ0)
93 oveq2 6854 . . . . . . . . . . 11 (𝑘 = 𝑚 → ((((abs‘𝐴) + 1) / 2)↑𝑘) = ((((abs‘𝐴) + 1) / 2)↑𝑚))
94 eqid 2765 . . . . . . . . . . 11 (𝑘 ∈ ℕ0 ↦ ((((abs‘𝐴) + 1) / 2)↑𝑘)) = (𝑘 ∈ ℕ0 ↦ ((((abs‘𝐴) + 1) / 2)↑𝑘))
95 ovex 6878 . . . . . . . . . . 11 ((((abs‘𝐴) + 1) / 2)↑𝑚) ∈ V
9693, 94, 95fvmpt 6475 . . . . . . . . . 10 (𝑚 ∈ ℕ0 → ((𝑘 ∈ ℕ0 ↦ ((((abs‘𝐴) + 1) / 2)↑𝑘))‘𝑚) = ((((abs‘𝐴) + 1) / 2)↑𝑚))
9796adantl 473 . . . . . . . . 9 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ (𝑛 ∈ ℕ0 ∧ ∀𝑘 ∈ (ℤ𝑛)(𝑘 · ((abs‘𝐴)↑𝑘)) < ((((abs‘𝐴) + 1) / 2)↑𝑘))) ∧ 𝑚 ∈ ℕ0) → ((𝑘 ∈ ℕ0 ↦ ((((abs‘𝐴) + 1) / 2)↑𝑘))‘𝑚) = ((((abs‘𝐴) + 1) / 2)↑𝑚))
9843ad2antrr 717 . . . . . . . . . 10 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ (𝑛 ∈ ℕ0 ∧ ∀𝑘 ∈ (ℤ𝑛)(𝑘 · ((abs‘𝐴)↑𝑘)) < ((((abs‘𝐴) + 1) / 2)↑𝑘))) ∧ 𝑚 ∈ ℕ0) → (((abs‘𝐴) + 1) / 2) ∈ ℝ)
99 simpr 477 . . . . . . . . . 10 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ (𝑛 ∈ ℕ0 ∧ ∀𝑘 ∈ (ℤ𝑛)(𝑘 · ((abs‘𝐴)↑𝑘)) < ((((abs‘𝐴) + 1) / 2)↑𝑘))) ∧ 𝑚 ∈ ℕ0) → 𝑚 ∈ ℕ0)
10098, 99reexpcld 13237 . . . . . . . . 9 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ (𝑛 ∈ ℕ0 ∧ ∀𝑘 ∈ (ℤ𝑛)(𝑘 · ((abs‘𝐴)↑𝑘)) < ((((abs‘𝐴) + 1) / 2)↑𝑘))) ∧ 𝑚 ∈ ℕ0) → ((((abs‘𝐴) + 1) / 2)↑𝑚) ∈ ℝ)
10197, 100eqeltrd 2844 . . . . . . . 8 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ (𝑛 ∈ ℕ0 ∧ ∀𝑘 ∈ (ℤ𝑛)(𝑘 · ((abs‘𝐴)↑𝑘)) < ((((abs‘𝐴) + 1) / 2)↑𝑘))) ∧ 𝑚 ∈ ℕ0) → ((𝑘 ∈ ℕ0 ↦ ((((abs‘𝐴) + 1) / 2)↑𝑘))‘𝑚) ∈ ℝ)
102 id 22 . . . . . . . . . . . 12 (𝑘 = 𝑚𝑘 = 𝑚)
103 oveq2 6854 . . . . . . . . . . . 12 (𝑘 = 𝑚 → (𝐴𝑘) = (𝐴𝑚))
104102, 103oveq12d 6864 . . . . . . . . . . 11 (𝑘 = 𝑚 → (𝑘 · (𝐴𝑘)) = (𝑚 · (𝐴𝑚)))
105 ovex 6878 . . . . . . . . . . 11 (𝑚 · (𝐴𝑚)) ∈ V
106104, 1, 105fvmpt 6475 . . . . . . . . . 10 (𝑚 ∈ ℕ0 → (𝐹𝑚) = (𝑚 · (𝐴𝑚)))
107106adantl 473 . . . . . . . . 9 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ (𝑛 ∈ ℕ0 ∧ ∀𝑘 ∈ (ℤ𝑛)(𝑘 · ((abs‘𝐴)↑𝑘)) < ((((abs‘𝐴) + 1) / 2)↑𝑘))) ∧ 𝑚 ∈ ℕ0) → (𝐹𝑚) = (𝑚 · (𝐴𝑚)))
108 nn0cn 11553 . . . . . . . . . . 11 (𝑚 ∈ ℕ0𝑚 ∈ ℂ)
109108adantl 473 . . . . . . . . . 10 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ (𝑛 ∈ ℕ0 ∧ ∀𝑘 ∈ (ℤ𝑛)(𝑘 · ((abs‘𝐴)↑𝑘)) < ((((abs‘𝐴) + 1) / 2)↑𝑘))) ∧ 𝑚 ∈ ℕ0) → 𝑚 ∈ ℂ)
110 simpll 783 . . . . . . . . . . 11 (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ (𝑛 ∈ ℕ0 ∧ ∀𝑘 ∈ (ℤ𝑛)(𝑘 · ((abs‘𝐴)↑𝑘)) < ((((abs‘𝐴) + 1) / 2)↑𝑘))) → 𝐴 ∈ ℂ)
111 expcl 13090 . . . . . . . . . . 11 ((𝐴 ∈ ℂ ∧ 𝑚 ∈ ℕ0) → (𝐴𝑚) ∈ ℂ)
112110, 111sylan 575 . . . . . . . . . 10 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ (𝑛 ∈ ℕ0 ∧ ∀𝑘 ∈ (ℤ𝑛)(𝑘 · ((abs‘𝐴)↑𝑘)) < ((((abs‘𝐴) + 1) / 2)↑𝑘))) ∧ 𝑚 ∈ ℕ0) → (𝐴𝑚) ∈ ℂ)
113109, 112mulcld 10318 . . . . . . . . 9 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ (𝑛 ∈ ℕ0 ∧ ∀𝑘 ∈ (ℤ𝑛)(𝑘 · ((abs‘𝐴)↑𝑘)) < ((((abs‘𝐴) + 1) / 2)↑𝑘))) ∧ 𝑚 ∈ ℕ0) → (𝑚 · (𝐴𝑚)) ∈ ℂ)
114107, 113eqeltrd 2844 . . . . . . . 8 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ (𝑛 ∈ ℕ0 ∧ ∀𝑘 ∈ (ℤ𝑛)(𝑘 · ((abs‘𝐴)↑𝑘)) < ((((abs‘𝐴) + 1) / 2)↑𝑘))) ∧ 𝑚 ∈ ℕ0) → (𝐹𝑚) ∈ ℂ)
115 0red 10301 . . . . . . . . . . . . . 14 ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → 0 ∈ ℝ)
116 absge0 14326 . . . . . . . . . . . . . . . 16 (𝐴 ∈ ℂ → 0 ≤ (abs‘𝐴))
117116adantr 472 . . . . . . . . . . . . . . 15 ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → 0 ≤ (abs‘𝐴))
118115, 40, 43, 117, 54lelttrd 10453 . . . . . . . . . . . . . 14 ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → 0 < (((abs‘𝐴) + 1) / 2))
119115, 43, 118ltled 10443 . . . . . . . . . . . . 13 ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → 0 ≤ (((abs‘𝐴) + 1) / 2))
12043, 119absidd 14460 . . . . . . . . . . . 12 ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → (abs‘(((abs‘𝐴) + 1) / 2)) = (((abs‘𝐴) + 1) / 2))
121 avglt2 11521 . . . . . . . . . . . . . 14 (((abs‘𝐴) ∈ ℝ ∧ 1 ∈ ℝ) → ((abs‘𝐴) < 1 ↔ (((abs‘𝐴) + 1) / 2) < 1))
12240, 51, 121sylancl 580 . . . . . . . . . . . . 13 ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → ((abs‘𝐴) < 1 ↔ (((abs‘𝐴) + 1) / 2) < 1))
12350, 122mpbid 223 . . . . . . . . . . . 12 ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → (((abs‘𝐴) + 1) / 2) < 1)
124120, 123eqbrtrd 4833 . . . . . . . . . . 11 ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → (abs‘(((abs‘𝐴) + 1) / 2)) < 1)
125 oveq2 6854 . . . . . . . . . . . . 13 (𝑘 = 𝑛 → ((((abs‘𝐴) + 1) / 2)↑𝑘) = ((((abs‘𝐴) + 1) / 2)↑𝑛))
126 ovex 6878 . . . . . . . . . . . . 13 ((((abs‘𝐴) + 1) / 2)↑𝑛) ∈ V
127125, 94, 126fvmpt 6475 . . . . . . . . . . . 12 (𝑛 ∈ ℕ0 → ((𝑘 ∈ ℕ0 ↦ ((((abs‘𝐴) + 1) / 2)↑𝑘))‘𝑛) = ((((abs‘𝐴) + 1) / 2)↑𝑛))
128127adantl 473 . . . . . . . . . . 11 (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑛 ∈ ℕ0) → ((𝑘 ∈ ℕ0 ↦ ((((abs‘𝐴) + 1) / 2)↑𝑘))‘𝑛) = ((((abs‘𝐴) + 1) / 2)↑𝑛))
12965, 124, 128geolim 14899 . . . . . . . . . 10 ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → seq0( + , (𝑘 ∈ ℕ0 ↦ ((((abs‘𝐴) + 1) / 2)↑𝑘))) ⇝ (1 / (1 − (((abs‘𝐴) + 1) / 2))))
130 seqex 13015 . . . . . . . . . . 11 seq0( + , (𝑘 ∈ ℕ0 ↦ ((((abs‘𝐴) + 1) / 2)↑𝑘))) ∈ V
131 ovex 6878 . . . . . . . . . . 11 (1 / (1 − (((abs‘𝐴) + 1) / 2))) ∈ V
132130, 131breldm 5499 . . . . . . . . . 10 (seq0( + , (𝑘 ∈ ℕ0 ↦ ((((abs‘𝐴) + 1) / 2)↑𝑘))) ⇝ (1 / (1 − (((abs‘𝐴) + 1) / 2))) → seq0( + , (𝑘 ∈ ℕ0 ↦ ((((abs‘𝐴) + 1) / 2)↑𝑘))) ∈ dom ⇝ )
133129, 132syl 17 . . . . . . . . 9 ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → seq0( + , (𝑘 ∈ ℕ0 ↦ ((((abs‘𝐴) + 1) / 2)↑𝑘))) ∈ dom ⇝ )
134133adantr 472 . . . . . . . 8 (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ (𝑛 ∈ ℕ0 ∧ ∀𝑘 ∈ (ℤ𝑛)(𝑘 · ((abs‘𝐴)↑𝑘)) < ((((abs‘𝐴) + 1) / 2)↑𝑘))) → seq0( + , (𝑘 ∈ ℕ0 ↦ ((((abs‘𝐴) + 1) / 2)↑𝑘))) ∈ dom ⇝ )
135 1red 10298 . . . . . . . 8 (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ (𝑛 ∈ ℕ0 ∧ ∀𝑘 ∈ (ℤ𝑛)(𝑘 · ((abs‘𝐴)↑𝑘)) < ((((abs‘𝐴) + 1) / 2)↑𝑘))) → 1 ∈ ℝ)
136 eluznn0 11963 . . . . . . . . . . . . . 14 ((𝑛 ∈ ℕ0𝑚 ∈ (ℤ𝑛)) → 𝑚 ∈ ℕ0)
13792, 136sylan 575 . . . . . . . . . . . . 13 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ (𝑛 ∈ ℕ0 ∧ ∀𝑘 ∈ (ℤ𝑛)(𝑘 · ((abs‘𝐴)↑𝑘)) < ((((abs‘𝐴) + 1) / 2)↑𝑘))) ∧ 𝑚 ∈ (ℤ𝑛)) → 𝑚 ∈ ℕ0)
138137nn0red 11603 . . . . . . . . . . . 12 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ (𝑛 ∈ ℕ0 ∧ ∀𝑘 ∈ (ℤ𝑛)(𝑘 · ((abs‘𝐴)↑𝑘)) < ((((abs‘𝐴) + 1) / 2)↑𝑘))) ∧ 𝑚 ∈ (ℤ𝑛)) → 𝑚 ∈ ℝ)
139 simplll 791 . . . . . . . . . . . . . 14 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ (𝑛 ∈ ℕ0 ∧ ∀𝑘 ∈ (ℤ𝑛)(𝑘 · ((abs‘𝐴)↑𝑘)) < ((((abs‘𝐴) + 1) / 2)↑𝑘))) ∧ 𝑚 ∈ (ℤ𝑛)) → 𝐴 ∈ ℂ)
140139abscld 14474 . . . . . . . . . . . . 13 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ (𝑛 ∈ ℕ0 ∧ ∀𝑘 ∈ (ℤ𝑛)(𝑘 · ((abs‘𝐴)↑𝑘)) < ((((abs‘𝐴) + 1) / 2)↑𝑘))) ∧ 𝑚 ∈ (ℤ𝑛)) → (abs‘𝐴) ∈ ℝ)
141140, 137reexpcld 13237 . . . . . . . . . . . 12 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ (𝑛 ∈ ℕ0 ∧ ∀𝑘 ∈ (ℤ𝑛)(𝑘 · ((abs‘𝐴)↑𝑘)) < ((((abs‘𝐴) + 1) / 2)↑𝑘))) ∧ 𝑚 ∈ (ℤ𝑛)) → ((abs‘𝐴)↑𝑚) ∈ ℝ)
142138, 141remulcld 10328 . . . . . . . . . . 11 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ (𝑛 ∈ ℕ0 ∧ ∀𝑘 ∈ (ℤ𝑛)(𝑘 · ((abs‘𝐴)↑𝑘)) < ((((abs‘𝐴) + 1) / 2)↑𝑘))) ∧ 𝑚 ∈ (ℤ𝑛)) → (𝑚 · ((abs‘𝐴)↑𝑚)) ∈ ℝ)
143137, 100syldan 585 . . . . . . . . . . 11 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ (𝑛 ∈ ℕ0 ∧ ∀𝑘 ∈ (ℤ𝑛)(𝑘 · ((abs‘𝐴)↑𝑘)) < ((((abs‘𝐴) + 1) / 2)↑𝑘))) ∧ 𝑚 ∈ (ℤ𝑛)) → ((((abs‘𝐴) + 1) / 2)↑𝑚) ∈ ℝ)
144 simprr 789 . . . . . . . . . . . 12 (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ (𝑛 ∈ ℕ0 ∧ ∀𝑘 ∈ (ℤ𝑛)(𝑘 · ((abs‘𝐴)↑𝑘)) < ((((abs‘𝐴) + 1) / 2)↑𝑘))) → ∀𝑘 ∈ (ℤ𝑛)(𝑘 · ((abs‘𝐴)↑𝑘)) < ((((abs‘𝐴) + 1) / 2)↑𝑘))
145 oveq2 6854 . . . . . . . . . . . . . . 15 (𝑘 = 𝑚 → ((abs‘𝐴)↑𝑘) = ((abs‘𝐴)↑𝑚))
146102, 145oveq12d 6864 . . . . . . . . . . . . . 14 (𝑘 = 𝑚 → (𝑘 · ((abs‘𝐴)↑𝑘)) = (𝑚 · ((abs‘𝐴)↑𝑚)))
147146, 93breq12d 4824 . . . . . . . . . . . . 13 (𝑘 = 𝑚 → ((𝑘 · ((abs‘𝐴)↑𝑘)) < ((((abs‘𝐴) + 1) / 2)↑𝑘) ↔ (𝑚 · ((abs‘𝐴)↑𝑚)) < ((((abs‘𝐴) + 1) / 2)↑𝑚)))
148147rspccva 3461 . . . . . . . . . . . 12 ((∀𝑘 ∈ (ℤ𝑛)(𝑘 · ((abs‘𝐴)↑𝑘)) < ((((abs‘𝐴) + 1) / 2)↑𝑘) ∧ 𝑚 ∈ (ℤ𝑛)) → (𝑚 · ((abs‘𝐴)↑𝑚)) < ((((abs‘𝐴) + 1) / 2)↑𝑚))
149144, 148sylan 575 . . . . . . . . . . 11 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ (𝑛 ∈ ℕ0 ∧ ∀𝑘 ∈ (ℤ𝑛)(𝑘 · ((abs‘𝐴)↑𝑘)) < ((((abs‘𝐴) + 1) / 2)↑𝑘))) ∧ 𝑚 ∈ (ℤ𝑛)) → (𝑚 · ((abs‘𝐴)↑𝑚)) < ((((abs‘𝐴) + 1) / 2)↑𝑚))
150142, 143, 149ltled 10443 . . . . . . . . . 10 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ (𝑛 ∈ ℕ0 ∧ ∀𝑘 ∈ (ℤ𝑛)(𝑘 · ((abs‘𝐴)↑𝑘)) < ((((abs‘𝐴) + 1) / 2)↑𝑘))) ∧ 𝑚 ∈ (ℤ𝑛)) → (𝑚 · ((abs‘𝐴)↑𝑚)) ≤ ((((abs‘𝐴) + 1) / 2)↑𝑚))
151137nn0cnd 11604 . . . . . . . . . . . 12 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ (𝑛 ∈ ℕ0 ∧ ∀𝑘 ∈ (ℤ𝑛)(𝑘 · ((abs‘𝐴)↑𝑘)) < ((((abs‘𝐴) + 1) / 2)↑𝑘))) ∧ 𝑚 ∈ (ℤ𝑛)) → 𝑚 ∈ ℂ)
152139, 137expcld 13220 . . . . . . . . . . . 12 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ (𝑛 ∈ ℕ0 ∧ ∀𝑘 ∈ (ℤ𝑛)(𝑘 · ((abs‘𝐴)↑𝑘)) < ((((abs‘𝐴) + 1) / 2)↑𝑘))) ∧ 𝑚 ∈ (ℤ𝑛)) → (𝐴𝑚) ∈ ℂ)
153151, 152absmuld 14492 . . . . . . . . . . 11 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ (𝑛 ∈ ℕ0 ∧ ∀𝑘 ∈ (ℤ𝑛)(𝑘 · ((abs‘𝐴)↑𝑘)) < ((((abs‘𝐴) + 1) / 2)↑𝑘))) ∧ 𝑚 ∈ (ℤ𝑛)) → (abs‘(𝑚 · (𝐴𝑚))) = ((abs‘𝑚) · (abs‘(𝐴𝑚))))
154137nn0ge0d 11605 . . . . . . . . . . . . 13 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ (𝑛 ∈ ℕ0 ∧ ∀𝑘 ∈ (ℤ𝑛)(𝑘 · ((abs‘𝐴)↑𝑘)) < ((((abs‘𝐴) + 1) / 2)↑𝑘))) ∧ 𝑚 ∈ (ℤ𝑛)) → 0 ≤ 𝑚)
155138, 154absidd 14460 . . . . . . . . . . . 12 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ (𝑛 ∈ ℕ0 ∧ ∀𝑘 ∈ (ℤ𝑛)(𝑘 · ((abs‘𝐴)↑𝑘)) < ((((abs‘𝐴) + 1) / 2)↑𝑘))) ∧ 𝑚 ∈ (ℤ𝑛)) → (abs‘𝑚) = 𝑚)
156139, 137absexpd 14490 . . . . . . . . . . . 12 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ (𝑛 ∈ ℕ0 ∧ ∀𝑘 ∈ (ℤ𝑛)(𝑘 · ((abs‘𝐴)↑𝑘)) < ((((abs‘𝐴) + 1) / 2)↑𝑘))) ∧ 𝑚 ∈ (ℤ𝑛)) → (abs‘(𝐴𝑚)) = ((abs‘𝐴)↑𝑚))
157155, 156oveq12d 6864 . . . . . . . . . . 11 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ (𝑛 ∈ ℕ0 ∧ ∀𝑘 ∈ (ℤ𝑛)(𝑘 · ((abs‘𝐴)↑𝑘)) < ((((abs‘𝐴) + 1) / 2)↑𝑘))) ∧ 𝑚 ∈ (ℤ𝑛)) → ((abs‘𝑚) · (abs‘(𝐴𝑚))) = (𝑚 · ((abs‘𝐴)↑𝑚)))
158153, 157eqtrd 2799 . . . . . . . . . 10 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ (𝑛 ∈ ℕ0 ∧ ∀𝑘 ∈ (ℤ𝑛)(𝑘 · ((abs‘𝐴)↑𝑘)) < ((((abs‘𝐴) + 1) / 2)↑𝑘))) ∧ 𝑚 ∈ (ℤ𝑛)) → (abs‘(𝑚 · (𝐴𝑚))) = (𝑚 · ((abs‘𝐴)↑𝑚)))
159143recnd 10326 . . . . . . . . . . 11 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ (𝑛 ∈ ℕ0 ∧ ∀𝑘 ∈ (ℤ𝑛)(𝑘 · ((abs‘𝐴)↑𝑘)) < ((((abs‘𝐴) + 1) / 2)↑𝑘))) ∧ 𝑚 ∈ (ℤ𝑛)) → ((((abs‘𝐴) + 1) / 2)↑𝑚) ∈ ℂ)
160159mulid2d 10316 . . . . . . . . . 10 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ (𝑛 ∈ ℕ0 ∧ ∀𝑘 ∈ (ℤ𝑛)(𝑘 · ((abs‘𝐴)↑𝑘)) < ((((abs‘𝐴) + 1) / 2)↑𝑘))) ∧ 𝑚 ∈ (ℤ𝑛)) → (1 · ((((abs‘𝐴) + 1) / 2)↑𝑚)) = ((((abs‘𝐴) + 1) / 2)↑𝑚))
161150, 158, 1603brtr4d 4843 . . . . . . . . 9 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ (𝑛 ∈ ℕ0 ∧ ∀𝑘 ∈ (ℤ𝑛)(𝑘 · ((abs‘𝐴)↑𝑘)) < ((((abs‘𝐴) + 1) / 2)↑𝑘))) ∧ 𝑚 ∈ (ℤ𝑛)) → (abs‘(𝑚 · (𝐴𝑚))) ≤ (1 · ((((abs‘𝐴) + 1) / 2)↑𝑚)))
162137, 106syl 17 . . . . . . . . . 10 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ (𝑛 ∈ ℕ0 ∧ ∀𝑘 ∈ (ℤ𝑛)(𝑘 · ((abs‘𝐴)↑𝑘)) < ((((abs‘𝐴) + 1) / 2)↑𝑘))) ∧ 𝑚 ∈ (ℤ𝑛)) → (𝐹𝑚) = (𝑚 · (𝐴𝑚)))
163162fveq2d 6383 . . . . . . . . 9 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ (𝑛 ∈ ℕ0 ∧ ∀𝑘 ∈ (ℤ𝑛)(𝑘 · ((abs‘𝐴)↑𝑘)) < ((((abs‘𝐴) + 1) / 2)↑𝑘))) ∧ 𝑚 ∈ (ℤ𝑛)) → (abs‘(𝐹𝑚)) = (abs‘(𝑚 · (𝐴𝑚))))
164137, 96syl 17 . . . . . . . . . 10 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ (𝑛 ∈ ℕ0 ∧ ∀𝑘 ∈ (ℤ𝑛)(𝑘 · ((abs‘𝐴)↑𝑘)) < ((((abs‘𝐴) + 1) / 2)↑𝑘))) ∧ 𝑚 ∈ (ℤ𝑛)) → ((𝑘 ∈ ℕ0 ↦ ((((abs‘𝐴) + 1) / 2)↑𝑘))‘𝑚) = ((((abs‘𝐴) + 1) / 2)↑𝑚))
165164oveq2d 6862 . . . . . . . . 9 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ (𝑛 ∈ ℕ0 ∧ ∀𝑘 ∈ (ℤ𝑛)(𝑘 · ((abs‘𝐴)↑𝑘)) < ((((abs‘𝐴) + 1) / 2)↑𝑘))) ∧ 𝑚 ∈ (ℤ𝑛)) → (1 · ((𝑘 ∈ ℕ0 ↦ ((((abs‘𝐴) + 1) / 2)↑𝑘))‘𝑚)) = (1 · ((((abs‘𝐴) + 1) / 2)↑𝑚)))
166161, 163, 1653brtr4d 4843 . . . . . . . 8 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ (𝑛 ∈ ℕ0 ∧ ∀𝑘 ∈ (ℤ𝑛)(𝑘 · ((abs‘𝐴)↑𝑘)) < ((((abs‘𝐴) + 1) / 2)↑𝑘))) ∧ 𝑚 ∈ (ℤ𝑛)) → (abs‘(𝐹𝑚)) ≤ (1 · ((𝑘 ∈ ℕ0 ↦ ((((abs‘𝐴) + 1) / 2)↑𝑘))‘𝑚)))
16725, 92, 101, 114, 134, 135, 166cvgcmpce 14848 . . . . . . 7 (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ (𝑛 ∈ ℕ0 ∧ ∀𝑘 ∈ (ℤ𝑛)(𝑘 · ((abs‘𝐴)↑𝑘)) < ((((abs‘𝐴) + 1) / 2)↑𝑘))) → seq0( + , 𝐹) ∈ dom ⇝ )
168167expr 448 . . . . . 6 (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑛 ∈ ℕ0) → (∀𝑘 ∈ (ℤ𝑛)(𝑘 · ((abs‘𝐴)↑𝑘)) < ((((abs‘𝐴) + 1) / 2)↑𝑘) → seq0( + , 𝐹) ∈ dom ⇝ ))
169168adantlr 706 . . . . 5 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝐴 ≠ 0) ∧ 𝑛 ∈ ℕ0) → (∀𝑘 ∈ (ℤ𝑛)(𝑘 · ((abs‘𝐴)↑𝑘)) < ((((abs‘𝐴) + 1) / 2)↑𝑘) → seq0( + , 𝐹) ∈ dom ⇝ ))
17091, 169sylbid 231 . . . 4 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝐴 ≠ 0) ∧ 𝑛 ∈ ℕ0) → (∀𝑘 ∈ (ℤ𝑛)(1 · 𝑘) < (((((abs‘𝐴) + 1) / 2) / (abs‘𝐴))↑𝑘) → seq0( + , 𝐹) ∈ dom ⇝ ))
171170rexlimdva 3178 . . 3 (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝐴 ≠ 0) → (∃𝑛 ∈ ℕ0𝑘 ∈ (ℤ𝑛)(1 · 𝑘) < (((((abs‘𝐴) + 1) / 2) / (abs‘𝐴))↑𝑘) → seq0( + , 𝐹) ∈ dom ⇝ ))
17260, 171mpd 15 . 2 (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝐴 ≠ 0) → seq0( + , 𝐹) ∈ dom ⇝ )
17337, 172pm2.61dane 3024 1 ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → seq0( + , 𝐹) ∈ dom ⇝ )
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 197  wa 384  wo 873   = wceq 1652  wcel 2155  wne 2937  wral 3055  wrex 3056  {csn 4336   class class class wbr 4811  cmpt 4890   × cxp 5277  dom cdm 5279  cfv 6070  (class class class)co 6846  cc 10191  cr 10192  0cc0 10193  1c1 10194   + caddc 10196   · cmul 10198   < clt 10332  cle 10333  cmin 10524   / cdiv 10942  cn 11278  2c2 11331  0cn0 11542  cz 11628  cuz 11891  +crp 12033  seqcseq 13013  cexp 13072  abscabs 14273  cli 14514
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1890  ax-4 1904  ax-5 2005  ax-6 2070  ax-7 2105  ax-8 2157  ax-9 2164  ax-10 2183  ax-11 2198  ax-12 2211  ax-13 2352  ax-ext 2743  ax-rep 4932  ax-sep 4943  ax-nul 4951  ax-pow 5003  ax-pr 5064  ax-un 7151  ax-inf2 8757  ax-cnex 10249  ax-resscn 10250  ax-1cn 10251  ax-icn 10252  ax-addcl 10253  ax-addrcl 10254  ax-mulcl 10255  ax-mulrcl 10256  ax-mulcom 10257  ax-addass 10258  ax-mulass 10259  ax-distr 10260  ax-i2m1 10261  ax-1ne0 10262  ax-1rid 10263  ax-rnegex 10264  ax-rrecex 10265  ax-cnre 10266  ax-pre-lttri 10267  ax-pre-lttrn 10268  ax-pre-ltadd 10269  ax-pre-mulgt0 10270  ax-pre-sup 10271  ax-addf 10272  ax-mulf 10273
This theorem depends on definitions:  df-bi 198  df-an 385  df-or 874  df-3or 1108  df-3an 1109  df-tru 1656  df-fal 1666  df-ex 1875  df-nf 1879  df-sb 2063  df-mo 2565  df-eu 2582  df-clab 2752  df-cleq 2758  df-clel 2761  df-nfc 2896  df-ne 2938  df-nel 3041  df-ral 3060  df-rex 3061  df-reu 3062  df-rmo 3063  df-rab 3064  df-v 3352  df-sbc 3599  df-csb 3694  df-dif 3737  df-un 3739  df-in 3741  df-ss 3748  df-pss 3750  df-nul 4082  df-if 4246  df-pw 4319  df-sn 4337  df-pr 4339  df-tp 4341  df-op 4343  df-uni 4597  df-int 4636  df-iun 4680  df-br 4812  df-opab 4874  df-mpt 4891  df-tr 4914  df-id 5187  df-eprel 5192  df-po 5200  df-so 5201  df-fr 5238  df-se 5239  df-we 5240  df-xp 5285  df-rel 5286  df-cnv 5287  df-co 5288  df-dm 5289  df-rn 5290  df-res 5291  df-ima 5292  df-pred 5867  df-ord 5913  df-on 5914  df-lim 5915  df-suc 5916  df-iota 6033  df-fun 6072  df-fn 6073  df-f 6074  df-f1 6075  df-fo 6076  df-f1o 6077  df-fv 6078  df-isom 6079  df-riota 6807  df-ov 6849  df-oprab 6850  df-mpt2 6851  df-om 7268  df-1st 7370  df-2nd 7371  df-wrecs 7614  df-recs 7676  df-rdg 7714  df-1o 7768  df-oadd 7772  df-er 7951  df-pm 8067  df-en 8165  df-dom 8166  df-sdom 8167  df-fin 8168  df-sup 8559  df-inf 8560  df-oi 8626  df-card 9020  df-pnf 10334  df-mnf 10335  df-xr 10336  df-ltxr 10337  df-le 10338  df-sub 10526  df-neg 10527  df-div 10943  df-nn 11279  df-2 11339  df-3 11340  df-n0 11543  df-z 11629  df-uz 11892  df-rp 12034  df-ico 12388  df-fz 12539  df-fzo 12679  df-fl 12806  df-seq 13014  df-exp 13073  df-hash 13327  df-cj 14138  df-re 14139  df-im 14140  df-sqrt 14274  df-abs 14275  df-limsup 14501  df-clim 14518  df-rlim 14519  df-sum 14716
This theorem is referenced by:  radcnvlem1  24472
  Copyright terms: Public domain W3C validator