Metamath Proof Explorer


Theorem abelthlem6

Description: Lemma for abelth . (Contributed by Mario Carneiro, 2-Apr-2015)

Ref Expression
Hypotheses abelth.1 ⊢ φ → A : ℕ 0 ⟶ ℂ
abelth.2 ⊢ φ → seq 0 + A ∈ dom ⁡ ⇝
abelth.3 ⊢ φ → M ∈ ℝ
abelth.4 ⊢ φ → 0 ≤ M
abelth.5 ⊢ S = z ∈ ℂ | 1 − z ≤ M ⁢ 1 − z
abelth.6 ⊢ F = x ∈ S ⟼ ∑ n ∈ ℕ 0 A ⁡ n ⁢ x n
abelth.7 ⊢ φ → seq 0 + A ⇝ 0
abelthlem6.1 ⊢ φ → X ∈ S ∖ 1
Assertion abelthlem6 ⊢ φ → F ⁡ X = 1 − X ⁢ ∑ n ∈ ℕ 0 seq 0 + A ⁡ n ⁢ X n

Proof

Step Hyp Ref Expression
1 abelth.1 ⊢ φ → A : ℕ 0 ⟶ ℂ
2 abelth.2 ⊢ φ → seq 0 + A ∈ dom ⁡ ⇝
3 abelth.3 ⊢ φ → M ∈ ℝ
4 abelth.4 ⊢ φ → 0 ≤ M
5 abelth.5 ⊢ S = z ∈ ℂ | 1 − z ≤ M ⁢ 1 − z
6 abelth.6 ⊢ F = x ∈ S ⟼ ∑ n ∈ ℕ 0 A ⁡ n ⁢ x n
7 abelth.7 ⊢ φ → seq 0 + A ⇝ 0
8 abelthlem6.1 ⊢ φ → X ∈ S ∖ 1
9 8 eldifad ⊢ φ → X ∈ S
10 oveq1 ⊢ x = X → x n = X n
11 10 oveq2d ⊢ x = X → A ⁡ n ⁢ x n = A ⁡ n ⁢ X n
12 11 sumeq2sdv ⊢ x = X → ∑ n ∈ ℕ 0 A ⁡ n ⁢ x n = ∑ n ∈ ℕ 0 A ⁡ n ⁢ X n
13 sumex ⊢ ∑ n ∈ ℕ 0 A ⁡ n ⁢ X n ∈ V
14 12 6 13 fvmpt ⊢ X ∈ S → F ⁡ X = ∑ n ∈ ℕ 0 A ⁡ n ⁢ X n
15 9 14 syl ⊢ φ → F ⁡ X = ∑ n ∈ ℕ 0 A ⁡ n ⁢ X n
16 nn0uz ⊢ ℕ 0 = ℤ ≥ 0
17 0zd ⊢ φ → 0 ∈ ℤ
18 fveq2 ⊢ k = n → A ⁡ k = A ⁡ n
19 oveq2 ⊢ k = n → X k = X n
20 18 19 oveq12d ⊢ k = n → A ⁡ k ⁢ X k = A ⁡ n ⁢ X n
21 eqid ⊢ k ∈ ℕ 0 ⟼ A ⁡ k ⁢ X k = k ∈ ℕ 0 ⟼ A ⁡ k ⁢ X k
22 ovex ⊢ A ⁡ n ⁢ X n ∈ V
23 20 21 22 fvmpt ⊢ n ∈ ℕ 0 → k ∈ ℕ 0 ⟼ A ⁡ k ⁢ X k ⁡ n = A ⁡ n ⁢ X n
24 23 adantl ⊢ φ ∧ n ∈ ℕ 0 → k ∈ ℕ 0 ⟼ A ⁡ k ⁢ X k ⁡ n = A ⁡ n ⁢ X n
25 1 ffvelcdmda ⊢ φ ∧ n ∈ ℕ 0 → A ⁡ n ∈ ℂ
26 5 ssrab3 ⊢ S ⊆ ℂ
27 26 9 sselid ⊢ φ → X ∈ ℂ
28 expcl ⊢ X ∈ ℂ ∧ n ∈ ℕ 0 → X n ∈ ℂ
29 27 28 sylan ⊢ φ ∧ n ∈ ℕ 0 → X n ∈ ℂ
30 25 29 mulcld ⊢ φ ∧ n ∈ ℕ 0 → A ⁡ n ⁢ X n ∈ ℂ
31 fveq2 ⊢ k = n → seq 0 + A ⁡ k = seq 0 + A ⁡ n
32 31 19 oveq12d ⊢ k = n → seq 0 + A ⁡ k ⁢ X k = seq 0 + A ⁡ n ⁢ X n
33 eqid ⊢ k ∈ ℕ 0 ⟼ seq 0 + A ⁡ k ⁢ X k = k ∈ ℕ 0 ⟼ seq 0 + A ⁡ k ⁢ X k
34 ovex ⊢ seq 0 + A ⁡ n ⁢ X n ∈ V
35 32 33 34 fvmpt ⊢ n ∈ ℕ 0 → k ∈ ℕ 0 ⟼ seq 0 + A ⁡ k ⁢ X k ⁡ n = seq 0 + A ⁡ n ⁢ X n
36 35 adantl ⊢ φ ∧ n ∈ ℕ 0 → k ∈ ℕ 0 ⟼ seq 0 + A ⁡ k ⁢ X k ⁡ n = seq 0 + A ⁡ n ⁢ X n
37 16 17 25 serf ⊢ φ → seq 0 + A : ℕ 0 ⟶ ℂ
38 37 ffvelcdmda ⊢ φ ∧ n ∈ ℕ 0 → seq 0 + A ⁡ n ∈ ℂ
39 38 29 mulcld ⊢ φ ∧ n ∈ ℕ 0 → seq 0 + A ⁡ n ⁢ X n ∈ ℂ
40 1 2 3 4 5 abelthlem2 ⊢ φ → 1 ∈ S ∧ S ∖ 1 ⊆ 0 ball ⁡ abs ∘ − 1
41 40 simprd ⊢ φ → S ∖ 1 ⊆ 0 ball ⁡ abs ∘ − 1
42 41 8 sseldd ⊢ φ → X ∈ 0 ball ⁡ abs ∘ − 1
43 1 2 3 4 5 6 7 abelthlem5 ⊢ φ ∧ X ∈ 0 ball ⁡ abs ∘ − 1 → seq 0 + k ∈ ℕ 0 ⟼ seq 0 + A ⁡ k ⁢ X k ∈ dom ⁡ ⇝
44 42 43 mpdan ⊢ φ → seq 0 + k ∈ ℕ 0 ⟼ seq 0 + A ⁡ k ⁢ X k ∈ dom ⁡ ⇝
45 16 17 36 39 44 isumclim2 ⊢ φ → seq 0 + k ∈ ℕ 0 ⟼ seq 0 + A ⁡ k ⁢ X k ⇝ ∑ n ∈ ℕ 0 seq 0 + A ⁡ n ⁢ X n
46 seqex ⊢ seq 0 + k ∈ ℕ 0 ⟼ A ⁡ k ⁢ X k ∈ V
47 46 a1i ⊢ φ → seq 0 + k ∈ ℕ 0 ⟼ A ⁡ k ⁢ X k ∈ V
48 0nn0 ⊢ 0 ∈ ℕ 0
49 48 a1i ⊢ φ → 0 ∈ ℕ 0
50 oveq1 ⊢ k = i → k − 1 = i − 1
51 50 oveq2d ⊢ k = i → 0 … k − 1 = 0 … i − 1
52 51 sumeq1d ⊢ k = i → ∑ m = 0 k − 1 A ⁡ m = ∑ m = 0 i − 1 A ⁡ m
53 oveq2 ⊢ k = i → X k = X i
54 52 53 oveq12d ⊢ k = i → ∑ m = 0 k − 1 A ⁡ m ⁢ X k = ∑ m = 0 i − 1 A ⁡ m ⁢ X i
55 eqid ⊢ k ∈ ℕ 0 ⟼ ∑ m = 0 k − 1 A ⁡ m ⁢ X k = k ∈ ℕ 0 ⟼ ∑ m = 0 k − 1 A ⁡ m ⁢ X k
56 ovex ⊢ ∑ m = 0 i − 1 A ⁡ m ⁢ X i ∈ V
57 54 55 56 fvmpt ⊢ i ∈ ℕ 0 → k ∈ ℕ 0 ⟼ ∑ m = 0 k − 1 A ⁡ m ⁢ X k ⁡ i = ∑ m = 0 i − 1 A ⁡ m ⁢ X i
58 57 adantl ⊢ φ ∧ i ∈ ℕ 0 → k ∈ ℕ 0 ⟼ ∑ m = 0 k − 1 A ⁡ m ⁢ X k ⁡ i = ∑ m = 0 i − 1 A ⁡ m ⁢ X i
59 fzfid ⊢ φ ∧ i ∈ ℕ 0 → 0 … i − 1 ∈ Fin
60 1 adantr ⊢ φ ∧ i ∈ ℕ 0 → A : ℕ 0 ⟶ ℂ
61 elfznn0 ⊢ m ∈ 0 … i − 1 → m ∈ ℕ 0
62 ffvelcdm ⊢ A : ℕ 0 ⟶ ℂ ∧ m ∈ ℕ 0 → A ⁡ m ∈ ℂ
63 60 61 62 syl2an ⊢ φ ∧ i ∈ ℕ 0 ∧ m ∈ 0 … i − 1 → A ⁡ m ∈ ℂ
64 59 63 fsumcl ⊢ φ ∧ i ∈ ℕ 0 → ∑ m = 0 i − 1 A ⁡ m ∈ ℂ
65 expcl ⊢ X ∈ ℂ ∧ i ∈ ℕ 0 → X i ∈ ℂ
66 27 65 sylan ⊢ φ ∧ i ∈ ℕ 0 → X i ∈ ℂ
67 64 66 mulcld ⊢ φ ∧ i ∈ ℕ 0 → ∑ m = 0 i − 1 A ⁡ m ⁢ X i ∈ ℂ
68 58 67 eqeltrd ⊢ φ ∧ i ∈ ℕ 0 → k ∈ ℕ 0 ⟼ ∑ m = 0 k − 1 A ⁡ m ⁢ X k ⁡ i ∈ ℂ
69 17 peano2zd ⊢ φ → 0 + 1 ∈ ℤ
70 nnuz ⊢ ℕ = ℤ ≥ 1
71 1e0p1 ⊢ 1 = 0 + 1
72 71 fveq2i ⊢ ℤ ≥ 1 = ℤ ≥ 0 + 1
73 70 72 eqtri ⊢ ℕ = ℤ ≥ 0 + 1
74 73 eleq2i ⊢ n ∈ ℕ ↔ n ∈ ℤ ≥ 0 + 1
75 nnm1nn0 ⊢ n ∈ ℕ → n − 1 ∈ ℕ 0
76 75 adantl ⊢ φ ∧ n ∈ ℕ → n − 1 ∈ ℕ 0
77 fveq2 ⊢ k = n − 1 → seq 0 + A ⁡ k = seq 0 + A ⁡ n − 1
78 oveq2 ⊢ k = n − 1 → X k = X n − 1
79 77 78 oveq12d ⊢ k = n − 1 → seq 0 + A ⁡ k ⁢ X k = seq 0 + A ⁡ n − 1 ⁢ X n − 1
80 79 oveq2d ⊢ k = n − 1 → X ⁢ seq 0 + A ⁡ k ⁢ X k = X ⁢ seq 0 + A ⁡ n − 1 ⁢ X n − 1
81 eqid ⊢ k ∈ ℕ 0 ⟼ X ⁢ seq 0 + A ⁡ k ⁢ X k = k ∈ ℕ 0 ⟼ X ⁢ seq 0 + A ⁡ k ⁢ X k
82 ovex ⊢ X ⁢ seq 0 + A ⁡ n − 1 ⁢ X n − 1 ∈ V
83 80 81 82 fvmpt ⊢ n − 1 ∈ ℕ 0 → k ∈ ℕ 0 ⟼ X ⁢ seq 0 + A ⁡ k ⁢ X k ⁡ n − 1 = X ⁢ seq 0 + A ⁡ n − 1 ⁢ X n − 1
84 76 83 syl ⊢ φ ∧ n ∈ ℕ → k ∈ ℕ 0 ⟼ X ⁢ seq 0 + A ⁡ k ⁢ X k ⁡ n − 1 = X ⁢ seq 0 + A ⁡ n − 1 ⁢ X n − 1
85 ax-1cn ⊢ 1 ∈ ℂ
86 nncn ⊢ n ∈ ℕ → n ∈ ℂ
87 86 adantl ⊢ φ ∧ n ∈ ℕ → n ∈ ℂ
88 nn0ex ⊢ ℕ 0 ∈ V
89 88 mptex ⊢ k ∈ ℕ 0 ⟼ X ⁢ seq 0 + A ⁡ k ⁢ X k ∈ V
90 89 shftval ⊢ 1 ∈ ℂ ∧ n ∈ ℂ → k ∈ ℕ 0 ⟼ X ⁢ seq 0 + A ⁡ k ⁢ X k shift 1 ⁡ n = k ∈ ℕ 0 ⟼ X ⁢ seq 0 + A ⁡ k ⁢ X k ⁡ n − 1
91 85 87 90 sylancr ⊢ φ ∧ n ∈ ℕ → k ∈ ℕ 0 ⟼ X ⁢ seq 0 + A ⁡ k ⁢ X k shift 1 ⁡ n = k ∈ ℕ 0 ⟼ X ⁢ seq 0 + A ⁡ k ⁢ X k ⁡ n − 1
92 eqidd ⊢ φ ∧ n ∈ ℕ ∧ m ∈ 0 … n − 1 → A ⁡ m = A ⁡ m
93 76 16 eleqtrdi ⊢ φ ∧ n ∈ ℕ → n − 1 ∈ ℤ ≥ 0
94 1 adantr ⊢ φ ∧ n ∈ ℕ → A : ℕ 0 ⟶ ℂ
95 elfznn0 ⊢ m ∈ 0 … n − 1 → m ∈ ℕ 0
96 94 95 62 syl2an ⊢ φ ∧ n ∈ ℕ ∧ m ∈ 0 … n − 1 → A ⁡ m ∈ ℂ
97 92 93 96 fsumser ⊢ φ ∧ n ∈ ℕ → ∑ m = 0 n − 1 A ⁡ m = seq 0 + A ⁡ n − 1
98 expm1t ⊢ X ∈ ℂ ∧ n ∈ ℕ → X n = X n − 1 ⁢ X
99 27 98 sylan ⊢ φ ∧ n ∈ ℕ → X n = X n − 1 ⁢ X
100 27 adantr ⊢ φ ∧ n ∈ ℕ → X ∈ ℂ
101 expcl ⊢ X ∈ ℂ ∧ n − 1 ∈ ℕ 0 → X n − 1 ∈ ℂ
102 27 75 101 syl2an ⊢ φ ∧ n ∈ ℕ → X n − 1 ∈ ℂ
103 100 102 mulcomd ⊢ φ ∧ n ∈ ℕ → X ⁢ X n − 1 = X n − 1 ⁢ X
104 99 103 eqtr4d ⊢ φ ∧ n ∈ ℕ → X n = X ⁢ X n − 1
105 97 104 oveq12d ⊢ φ ∧ n ∈ ℕ → ∑ m = 0 n − 1 A ⁡ m ⁢ X n = seq 0 + A ⁡ n − 1 ⁢ X ⁢ X n − 1
106 nnnn0 ⊢ n ∈ ℕ → n ∈ ℕ 0
107 106 adantl ⊢ φ ∧ n ∈ ℕ → n ∈ ℕ 0
108 oveq1 ⊢ k = n → k − 1 = n − 1
109 108 oveq2d ⊢ k = n → 0 … k − 1 = 0 … n − 1
110 109 sumeq1d ⊢ k = n → ∑ m = 0 k − 1 A ⁡ m = ∑ m = 0 n − 1 A ⁡ m
111 110 19 oveq12d ⊢ k = n → ∑ m = 0 k − 1 A ⁡ m ⁢ X k = ∑ m = 0 n − 1 A ⁡ m ⁢ X n
112 ovex ⊢ ∑ m = 0 n − 1 A ⁡ m ⁢ X n ∈ V
113 111 55 112 fvmpt ⊢ n ∈ ℕ 0 → k ∈ ℕ 0 ⟼ ∑ m = 0 k − 1 A ⁡ m ⁢ X k ⁡ n = ∑ m = 0 n − 1 A ⁡ m ⁢ X n
114 107 113 syl ⊢ φ ∧ n ∈ ℕ → k ∈ ℕ 0 ⟼ ∑ m = 0 k − 1 A ⁡ m ⁢ X k ⁡ n = ∑ m = 0 n − 1 A ⁡ m ⁢ X n
115 ffvelcdm ⊢ seq 0 + A : ℕ 0 ⟶ ℂ ∧ n − 1 ∈ ℕ 0 → seq 0 + A ⁡ n − 1 ∈ ℂ
116 37 75 115 syl2an ⊢ φ ∧ n ∈ ℕ → seq 0 + A ⁡ n − 1 ∈ ℂ
117 100 116 102 mul12d ⊢ φ ∧ n ∈ ℕ → X ⁢ seq 0 + A ⁡ n − 1 ⁢ X n − 1 = seq 0 + A ⁡ n − 1 ⁢ X ⁢ X n − 1
118 105 114 117 3eqtr4d ⊢ φ ∧ n ∈ ℕ → k ∈ ℕ 0 ⟼ ∑ m = 0 k − 1 A ⁡ m ⁢ X k ⁡ n = X ⁢ seq 0 + A ⁡ n − 1 ⁢ X n − 1
119 84 91 118 3eqtr4d ⊢ φ ∧ n ∈ ℕ → k ∈ ℕ 0 ⟼ X ⁢ seq 0 + A ⁡ k ⁢ X k shift 1 ⁡ n = k ∈ ℕ 0 ⟼ ∑ m = 0 k − 1 A ⁡ m ⁢ X k ⁡ n
120 74 119 sylan2br ⊢ φ ∧ n ∈ ℤ ≥ 0 + 1 → k ∈ ℕ 0 ⟼ X ⁢ seq 0 + A ⁡ k ⁢ X k shift 1 ⁡ n = k ∈ ℕ 0 ⟼ ∑ m = 0 k − 1 A ⁡ m ⁢ X k ⁡ n
121 69 120 seqfeq ⊢ φ → seq 0 + 1 + k ∈ ℕ 0 ⟼ X ⁢ seq 0 + A ⁡ k ⁢ X k shift 1 = seq 0 + 1 + k ∈ ℕ 0 ⟼ ∑ m = 0 k − 1 A ⁡ m ⁢ X k
122 fveq2 ⊢ k = i → seq 0 + A ⁡ k = seq 0 + A ⁡ i
123 122 53 oveq12d ⊢ k = i → seq 0 + A ⁡ k ⁢ X k = seq 0 + A ⁡ i ⁢ X i
124 ovex ⊢ seq 0 + A ⁡ i ⁢ X i ∈ V
125 123 33 124 fvmpt ⊢ i ∈ ℕ 0 → k ∈ ℕ 0 ⟼ seq 0 + A ⁡ k ⁢ X k ⁡ i = seq 0 + A ⁡ i ⁢ X i
126 125 adantl ⊢ φ ∧ i ∈ ℕ 0 → k ∈ ℕ 0 ⟼ seq 0 + A ⁡ k ⁢ X k ⁡ i = seq 0 + A ⁡ i ⁢ X i
127 37 ffvelcdmda ⊢ φ ∧ i ∈ ℕ 0 → seq 0 + A ⁡ i ∈ ℂ
128 127 66 mulcld ⊢ φ ∧ i ∈ ℕ 0 → seq 0 + A ⁡ i ⁢ X i ∈ ℂ
129 126 128 eqeltrd ⊢ φ ∧ i ∈ ℕ 0 → k ∈ ℕ 0 ⟼ seq 0 + A ⁡ k ⁢ X k ⁡ i ∈ ℂ
130 123 oveq2d ⊢ k = i → X ⁢ seq 0 + A ⁡ k ⁢ X k = X ⁢ seq 0 + A ⁡ i ⁢ X i
131 ovex ⊢ X ⁢ seq 0 + A ⁡ i ⁢ X i ∈ V
132 130 81 131 fvmpt ⊢ i ∈ ℕ 0 → k ∈ ℕ 0 ⟼ X ⁢ seq 0 + A ⁡ k ⁢ X k ⁡ i = X ⁢ seq 0 + A ⁡ i ⁢ X i
133 132 adantl ⊢ φ ∧ i ∈ ℕ 0 → k ∈ ℕ 0 ⟼ X ⁢ seq 0 + A ⁡ k ⁢ X k ⁡ i = X ⁢ seq 0 + A ⁡ i ⁢ X i
134 126 oveq2d ⊢ φ ∧ i ∈ ℕ 0 → X ⁢ k ∈ ℕ 0 ⟼ seq 0 + A ⁡ k ⁢ X k ⁡ i = X ⁢ seq 0 + A ⁡ i ⁢ X i
135 133 134 eqtr4d ⊢ φ ∧ i ∈ ℕ 0 → k ∈ ℕ 0 ⟼ X ⁢ seq 0 + A ⁡ k ⁢ X k ⁡ i = X ⁢ k ∈ ℕ 0 ⟼ seq 0 + A ⁡ k ⁢ X k ⁡ i
136 16 17 27 45 129 135 isermulc2 ⊢ φ → seq 0 + k ∈ ℕ 0 ⟼ X ⁢ seq 0 + A ⁡ k ⁢ X k ⇝ X ⁢ ∑ n ∈ ℕ 0 seq 0 + A ⁡ n ⁢ X n
137 0z ⊢ 0 ∈ ℤ
138 1z ⊢ 1 ∈ ℤ
139 89 isershft ⊢ 0 ∈ ℤ ∧ 1 ∈ ℤ → seq 0 + k ∈ ℕ 0 ⟼ X ⁢ seq 0 + A ⁡ k ⁢ X k ⇝ X ⁢ ∑ n ∈ ℕ 0 seq 0 + A ⁡ n ⁢ X n ↔ seq 0 + 1 + k ∈ ℕ 0 ⟼ X ⁢ seq 0 + A ⁡ k ⁢ X k shift 1 ⇝ X ⁢ ∑ n ∈ ℕ 0 seq 0 + A ⁡ n ⁢ X n
140 137 138 139 mp2an ⊢ seq 0 + k ∈ ℕ 0 ⟼ X ⁢ seq 0 + A ⁡ k ⁢ X k ⇝ X ⁢ ∑ n ∈ ℕ 0 seq 0 + A ⁡ n ⁢ X n ↔ seq 0 + 1 + k ∈ ℕ 0 ⟼ X ⁢ seq 0 + A ⁡ k ⁢ X k shift 1 ⇝ X ⁢ ∑ n ∈ ℕ 0 seq 0 + A ⁡ n ⁢ X n
141 136 140 sylib ⊢ φ → seq 0 + 1 + k ∈ ℕ 0 ⟼ X ⁢ seq 0 + A ⁡ k ⁢ X k shift 1 ⇝ X ⁢ ∑ n ∈ ℕ 0 seq 0 + A ⁡ n ⁢ X n
142 121 141 eqbrtrrd ⊢ φ → seq 0 + 1 + k ∈ ℕ 0 ⟼ ∑ m = 0 k − 1 A ⁡ m ⁢ X k ⇝ X ⁢ ∑ n ∈ ℕ 0 seq 0 + A ⁡ n ⁢ X n
143 16 49 68 142 clim2ser2 ⊢ φ → seq 0 + k ∈ ℕ 0 ⟼ ∑ m = 0 k − 1 A ⁡ m ⁢ X k ⇝ X ⁢ ∑ n ∈ ℕ 0 seq 0 + A ⁡ n ⁢ X n + seq 0 + k ∈ ℕ 0 ⟼ ∑ m = 0 k − 1 A ⁡ m ⁢ X k ⁡ 0
144 seq1 ⊢ 0 ∈ ℤ → seq 0 + k ∈ ℕ 0 ⟼ ∑ m = 0 k − 1 A ⁡ m ⁢ X k ⁡ 0 = k ∈ ℕ 0 ⟼ ∑ m = 0 k − 1 A ⁡ m ⁢ X k ⁡ 0
145 137 144 ax-mp ⊢ seq 0 + k ∈ ℕ 0 ⟼ ∑ m = 0 k − 1 A ⁡ m ⁢ X k ⁡ 0 = k ∈ ℕ 0 ⟼ ∑ m = 0 k − 1 A ⁡ m ⁢ X k ⁡ 0
146 oveq1 ⊢ k = 0 → k − 1 = 0 − 1
147 146 oveq2d ⊢ k = 0 → 0 … k − 1 = 0 … 0 − 1
148 fz00m1 ⊢ 0 … 0 − 1 = ∅
149 147 148 eqtrdi ⊢ k = 0 → 0 … k − 1 = ∅
150 149 sumeq1d ⊢ k = 0 → ∑ m = 0 k − 1 A ⁡ m = ∑ m ∈ ∅ A ⁡ m
151 sum0 ⊢ ∑ m ∈ ∅ A ⁡ m = 0
152 150 151 eqtrdi ⊢ k = 0 → ∑ m = 0 k − 1 A ⁡ m = 0
153 oveq2 ⊢ k = 0 → X k = X 0
154 152 153 oveq12d ⊢ k = 0 → ∑ m = 0 k − 1 A ⁡ m ⁢ X k = 0 ⋅ X 0
155 ovex ⊢ 0 ⋅ X 0 ∈ V
156 154 55 155 fvmpt ⊢ 0 ∈ ℕ 0 → k ∈ ℕ 0 ⟼ ∑ m = 0 k − 1 A ⁡ m ⁢ X k ⁡ 0 = 0 ⋅ X 0
157 48 156 ax-mp ⊢ k ∈ ℕ 0 ⟼ ∑ m = 0 k − 1 A ⁡ m ⁢ X k ⁡ 0 = 0 ⋅ X 0
158 145 157 eqtri ⊢ seq 0 + k ∈ ℕ 0 ⟼ ∑ m = 0 k − 1 A ⁡ m ⁢ X k ⁡ 0 = 0 ⋅ X 0
159 expcl ⊢ X ∈ ℂ ∧ 0 ∈ ℕ 0 → X 0 ∈ ℂ
160 27 48 159 sylancl ⊢ φ → X 0 ∈ ℂ
161 160 mul02d ⊢ φ → 0 ⋅ X 0 = 0
162 158 161 eqtrid ⊢ φ → seq 0 + k ∈ ℕ 0 ⟼ ∑ m = 0 k − 1 A ⁡ m ⁢ X k ⁡ 0 = 0
163 162 oveq2d ⊢ φ → X ⁢ ∑ n ∈ ℕ 0 seq 0 + A ⁡ n ⁢ X n + seq 0 + k ∈ ℕ 0 ⟼ ∑ m = 0 k − 1 A ⁡ m ⁢ X k ⁡ 0 = X ⁢ ∑ n ∈ ℕ 0 seq 0 + A ⁡ n ⁢ X n + 0
164 16 17 36 39 44 isumcl ⊢ φ → ∑ n ∈ ℕ 0 seq 0 + A ⁡ n ⁢ X n ∈ ℂ
165 27 164 mulcld ⊢ φ → X ⁢ ∑ n ∈ ℕ 0 seq 0 + A ⁡ n ⁢ X n ∈ ℂ
166 165 addridd ⊢ φ → X ⁢ ∑ n ∈ ℕ 0 seq 0 + A ⁡ n ⁢ X n + 0 = X ⁢ ∑ n ∈ ℕ 0 seq 0 + A ⁡ n ⁢ X n
167 163 166 eqtrd ⊢ φ → X ⁢ ∑ n ∈ ℕ 0 seq 0 + A ⁡ n ⁢ X n + seq 0 + k ∈ ℕ 0 ⟼ ∑ m = 0 k − 1 A ⁡ m ⁢ X k ⁡ 0 = X ⁢ ∑ n ∈ ℕ 0 seq 0 + A ⁡ n ⁢ X n
168 143 167 breqtrd ⊢ φ → seq 0 + k ∈ ℕ 0 ⟼ ∑ m = 0 k − 1 A ⁡ m ⁢ X k ⇝ X ⁢ ∑ n ∈ ℕ 0 seq 0 + A ⁡ n ⁢ X n
169 16 17 129 serf ⊢ φ → seq 0 + k ∈ ℕ 0 ⟼ seq 0 + A ⁡ k ⁢ X k : ℕ 0 ⟶ ℂ
170 169 ffvelcdmda ⊢ φ ∧ i ∈ ℕ 0 → seq 0 + k ∈ ℕ 0 ⟼ seq 0 + A ⁡ k ⁢ X k ⁡ i ∈ ℂ
171 16 17 68 serf ⊢ φ → seq 0 + k ∈ ℕ 0 ⟼ ∑ m = 0 k − 1 A ⁡ m ⁢ X k : ℕ 0 ⟶ ℂ
172 171 ffvelcdmda ⊢ φ ∧ i ∈ ℕ 0 → seq 0 + k ∈ ℕ 0 ⟼ ∑ m = 0 k − 1 A ⁡ m ⁢ X k ⁡ i ∈ ℂ
173 simpr ⊢ φ ∧ i ∈ ℕ 0 → i ∈ ℕ 0
174 173 16 eleqtrdi ⊢ φ ∧ i ∈ ℕ 0 → i ∈ ℤ ≥ 0
175 simpl ⊢ φ ∧ i ∈ ℕ 0 → φ
176 elfznn0 ⊢ n ∈ 0 … i → n ∈ ℕ 0
177 36 39 eqeltrd ⊢ φ ∧ n ∈ ℕ 0 → k ∈ ℕ 0 ⟼ seq 0 + A ⁡ k ⁢ X k ⁡ n ∈ ℂ
178 175 176 177 syl2an ⊢ φ ∧ i ∈ ℕ 0 ∧ n ∈ 0 … i → k ∈ ℕ 0 ⟼ seq 0 + A ⁡ k ⁢ X k ⁡ n ∈ ℂ
179 113 adantl ⊢ φ ∧ n ∈ ℕ 0 → k ∈ ℕ 0 ⟼ ∑ m = 0 k − 1 A ⁡ m ⁢ X k ⁡ n = ∑ m = 0 n − 1 A ⁡ m ⁢ X n
180 fzfid ⊢ φ ∧ n ∈ ℕ 0 → 0 … n − 1 ∈ Fin
181 1 adantr ⊢ φ ∧ n ∈ ℕ 0 → A : ℕ 0 ⟶ ℂ
182 181 95 62 syl2an ⊢ φ ∧ n ∈ ℕ 0 ∧ m ∈ 0 … n − 1 → A ⁡ m ∈ ℂ
183 180 182 fsumcl ⊢ φ ∧ n ∈ ℕ 0 → ∑ m = 0 n − 1 A ⁡ m ∈ ℂ
184 183 29 mulcld ⊢ φ ∧ n ∈ ℕ 0 → ∑ m = 0 n − 1 A ⁡ m ⁢ X n ∈ ℂ
185 179 184 eqeltrd ⊢ φ ∧ n ∈ ℕ 0 → k ∈ ℕ 0 ⟼ ∑ m = 0 k − 1 A ⁡ m ⁢ X k ⁡ n ∈ ℂ
186 175 176 185 syl2an ⊢ φ ∧ i ∈ ℕ 0 ∧ n ∈ 0 … i → k ∈ ℕ 0 ⟼ ∑ m = 0 k − 1 A ⁡ m ⁢ X k ⁡ n ∈ ℂ
187 eqidd ⊢ φ ∧ n ∈ ℕ 0 ∧ m ∈ 0 … n → A ⁡ m = A ⁡ m
188 simpr ⊢ φ ∧ n ∈ ℕ 0 → n ∈ ℕ 0
189 188 16 eleqtrdi ⊢ φ ∧ n ∈ ℕ 0 → n ∈ ℤ ≥ 0
190 elfznn0 ⊢ m ∈ 0 … n → m ∈ ℕ 0
191 181 190 62 syl2an ⊢ φ ∧ n ∈ ℕ 0 ∧ m ∈ 0 … n → A ⁡ m ∈ ℂ
192 187 189 191 fsumser ⊢ φ ∧ n ∈ ℕ 0 → ∑ m = 0 n A ⁡ m = seq 0 + A ⁡ n
193 fveq2 ⊢ m = n → A ⁡ m = A ⁡ n
194 189 191 193 fsumm1 ⊢ φ ∧ n ∈ ℕ 0 → ∑ m = 0 n A ⁡ m = ∑ m = 0 n − 1 A ⁡ m + A ⁡ n
195 192 194 eqtr3d ⊢ φ ∧ n ∈ ℕ 0 → seq 0 + A ⁡ n = ∑ m = 0 n − 1 A ⁡ m + A ⁡ n
196 195 oveq1d ⊢ φ ∧ n ∈ ℕ 0 → seq 0 + A ⁡ n − ∑ m = 0 n − 1 A ⁡ m = ∑ m = 0 n − 1 A ⁡ m + A ⁡ n - ∑ m = 0 n − 1 A ⁡ m
197 183 25 pncan2d ⊢ φ ∧ n ∈ ℕ 0 → ∑ m = 0 n − 1 A ⁡ m + A ⁡ n - ∑ m = 0 n − 1 A ⁡ m = A ⁡ n
198 196 197 eqtr2d ⊢ φ ∧ n ∈ ℕ 0 → A ⁡ n = seq 0 + A ⁡ n − ∑ m = 0 n − 1 A ⁡ m
199 198 oveq1d ⊢ φ ∧ n ∈ ℕ 0 → A ⁡ n ⁢ X n = seq 0 + A ⁡ n − ∑ m = 0 n − 1 A ⁡ m ⁢ X n
200 38 183 29 subdird ⊢ φ ∧ n ∈ ℕ 0 → seq 0 + A ⁡ n − ∑ m = 0 n − 1 A ⁡ m ⁢ X n = seq 0 + A ⁡ n ⁢ X n − ∑ m = 0 n − 1 A ⁡ m ⁢ X n
201 199 200 eqtrd ⊢ φ ∧ n ∈ ℕ 0 → A ⁡ n ⁢ X n = seq 0 + A ⁡ n ⁢ X n − ∑ m = 0 n − 1 A ⁡ m ⁢ X n
202 36 179 oveq12d ⊢ φ ∧ n ∈ ℕ 0 → k ∈ ℕ 0 ⟼ seq 0 + A ⁡ k ⁢ X k ⁡ n − k ∈ ℕ 0 ⟼ ∑ m = 0 k − 1 A ⁡ m ⁢ X k ⁡ n = seq 0 + A ⁡ n ⁢ X n − ∑ m = 0 n − 1 A ⁡ m ⁢ X n
203 201 24 202 3eqtr4d ⊢ φ ∧ n ∈ ℕ 0 → k ∈ ℕ 0 ⟼ A ⁡ k ⁢ X k ⁡ n = k ∈ ℕ 0 ⟼ seq 0 + A ⁡ k ⁢ X k ⁡ n − k ∈ ℕ 0 ⟼ ∑ m = 0 k − 1 A ⁡ m ⁢ X k ⁡ n
204 175 176 203 syl2an ⊢ φ ∧ i ∈ ℕ 0 ∧ n ∈ 0 … i → k ∈ ℕ 0 ⟼ A ⁡ k ⁢ X k ⁡ n = k ∈ ℕ 0 ⟼ seq 0 + A ⁡ k ⁢ X k ⁡ n − k ∈ ℕ 0 ⟼ ∑ m = 0 k − 1 A ⁡ m ⁢ X k ⁡ n
205 174 178 186 204 sersub ⊢ φ ∧ i ∈ ℕ 0 → seq 0 + k ∈ ℕ 0 ⟼ A ⁡ k ⁢ X k ⁡ i = seq 0 + k ∈ ℕ 0 ⟼ seq 0 + A ⁡ k ⁢ X k ⁡ i − seq 0 + k ∈ ℕ 0 ⟼ ∑ m = 0 k − 1 A ⁡ m ⁢ X k ⁡ i
206 16 17 45 47 168 170 172 205 climsub ⊢ φ → seq 0 + k ∈ ℕ 0 ⟼ A ⁡ k ⁢ X k ⇝ ∑ n ∈ ℕ 0 seq 0 + A ⁡ n ⁢ X n − X ⁢ ∑ n ∈ ℕ 0 seq 0 + A ⁡ n ⁢ X n
207 1cnd ⊢ φ → 1 ∈ ℂ
208 207 27 164 subdird ⊢ φ → 1 − X ⁢ ∑ n ∈ ℕ 0 seq 0 + A ⁡ n ⁢ X n = 1 ⁢ ∑ n ∈ ℕ 0 seq 0 + A ⁡ n ⁢ X n − X ⁢ ∑ n ∈ ℕ 0 seq 0 + A ⁡ n ⁢ X n
209 164 mullidd ⊢ φ → 1 ⁢ ∑ n ∈ ℕ 0 seq 0 + A ⁡ n ⁢ X n = ∑ n ∈ ℕ 0 seq 0 + A ⁡ n ⁢ X n
210 209 oveq1d ⊢ φ → 1 ⁢ ∑ n ∈ ℕ 0 seq 0 + A ⁡ n ⁢ X n − X ⁢ ∑ n ∈ ℕ 0 seq 0 + A ⁡ n ⁢ X n = ∑ n ∈ ℕ 0 seq 0 + A ⁡ n ⁢ X n − X ⁢ ∑ n ∈ ℕ 0 seq 0 + A ⁡ n ⁢ X n
211 208 210 eqtrd ⊢ φ → 1 − X ⁢ ∑ n ∈ ℕ 0 seq 0 + A ⁡ n ⁢ X n = ∑ n ∈ ℕ 0 seq 0 + A ⁡ n ⁢ X n − X ⁢ ∑ n ∈ ℕ 0 seq 0 + A ⁡ n ⁢ X n
212 206 211 breqtrrd ⊢ φ → seq 0 + k ∈ ℕ 0 ⟼ A ⁡ k ⁢ X k ⇝ 1 − X ⁢ ∑ n ∈ ℕ 0 seq 0 + A ⁡ n ⁢ X n
213 16 17 24 30 212 isumclim ⊢ φ → ∑ n ∈ ℕ 0 A ⁡ n ⁢ X n = 1 − X ⁢ ∑ n ∈ ℕ 0 seq 0 + A ⁡ n ⁢ X n
214 15 213 eqtrd ⊢ φ → F ⁡ X = 1 − X ⁢ ∑ n ∈ ℕ 0 seq 0 + A ⁡ n ⁢ X n