Metamath Proof Explorer


Theorem radcnvrat

Description: Let L be the limit, if one exists, of the ratio ( abs( ( A( k + 1 ) ) / ( Ak ) ) ) (as in the ratio test cvgdvgrat ) as k increases. Then the radius of convergence of power series sum_ n e. NN0 ( ( An ) x. ( x ^ n ) ) is ( 1 / L ) if L is nonzero. Proof "The limit involved in the ratio test..." in https://en.wikipedia.org/wiki/Radius_of_convergence —a few lines that evidently hide quite an involved process to confirm. (Contributed by Steve Rodriguez, 8-Mar-2020)

Ref Expression
Hypotheses radcnvrat.g ⊢ G = x ∈ ℂ ⟼ n ∈ ℕ 0 ⟼ A ⁡ n ⁢ x n
radcnvrat.a ⊢ φ → A : ℕ 0 ⟶ ℂ
radcnvrat.r ⊢ R = sup r ∈ ℝ | seq 0 + G ⁡ r ∈ dom ⁡ ⇝ ℝ * <
radcnvrat.rat ⊢ D = k ∈ ℕ 0 ⟼ A ⁡ k + 1 A ⁡ k
radcnvrat.z ⊢ Z = ℤ ≥ M
radcnvrat.m ⊢ φ → M ∈ ℕ 0
radcnvrat.n0 ⊢ φ ∧ k ∈ Z → A ⁡ k ≠ 0
radcnvrat.l ⊢ φ → D ⇝ L
radcnvrat.ln0 ⊢ φ → L ≠ 0
Assertion radcnvrat ⊢ φ → R = 1 L

Proof

