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 𝑘 𝜑
climsuse.3 𝑘 𝐹
climsuse.2 𝑘 𝐺
climsuse.4 𝑘 𝐼
climsuse.5 𝑍 = ( ℤ𝑀 )
climsuse.6 ( 𝜑𝑀 ∈ ℤ )
climsuse.7 ( 𝜑𝐹𝑋 )
climsuse.8 ( ( 𝜑𝑘𝑍 ) → ( 𝐹𝑘 ) ∈ ℂ )
climsuse.9 ( 𝜑𝐹𝐴 )
climsuse.10 ( 𝜑 → ( 𝐼𝑀 ) ∈ 𝑍 )
climsuse.11 ( ( 𝜑𝑘𝑍 ) → ( 𝐼 ‘ ( 𝑘 + 1 ) ) ∈ ( ℤ ‘ ( ( 𝐼𝑘 ) + 1 ) ) )
climsuse.12 ( 𝜑𝐺𝑌 )
climsuse.13 ( ( 𝜑𝑘𝑍 ) → ( 𝐺𝑘 ) = ( 𝐹 ‘ ( 𝐼𝑘 ) ) )
Assertion climsuse ( 𝜑𝐺𝐴 )

Proof

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