Metamath Proof Explorer


Theorem climsuse

Description: A subsequence G of a converging sequence F , converges to the same limit. I is the strictly increasing and it is used to index the subsequence. (Contributed by Glauco Siliprandi, 29-Jun-2017)

Ref Expression
Hypotheses climsuse.1 k φ
climsuse.3 _ k F
climsuse.2 _ k G
climsuse.4 _ k I
climsuse.5 Z = M
climsuse.6 φ M
climsuse.7 φ F X
climsuse.8 φ k Z F k
climsuse.9 φ F A
climsuse.10 φ I M Z
climsuse.11 φ k Z I k + 1 I k + 1
climsuse.12 φ G Y
climsuse.13 φ k Z G k = F I k
Assertion climsuse φ G A

Proof

Step Hyp Ref Expression
1 climsuse.1 k φ
2 climsuse.3 _ k F
3 climsuse.2 _ k G
4 climsuse.4 _ k I
5 climsuse.5 Z = M
6 climsuse.6 φ M
7 climsuse.7 φ F X
8 climsuse.8 φ k Z F k
9 climsuse.9 φ F A
10 climsuse.10 φ I M Z
11 climsuse.11 φ k Z I k + 1 I k + 1
12 climsuse.12 φ G Y
13 climsuse.13 φ k Z G k = F I k
14 climcl F A A
15 9 14 syl φ A
16 nfv x φ
17 simpllr φ x + j i j F i F i A < x M j j
18 6 ad4antr φ x + j i j F i F i A < x ¬ M j M
19 17 18 ifclda φ x + j i j F i F i A < x if M j j M
20 nfv i φ x + j
21 nfra1 i i j F i F i A < x
22 20 21 nfan i φ x + j i j F i F i A < x
23 simp-4l φ x + j i j F i F i A < x i if M j j M φ
24 simpllr φ x + j i j F i F i A < x i if M j j M j
25 23 24 jca φ x + j i j F i F i A < x i if M j j M φ j
26 simpr φ x + j i j F i F i A < x i if M j j M i if M j j M
27 simpr φ j M j M j
28 6 anim1i φ j M j
29 28 adantr φ j M j M j
30 eluz M j j M M j
31 29 30 syl φ j M j j M M j
32 27 31 mpbird φ j M j j M
33 simpll φ j ¬ M j φ
34 uzid M M M
35 33 6 34 3syl φ j ¬ M j M M
36 32 35 ifclda φ j if M j j M M
37 uzss if M j j M M if M j j M M
38 36 37 syl φ j if M j j M M
39 38 5 sseqtrrdi φ j if M j j M Z
40 39 sseld φ j i if M j j M i Z
41 25 26 40 sylc φ x + j i j F i F i A < x i if M j j M i Z
42 nfv k i Z
43 1 42 nfan k φ i Z
44 nfcv _ k i
45 3 44 nffv _ k G i
46 4 44 nffv _ k I i
47 2 46 nffv _ k F I i
48 45 47 nfeq k G i = F I i
49 43 48 nfim k φ i Z G i = F I i
50 eleq1 k = i k Z i Z
51 50 anbi2d k = i φ k Z φ i Z
52 fveq2 k = i G k = G i
53 2fveq3 k = i F I k = F I i
54 52 53 eqeq12d k = i G k = F I k G i = F I i
55 51 54 imbi12d k = i φ k Z G k = F I k φ i Z G i = F I i
56 49 55 13 chvarfv φ i Z G i = F I i
57 5 eleq2i i Z i M
58 57 bilani φ i Z i M
59 uzss i M i M
60 58 59 syl φ i Z i M
61 nfcv _ k i + 1
62 4 61 nffv _ k I i + 1
63 nfcv _ k
64 nfcv _ k +
65 nfcv _ k 1
66 46 64 65 nfov _ k I i + 1
67 63 66 nffv _ k I i + 1
68 62 67 nfel k I i + 1 I i + 1
69 43 68 nfim k φ i Z I i + 1 I i + 1
70 fvoveq1 k = i I k + 1 = I i + 1
71 fveq2 k = i I k = I i
72 71 fvoveq1d k = i I k + 1 = I i + 1
73 70 72 eleq12d k = i I k + 1 I k + 1 I i + 1 I i + 1
74 51 73 imbi12d k = i φ k Z I k + 1 I k + 1 φ i Z I i + 1 I i + 1
75 69 74 11 chvarfv φ i Z I i + 1 I i + 1
76 5 6 10 75 climsuselem1 φ i Z I i i
77 60 76 sseldd φ i Z I i M
78 77 5 eleqtrrdi φ i Z I i Z
79 78 ex φ i Z I i Z
80 79 imdistani φ i Z φ I i Z
81 42 nfci _ k Z
82 46 81 nfel k I i Z
83 1 82 nfan k φ I i Z
84 47 nfel1 k F I i
85 83 84 nfim k φ I i Z F I i
86 eleq1 k = I i k Z I i Z
87 86 anbi2d k = I i φ k Z φ I i Z
88 fveq2 k = I i F k = F I i
89 88 eleq1d k = I i F k F I i
90 87 89 imbi12d k = I i φ k Z F k φ I i Z F I i
91 46 85 90 8 vtoclgf I i Z φ I i Z F I i
92 78 80 91 sylc φ i Z F I i
93 56 92 eqeltrd φ i Z G i
94 23 41 93 syl2anc φ x + j i j F i F i A < x i if M j j M G i
95 23 41 56 syl2anc φ x + j i j F i F i A < x i if M j j M G i = F I i
96 95 fvoveq1d φ x + j i j F i F i A < x i if M j j M G i A = F I i A
97 fveq2 i = h F i = F h
98 97 eleq1d i = h F i F h
99 97 fvoveq1d i = h F i A = F h A
100 99 breq1d i = h F i A < x F h A < x
101 98 100 anbi12d i = h F i F i A < x F h F h A < x
102 101 cbvralvw i j F i F i A < x h j F h F h A < x
103 102 biimpi i j F i F i A < x h j F h F h A < x
104 103 ad2antlr φ x + j i j F i F i A < x i if M j j M h j F h F h A < x
105 zre j j
106 105 3ad2ant2 φ j i if M j j M j
107 simp3 φ j i if M j j M i if M j j M
108 eluzelz i if M j j M i
109 zre i i
110 107 108 109 3syl φ j i if M j j M i
111 simp1 φ j i if M j j M φ
112 6 zred φ M
113 111 112 syl φ j i if M j j M M
114 simpl2 φ j i if M j j M M j j
115 114 zred φ j i if M j j M M j j
116 113 adantr φ j i if M j j M ¬ M j M
117 115 116 ifclda φ j i if M j j M if M j j M
118 max1 M j M if M j j M
119 113 106 118 syl2anc φ j i if M j j M M if M j j M
120 eluzle i if M j j M if M j j M i
121 120 3ad2ant3 φ j i if M j j M if M j j M i
122 113 117 110 119 121 letrd φ j i if M j j M M i
123 111 6 syl φ j i if M j j M M
124 108 3ad2ant3 φ j i if M j j M i
125 eluz M i i M M i
126 123 124 125 syl2anc φ j i if M j j M i M M i
127 122 126 mpbird φ j i if M j j M i M
128 127 5 eleqtrrdi φ j i if M j j M i Z
129 111 128 jca φ j i if M j j M φ i Z
130 eluzelre I i M I i
131 129 77 130 3syl φ j i if M j j M I i
132 max2 M j j if M j j M
133 113 106 132 syl2anc φ j i if M j j M j if M j j M
134 106 117 110 133 121 letrd φ j i if M j j M j i
135 eluzle I i i i I i
136 129 76 135 3syl φ j i if M j j M i I i
137 106 110 131 134 136 letrd φ j i if M j j M j I i
138 simp2 φ j i if M j j M j
139 eluzelz I i i I i
140 129 76 139 3syl φ j i if M j j M I i
141 eluz j I i I i j j I i
142 138 140 141 syl2anc φ j i if M j j M I i j j I i
143 137 142 mpbird φ j i if M j j M I i j
144 23 24 26 143 syl3anc φ x + j i j F i F i A < x i if M j j M I i j
145 fveq2 h = I i F h = F I i
146 145 eleq1d h = I i F h F I i
147 145 fvoveq1d h = I i F h A = F I i A
148 147 breq1d h = I i F h A < x F I i A < x
149 146 148 anbi12d h = I i F h F h A < x F I i F I i A < x
150 149 rspccva h j F h F h A < x I i j F I i F I i A < x
151 150 simprd h j F h F h A < x I i j F I i A < x
152 104 144 151 syl2anc φ x + j i j F i F i A < x i if M j j M F I i A < x
153 96 152 eqbrtrd φ x + j i j F i F i A < x i if M j j M G i A < x
154 94 153 jca φ x + j i j F i F i A < x i if M j j M G i G i A < x
155 154 ex φ x + j i j F i F i A < x i if M j j M G i G i A < x
156 22 155 ralrimi φ x + j i j F i F i A < x i if M j j M G i G i A < x
157 fveq2 l = if M j j M l = if M j j M
158 157 raleqdv l = if M j j M i l G i G i A < x i if M j j M G i G i A < x
159 158 rspcev if M j j M i if M j j M G i G i A < x l i l G i G i A < x
160 19 156 159 syl2anc φ x + j i j F i F i A < x l i l G i G i A < x
161 eqidd φ i F i = F i
162 7 161 clim φ F A A x + j i j F i F i A < x
163 9 162 mpbid φ A x + j i j F i F i A < x
164 163 simprd φ x + j i j F i F i A < x
165 164 r19.21bi φ x + j i j F i F i A < x
166 160 165 r19.29a φ x + l i l G i G i A < x
167 166 ex φ x + l i l G i G i A < x
168 16 167 ralrimi φ x + l i l G i G i A < x
169 eqidd φ i G i = G i
170 12 169 clim φ G A A x + l i l G i G i A < x
171 15 168 170 mpbir2and φ G A