Metamath Proof Explorer


Theorem fdc

Description: Finite version of dependent choice. Construct a function whose value depends on the previous function value, except at a final point at which no new value can be chosen. The final hypothesis ensures that the process will terminate. The proof does not use the Axiom of Choice. (Contributed by Jeff Madsen, 18-Jun-2010)

Ref Expression
Hypotheses fdc.1 A V
fdc.2 M
fdc.3 Z = M
fdc.4 N = M + 1
fdc.5 a = f k 1 φ ψ
fdc.6 b = f k ψ χ
fdc.7 a = f n θ τ
fdc.8 η C A
fdc.9 η R Fr A
fdc.10 η a A θ b A φ
fdc.11 η φ a A b A b R a
Assertion fdc η n Z f f : M n A f M = C τ k N n χ

Proof

Step Hyp Ref Expression
1 fdc.1 A V
2 fdc.2 M
3 fdc.3 Z = M
4 fdc.4 N = M + 1
5 fdc.5 a = f k 1 φ ψ
6 fdc.6 b = f k ψ χ
7 fdc.7 a = f n θ τ
8 fdc.8 η C A
9 fdc.9 η R Fr A
10 fdc.10 η a A θ b A φ
11 fdc.11 η φ a A b A b R a
12 uzid M M M
13 2 12 ax-mp M M
14 13 3 eleqtrri M Z
15 eqid M a = M a
16 2 elexi M V
17 vex a V
18 16 17 fsn M a : M a M a = M a
19 15 18 mpbir M a : M a
20 snssi a A a A
21 fss M a : M a a A M a : M A
22 19 20 21 sylancr a A M a : M A
23 fzsn M M M = M
24 2 23 ax-mp M M = M
25 24 feq2i M a : M M A M a : M A
26 22 25 sylibr a A M a : M M A
27 26 adantr a A θ M a : M M A
28 16 17 fvsn M a M = a
29 28 a1i a A θ M a M = a
30 simpr a A θ θ
31 snex M a V
32 feq1 f = M a f : M M A M a : M M A
33 fveq1 f = M a f M = M a M
34 33 eqeq1d f = M a f M = a M a M = a
35 33 28 eqtrdi f = M a f M = a
36 sbceq2a f M = a [˙ f M / a]˙ θ θ
37 35 36 syl f = M a [˙ f M / a]˙ θ θ
38 34 37 anbi12d f = M a f M = a [˙ f M / a]˙ θ M a M = a θ
39 32 38 anbi12d f = M a f : M M A f M = a [˙ f M / a]˙ θ M a : M M A M a M = a θ
40 31 39 spcev M a : M M A M a M = a θ f f : M M A f M = a [˙ f M / a]˙ θ
41 27 29 30 40 syl12anc a A θ f f : M M A f M = a [˙ f M / a]˙ θ
42 oveq2 n = M M n = M M
43 42 feq2d n = M f : M n A f : M M A
44 fvex f n V
45 44 7 sbcie [˙ f n / a]˙ θ τ
46 fveq2 n = M f n = f M
47 46 sbceq1d n = M [˙ f n / a]˙ θ [˙ f M / a]˙ θ
48 45 47 bitr3id n = M τ [˙ f M / a]˙ θ
49 48 anbi2d n = M f M = a τ f M = a [˙ f M / a]˙ θ
50 oveq2 n = M N n = N M
51 4 oveq1i N M = M + 1 M
52 2 zrei M
53 52 ltp1i M < M + 1
54 peano2z M M + 1
55 2 54 ax-mp M + 1
56 fzn M + 1 M M < M + 1 M + 1 M =
57 55 2 56 mp2an M < M + 1 M + 1 M =
58 53 57 mpbi M + 1 M =
59 51 58 eqtri N M =
60 50 59 eqtrdi n = M N n =
61 60 raleqdv n = M k N n χ k χ
62 43 49 61 3anbi123d n = M f : M n A f M = a τ k N n χ f : M M A f M = a [˙ f M / a]˙ θ k χ
63 ral0 k χ
64 df-3an f : M M A f M = a [˙ f M / a]˙ θ k χ f : M M A f M = a [˙ f M / a]˙ θ k χ
65 63 64 mpbiran2 f : M M A f M = a [˙ f M / a]˙ θ k χ f : M M A f M = a [˙ f M / a]˙ θ
66 62 65 bitrdi n = M f : M n A f M = a τ k N n χ f : M M A f M = a [˙ f M / a]˙ θ
67 66 exbidv n = M f f : M n A f M = a τ k N n χ f f : M M A f M = a [˙ f M / a]˙ θ
68 67 rspcev M Z f f : M M A f M = a [˙ f M / a]˙ θ n Z f f : M n A f M = a τ k N n χ
69 14 41 68 sylancr a A θ n Z f f : M n A f M = a τ k N n χ
70 69 adantll η a A θ n Z f f : M n A f M = a τ k N n χ
71 70 a1d η a A θ d A c A | n Z f f : M n A f M = c τ k N n χ ¬ d R a n Z f f : M n A f M = a τ k N n χ
72 breq1 d = b d R a b R a
73 72 rspcev b A c A | n Z f f : M n A f M = c τ k N n χ b R a d A c A | n Z f f : M n A f M = c τ k N n χ d R a
74 73 expcom b R a b A c A | n Z f f : M n A f M = c τ k N n χ d A c A | n Z f f : M n A f M = c τ k N n χ d R a
75 11 74 syl η φ a A b A b A c A | n Z f f : M n A f M = c τ k N n χ d A c A | n Z f f : M n A f M = c τ k N n χ d R a
76 dfrex2 d A c A | n Z f f : M n A f M = c τ k N n χ d R a ¬ d A c A | n Z f f : M n A f M = c τ k N n χ ¬ d R a
77 75 76 syl6ib η φ a A b A b A c A | n Z f f : M n A f M = c τ k N n χ ¬ d A c A | n Z f f : M n A f M = c τ k N n χ ¬ d R a
78 77 con2d η φ a A b A d A c A | n Z f f : M n A f M = c τ k N n χ ¬ d R a ¬ b A c A | n Z f f : M n A f M = c τ k N n χ
79 eldif b A A c A | n Z f f : M n A f M = c τ k N n χ b A ¬ b A c A | n Z f f : M n A f M = c τ k N n χ
80 79 simplbi2 b A ¬ b A c A | n Z f f : M n A f M = c τ k N n χ b A A c A | n Z f f : M n A f M = c τ k N n χ
81 ssrab2 c A | n Z f f : M n A f M = c τ k N n χ A
82 dfss4 c A | n Z f f : M n A f M = c τ k N n χ A A A c A | n Z f f : M n A f M = c τ k N n χ = c A | n Z f f : M n A f M = c τ k N n χ
83 81 82 mpbi A A c A | n Z f f : M n A f M = c τ k N n χ = c A | n Z f f : M n A f M = c τ k N n χ
84 83 eleq2i b A A c A | n Z f f : M n A f M = c τ k N n χ b c A | n Z f f : M n A f M = c τ k N n χ
85 eqeq2 c = b f M = c f M = b
86 85 anbi1d c = b f M = c τ f M = b τ
87 86 3anbi2d c = b f : M n A f M = c τ k N n χ f : M n A f M = b τ k N n χ
88 87 exbidv c = b f f : M n A f M = c τ k N n χ f f : M n A f M = b τ k N n χ
89 88 rexbidv c = b n Z f f : M n A f M = c τ k N n χ n Z f f : M n A f M = b τ k N n χ
90 89 elrab3 b A b c A | n Z f f : M n A f M = c τ k N n χ n Z f f : M n A f M = b τ k N n χ
91 84 90 syl5bb b A b A A c A | n Z f f : M n A f M = c τ k N n χ n Z f f : M n A f M = b τ k N n χ
92 80 91 sylibd b A ¬ b A c A | n Z f f : M n A f M = c τ k N n χ n Z f f : M n A f M = b τ k N n χ
93 92 ad2antll η φ a A b A ¬ b A c A | n Z f f : M n A f M = c τ k N n χ n Z f f : M n A f M = b τ k N n χ
94 oveq2 n = m M n = M m
95 94 feq2d n = m f : M n A f : M m A
96 fveq2 n = m f n = f m
97 96 sbceq1d n = m [˙ f n / a]˙ θ [˙ f m / a]˙ θ
98 45 97 bitr3id n = m τ [˙ f m / a]˙ θ
99 98 anbi2d n = m f M = b τ f M = b [˙ f m / a]˙ θ
100 oveq2 n = m N n = N m
101 100 raleqdv n = m k N n χ k N m χ
102 95 99 101 3anbi123d n = m f : M n A f M = b τ k N n χ f : M m A f M = b [˙ f m / a]˙ θ k N m χ
103 102 exbidv n = m f f : M n A f M = b τ k N n χ f f : M m A f M = b [˙ f m / a]˙ θ k N m χ
104 103 cbvrexvw n Z f f : M n A f M = b τ k N n χ m Z f f : M m A f M = b [˙ f m / a]˙ θ k N m χ
105 feq1 f = g f : M m A g : M m A
106 fveq1 f = g f M = g M
107 106 eqeq1d f = g f M = b g M = b
108 fveq1 f = g f m = g m
109 108 sbceq1d f = g [˙ f m / a]˙ θ [˙ g m / a]˙ θ
110 107 109 anbi12d f = g f M = b [˙ f m / a]˙ θ g M = b [˙ g m / a]˙ θ
111 fvex f k 1 V
112 5 sbcbidv a = f k 1 [˙ f k / b]˙ φ [˙ f k / b]˙ ψ
113 111 112 sbcie [˙ f k 1 / a]˙ [˙ f k / b]˙ φ [˙ f k / b]˙ ψ
114 fvex f k V
115 114 6 sbcie [˙ f k / b]˙ ψ χ
116 113 115 bitri [˙ f k 1 / a]˙ [˙ f k / b]˙ φ χ
117 fveq1 f = g f k 1 = g k 1
118 fveq1 f = g f k = g k
119 118 sbceq1d f = g [˙ f k / b]˙ φ [˙ g k / b]˙ φ
120 117 119 sbceqbid f = g [˙ f k 1 / a]˙ [˙ f k / b]˙ φ [˙ g k 1 / a]˙ [˙ g k / b]˙ φ
121 116 120 bitr3id f = g χ [˙ g k 1 / a]˙ [˙ g k / b]˙ φ
122 121 ralbidv f = g k N m χ k N m [˙ g k 1 / a]˙ [˙ g k / b]˙ φ
123 105 110 122 3anbi123d f = g f : M m A f M = b [˙ f m / a]˙ θ k N m χ g : M m A g M = b [˙ g m / a]˙ θ k N m [˙ g k 1 / a]˙ [˙ g k / b]˙ φ
124 123 cbvexvw f f : M m A f M = b [˙ f m / a]˙ θ k N m χ g g : M m A g M = b [˙ g m / a]˙ θ k N m [˙ g k 1 / a]˙ [˙ g k / b]˙ φ
125 124 rexbii m Z f f : M m A f M = b [˙ f m / a]˙ θ k N m χ m Z g g : M m A g M = b [˙ g m / a]˙ θ k N m [˙ g k 1 / a]˙ [˙ g k / b]˙ φ
126 104 125 bitri n Z f f : M n A f M = b τ k N n χ m Z g g : M m A g M = b [˙ g m / a]˙ θ k N m [˙ g k 1 / a]˙ [˙ g k / b]˙ φ
127 3 peano2uzs m Z m + 1 Z
128 127 ad2antlr η φ a A b A m Z g : M m A g M = b [˙ g m / a]˙ θ k N m [˙ g k 1 / a]˙ [˙ g k / b]˙ φ m + 1 Z
129 sbceq2a d = b [˙d / b]˙ φ φ
130 129 anbi1d d = b [˙d / b]˙ φ a A φ a A
131 130 anbi1d d = b [˙d / b]˙ φ a A m Z φ a A m Z
132 eqeq2 d = b g M = d g M = b
133 132 anbi1d d = b g M = d [˙ g m / a]˙ θ g M = b [˙ g m / a]˙ θ
134 133 3anbi2d d = b g : M m A g M = d [˙ g m / a]˙ θ k N m [˙ g k 1 / a]˙ [˙ g k / b]˙ φ g : M m A g M = b [˙ g m / a]˙ θ k N m [˙ g k 1 / a]˙ [˙ g k / b]˙ φ
135 134 imbi1d d = b g : M m A g M = d [˙ g m / a]˙ θ k N m [˙ g k 1 / a]˙ [˙ g k / b]˙ φ f f : M m + 1 A f M = a [˙ f m + 1 / a]˙ θ k N m + 1 χ g : M m A g M = b [˙ g m / a]˙ θ k N m [˙ g k 1 / a]˙ [˙ g k / b]˙ φ f f : M m + 1 A f M = a [˙ f m + 1 / a]˙ θ k N m + 1 χ
136 131 135 imbi12d d = b [˙d / b]˙ φ a A m Z g : M m A g M = d [˙ g m / a]˙ θ k N m [˙ g k 1 / a]˙ [˙ g k / b]˙ φ f f : M m + 1 A f M = a [˙ f m + 1 / a]˙ θ k N m + 1 χ φ a A m Z g : M m A g M = b [˙ g m / a]˙ θ k N m [˙ g k 1 / a]˙ [˙ g k / b]˙ φ f f : M m + 1 A f M = a [˙ f m + 1 / a]˙ θ k N m + 1 χ
137 sbceq2a c = a [˙c / a]˙ [˙d / b]˙ φ [˙d / b]˙ φ
138 eleq1 c = a c A a A
139 137 138 anbi12d c = a [˙c / a]˙ [˙d / b]˙ φ c A [˙d / b]˙ φ a A
140 139 anbi1d c = a [˙c / a]˙ [˙d / b]˙ φ c A m Z [˙d / b]˙ φ a A m Z
141 eqeq2 c = a f M = c f M = a
142 141 anbi1d c = a f M = c [˙ f m + 1 / a]˙ θ f M = a [˙ f m + 1 / a]˙ θ
143 142 3anbi2d c = a f : M m + 1 A f M = c [˙ f m + 1 / a]˙ θ k N m + 1 χ f : M m + 1 A f M = a [˙ f m + 1 / a]˙ θ k N m + 1 χ
144 143 exbidv c = a f f : M m + 1 A f M = c [˙ f m + 1 / a]˙ θ k N m + 1 χ f f : M m + 1 A f M = a [˙ f m + 1 / a]˙ θ k N m + 1 χ
145 144 imbi2d c = a g : M m A g M = d [˙ g m / a]˙ θ k N m [˙ g k 1 / a]˙ [˙ g k / b]˙ φ f f : M m + 1 A f M = c [˙ f m + 1 / a]˙ θ k N m + 1 χ g : M m A g M = d [˙ g m / a]˙ θ k N m [˙ g k 1 / a]˙ [˙ g k / b]˙ φ f f : M m + 1 A f M = a [˙ f m + 1 / a]˙ θ k N m + 1 χ
146 140 145 imbi12d c = a [˙c / a]˙ [˙d / b]˙ φ c A m Z g : M m A g M = d [˙ g m / a]˙ θ k N m [˙ g k 1 / a]˙ [˙ g k / b]˙ φ f f : M m + 1 A f M = c [˙ f m + 1 / a]˙ θ k N m + 1 χ [˙d / b]˙ φ a A m Z g : M m A g M = d [˙ g m / a]˙ θ k N m [˙ g k 1 / a]˙ [˙ g k / b]˙ φ f f : M m + 1 A f M = a [˙ f m + 1 / a]˙ θ k N m + 1 χ
147 peano2uz m M m + 1 M
148 147 3 eleq2s m Z m + 1 M
149 elfzp12 m + 1 M x M m + 1 x = M x M + 1 m + 1
150 148 149 syl m Z x M m + 1 x = M x M + 1 m + 1
151 150 ad2antlr c A m Z g : M m A x M m + 1 x = M x M + 1 m + 1
152 iftrue x = M if x = M c g x 1 = c
153 152 eleq1d x = M if x = M c g x 1 A c A
154 153 biimprcd c A x = M if x = M c g x 1 A
155 154 ad2antrr c A m Z g : M m A x = M if x = M c g x 1 A
156 1re 1
157 52 156 readdcli M + 1
158 52 157 ltnlei M < M + 1 ¬ M + 1 M
159 53 158 mpbi ¬ M + 1 M
160 eleq1 x = M x M + 1 m + 1 M M + 1 m + 1
161 elfzle1 M M + 1 m + 1 M + 1 M
162 160 161 syl6bi x = M x M + 1 m + 1 M + 1 M
163 162 com12 x M + 1 m + 1 x = M M + 1 M
164 159 163 mtoi x M + 1 m + 1 ¬ x = M
165 164 adantl m Z g : M m A x M + 1 m + 1 ¬ x = M
166 165 iffalsed m Z g : M m A x M + 1 m + 1 if x = M c g x 1 = g x 1
167 elfzelz x M + 1 m + 1 x
168 167 adantl m Z x M + 1 m + 1 x
169 eluzelz m M m
170 169 3 eleq2s m Z m
171 170 peano2zd m Z m + 1
172 1z 1
173 fzsubel M + 1 m + 1 x 1 x M + 1 m + 1 x 1 M + 1 - 1 m + 1 - 1
174 173 biimpd M + 1 m + 1 x 1 x M + 1 m + 1 x 1 M + 1 - 1 m + 1 - 1
175 172 174 mpanr2 M + 1 m + 1 x x M + 1 m + 1 x 1 M + 1 - 1 m + 1 - 1
176 55 175 mpanl1 m + 1 x x M + 1 m + 1 x 1 M + 1 - 1 m + 1 - 1
177 176 ex m + 1 x x M + 1 m + 1 x 1 M + 1 - 1 m + 1 - 1
178 171 177 syl m Z x x M + 1 m + 1 x 1 M + 1 - 1 m + 1 - 1
179 178 com23 m Z x M + 1 m + 1 x x 1 M + 1 - 1 m + 1 - 1
180 179 imp m Z x M + 1 m + 1 x x 1 M + 1 - 1 m + 1 - 1
181 168 180 mpd m Z x M + 1 m + 1 x 1 M + 1 - 1 m + 1 - 1
182 52 recni M
183 ax-1cn 1
184 182 183 pncan3oi M + 1 - 1 = M
185 184 a1i m Z M + 1 - 1 = M
186 170 zcnd m Z m
187 pncan m 1 m + 1 - 1 = m
188 186 183 187 sylancl m Z m + 1 - 1 = m
189 185 188 oveq12d m Z M + 1 - 1 m + 1 - 1 = M m
190 189 adantr m Z x M + 1 m + 1 M + 1 - 1 m + 1 - 1 = M m
191 181 190 eleqtrd m Z x M + 1 m + 1 x 1 M m
192 ffvelrn g : M m A x 1 M m g x 1 A
193 191 192 sylan2 g : M m A m Z x M + 1 m + 1 g x 1 A
194 193 anassrs g : M m A m Z x M + 1 m + 1 g x 1 A
195 194 ancom1s m Z g : M m A x M + 1 m + 1 g x 1 A
196 166 195 eqeltrd m Z g : M m A x M + 1 m + 1 if x = M c g x 1 A
197 196 ex m Z g : M m A x M + 1 m + 1 if x = M c g x 1 A
198 197 adantll c A m Z g : M m A x M + 1 m + 1 if x = M c g x 1 A
199 155 198 jaod c A m Z g : M m A x = M x M + 1 m + 1 if x = M c g x 1 A
200 151 199 sylbid c A m Z g : M m A x M m + 1 if x = M c g x 1 A
201 200 ralrimiv c A m Z g : M m A x M m + 1 if x = M c g x 1 A
202 eqid x M m + 1 if x = M c g x 1 = x M m + 1 if x = M c g x 1
203 202 fmpt x M m + 1 if x = M c g x 1 A x M m + 1 if x = M c g x 1 : M m + 1 A
204 201 203 sylib c A m Z g : M m A x M m + 1 if x = M c g x 1 : M m + 1 A
205 204 adantlll [˙c / a]˙ [˙d / b]˙ φ c A m Z g : M m A x M m + 1 if x = M c g x 1 : M m + 1 A
206 205 3ad2antr1 [˙c / a]˙ [˙d / b]˙ φ c A m Z g : M m A g M = d [˙ g m / a]˙ θ k N m [˙ g k 1 / a]˙ [˙ g k / b]˙ φ x M m + 1 if x = M c g x 1 : M m + 1 A
207 eluzfz1 m + 1 M M M m + 1
208 147 207 syl m M M M m + 1
209 208 3 eleq2s m Z M M m + 1
210 vex c V
211 152 202 210 fvmpt M M m + 1 x M m + 1 if x = M c g x 1 M = c
212 209 211 syl m Z x M m + 1 if x = M c g x 1 M = c
213 212 ad2antlr [˙c / a]˙ [˙d / b]˙ φ c A m Z g : M m A g M = d [˙ g m / a]˙ θ k N m [˙ g k 1 / a]˙ [˙ g k / b]˙ φ x M m + 1 if x = M c g x 1 M = c
214 eluzfz2 m + 1 M m + 1 M m + 1
215 147 214 syl m M m + 1 M m + 1
216 215 3 eleq2s m Z m + 1 M m + 1
217 eqeq1 x = m + 1 x = M m + 1 = M
218 fvoveq1 x = m + 1 g x 1 = g m + 1 - 1
219 217 218 ifbieq2d x = m + 1 if x = M c g x 1 = if m + 1 = M c g m + 1 - 1
220 fvex g m + 1 - 1 V
221 210 220 ifex if m + 1 = M c g m + 1 - 1 V
222 219 202 221 fvmpt m + 1 M m + 1 x M m + 1 if x = M c g x 1 m + 1 = if m + 1 = M c g m + 1 - 1
223 216 222 syl m Z x M m + 1 if x = M c g x 1 m + 1 = if m + 1 = M c g m + 1 - 1
224 eluzle m M M m
225 224 3 eleq2s m Z M m
226 zleltp1 M m M m M < m + 1
227 2 170 226 sylancr m Z M m M < m + 1
228 225 227 mpbid m Z M < m + 1
229 ltne M M < m + 1 m + 1 M
230 52 228 229 sylancr m Z m + 1 M
231 230 neneqd m Z ¬ m + 1 = M
232 231 iffalsed m Z if m + 1 = M c g m + 1 - 1 = g m + 1 - 1
233 188 fveq2d m Z g m + 1 - 1 = g m
234 223 232 233 3eqtrd m Z x M m + 1 if x = M c g x 1 m + 1 = g m
235 234 sbceq1d m Z [˙ x M m + 1 if x = M c g x 1 m + 1 / a]˙ θ [˙ g m / a]˙ θ
236 235 biimpar m Z [˙ g m / a]˙ θ [˙ x M m + 1 if x = M c g x 1 m + 1 / a]˙ θ
237 236 ad2ant2l [˙c / a]˙ [˙d / b]˙ φ c A m Z g M = d [˙ g m / a]˙ θ [˙ x M m + 1 if x = M c g x 1 m + 1 / a]˙ θ
238 237 3ad2antr2 [˙c / a]˙ [˙d / b]˙ φ c A m Z g : M m A g M = d [˙ g m / a]˙ θ k N m [˙ g k 1 / a]˙ [˙ g k / b]˙ φ [˙ x M m + 1 if x = M c g x 1 m + 1 / a]˙ θ
239 eluzp1p1 m M m + 1 M + 1
240 239 3 eleq2s m Z m + 1 M + 1
241 4 fveq2i N = M + 1
242 240 241 eleqtrrdi m Z m + 1 N
243 elfzp12 m + 1 N j N m + 1 j = N j N + 1 m + 1
244 242 243 syl m Z j N m + 1 j = N j N + 1 m + 1
245 244 biimpa m Z j N m + 1 j = N j N + 1 m + 1
246 245 adantll [˙c / a]˙ [˙d / b]˙ φ m Z j N m + 1 j = N j N + 1 m + 1
247 246 adantlr [˙c / a]˙ [˙d / b]˙ φ m Z g M = d k N m [˙ g k 1 / a]˙ [˙ g k / b]˙ φ j N m + 1 j = N j N + 1 m + 1
248 oveq1 j = N j 1 = N 1
249 4 oveq1i N 1 = M + 1 - 1
250 249 184 eqtri N 1 = M
251 248 250 eqtrdi j = N j 1 = M
252 251 fveq2d j = N x M m + 1 if x = M c g x 1 j 1 = x M m + 1 if x = M c g x 1 M
253 252 ad2antll m Z g M = d j = N x M m + 1 if x = M c g x 1 j 1 = x M m + 1 if x = M c g x 1 M
254 212 adantr m Z g M = d j = N x M m + 1 if x = M c g x 1 M = c
255 253 254 eqtrd m Z g M = d j = N x M m + 1 if x = M c g x 1 j 1 = c
256 4 eqeq2i j = N j = M + 1
257 fveq2 j = M + 1 x M m + 1 if x = M c g x 1 j = x M m + 1 if x = M c g x 1 M + 1
258 256 257 sylbi j = N x M m + 1 if x = M c g x 1 j = x M m + 1 if x = M c g x 1 M + 1
259 258 ad2antll m Z g M = d j = N x M m + 1 if x = M c g x 1 j = x M m + 1 if x = M c g x 1 M + 1
260 52 157 53 ltleii M M + 1
261 eluz2 M + 1 M M M + 1 M M + 1
262 2 55 260 261 mpbir3an M + 1 M
263 fzss1 M + 1 M M + 1 m + 1 M m + 1
264 262 263 ax-mp M + 1 m + 1 M m + 1
265 eluzfz1 m M M M m
266 265 3 eleq2s m Z M M m
267 fzaddel M m M 1 M M m M + 1 M + 1 m + 1
268 2 172 267 mpanr12 M m M M m M + 1 M + 1 m + 1
269 2 170 268 sylancr m Z M M m M + 1 M + 1 m + 1
270 266 269 mpbid m Z M + 1 M + 1 m + 1
271 264 270 sselid m Z M + 1 M m + 1
272 eqeq1 x = M + 1 x = M M + 1 = M
273 oveq1 x = M + 1 x 1 = M + 1 - 1
274 273 184 eqtrdi x = M + 1 x 1 = M
275 274 fveq2d x = M + 1 g x 1 = g M
276 272 275 ifbieq2d x = M + 1 if x = M c g x 1 = if M + 1 = M c g M
277 fvex g M V
278 210 277 ifex if M + 1 = M c g M V
279 276 202 278 fvmpt M + 1 M m + 1 x M m + 1 if x = M c g x 1 M + 1 = if M + 1 = M c g M
280 271 279 syl m Z x M m + 1 if x = M c g x 1 M + 1 = if M + 1 = M c g M
281 52 53 gtneii M + 1 M
282 ifnefalse M + 1 M if M + 1 = M c g M = g M
283 281 282 ax-mp if M + 1 = M c g M = g M
284 280 283 eqtrdi m Z x M m + 1 if x = M c g x 1 M + 1 = g M
285 284 adantr m Z g M = d j = N x M m + 1 if x = M c g x 1 M + 1 = g M
286 simprl m Z g M = d j = N g M = d
287 259 285 286 3eqtrd m Z g M = d j = N x M m + 1 if x = M c g x 1 j = d
288 287 sbceq1d m Z g M = d j = N [˙ x M m + 1 if x = M c g x 1 j / b]˙ φ [˙d / b]˙ φ
289 255 288 sbceqbid m Z g M = d j = N [˙ x M m + 1 if x = M c g x 1 j 1 / a]˙ [˙ x M m + 1 if x = M c g x 1 j / b]˙ φ [˙c / a]˙ [˙d / b]˙ φ
290 289 biimparc [˙c / a]˙ [˙d / b]˙ φ m Z g M = d j = N [˙ x M m + 1 if x = M c g x 1 j 1 / a]˙ [˙ x M m + 1 if x = M c g x 1 j / b]˙ φ
291 290 anassrs [˙c / a]˙ [˙d / b]˙ φ m Z g M = d j = N [˙ x M m + 1 if x = M c g x 1 j 1 / a]˙ [˙ x M m + 1 if x = M c g x 1 j / b]˙ φ
292 291 anassrs [˙c / a]˙ [˙d / b]˙ φ m Z g M = d j = N [˙ x M m + 1 if x = M c g x 1 j 1 / a]˙ [˙ x M m + 1 if x = M c g x 1 j / b]˙ φ
293 292 adantlrr [˙c / a]˙ [˙d / b]˙ φ m Z g M = d k N m [˙ g k 1 / a]˙ [˙ g k / b]˙ φ j = N [˙ x M m + 1 if x = M c g x 1 j 1 / a]˙ [˙ x M m + 1 if x = M c g x 1 j / b]˙ φ
294 elfzelz j N + 1 m + 1 j
295 294 adantl m Z j N + 1 m + 1 j
296 4 55 eqeltri N
297 peano2z N N + 1
298 296 297 ax-mp N + 1
299 fzsubel N + 1 m + 1 j 1 j N + 1 m + 1 j 1 N + 1 - 1 m + 1 - 1
300 299 biimpd N + 1 m + 1 j 1 j N + 1 m + 1 j 1 N + 1 - 1 m + 1 - 1
301 172 300 mpanr2 N + 1 m + 1 j j N + 1 m + 1 j 1 N + 1 - 1 m + 1 - 1
302 301 ex N + 1 m + 1 j j N + 1 m + 1 j 1 N + 1 - 1 m + 1 - 1
303 298 171 302 sylancr m Z j j N + 1 m + 1 j 1 N + 1 - 1 m + 1 - 1
304 303 com23 m Z j N + 1 m + 1 j j 1 N + 1 - 1 m + 1 - 1
305 304 imp m Z j N + 1 m + 1 j j 1 N + 1 - 1 m + 1 - 1
306 295 305 mpd m Z j N + 1 m + 1 j 1 N + 1 - 1 m + 1 - 1
307 296 zrei N
308 307 recni N
309 308 183 pncan3oi N + 1 - 1 = N
310 309 a1i m Z N + 1 - 1 = N
311 310 188 oveq12d m Z N + 1 - 1 m + 1 - 1 = N m
312 311 adantr m Z j N + 1 m + 1 N + 1 - 1 m + 1 - 1 = N m
313 306 312 eleqtrd m Z j N + 1 m + 1 j 1 N m
314 fvoveq1 k = j 1 g k 1 = g j - 1 - 1
315 fveq2 k = j 1 g k = g j 1
316 315 sbceq1d k = j 1 [˙ g k / b]˙ φ [˙ g j 1 / b]˙ φ
317 314 316 sbceqbid k = j 1 [˙ g k 1 / a]˙ [˙ g k / b]˙ φ [˙ g j - 1 - 1 / a]˙ [˙ g j 1 / b]˙ φ
318 317 rspcva j 1 N m k N m [˙ g k 1 / a]˙ [˙ g k / b]˙ φ [˙ g j - 1 - 1 / a]˙ [˙ g j 1 / b]˙ φ
319 313 318 sylan m Z j N + 1 m + 1 k N m [˙ g k 1 / a]˙ [˙ g k / b]˙ φ [˙ g j - 1 - 1 / a]˙ [˙ g j 1 / b]˙ φ
320 4 262 eqeltri N M
321 fzss1 N M N m + 1 M m + 1
322 320 321 ax-mp N m + 1 M m + 1
323 fzssp1 N m N m + 1
324 323 313 sselid m Z j N + 1 m + 1 j 1 N m + 1
325 322 324 sselid m Z j N + 1 m + 1 j 1 M m + 1
326 eqeq1 x = j 1 x = M j 1 = M
327 fvoveq1 x = j 1 g x 1 = g j - 1 - 1
328 326 327 ifbieq2d x = j 1 if x = M c g x 1 = if j 1 = M c g j - 1 - 1
329 fvex g j - 1 - 1 V
330 210 329 ifex if j 1 = M c g j - 1 - 1 V
331 328 202 330 fvmpt j 1 M m + 1 x M m + 1 if x = M c g x 1 j 1 = if j 1 = M c g j - 1 - 1
332 325 331 syl m Z j N + 1 m + 1 x M m + 1 if x = M c g x 1 j 1 = if j 1 = M c g j - 1 - 1
333 157 ltp1i M + 1 < M + 1 + 1
334 4 oveq1i N + 1 = M + 1 + 1
335 333 334 breqtrri M + 1 < N + 1
336 307 156 readdcli N + 1
337 157 336 ltnlei M + 1 < N + 1 ¬ N + 1 M + 1
338 335 337 mpbi ¬ N + 1 M + 1
339 294 zcnd j N + 1 m + 1 j
340 subadd j 1 M j 1 = M 1 + M = j
341 183 182 340 mp3an23 j j 1 = M 1 + M = j
342 339 341 syl j N + 1 m + 1 j 1 = M 1 + M = j
343 eqcom 1 + M = j j = 1 + M
344 183 182 addcomi 1 + M = M + 1
345 344 eqeq2i j = 1 + M j = M + 1
346 343 345 bitri 1 + M = j j = M + 1
347 eleq1 j = M + 1 j N + 1 m + 1 M + 1 N + 1 m + 1
348 elfzle1 M + 1 N + 1 m + 1 N + 1 M + 1
349 347 348 syl6bi j = M + 1 j N + 1 m + 1 N + 1 M + 1
350 349 com12 j N + 1 m + 1 j = M + 1 N + 1 M + 1
351 346 350 syl5bi j N + 1 m + 1 1 + M = j N + 1 M + 1
352 342 351 sylbid j N + 1 m + 1 j 1 = M N + 1 M + 1
353 338 352 mtoi j N + 1 m + 1 ¬ j 1 = M
354 353 adantl m Z j N + 1 m + 1 ¬ j 1 = M
355 354 iffalsed m Z j N + 1 m + 1 if j 1 = M c g j - 1 - 1 = g j - 1 - 1
356 332 355 eqtrd m Z j N + 1 m + 1 x M m + 1 if x = M c g x 1 j 1 = g j - 1 - 1
357 peano2uz N M N + 1 M
358 fzss1 N + 1 M N + 1 m + 1 M m + 1
359 320 357 358 mp2b N + 1 m + 1 M m + 1
360 simpr m Z j N + 1 m + 1 j N + 1 m + 1
361 359 360 sselid m Z j N + 1 m + 1 j M m + 1
362 eqeq1 x = j x = M j = M
363 fvoveq1 x = j g x 1 = g j 1
364 362 363 ifbieq2d x = j if x = M c g x 1 = if j = M c g j 1
365 fvex g j 1 V
366 210 365 ifex if j = M c g j 1 V
367 364 202 366 fvmpt j M m + 1 x M m + 1 if x = M c g x 1 j = if j = M c g j 1
368 361 367 syl m Z j N + 1 m + 1 x M m + 1 if x = M c g x 1 j = if j = M c g j 1
369 53 4 breqtrri M < N
370 307 ltp1i N < N + 1
371 52 307 336 lttri M < N N < N + 1 M < N + 1
372 369 370 371 mp2an M < N + 1
373 52 336 ltnlei M < N + 1 ¬ N + 1 M
374 372 373 mpbi ¬ N + 1 M
375 eleq1 j = M j N + 1 m + 1 M N + 1 m + 1
376 elfzle1 M N + 1 m + 1 N + 1 M
377 375 376 syl6bi j = M j N + 1 m + 1 N + 1 M
378 377 com12 j N + 1 m + 1 j = M N + 1 M
379 374 378 mtoi j N + 1 m + 1 ¬ j = M
380 379 adantl m Z j N + 1 m + 1 ¬ j = M
381 380 iffalsed m Z j N + 1 m + 1 if j = M c g j 1 = g j 1
382 368 381 eqtrd m Z j N + 1 m + 1 x M m + 1 if x = M c g x 1 j = g j 1
383 382 sbceq1d m Z j N + 1 m + 1 [˙ x M m + 1 if x = M c g x 1 j / b]˙ φ [˙ g j 1 / b]˙ φ
384 356 383 sbceqbid m Z j N + 1 m + 1 [˙ x M m + 1 if x = M c g x 1 j 1 / a]˙ [˙ x M m + 1 if x = M c g x 1 j / b]˙ φ [˙ g j - 1 - 1 / a]˙ [˙ g j 1 / b]˙ φ
385 384 biimpar m Z j N + 1 m + 1 [˙ g j - 1 - 1 / a]˙ [˙ g j 1 / b]˙ φ [˙ x M m + 1 if x = M c g x 1 j 1 / a]˙ [˙ x M m + 1 if x = M c g x 1 j / b]˙ φ
386 319 385 syldan m Z j N + 1 m + 1 k N m [˙ g k 1 / a]˙ [˙ g k / b]˙ φ [˙ x M m + 1 if x = M c g x 1 j 1 / a]˙ [˙ x M m + 1 if x = M c g x 1 j / b]˙ φ
387 386 an32s m Z k N m [˙ g k 1 / a]˙ [˙ g k / b]˙ φ j N + 1 m + 1 [˙ x M m + 1 if x = M c g x 1 j 1 / a]˙ [˙ x M m + 1 if x = M c g x 1 j / b]˙ φ
388 387 adantlrl m Z g M = d k N m [˙ g k 1 / a]˙ [˙ g k / b]˙ φ j N + 1 m + 1 [˙ x M m + 1 if x = M c g x 1 j 1 / a]˙ [˙ x M m + 1 if x = M c g x 1 j / b]˙ φ
389 388 adantlll [˙c / a]˙ [˙d / b]˙ φ m Z g M = d k N m [˙ g k 1 / a]˙ [˙ g k / b]˙ φ j N + 1 m + 1 [˙ x M m + 1 if x = M c g x 1 j 1 / a]˙ [˙ x M m + 1 if x = M c g x 1 j / b]˙ φ
390 293 389 jaodan [˙c / a]˙ [˙d / b]˙ φ m Z g M = d k N m [˙ g k 1 / a]˙ [˙ g k / b]˙ φ j = N j N + 1 m + 1 [˙ x M m + 1 if x = M c g x 1 j 1 / a]˙ [˙ x M m + 1 if x = M c g x 1 j / b]˙ φ
391 247 390 syldan [˙c / a]˙ [˙d / b]˙ φ m Z g M = d k N m [˙ g k 1 / a]˙ [˙ g k / b]˙ φ j N m + 1 [˙ x M m + 1 if x = M c g x 1 j 1 / a]˙ [˙ x M m + 1 if x = M c g x 1 j / b]˙ φ
392 391 ralrimiva [˙c / a]˙ [˙d / b]˙ φ m Z g M = d k N m [˙ g k 1 / a]˙ [˙ g k / b]˙ φ j N m + 1 [˙ x M m + 1 if x = M c g x 1 j 1 / a]˙ [˙ x M m + 1 if x = M c g x 1 j / b]˙ φ
393 fvoveq1 j = k x M m + 1 if x = M c g x 1 j 1 = x M m + 1 if x = M c g x 1 k 1
394 fveq2 j = k x M m + 1 if x = M c g x 1 j = x M m + 1 if x = M c g x 1 k
395 394 sbceq1d j = k [˙ x M m + 1 if x = M c g x 1 j / b]˙ φ [˙ x M m + 1 if x = M c g x 1 k / b]˙ φ
396 393 395 sbceqbid j = k [˙ x M m + 1 if x = M c g x 1 j 1 / a]˙ [˙ x M m + 1 if x = M c g x 1 j / b]˙ φ [˙ x M m + 1 if x = M c g x 1 k 1 / a]˙ [˙ x M m + 1 if x = M c g x 1 k / b]˙ φ
397 396 cbvralvw j N m + 1 [˙ x M m + 1 if x = M c g x 1 j 1 / a]˙ [˙ x M m + 1 if x = M c g x 1 j / b]˙ φ k N m + 1 [˙ x M m + 1 if x = M c g x 1 k 1 / a]˙ [˙ x M m + 1 if x = M c g x 1 k / b]˙ φ
398 392 397 sylib [˙c / a]˙ [˙d / b]˙ φ m Z g M = d k N m [˙ g k 1 / a]˙ [˙ g k / b]˙ φ k N m + 1 [˙ x M m + 1 if x = M c g x 1 k 1 / a]˙ [˙ x M m + 1 if x = M c g x 1 k / b]˙ φ
399 398 adantllr [˙c / a]˙ [˙d / b]˙ φ c A m Z g M = d k N m [˙ g k 1 / a]˙ [˙ g k / b]˙ φ k N m + 1 [˙ x M m + 1 if x = M c g x 1 k 1 / a]˙ [˙ x M m + 1 if x = M c g x 1 k / b]˙ φ
400 399 adantrlr [˙c / a]˙ [˙d / b]˙ φ c A m Z g M = d [˙ g m / a]˙ θ k N m [˙ g k 1 / a]˙ [˙ g k / b]˙ φ k N m + 1 [˙ x M m + 1 if x = M c g x 1 k 1 / a]˙ [˙ x M m + 1 if x = M c g x 1 k / b]˙ φ
401 400 3adantr1 [˙c / a]˙ [˙d / b]˙ φ c A m Z g : M m A g M = d [˙ g m / a]˙ θ k N m [˙ g k 1 / a]˙ [˙ g k / b]˙ φ k N m + 1 [˙ x M m + 1 if x = M c g x 1 k 1 / a]˙ [˙ x M m + 1 if x = M c g x 1 k / b]˙ φ
402 ovex M m + 1 V
403 402 mptex x M m + 1 if x = M c g x 1 V
404 feq1 f = x M m + 1 if x = M c g x 1 f : M m + 1 A x M m + 1 if x = M c g x 1 : M m + 1 A
405 fveq1 f = x M m + 1 if x = M c g x 1 f M = x M m + 1 if x = M c g x 1 M
406 405 eqeq1d f = x M m + 1 if x = M c g x 1 f M = c x M m + 1 if x = M c g x 1 M = c
407 fveq1 f = x M m + 1 if x = M c g x 1 f m + 1 = x M m + 1 if x = M c g x 1 m + 1
408 407 sbceq1d f = x M m + 1 if x = M c g x 1 [˙ f m + 1 / a]˙ θ [˙ x M m + 1 if x = M c g x 1 m + 1 / a]˙ θ
409 406 408 anbi12d f = x M m + 1 if x = M c g x 1 f M = c [˙ f m + 1 / a]˙ θ x M m + 1 if x = M c g x 1 M = c [˙ x M m + 1 if x = M c g x 1 m + 1 / a]˙ θ
410 fveq1 f = x M m + 1 if x = M c g x 1 f k 1 = x M m + 1 if x = M c g x 1 k 1
411 fveq1 f = x M m + 1 if x = M c g x 1 f k = x M m + 1 if x = M c g x 1 k
412 411 sbceq1d f = x M m + 1 if x = M c g x 1 [˙ f k / b]˙ φ [˙ x M m + 1 if x = M c g x 1 k / b]˙ φ
413 410 412 sbceqbid f = x M m + 1 if x = M c g x 1 [˙ f k 1 / a]˙ [˙ f k / b]˙ φ [˙ x M m + 1 if x = M c g x 1 k 1 / a]˙ [˙ x M m + 1 if x = M c g x 1 k / b]˙ φ
414 116 413 bitr3id f = x M m + 1 if x = M c g x 1 χ [˙ x M m + 1 if x = M c g x 1 k 1 / a]˙ [˙ x M m + 1 if x = M c g x 1 k / b]˙ φ
415 414 ralbidv f = x M m + 1 if x = M c g x 1 k N m + 1 χ k N m + 1 [˙ x M m + 1 if x = M c g x 1 k 1 / a]˙ [˙ x M m + 1 if x = M c g x 1 k / b]˙ φ
416 404 409 415 3anbi123d f = x M m + 1 if x = M c g x 1 f : M m + 1 A f M = c [˙ f m + 1 / a]˙ θ k N m + 1 χ x M m + 1 if x = M c g x 1 : M m + 1 A x M m + 1 if x = M c g x 1 M = c [˙ x M m + 1 if x = M c g x 1 m + 1 / a]˙ θ k N m + 1 [˙ x M m + 1 if x = M c g x 1 k 1 / a]˙ [˙ x M m + 1 if x = M c g x 1 k / b]˙ φ
417 403 416 spcev x M m + 1 if x = M c g x 1 : M m + 1 A x M m + 1 if x = M c g x 1 M = c [˙ x M m + 1 if x = M c g x 1 m + 1 / a]˙ θ k N m + 1 [˙ x M m + 1 if x = M c g x 1 k 1 / a]˙ [˙ x M m + 1 if x = M c g x 1 k / b]˙ φ f f : M m + 1 A f M = c [˙ f m + 1 / a]˙ θ k N m + 1 χ
418 206 213 238 401 417 syl121anc [˙c / a]˙ [˙d / b]˙ φ c A m Z g : M m A g M = d [˙ g m / a]˙ θ k N m [˙ g k 1 / a]˙ [˙ g k / b]˙ φ f f : M m + 1 A f M = c [˙ f m + 1 / a]˙ θ k N m + 1 χ
419 418 ex [˙c / a]˙ [˙d / b]˙ φ c A m Z g : M m A g M = d [˙ g m / a]˙ θ k N m [˙ g k 1 / a]˙ [˙ g k / b]˙ φ f f : M m + 1 A f M = c [˙ f m + 1 / a]˙ θ k N m + 1 χ
420 146 419 chvarvv [˙d / b]˙ φ a A m Z g : M m A g M = d [˙ g m / a]˙ θ k N m [˙ g k 1 / a]˙ [˙ g k / b]˙ φ f f : M m + 1 A f M = a [˙ f m + 1 / a]˙ θ k N m + 1 χ
421 136 420 chvarvv φ a A m Z g : M m A g M = b [˙ g m / a]˙ θ k N m [˙ g k 1 / a]˙ [˙ g k / b]˙ φ f f : M m + 1 A f M = a [˙ f m + 1 / a]˙ θ k N m + 1 χ
422 421 adantlrr φ a A b A m Z g : M m A g M = b [˙ g m / a]˙ θ k N m [˙ g k 1 / a]˙ [˙ g k / b]˙ φ f f : M m + 1 A f M = a [˙ f m + 1 / a]˙ θ k N m + 1 χ
423 422 adantlll η φ a A b A m Z g : M m A g M = b [˙ g m / a]˙ θ k N m [˙ g k 1 / a]˙ [˙ g k / b]˙ φ f f : M m + 1 A f M = a [˙ f m + 1 / a]˙ θ k N m + 1 χ
424 423 imp η φ a A b A m Z g : M m A g M = b [˙ g m / a]˙ θ k N m [˙ g k 1 / a]˙ [˙ g k / b]˙ φ f f : M m + 1 A f M = a [˙ f m + 1 / a]˙ θ k N m + 1 χ
425 oveq2 n = m + 1 M n = M m + 1
426 425 feq2d n = m + 1 f : M n A f : M m + 1 A
427 fveq2 n = m + 1 f n = f m + 1
428 427 sbceq1d n = m + 1 [˙ f n / a]˙ θ [˙ f m + 1 / a]˙ θ
429 45 428 bitr3id n = m + 1 τ [˙ f m + 1 / a]˙ θ
430 429 anbi2d n = m + 1 f M = a τ f M = a [˙ f m + 1 / a]˙ θ
431 oveq2 n = m + 1 N n = N m + 1
432 431 raleqdv n = m + 1 k N n χ k N m + 1 χ
433 426 430 432 3anbi123d n = m + 1 f : M n A f M = a τ k N n χ f : M m + 1 A f M = a [˙ f m + 1 / a]˙ θ k N m + 1 χ
434 433 exbidv n = m + 1 f f : M n A f M = a τ k N n χ f f : M m + 1 A f M = a [˙ f m + 1 / a]˙ θ k N m + 1 χ
435 434 rspcev m + 1 Z f f : M m + 1 A f M = a [˙ f m + 1 / a]˙ θ k N m + 1 χ n Z f f : M n A f M = a τ k N n χ
436 128 424 435 syl2anc η φ a A b A m Z g : M m A g M = b [˙ g m / a]˙ θ k N m [˙ g k 1 / a]˙ [˙ g k / b]˙ φ n Z f f : M n A f M = a τ k N n χ
437 436 ex η φ a A b A m Z g : M m A g M = b [˙ g m / a]˙ θ k N m [˙ g k 1 / a]˙ [˙ g k / b]˙ φ n Z f f : M n A f M = a τ k N n χ
438 437 exlimdv η φ a A b A m Z g g : M m A g M = b [˙ g m / a]˙ θ k N m [˙ g k 1 / a]˙ [˙ g k / b]˙ φ n Z f f : M n A f M = a τ k N n χ
439 438 rexlimdva η φ a A b A m Z g g : M m A g M = b [˙ g m / a]˙ θ k N m [˙ g k 1 / a]˙ [˙ g k / b]˙ φ n Z f f : M n A f M = a τ k N n χ
440 126 439 syl5bi η φ a A b A n Z f f : M n A f M = b τ k N n χ n Z f f : M n A f M = a τ k N n χ
441 78 93 440 3syld η φ a A b A d A c A | n Z f f : M n A f M = c τ k N n χ ¬ d R a n Z f f : M n A f M = a τ k N n χ
442 441 an42s η a A b A φ d A c A | n Z f f : M n A f M = c τ k N n χ ¬ d R a n Z f f : M n A f M = a τ k N n χ
443 442 rexlimdvaa η a A b A φ d A c A | n Z f f : M n A f M = c τ k N n χ ¬ d R a n Z f f : M n A f M = a τ k N n χ
444 443 imp η a A b A φ d A c A | n Z f f : M n A f M = c τ k N n χ ¬ d R a n Z f f : M n A f M = a τ k N n χ
445 71 444 10 mpjaodan η a A d A c A | n Z f f : M n A f M = c τ k N n χ ¬ d R a n Z f f : M n A f M = a τ k N n χ
446 141 anbi1d c = a f M = c τ f M = a τ
447 446 3anbi2d c = a f : M n A f M = c τ k N n χ f : M n A f M = a τ k N n χ
448 447 exbidv c = a f f : M n A f M = c τ k N n χ f f : M n A f M = a τ k N n χ
449 448 rexbidv c = a n Z f f : M n A f M = c τ k N n χ n Z f f : M n A f M = a τ k N n χ
450 449 elrab3 a A a c A | n Z f f : M n A f M = c τ k N n χ n Z f f : M n A f M = a τ k N n χ
451 450 adantl η a A a c A | n Z f f : M n A f M = c τ k N n χ n Z f f : M n A f M = a τ k N n χ
452 445 451 sylibrd η a A d A c A | n Z f f : M n A f M = c τ k N n χ ¬ d R a a c A | n Z f f : M n A f M = c τ k N n χ
453 452 ex η a A d A c A | n Z f f : M n A f M = c τ k N n χ ¬ d R a a c A | n Z f f : M n A f M = c τ k N n χ
454 453 com23 η d A c A | n Z f f : M n A f M = c τ k N n χ ¬ d R a a A a c A | n Z f f : M n A f M = c τ k N n χ
455 eldif a A c A | n Z f f : M n A f M = c τ k N n χ a A ¬ a c A | n Z f f : M n A f M = c τ k N n χ
456 455 notbii ¬ a A c A | n Z f f : M n A f M = c τ k N n χ ¬ a A ¬ a c A | n Z f f : M n A f M = c τ k N n χ
457 iman a A a c A | n Z f f : M n A f M = c τ k N n χ ¬ a A ¬ a c A | n Z f f : M n A f M = c τ k N n χ
458 456 457 bitr4i ¬ a A c A | n Z f f : M n A f M = c τ k N n χ a A a c A | n Z f f : M n A f M = c τ k N n χ
459 454 458 syl6ibr η d A c A | n Z f f : M n A f M = c τ k N n χ ¬ d R a ¬ a A c A | n Z f f : M n A f M = c τ k N n χ
460 459 con2d η a A c A | n Z f f : M n A f M = c τ k N n χ ¬ d A c A | n Z f f : M n A f M = c τ k N n χ ¬ d R a
461 460 imp η a A c A | n Z f f : M n A f M = c τ k N n χ ¬ d A c A | n Z f f : M n A f M = c τ k N n χ ¬ d R a
462 461 nrexdv η ¬ a A c A | n Z f f : M n A f M = c τ k N n χ d A c A | n Z f f : M n A f M = c τ k N n χ ¬ d R a
463 df-ne A c A | n Z f f : M n A f M = c τ k N n χ ¬ A c A | n Z f f : M n A f M = c τ k N n χ =
464 difss A c A | n Z f f : M n A f M = c τ k N n χ A
465 difexg A V A c A | n Z f f : M n A f M = c τ k N n χ V
466 1 465 ax-mp A c A | n Z f f : M n A f M = c τ k N n χ V
467 fri A c A | n Z f f : M n A f M = c τ k N n χ V R Fr A A c A | n Z f f : M n A f M = c τ k N n χ A A c A | n Z f f : M n A f M = c τ k N n χ a A c A | n Z f f : M n A f M = c τ k N n χ d A c A | n Z f f : M n A f M = c τ k N n χ ¬ d R a
468 466 467 mpanl1 R Fr A A c A | n Z f f : M n A f M = c τ k N n χ A A c A | n Z f f : M n A f M = c τ k N n χ a A c A | n Z f f : M n A f M = c τ k N n χ d A c A | n Z f f : M n A f M = c τ k N n χ ¬ d R a
469 468 expr R Fr A A c A | n Z f f : M n A f M = c τ k N n χ A A c A | n Z f f : M n A f M = c τ k N n χ a A c A | n Z f f : M n A f M = c τ k N n χ d A c A | n Z f f : M n A f M = c τ k N n χ ¬ d R a
470 9 464 469 sylancl η A c A | n Z f f : M n A f M = c τ k N n χ a A c A | n Z f f : M n A f M = c τ k N n χ d A c A | n Z f f : M n A f M = c τ k N n χ ¬ d R a
471 463 470 syl5bir η ¬ A c A | n Z f f : M n A f M = c τ k N n χ = a A c A | n Z f f : M n A f M = c τ k N n χ d A c A | n Z f f : M n A f M = c τ k N n χ ¬ d R a
472 462 471 mt3d η A c A | n Z f f : M n A f M = c τ k N n χ =
473 ssdif0 A c A | n Z f f : M n A f M = c τ k N n χ A c A | n Z f f : M n A f M = c τ k N n χ =
474 472 473 sylibr η A c A | n Z f f : M n A f M = c τ k N n χ
475 81 a1i η c A | n Z f f : M n A f M = c τ k N n χ A
476 474 475 eqssd η A = c A | n Z f f : M n A f M = c τ k N n χ
477 rabid2 A = c A | n Z f f : M n A f M = c τ k N n χ c A n Z f f : M n A f M = c τ k N n χ
478 476 477 sylib η c A n Z f f : M n A f M = c τ k N n χ
479 eqeq2 c = C f M = c f M = C
480 479 anbi1d c = C f M = c τ f M = C τ
481 480 3anbi2d c = C f : M n A f M = c τ k N n χ f : M n A f M = C τ k N n χ
482 481 exbidv c = C f f : M n A f M = c τ k N n χ f f : M n A f M = C τ k N n χ
483 482 rexbidv c = C n Z f f : M n A f M = c τ k N n χ n Z f f : M n A f M = C τ k N n χ
484 483 rspcva C A c A n Z f f : M n A f M = c τ k N n χ n Z f f : M n A f M = C τ k N n χ
485 8 478 484 syl2anc η n Z f f : M n A f M = C τ k N n χ