Step Hyp Ref Expression
1 radcnvrat.g ⊢ G = x ∈ ℂ ⟼ n ∈ ℕ 0 ⟼ A ⁡ n ⁢ x n
2 radcnvrat.a ⊢ φ → A : ℕ 0 ⟶ ℂ
3 radcnvrat.r ⊢ R = sup r ∈ ℝ | seq 0 + G ⁡ r ∈ dom ⁡ ⇝ ℝ * <
4 radcnvrat.rat ⊢ D = k ∈ ℕ 0 ⟼ A ⁡ k + 1 A ⁡ k
5 radcnvrat.z ⊢ Z = ℤ ≥ M
6 radcnvrat.m ⊢ φ → M ∈ ℕ 0
7 radcnvrat.n0 ⊢ φ ∧ k ∈ Z → A ⁡ k ≠ 0
8 radcnvrat.l ⊢ φ → D ⇝ L
9 radcnvrat.ln0 ⊢ φ → L ≠ 0
10 xrltso ⊢ < Or ℝ *
11 10 a1i ⊢ φ → < Or ℝ *
12 6 nn0zd ⊢ φ → M ∈ ℤ
13 5 reseq2i ⊢ D ↾ Z = D ↾ ℤ ≥ M
14 nn0ex ⊢ ℕ 0 ∈ V
15 14 mptex ⊢ k ∈ ℕ 0 ⟼ A ⁡ k + 1 A ⁡ k ∈ V
16 4 15 eqeltri ⊢ D ∈ V
17 climres ⊢ M ∈ ℤ ∧ D ∈ V → D ↾ ℤ ≥ M ⇝ L ↔ D ⇝ L
18 12 16 17 sylancl ⊢ φ → D ↾ ℤ ≥ M ⇝ L ↔ D ⇝ L
19 8 18 mpbird ⊢ φ → D ↾ ℤ ≥ M ⇝ L
20 13 19 eqbrtrid ⊢ φ → D ↾ Z ⇝ L
21 4 reseq1i ⊢ D ↾ Z = k ∈ ℕ 0 ⟼ A ⁡ k + 1 A ⁡ k ↾ Z
22 eluznn0 ⊢ M ∈ ℕ 0 ∧ k ∈ ℤ ≥ M → k ∈ ℕ 0
23 6 22 sylan ⊢ φ ∧ k ∈ ℤ ≥ M → k ∈ ℕ 0
24 23 ex ⊢ φ → k ∈ ℤ ≥ M → k ∈ ℕ 0
25 24 ssrdv ⊢ φ → ℤ ≥ M ⊆ ℕ 0
26 5 25 eqsstrid ⊢ φ → Z ⊆ ℕ 0
27 26 resmptd ⊢ φ → k ∈ ℕ 0 ⟼ A ⁡ k + 1 A ⁡ k ↾ Z = k ∈ Z ⟼ A ⁡ k + 1 A ⁡ k
28 21 27 eqtrid ⊢ φ → D ↾ Z = k ∈ Z ⟼ A ⁡ k + 1 A ⁡ k
29 fvexd ⊢ φ ∧ k ∈ Z → A ⁡ k + 1 A ⁡ k ∈ V
30 28 29 fvmpt2d ⊢ φ ∧ k ∈ Z → D ↾ Z ⁡ k = A ⁡ k + 1 A ⁡ k
31 5 peano2uzs ⊢ k ∈ Z → k + 1 ∈ Z
32 26 sselda ⊢ φ ∧ k + 1 ∈ Z → k + 1 ∈ ℕ 0
33 2 ffvelcdmda ⊢ φ ∧ k + 1 ∈ ℕ 0 → A ⁡ k + 1 ∈ ℂ
34 32 33 syldan ⊢ φ ∧ k + 1 ∈ Z → A ⁡ k + 1 ∈ ℂ
35 31 34 sylan2 ⊢ φ ∧ k ∈ Z → A ⁡ k + 1 ∈ ℂ
36 26 sselda ⊢ φ ∧ k ∈ Z → k ∈ ℕ 0
37 2 ffvelcdmda ⊢ φ ∧ k ∈ ℕ 0 → A ⁡ k ∈ ℂ
38 36 37 syldan ⊢ φ ∧ k ∈ Z → A ⁡ k ∈ ℂ
39 35 38 7 divcld ⊢ φ ∧ k ∈ Z → A ⁡ k + 1 A ⁡ k ∈ ℂ
40 39 abscld ⊢ φ ∧ k ∈ Z → A ⁡ k + 1 A ⁡ k ∈ ℝ
41 30 40 eqeltrd ⊢ φ ∧ k ∈ Z → D ↾ Z ⁡ k ∈ ℝ
42 5 12 20 41 climrecl ⊢ φ → L ∈ ℝ
43 42 9 rereccld ⊢ φ → 1 L ∈ ℝ
44 43 rexrd ⊢ φ → 1 L ∈ ℝ *
45 simpr ⊢ φ ∧ x ∈ r ∈ ℝ | seq 0 + G ⁡ r ∈ dom ⁡ ⇝ → x ∈ r ∈ ℝ | seq 0 + G ⁡ r ∈ dom ⁡ ⇝
46 elrabi ⊢ x ∈ r ∈ ℝ | seq 0 + G ⁡ r ∈ dom ⁡ ⇝ → x ∈ ℝ
47 43 adantr ⊢ φ ∧ x ∈ ℝ → 1 L ∈ ℝ
48 recn ⊢ x ∈ ℝ → x ∈ ℂ
49 48 abscld ⊢ x ∈ ℝ → x ∈ ℝ
50 49 adantl ⊢ φ ∧ x ∈ ℝ → x ∈ ℝ
51 47 50 ltlend ⊢ φ ∧ x ∈ ℝ → 1 L < x ↔ 1 L ≤ x ∧ x ≠ 1 L
52 51 simplbda ⊢ φ ∧ x ∈ ℝ ∧ 1 L < x → x ≠ 1 L
53 51 adantr ⊢ φ ∧ x ∈ ℝ ∧ x ≠ 1 L → 1 L < x ↔ 1 L ≤ x ∧ x ≠ 1 L
54 simpr ⊢ φ ∧ x ∈ ℝ ∧ x ≠ 1 L → x ≠ 1 L
55 54 biantrud ⊢ φ ∧ x ∈ ℝ ∧ x ≠ 1 L → 1 L ≤ x ↔ 1 L ≤ x ∧ x ≠ 1 L
56 47 50 lenltd ⊢ φ ∧ x ∈ ℝ → 1 L ≤ x ↔ ¬ x < 1 L
57 56 adantr ⊢ φ ∧ x ∈ ℝ ∧ x ≠ 1 L → 1 L ≤ x ↔ ¬ x < 1 L
58 53 55 57 3bitr2d ⊢ φ ∧ x ∈ ℝ ∧ x ≠ 1 L → 1 L < x ↔ ¬ x < 1 L
59 1cnd ⊢ φ ∧ x ∈ ℝ → 1 ∈ ℂ
60 50 recnd ⊢ φ ∧ x ∈ ℝ → x ∈ ℂ
61 42 recnd ⊢ φ → L ∈ ℂ
62 61 adantr ⊢ φ ∧ x ∈ ℝ → L ∈ ℂ
63 9 adantr ⊢ φ ∧ x ∈ ℝ → L ≠ 0
64 59 60 62 63 divmul3d ⊢ φ ∧ x ∈ ℝ → 1 L = x ↔ 1 = x ⁢ L
65 eqcom ⊢ 1 L = x ↔ x = 1 L
66 eqcom ⊢ 1 = x ⁢ L ↔ x ⁢ L = 1
67 64 65 66 3bitr3g ⊢ φ ∧ x ∈ ℝ → x = 1 L ↔ x ⁢ L = 1
68 67 necon3bid ⊢ φ ∧ x ∈ ℝ → x ≠ 1 L ↔ x ⁢ L ≠ 1
69 68 biimpa ⊢ φ ∧ x ∈ ℝ ∧ x ≠ 1 L → x ⁢ L ≠ 1
70 1red ⊢ φ ∧ x ∈ ℝ → 1 ∈ ℝ
71 fvres ⊢ k ∈ Z → D ↾ Z ⁡ k = D ⁡ k
72 71 adantl ⊢ φ ∧ k ∈ Z → D ↾ Z ⁡ k = D ⁡ k
73 72 41 eqeltrrd ⊢ φ ∧ k ∈ Z → D ⁡ k ∈ ℝ
74 39 absge0d ⊢ φ ∧ k ∈ Z → 0 ≤ A ⁡ k + 1 A ⁡ k
75 74 30 breqtrrd ⊢ φ ∧ k ∈ Z → 0 ≤ D ↾ Z ⁡ k
76 75 72 breqtrd ⊢ φ ∧ k ∈ Z → 0 ≤ D ⁡ k
77 5 12 8 73 76 climge0 ⊢ φ → 0 ≤ L
78 42 77 9 ne0gt0d ⊢ φ → 0 < L
79 42 78 elrpd ⊢ φ → L ∈ ℝ +
80 79 adantr ⊢ φ ∧ x ∈ ℝ → L ∈ ℝ +
81 50 70 80 ltmuldivd ⊢ φ ∧ x ∈ ℝ → x ⁢ L < 1 ↔ x < 1 L
82 81 adantr ⊢ φ ∧ x ∈ ℝ ∧ x ⁢ L ≠ 1 → x ⁢ L < 1 ↔ x < 1 L
83 elun ⊢ x ∈ ℝ ∩ 0 ∪ ℝ ∖ 0 ↔ x ∈ ℝ ∩ 0 ∨ x ∈ ℝ ∖ 0
84 inundif ⊢ ℝ ∩ 0 ∪ ℝ ∖ 0 = ℝ
85 84 eleq2i ⊢ x ∈ ℝ ∩ 0 ∪ ℝ ∖ 0 ↔ x ∈ ℝ
86 83 85 bitr3i ⊢ x ∈ ℝ ∩ 0 ∨ x ∈ ℝ ∖ 0 ↔ x ∈ ℝ
87 elin ⊢ x ∈ ℝ ∩ 0 ↔ x ∈ ℝ ∧ x ∈ 0
88 87 simprbi ⊢ x ∈ ℝ ∩ 0 → x ∈ 0
89 elsni ⊢ x ∈ 0 → x = 0
90 88 89 syl ⊢ x ∈ ℝ ∩ 0 → x = 0
91 fveq2 ⊢ x = 0 → x = 0
92 abs0 ⊢ 0 = 0
93 91 92 eqtrdi ⊢ x = 0 → x = 0
94 93 oveq1d ⊢ x = 0 → x ⁢ L = 0 ⋅ L
95 61 mul02d ⊢ φ → 0 ⋅ L = 0
96 94 95 sylan9eqr ⊢ φ ∧ x = 0 → x ⁢ L = 0
97 0lt1 ⊢ 0 < 1
98 96 97 eqbrtrdi ⊢ φ ∧ x = 0 → x ⁢ L < 1
99 1 2 radcnv0 ⊢ φ → 0 ∈ r ∈ ℝ | seq 0 + G ⁡ r ∈ dom ⁡ ⇝
100 eleq1 ⊢ x = 0 → x ∈ r ∈ ℝ | seq 0 + G ⁡ r ∈ dom ⁡ ⇝ ↔ 0 ∈ r ∈ ℝ | seq 0 + G ⁡ r ∈ dom ⁡ ⇝
101 99 100 syl5ibrcom ⊢ φ → x = 0 → x ∈ r ∈ ℝ | seq 0 + G ⁡ r ∈ dom ⁡ ⇝
102 101 imp ⊢ φ ∧ x = 0 → x ∈ r ∈ ℝ | seq 0 + G ⁡ r ∈ dom ⁡ ⇝
103 98 102 2thd ⊢ φ ∧ x = 0 → x ⁢ L < 1 ↔ x ∈ r ∈ ℝ | seq 0 + G ⁡ r ∈ dom ⁡ ⇝
104 90 103 sylan2 ⊢ φ ∧ x ∈ ℝ ∩ 0 → x ⁢ L < 1 ↔ x ∈ r ∈ ℝ | seq 0 + G ⁡ r ∈ dom ⁡ ⇝
105 104 adantlr ⊢ φ ∧ x ⁢ L ≠ 1 ∧ x ∈ ℝ ∩ 0 → x ⁢ L < 1 ↔ x ∈ r ∈ ℝ | seq 0 + G ⁡ r ∈ dom ⁡ ⇝
106 ax-resscn ⊢ ℝ ⊆ ℂ
107 ssdif ⊢ ℝ ⊆ ℂ → ℝ ∖ 0 ⊆ ℂ ∖ 0
108 106 107 ax-mp ⊢ ℝ ∖ 0 ⊆ ℂ ∖ 0
109 108 sseli ⊢ x ∈ ℝ ∖ 0 → x ∈ ℂ ∖ 0
110 nn0uz ⊢ ℕ 0 = ℤ ≥ 0
111 6 ad2antrr ⊢ φ ∧ x ∈ ℂ ∖ 0 ∧ x ⁢ L ≠ 1 → M ∈ ℕ 0
112 fvexd ⊢ φ ∧ x ∈ ℂ ∖ 0 ∧ x ⁢ L ≠ 1 → G ⁡ x ∈ V
113 eldifi ⊢ x ∈ ℂ ∖ 0 → x ∈ ℂ
114 1 a1i ⊢ φ → G = x ∈ ℂ ⟼ n ∈ ℕ 0 ⟼ A ⁡ n ⁢ x n
115 14 mptex ⊢ n ∈ ℕ 0 ⟼ A ⁡ n ⁢ x n ∈ V
116 115 a1i ⊢ φ ∧ x ∈ ℂ → n ∈ ℕ 0 ⟼ A ⁡ n ⁢ x n ∈ V
117 114 116 fvmpt2d ⊢ φ ∧ x ∈ ℂ → G ⁡ x = n ∈ ℕ 0 ⟼ A ⁡ n ⁢ x n
118 117 adantr ⊢ φ ∧ x ∈ ℂ ∧ k ∈ ℕ 0 → G ⁡ x = n ∈ ℕ 0 ⟼ A ⁡ n ⁢ x n
119 fveq2 ⊢ n = k → A ⁡ n = A ⁡ k
120 oveq2 ⊢ n = k → x n = x k
121 119 120 oveq12d ⊢ n = k → A ⁡ n ⁢ x n = A ⁡ k ⁢ x k
122 121 adantl ⊢ φ ∧ x ∈ ℂ ∧ k ∈ ℕ 0 ∧ n = k → A ⁡ n ⁢ x n = A ⁡ k ⁢ x k
123 simpr ⊢ φ ∧ x ∈ ℂ ∧ k ∈ ℕ 0 → k ∈ ℕ 0
124 ovexd ⊢ φ ∧ x ∈ ℂ ∧ k ∈ ℕ 0 → A ⁡ k ⁢ x k ∈ V
125 118 122 123 124 fvmptd ⊢ φ ∧ x ∈ ℂ ∧ k ∈ ℕ 0 → G ⁡ x ⁡ k = A ⁡ k ⁢ x k
126 37 adantlr ⊢ φ ∧ x ∈ ℂ ∧ k ∈ ℕ 0 → A ⁡ k ∈ ℂ
127 simplr ⊢ φ ∧ x ∈ ℂ ∧ k ∈ ℕ 0 → x ∈ ℂ
128 127 123 expcld ⊢ φ ∧ x ∈ ℂ ∧ k ∈ ℕ 0 → x k ∈ ℂ
129 126 128 mulcld ⊢ φ ∧ x ∈ ℂ ∧ k ∈ ℕ 0 → A ⁡ k ⁢ x k ∈ ℂ
130 125 129 eqeltrd ⊢ φ ∧ x ∈ ℂ ∧ k ∈ ℕ 0 → G ⁡ x ⁡ k ∈ ℂ
131 113 130 sylanl2 ⊢ φ ∧ x ∈ ℂ ∖ 0 ∧ k ∈ ℕ 0 → G ⁡ x ⁡ k ∈ ℂ
132 131 adantlr ⊢ φ ∧ x ∈ ℂ ∖ 0 ∧ x ⁢ L ≠ 1 ∧ k ∈ ℕ 0 → G ⁡ x ⁡ k ∈ ℂ
133 36 adantlr ⊢ φ ∧ x ∈ ℂ ∧ k ∈ Z → k ∈ ℕ 0
134 133 125 syldan ⊢ φ ∧ x ∈ ℂ ∧ k ∈ Z → G ⁡ x ⁡ k = A ⁡ k ⁢ x k
135 113 134 sylanl2 ⊢ φ ∧ x ∈ ℂ ∖ 0 ∧ k ∈ Z → G ⁡ x ⁡ k = A ⁡ k ⁢ x k
136 38 adantlr ⊢ φ ∧ x ∈ ℂ ∖ 0 ∧ k ∈ Z → A ⁡ k ∈ ℂ
137 113 adantl ⊢ φ ∧ x ∈ ℂ ∖ 0 → x ∈ ℂ
138 137 adantr ⊢ φ ∧ x ∈ ℂ ∖ 0 ∧ k ∈ Z → x ∈ ℂ
139 36 adantlr ⊢ φ ∧ x ∈ ℂ ∖ 0 ∧ k ∈ Z → k ∈ ℕ 0
140 138 139 expcld ⊢ φ ∧ x ∈ ℂ ∖ 0 ∧ k ∈ Z → x k ∈ ℂ
141 7 adantlr ⊢ φ ∧ x ∈ ℂ ∖ 0 ∧ k ∈ Z → A ⁡ k ≠ 0
142 eldifsni ⊢ x ∈ ℂ ∖ 0 → x ≠ 0
143 142 ad2antlr ⊢ φ ∧ x ∈ ℂ ∖ 0 ∧ k ∈ Z → x ≠ 0
144 139 nn0zd ⊢ φ ∧ x ∈ ℂ ∖ 0 ∧ k ∈ Z → k ∈ ℤ
145 138 143 144 expne0d ⊢ φ ∧ x ∈ ℂ ∖ 0 ∧ k ∈ Z → x k ≠ 0
146 136 140 141 145 mulne0d ⊢ φ ∧ x ∈ ℂ ∖ 0 ∧ k ∈ Z → A ⁡ k ⁢ x k ≠ 0
147 135 146 eqnetrd ⊢ φ ∧ x ∈ ℂ ∖ 0 ∧ k ∈ Z → G ⁡ x ⁡ k ≠ 0
148 147 adantlr ⊢ φ ∧ x ∈ ℂ ∖ 0 ∧ x ⁢ L ≠ 1 ∧ k ∈ Z → G ⁡ x ⁡ k ≠ 0
149 fvoveq1 ⊢ n = k → G ⁡ x ⁡ n + 1 = G ⁡ x ⁡ k + 1
150 fveq2 ⊢ n = k → G ⁡ x ⁡ n = G ⁡ x ⁡ k
151 149 150 oveq12d ⊢ n = k → G ⁡ x ⁡ n + 1 G ⁡ x ⁡ n = G ⁡ x ⁡ k + 1 G ⁡ x ⁡ k
152 151 fveq2d ⊢ n = k → G ⁡ x ⁡ n + 1 G ⁡ x ⁡ n = G ⁡ x ⁡ k + 1 G ⁡ x ⁡ k
153 152 cbvmptv ⊢ n ∈ Z ⟼ G ⁡ x ⁡ n + 1 G ⁡ x ⁡ n = k ∈ Z ⟼ G ⁡ x ⁡ k + 1 G ⁡ x ⁡ k
154 5 reseq2i ⊢ n ∈ ℕ 0 ⟼ G ⁡ x ⁡ n + 1 G ⁡ x ⁡ n ↾ Z = n ∈ ℕ 0 ⟼ G ⁡ x ⁡ n + 1 G ⁡ x ⁡ n ↾ ℤ ≥ M
155 26 adantr ⊢ φ ∧ x ∈ ℂ ∖ 0 → Z ⊆ ℕ 0
156 155 resmptd ⊢ φ ∧ x ∈ ℂ ∖ 0 → n ∈ ℕ 0 ⟼ G ⁡ x ⁡ n + 1 G ⁡ x ⁡ n ↾ Z = n ∈ Z ⟼ G ⁡ x ⁡ n + 1 G ⁡ x ⁡ n
157 154 156 eqtr3id ⊢ φ ∧ x ∈ ℂ ∖ 0 → n ∈ ℕ 0 ⟼ G ⁡ x ⁡ n + 1 G ⁡ x ⁡ n ↾ ℤ ≥ M = n ∈ Z ⟼ G ⁡ x ⁡ n + 1 G ⁡ x ⁡ n
158 12 adantr ⊢ φ ∧ x ∈ ℂ ∖ 0 → M ∈ ℤ
159 8 adantr ⊢ φ ∧ x ∈ ℂ ∖ 0 → D ⇝ L
160 137 abscld ⊢ φ ∧ x ∈ ℂ ∖ 0 → x ∈ ℝ
161 160 recnd ⊢ φ ∧ x ∈ ℂ ∖ 0 → x ∈ ℂ
162 14 mptex ⊢ n ∈ ℕ 0 ⟼ G ⁡ x ⁡ n + 1 G ⁡ x ⁡ n ∈ V
163 162 a1i ⊢ φ ∧ x ∈ ℂ ∖ 0 → n ∈ ℕ 0 ⟼ G ⁡ x ⁡ n + 1 G ⁡ x ⁡ n ∈ V
164 73 recnd ⊢ φ ∧ k ∈ Z → D ⁡ k ∈ ℂ
165 164 adantlr ⊢ φ ∧ x ∈ ℂ ∖ 0 ∧ k ∈ Z → D ⁡ k ∈ ℂ
166 eqidd ⊢ φ ∧ x ∈ ℂ ∖ 0 ∧ k ∈ Z → n ∈ ℕ 0 ⟼ G ⁡ x ⁡ n + 1 G ⁡ x ⁡ n = n ∈ ℕ 0 ⟼ G ⁡ x ⁡ n + 1 G ⁡ x ⁡ n
167 152 adantl ⊢ φ ∧ x ∈ ℂ ∖ 0 ∧ k ∈ Z ∧ n = k → G ⁡ x ⁡ n + 1 G ⁡ x ⁡ n = G ⁡ x ⁡ k + 1 G ⁡ x ⁡ k
168 fvexd ⊢ φ ∧ x ∈ ℂ ∖ 0 ∧ k ∈ Z → G ⁡ x ⁡ k + 1 G ⁡ x ⁡ k ∈ V
169 166 167 139 168 fvmptd ⊢ φ ∧ x ∈ ℂ ∖ 0 ∧ k ∈ Z → n ∈ ℕ 0 ⟼ G ⁡ x ⁡ n + 1 G ⁡ x ⁡ n ⁡ k = G ⁡ x ⁡ k + 1 G ⁡ x ⁡ k
170 117 adantr ⊢ φ ∧ x ∈ ℂ ∧ k ∈ Z → G ⁡ x = n ∈ ℕ 0 ⟼ A ⁡ n ⁢ x n
171 simpr ⊢ φ ∧ x ∈ ℂ ∧ k ∈ Z ∧ n = k + 1 → n = k + 1
172 171 fveq2d ⊢ φ ∧ x ∈ ℂ ∧ k ∈ Z ∧ n = k + 1 → A ⁡ n = A ⁡ k + 1
173 171 oveq2d ⊢ φ ∧ x ∈ ℂ ∧ k ∈ Z ∧ n = k + 1 → x n = x k + 1
174 172 173 oveq12d ⊢ φ ∧ x ∈ ℂ ∧ k ∈ Z ∧ n = k + 1 → A ⁡ n ⁢ x n = A ⁡ k + 1 ⁢ x k + 1
175 1nn0 ⊢ 1 ∈ ℕ 0
176 175 a1i ⊢ φ ∧ x ∈ ℂ ∧ k ∈ Z → 1 ∈ ℕ 0
177 133 176 nn0addcld ⊢ φ ∧ x ∈ ℂ ∧ k ∈ Z → k + 1 ∈ ℕ 0
178 ovexd ⊢ φ ∧ x ∈ ℂ ∧ k ∈ Z → A ⁡ k + 1 ⁢ x k + 1 ∈ V
179 170 174 177 178 fvmptd ⊢ φ ∧ x ∈ ℂ ∧ k ∈ Z → G ⁡ x ⁡ k + 1 = A ⁡ k + 1 ⁢ x k + 1
180 121 adantl ⊢ φ ∧ x ∈ ℂ ∧ k ∈ Z ∧ n = k → A ⁡ n ⁢ x n = A ⁡ k ⁢ x k
181 ovexd ⊢ φ ∧ x ∈ ℂ ∧ k ∈ Z → A ⁡ k ⁢ x k ∈ V
182 170 180 133 181 fvmptd ⊢ φ ∧ x ∈ ℂ ∧ k ∈ Z → G ⁡ x ⁡ k = A ⁡ k ⁢ x k
183 179 182 oveq12d ⊢ φ ∧ x ∈ ℂ ∧ k ∈ Z → G ⁡ x ⁡ k + 1 G ⁡ x ⁡ k = A ⁡ k + 1 ⁢ x k + 1 A ⁡ k ⁢ x k
184 113 183 sylanl2 ⊢ φ ∧ x ∈ ℂ ∖ 0 ∧ k ∈ Z → G ⁡ x ⁡ k + 1 G ⁡ x ⁡ k = A ⁡ k + 1 ⁢ x k + 1 A ⁡ k ⁢ x k
185 35 adantlr ⊢ φ ∧ x ∈ ℂ ∖ 0 ∧ k ∈ Z → A ⁡ k + 1 ∈ ℂ
186 113 177 sylanl2 ⊢ φ ∧ x ∈ ℂ ∖ 0 ∧ k ∈ Z → k + 1 ∈ ℕ 0
187 138 186 expcld ⊢ φ ∧ x ∈ ℂ ∖ 0 ∧ k ∈ Z → x k + 1 ∈ ℂ
188 185 136 187 140 141 145 divmuldivd ⊢ φ ∧ x ∈ ℂ ∖ 0 ∧ k ∈ Z → A ⁡ k + 1 A ⁡ k ⁢ x k + 1 x k = A ⁡ k + 1 ⁢ x k + 1 A ⁡ k ⁢ x k
189 139 nn0cnd ⊢ φ ∧ x ∈ ℂ ∖ 0 ∧ k ∈ Z → k ∈ ℂ
190 1cnd ⊢ φ ∧ x ∈ ℂ ∖ 0 ∧ k ∈ Z → 1 ∈ ℂ
191 189 190 pncan2d ⊢ φ ∧ x ∈ ℂ ∖ 0 ∧ k ∈ Z → k + 1 - k = 1
192 191 oveq2d ⊢ φ ∧ x ∈ ℂ ∖ 0 ∧ k ∈ Z → x k + 1 - k = x 1
193 186 nn0zd ⊢ φ ∧ x ∈ ℂ ∖ 0 ∧ k ∈ Z → k + 1 ∈ ℤ
194 138 143 144 193 expsubd ⊢ φ ∧ x ∈ ℂ ∖ 0 ∧ k ∈ Z → x k + 1 - k = x k + 1 x k
195 138 exp1d ⊢ φ ∧ x ∈ ℂ ∖ 0 ∧ k ∈ Z → x 1 = x
196 192 194 195 3eqtr3d ⊢ φ ∧ x ∈ ℂ ∖ 0 ∧ k ∈ Z → x k + 1 x k = x
197 196 oveq2d ⊢ φ ∧ x ∈ ℂ ∖ 0 ∧ k ∈ Z → A ⁡ k + 1 A ⁡ k ⁢ x k + 1 x k = A ⁡ k + 1 A ⁡ k ⁢ x
198 184 188 197 3eqtr2d ⊢ φ ∧ x ∈ ℂ ∖ 0 ∧ k ∈ Z → G ⁡ x ⁡ k + 1 G ⁡ x ⁡ k = A ⁡ k + 1 A ⁡ k ⁢ x
199 198 fveq2d ⊢ φ ∧ x ∈ ℂ ∖ 0 ∧ k ∈ Z → G ⁡ x ⁡ k + 1 G ⁡ x ⁡ k = A ⁡ k + 1 A ⁡ k ⁢ x
200 39 adantlr ⊢ φ ∧ x ∈ ℂ ∖ 0 ∧ k ∈ Z → A ⁡ k + 1 A ⁡ k ∈ ℂ
201 200 138 absmuld ⊢ φ ∧ x ∈ ℂ ∖ 0 ∧ k ∈ Z → A ⁡ k + 1 A ⁡ k ⁢ x = A ⁡ k + 1 A ⁡ k ⁢ x
202 169 199 201 3eqtrd ⊢ φ ∧ x ∈ ℂ ∖ 0 ∧ k ∈ Z → n ∈ ℕ 0 ⟼ G ⁡ x ⁡ n + 1 G ⁡ x ⁡ n ⁡ k = A ⁡ k + 1 A ⁡ k ⁢ x
203 72 30 eqtr3d ⊢ φ ∧ k ∈ Z → D ⁡ k = A ⁡ k + 1 A ⁡ k
204 203 adantlr ⊢ φ ∧ x ∈ ℂ ∖ 0 ∧ k ∈ Z → D ⁡ k = A ⁡ k + 1 A ⁡ k
205 204 eqcomd ⊢ φ ∧ x ∈ ℂ ∖ 0 ∧ k ∈ Z → A ⁡ k + 1 A ⁡ k = D ⁡ k
206 205 oveq1d ⊢ φ ∧ x ∈ ℂ ∖ 0 ∧ k ∈ Z → A ⁡ k + 1 A ⁡ k ⁢ x = D ⁡ k ⁢ x
207 161 adantr ⊢ φ ∧ x ∈ ℂ ∖ 0 ∧ k ∈ Z → x ∈ ℂ
208 165 207 mulcomd ⊢ φ ∧ x ∈ ℂ ∖ 0 ∧ k ∈ Z → D ⁡ k ⁢ x = x ⁢ D ⁡ k
209 202 206 208 3eqtrd ⊢ φ ∧ x ∈ ℂ ∖ 0 ∧ k ∈ Z → n ∈ ℕ 0 ⟼ G ⁡ x ⁡ n + 1 G ⁡ x ⁡ n ⁡ k = x ⁢ D ⁡ k
210 5 158 159 161 163 165 209 climmulc2 ⊢ φ ∧ x ∈ ℂ ∖ 0 → n ∈ ℕ 0 ⟼ G ⁡ x ⁡ n + 1 G ⁡ x ⁡ n ⇝ x ⁢ L
211 climres ⊢ M ∈ ℤ ∧ n ∈ ℕ 0 ⟼ G ⁡ x ⁡ n + 1 G ⁡ x ⁡ n ∈ V → n ∈ ℕ 0 ⟼ G ⁡ x ⁡ n + 1 G ⁡ x ⁡ n ↾ ℤ ≥ M ⇝ x ⁢ L ↔ n ∈ ℕ 0 ⟼ G ⁡ x ⁡ n + 1 G ⁡ x ⁡ n ⇝ x ⁢ L
212 158 162 211 sylancl ⊢ φ ∧ x ∈ ℂ ∖ 0 → n ∈ ℕ 0 ⟼ G ⁡ x ⁡ n + 1 G ⁡ x ⁡ n ↾ ℤ ≥ M ⇝ x ⁢ L ↔ n ∈ ℕ 0 ⟼ G ⁡ x ⁡ n + 1 G ⁡ x ⁡ n ⇝ x ⁢ L
213 210 212 mpbird ⊢ φ ∧ x ∈ ℂ ∖ 0 → n ∈ ℕ 0 ⟼ G ⁡ x ⁡ n + 1 G ⁡ x ⁡ n ↾ ℤ ≥ M ⇝ x ⁢ L
214 157 213 eqbrtrrd ⊢ φ ∧ x ∈ ℂ ∖ 0 → n ∈ Z ⟼ G ⁡ x ⁡ n + 1 G ⁡ x ⁡ n ⇝ x ⁢ L
215 214 adantr ⊢ φ ∧ x ∈ ℂ ∖ 0 ∧ x ⁢ L ≠ 1 → n ∈ Z ⟼ G ⁡ x ⁡ n + 1 G ⁡ x ⁡ n ⇝ x ⁢ L
216 simpr ⊢ φ ∧ x ∈ ℂ ∖ 0 ∧ x ⁢ L ≠ 1 → x ⁢ L ≠ 1
217 110 5 111 112 132 148 153 215 216 cvgdvgrat ⊢ φ ∧ x ∈ ℂ ∖ 0 ∧ x ⁢ L ≠ 1 → x ⁢ L < 1 ↔ seq 0 + G ⁡ x ∈ dom ⁡ ⇝
218 109 217 sylanl2 ⊢ φ ∧ x ∈ ℝ ∖ 0 ∧ x ⁢ L ≠ 1 → x ⁢ L < 1 ↔ seq 0 + G ⁡ x ∈ dom ⁡ ⇝
219 eldifi ⊢ x ∈ ℝ ∖ 0 → x ∈ ℝ
220 fveq2 ⊢ r = x → G ⁡ r = G ⁡ x
221 220 seqeq3d ⊢ r = x → seq 0 + G ⁡ r = seq 0 + G ⁡ x
222 221 eleq1d ⊢ r = x → seq 0 + G ⁡ r ∈ dom ⁡ ⇝ ↔ seq 0 + G ⁡ x ∈ dom ⁡ ⇝
223 222 elrab3 ⊢ x ∈ ℝ → x ∈ r ∈ ℝ | seq 0 + G ⁡ r ∈ dom ⁡ ⇝ ↔ seq 0 + G ⁡ x ∈ dom ⁡ ⇝
224 219 223 syl ⊢ x ∈ ℝ ∖ 0 → x ∈ r ∈ ℝ | seq 0 + G ⁡ r ∈ dom ⁡ ⇝ ↔ seq 0 + G ⁡ x ∈ dom ⁡ ⇝
225 224 ad2antlr ⊢ φ ∧ x ∈ ℝ ∖ 0 ∧ x ⁢ L ≠ 1 → x ∈ r ∈ ℝ | seq 0 + G ⁡ r ∈ dom ⁡ ⇝ ↔ seq 0 + G ⁡ x ∈ dom ⁡ ⇝
226 218 225 bitr4d ⊢ φ ∧ x ∈ ℝ ∖ 0 ∧ x ⁢ L ≠ 1 → x ⁢ L < 1 ↔ x ∈ r ∈ ℝ | seq 0 + G ⁡ r ∈ dom ⁡ ⇝
227 226 an32s ⊢ φ ∧ x ⁢ L ≠ 1 ∧ x ∈ ℝ ∖ 0 → x ⁢ L < 1 ↔ x ∈ r ∈ ℝ | seq 0 + G ⁡ r ∈ dom ⁡ ⇝
228 105 227 jaodan ⊢ φ ∧ x ⁢ L ≠ 1 ∧ x ∈ ℝ ∩ 0 ∨ x ∈ ℝ ∖ 0 → x ⁢ L < 1 ↔ x ∈ r ∈ ℝ | seq 0 + G ⁡ r ∈ dom ⁡ ⇝
229 86 228 sylan2br ⊢ φ ∧ x ⁢ L ≠ 1 ∧ x ∈ ℝ → x ⁢ L < 1 ↔ x ∈ r ∈ ℝ | seq 0 + G ⁡ r ∈ dom ⁡ ⇝
230 229 an32s ⊢ φ ∧ x ∈ ℝ ∧ x ⁢ L ≠ 1 → x ⁢ L < 1 ↔ x ∈ r ∈ ℝ | seq 0 + G ⁡ r ∈ dom ⁡ ⇝
231 82 230 bitr3d ⊢ φ ∧ x ∈ ℝ ∧ x ⁢ L ≠ 1 → x < 1 L ↔ x ∈ r ∈ ℝ | seq 0 + G ⁡ r ∈ dom ⁡ ⇝
232 69 231 syldan ⊢ φ ∧ x ∈ ℝ ∧ x ≠ 1 L → x < 1 L ↔ x ∈ r ∈ ℝ | seq 0 + G ⁡ r ∈ dom ⁡ ⇝
233 232 notbid ⊢ φ ∧ x ∈ ℝ ∧ x ≠ 1 L → ¬ x < 1 L ↔ ¬ x ∈ r ∈ ℝ | seq 0 + G ⁡ r ∈ dom ⁡ ⇝
234 58 233 bitrd ⊢ φ ∧ x ∈ ℝ ∧ x ≠ 1 L → 1 L < x ↔ ¬ x ∈ r ∈ ℝ | seq 0 + G ⁡ r ∈ dom ⁡ ⇝
235 234 biimpd ⊢ φ ∧ x ∈ ℝ ∧ x ≠ 1 L → 1 L < x → ¬ x ∈ r ∈ ℝ | seq 0 + G ⁡ r ∈ dom ⁡ ⇝
236 235 impancom ⊢ φ ∧ x ∈ ℝ ∧ 1 L < x → x ≠ 1 L → ¬ x ∈ r ∈ ℝ | seq 0 + G ⁡ r ∈ dom ⁡ ⇝
237 52 236 mpd ⊢ φ ∧ x ∈ ℝ ∧ 1 L < x → ¬ x ∈ r ∈ ℝ | seq 0 + G ⁡ r ∈ dom ⁡ ⇝
238 237 ex ⊢ φ ∧ x ∈ ℝ → 1 L < x → ¬ x ∈ r ∈ ℝ | seq 0 + G ⁡ r ∈ dom ⁡ ⇝
239 238 con2d ⊢ φ ∧ x ∈ ℝ → x ∈ r ∈ ℝ | seq 0 + G ⁡ r ∈ dom ⁡ ⇝ → ¬ 1 L < x
240 47 adantr ⊢ φ ∧ x ∈ ℝ ∧ 1 L < x → 1 L ∈ ℝ
241 simplr ⊢ φ ∧ x ∈ ℝ ∧ 1 L < x → x ∈ ℝ
242 50 adantr ⊢ φ ∧ x ∈ ℝ ∧ 1 L < x → x ∈ ℝ
243 simpr ⊢ φ ∧ x ∈ ℝ ∧ 1 L < x → 1 L < x
244 241 leabsd ⊢ φ ∧ x ∈ ℝ ∧ 1 L < x → x ≤ x
245 240 241 242 243 244 ltletrd ⊢ φ ∧ x ∈ ℝ ∧ 1 L < x → 1 L < x
246 245 ex ⊢ φ ∧ x ∈ ℝ → 1 L < x → 1 L < x
247 239 246 nsyld ⊢ φ ∧ x ∈ ℝ → x ∈ r ∈ ℝ | seq 0 + G ⁡ r ∈ dom ⁡ ⇝ → ¬ 1 L < x
248 46 247 sylan2 ⊢ φ ∧ x ∈ r ∈ ℝ | seq 0 + G ⁡ r ∈ dom ⁡ ⇝ → x ∈ r ∈ ℝ | seq 0 + G ⁡ r ∈ dom ⁡ ⇝ → ¬ 1 L < x
249 45 248 mpd ⊢ φ ∧ x ∈ r ∈ ℝ | seq 0 + G ⁡ r ∈ dom ⁡ ⇝ → ¬ 1 L < x
250 43 renegcld ⊢ φ → − 1 L ∈ ℝ
251 250 rexrd ⊢ φ → − 1 L ∈ ℝ *
252 iooss1 ⊢ − 1 L ∈ ℝ * ∧ − 1 L ≤ x → x 1 L ⊆ − 1 L 1 L
253 251 252 sylan ⊢ φ ∧ − 1 L ≤ x → x 1 L ⊆ − 1 L 1 L
254 253 adantlr ⊢ φ ∧ x ∈ ℝ * ∧ x < 1 L ∧ − 1 L ≤ x → x 1 L ⊆ − 1 L 1 L
255 eliooord ⊢ k ∈ x 1 L → x < k ∧ k < 1 L
256 255 simpld ⊢ k ∈ x 1 L → x < k
257 256 rgen ⊢ ∀ k ∈ x 1 L x < k
258 ioon0 ⊢ x ∈ ℝ * ∧ 1 L ∈ ℝ * → x 1 L ≠ ∅ ↔ x < 1 L
259 44 258 sylan2 ⊢ x ∈ ℝ * ∧ φ → x 1 L ≠ ∅ ↔ x < 1 L
260 259 ancoms ⊢ φ ∧ x ∈ ℝ * → x 1 L ≠ ∅ ↔ x < 1 L
261 260 biimpar ⊢ φ ∧ x ∈ ℝ * ∧ x < 1 L → x 1 L ≠ ∅
262 r19.2zb ⊢ x 1 L ≠ ∅ ↔ ∀ k ∈ x 1 L x < k → ∃ k ∈ x 1 L x < k
263 261 262 sylib ⊢ φ ∧ x ∈ ℝ * ∧ x < 1 L → ∀ k ∈ x 1 L x < k → ∃ k ∈ x 1 L x < k
264 257 263 mpi ⊢ φ ∧ x ∈ ℝ * ∧ x < 1 L → ∃ k ∈ x 1 L x < k
265 264 anasss ⊢ φ ∧ x ∈ ℝ * ∧ x < 1 L → ∃ k ∈ x 1 L x < k
266 265 adantr ⊢ φ ∧ x ∈ ℝ * ∧ x < 1 L ∧ − 1 L ≤ x → ∃ k ∈ x 1 L x < k
267 ssrexv ⊢ x 1 L ⊆ − 1 L 1 L → ∃ k ∈ x 1 L x < k → ∃ k ∈ − 1 L 1 L x < k
268 254 266 267 sylc ⊢ φ ∧ x ∈ ℝ * ∧ x < 1 L ∧ − 1 L ≤ x → ∃ k ∈ − 1 L 1 L x < k
269 simplr ⊢ φ ∧ x ∈ ℝ * ∧ ¬ − 1 L ≤ x → x ∈ ℝ *
270 xrltnle ⊢ x ∈ ℝ * ∧ − 1 L ∈ ℝ * → x < − 1 L ↔ ¬ − 1 L ≤ x
271 xrltle ⊢ x ∈ ℝ * ∧ − 1 L ∈ ℝ * → x < − 1 L → x ≤ − 1 L
272 270 271 sylbird ⊢ x ∈ ℝ * ∧ − 1 L ∈ ℝ * → ¬ − 1 L ≤ x → x ≤ − 1 L
273 251 272 sylan2 ⊢ x ∈ ℝ * ∧ φ → ¬ − 1 L ≤ x → x ≤ − 1 L
274 273 ancoms ⊢ φ ∧ x ∈ ℝ * → ¬ − 1 L ≤ x → x ≤ − 1 L
275 274 imp ⊢ φ ∧ x ∈ ℝ * ∧ ¬ − 1 L ≤ x → x ≤ − 1 L
276 iooss1 ⊢ x ∈ ℝ * ∧ x ≤ − 1 L → − 1 L 1 L ⊆ x 1 L
277 269 275 276 syl2anc ⊢ φ ∧ x ∈ ℝ * ∧ ¬ − 1 L ≤ x → − 1 L 1 L ⊆ x 1 L
278 277 sselda ⊢ φ ∧ x ∈ ℝ * ∧ ¬ − 1 L ≤ x ∧ k ∈ − 1 L 1 L → k ∈ x 1 L
279 278 256 syl ⊢ φ ∧ x ∈ ℝ * ∧ ¬ − 1 L ≤ x ∧ k ∈ − 1 L 1 L → x < k
280 279 ralrimiva ⊢ φ ∧ x ∈ ℝ * ∧ ¬ − 1 L ≤ x → ∀ k ∈ − 1 L 1 L x < k
281 42 78 recgt0d ⊢ φ → 0 < 1 L
282 43 43 281 281 addgt0d ⊢ φ → 0 < 1 L + 1 L
283 43 recnd ⊢ φ → 1 L ∈ ℂ
284 283 283 subnegd ⊢ φ → 1 L − − 1 L = 1 L + 1 L
285 282 284 breqtrrd ⊢ φ → 0 < 1 L − − 1 L
286 250 43 posdifd ⊢ φ → − 1 L < 1 L ↔ 0 < 1 L − − 1 L
287 285 286 mpbird ⊢ φ → − 1 L < 1 L
288 ioon0 ⊢ − 1 L ∈ ℝ * ∧ 1 L ∈ ℝ * → − 1 L 1 L ≠ ∅ ↔ − 1 L < 1 L
289 251 44 288 syl2anc ⊢ φ → − 1 L 1 L ≠ ∅ ↔ − 1 L < 1 L
290 287 289 mpbird ⊢ φ → − 1 L 1 L ≠ ∅
291 r19.2zb ⊢ − 1 L 1 L ≠ ∅ ↔ ∀ k ∈ − 1 L 1 L x < k → ∃ k ∈ − 1 L 1 L x < k
292 290 291 sylib ⊢ φ → ∀ k ∈ − 1 L 1 L x < k → ∃ k ∈ − 1 L 1 L x < k
293 292 ad2antrr ⊢ φ ∧ x ∈ ℝ * ∧ ¬ − 1 L ≤ x → ∀ k ∈ − 1 L 1 L x < k → ∃ k ∈ − 1 L 1 L x < k
294 280 293 mpd ⊢ φ ∧ x ∈ ℝ * ∧ ¬ − 1 L ≤ x → ∃ k ∈ − 1 L 1 L x < k
295 294 adantlrr ⊢ φ ∧ x ∈ ℝ * ∧ x < 1 L ∧ ¬ − 1 L ≤ x → ∃ k ∈ − 1 L 1 L x < k
296 268 295 pm2.61dan ⊢ φ ∧ x ∈ ℝ * ∧ x < 1 L → ∃ k ∈ − 1 L 1 L x < k
297 elioo2 ⊢ − 1 L ∈ ℝ * ∧ 1 L ∈ ℝ * → x ∈ − 1 L 1 L ↔ x ∈ ℝ ∧ − 1 L < x ∧ x < 1 L
298 251 44 297 syl2anc ⊢ φ → x ∈ − 1 L 1 L ↔ x ∈ ℝ ∧ − 1 L < x ∧ x < 1 L
299 298 biimpa ⊢ φ ∧ x ∈ − 1 L 1 L → x ∈ ℝ ∧ − 1 L < x ∧ x < 1 L
300 simpr ⊢ φ ∧ x ∈ ℝ → x ∈ ℝ
301 300 47 absltd ⊢ φ ∧ x ∈ ℝ → x < 1 L ↔ − 1 L < x ∧ x < 1 L
302 50 adantr ⊢ φ ∧ x ∈ ℝ ∧ x < 1 L → x ∈ ℝ
303 simpr ⊢ φ ∧ x ∈ ℝ ∧ x < 1 L → x < 1 L
304 302 303 ltned ⊢ φ ∧ x ∈ ℝ ∧ x < 1 L → x ≠ 1 L
305 232 biimpd ⊢ φ ∧ x ∈ ℝ ∧ x ≠ 1 L → x < 1 L → x ∈ r ∈ ℝ | seq 0 + G ⁡ r ∈ dom ⁡ ⇝
306 305 impancom ⊢ φ ∧ x ∈ ℝ ∧ x < 1 L → x ≠ 1 L → x ∈ r ∈ ℝ | seq 0 + G ⁡ r ∈ dom ⁡ ⇝
307 304 306 mpd ⊢ φ ∧ x ∈ ℝ ∧ x < 1 L → x ∈ r ∈ ℝ | seq 0 + G ⁡ r ∈ dom ⁡ ⇝
308 307 ex ⊢ φ ∧ x ∈ ℝ → x < 1 L → x ∈ r ∈ ℝ | seq 0 + G ⁡ r ∈ dom ⁡ ⇝
309 301 308 sylbird ⊢ φ ∧ x ∈ ℝ → − 1 L < x ∧ x < 1 L → x ∈ r ∈ ℝ | seq 0 + G ⁡ r ∈ dom ⁡ ⇝
310 309 impr ⊢ φ ∧ x ∈ ℝ ∧ − 1 L < x ∧ x < 1 L → x ∈ r ∈ ℝ | seq 0 + G ⁡ r ∈ dom ⁡ ⇝
311 310 expcom ⊢ x ∈ ℝ ∧ − 1 L < x ∧ x < 1 L → φ → x ∈ r ∈ ℝ | seq 0 + G ⁡ r ∈ dom ⁡ ⇝
312 311 3impb ⊢ x ∈ ℝ ∧ − 1 L < x ∧ x < 1 L → φ → x ∈ r ∈ ℝ | seq 0 + G ⁡ r ∈ dom ⁡ ⇝
313 312 impcom ⊢ φ ∧ x ∈ ℝ ∧ − 1 L < x ∧ x < 1 L → x ∈ r ∈ ℝ | seq 0 + G ⁡ r ∈ dom ⁡ ⇝
314 299 313 syldan ⊢ φ ∧ x ∈ − 1 L 1 L → x ∈ r ∈ ℝ | seq 0 + G ⁡ r ∈ dom ⁡ ⇝
315 314 ex ⊢ φ → x ∈ − 1 L 1 L → x ∈ r ∈ ℝ | seq 0 + G ⁡ r ∈ dom ⁡ ⇝
316 315 ssrdv ⊢ φ → − 1 L 1 L ⊆ r ∈ ℝ | seq 0 + G ⁡ r ∈ dom ⁡ ⇝
317 ssrexv ⊢ − 1 L 1 L ⊆ r ∈ ℝ | seq 0 + G ⁡ r ∈ dom ⁡ ⇝ → ∃ k ∈ − 1 L 1 L x < k → ∃ k ∈ r ∈ ℝ | seq 0 + G ⁡ r ∈ dom ⁡ ⇝ x < k
318 316 317 syl ⊢ φ → ∃ k ∈ − 1 L 1 L x < k → ∃ k ∈ r ∈ ℝ | seq 0 + G ⁡ r ∈ dom ⁡ ⇝ x < k
319 318 adantr ⊢ φ ∧ x ∈ ℝ * ∧ x < 1 L → ∃ k ∈ − 1 L 1 L x < k → ∃ k ∈ r ∈ ℝ | seq 0 + G ⁡ r ∈ dom ⁡ ⇝ x < k
320 296 319 mpd ⊢ φ ∧ x ∈ ℝ * ∧ x < 1 L → ∃ k ∈ r ∈ ℝ | seq 0 + G ⁡ r ∈ dom ⁡ ⇝ x < k
321 11 44 249 320 eqsupd ⊢ φ → sup r ∈ ℝ | seq 0 + G ⁡ r ∈ dom ⁡ ⇝ ℝ * < = 1 L
322 3 321 eqtrid ⊢ φ → R = 1 L