Metamath Proof Explorer


Theorem dfac12lem2

Description: Lemma for dfac12 . (Contributed by Mario Carneiro, 29-May-2015)

Ref Expression
Hypotheses dfac12.1 φ A On
dfac12.3 φ F : 𝒫 har R1 A 1-1 On
dfac12.4 G = recs x V y R1 dom x if dom x = dom x suc ran ran x 𝑜 rank y + 𝑜 x suc rank y y F OrdIso E ran x dom x -1 x dom x y
dfac12.5 φ C On
dfac12.h H = OrdIso E ran G C -1 G C
dfac12.6 φ C A
dfac12.8 φ z C G z : R1 z 1-1 On
Assertion dfac12lem2 φ G C : R1 C 1-1 On

Proof

Step Hyp Ref Expression
1 dfac12.1 φ A On
2 dfac12.3 φ F : 𝒫 har R1 A 1-1 On
3 dfac12.4 G = recs x V y R1 dom x if dom x = dom x suc ran ran x 𝑜 rank y + 𝑜 x suc rank y y F OrdIso E ran x dom x -1 x dom x y
4 dfac12.5 φ C On
5 dfac12.h H = OrdIso E ran G C -1 G C
6 dfac12.6 φ C A
7 dfac12.8 φ z C G z : R1 z 1-1 On
8 3 tfr1 G Fn On
9 fnfun G Fn On Fun G
10 8 9 ax-mp Fun G
11 funimaexg Fun G C On G C V
12 10 4 11 sylancr φ G C V
13 uniexg G C V G C V
14 rnexg G C V ran G C V
15 12 13 14 3syl φ ran G C V
16 f1f G z : R1 z 1-1 On G z : R1 z On
17 fssxp G z : R1 z On G z R1 z × On
18 ssv R1 z V
19 xpss1 R1 z V R1 z × On V × On
20 18 19 ax-mp R1 z × On V × On
21 sstr G z R1 z × On R1 z × On V × On G z V × On
22 20 21 mpan2 G z R1 z × On G z V × On
23 fvex G z V
24 23 elpw G z 𝒫 V × On G z V × On
25 22 24 sylibr G z R1 z × On G z 𝒫 V × On
26 16 17 25 3syl G z : R1 z 1-1 On G z 𝒫 V × On
27 26 ralimi z C G z : R1 z 1-1 On z C G z 𝒫 V × On
28 7 27 syl φ z C G z 𝒫 V × On
29 onss C On C On
30 4 29 syl φ C On
31 fndm G Fn On dom G = On
32 8 31 ax-mp dom G = On
33 30 32 sseqtrrdi φ C dom G
34 funimass4 Fun G C dom G G C 𝒫 V × On z C G z 𝒫 V × On
35 10 33 34 sylancr φ G C 𝒫 V × On z C G z 𝒫 V × On
36 28 35 mpbird φ G C 𝒫 V × On
37 sspwuni G C 𝒫 V × On G C V × On
38 36 37 sylib φ G C V × On
39 rnss G C V × On ran G C ran V × On
40 38 39 syl φ ran G C ran V × On
41 rnxpss ran V × On On
42 40 41 sstrdi φ ran G C On
43 ssonuni ran G C V ran G C On ran G C On
44 15 42 43 sylc φ ran G C On
45 suceloni ran G C On suc ran G C On
46 44 45 syl φ suc ran G C On
47 46 ad2antrr φ y R1 C C = C suc ran G C On
48 rankon rank y On
49 omcl suc ran G C On rank y On suc ran G C 𝑜 rank y On
50 47 48 49 sylancl φ y R1 C C = C suc ran G C 𝑜 rank y On
51 fveq2 z = suc rank y G z = G suc rank y
52 f1eq1 G z = G suc rank y G z : R1 z 1-1 On G suc rank y : R1 z 1-1 On
53 51 52 syl z = suc rank y G z : R1 z 1-1 On G suc rank y : R1 z 1-1 On
54 fveq2 z = suc rank y R1 z = R1 suc rank y
55 f1eq2 R1 z = R1 suc rank y G suc rank y : R1 z 1-1 On G suc rank y : R1 suc rank y 1-1 On
56 54 55 syl z = suc rank y G suc rank y : R1 z 1-1 On G suc rank y : R1 suc rank y 1-1 On
57 53 56 bitrd z = suc rank y G z : R1 z 1-1 On G suc rank y : R1 suc rank y 1-1 On
58 7 ad2antrr φ y R1 C C = C z C G z : R1 z 1-1 On
59 rankr1ai y R1 C rank y C
60 59 ad2antlr φ y R1 C C = C rank y C
61 simpr φ y R1 C C = C C = C
62 60 61 eleqtrd φ y R1 C C = C rank y C
63 eloni C On Ord C
64 4 63 syl φ Ord C
65 64 ad2antrr φ y R1 C C = C Ord C
66 ordsucuniel Ord C rank y C suc rank y C
67 65 66 syl φ y R1 C C = C rank y C suc rank y C
68 62 67 mpbid φ y R1 C C = C suc rank y C
69 57 58 68 rspcdva φ y R1 C C = C G suc rank y : R1 suc rank y 1-1 On
70 f1f G suc rank y : R1 suc rank y 1-1 On G suc rank y : R1 suc rank y On
71 69 70 syl φ y R1 C C = C G suc rank y : R1 suc rank y On
72 r1elwf y R1 C y R1 On
73 72 ad2antlr φ y R1 C C = C y R1 On
74 rankidb y R1 On y R1 suc rank y
75 73 74 syl φ y R1 C C = C y R1 suc rank y
76 71 75 ffvelrnd φ y R1 C C = C G suc rank y y On
77 oacl suc ran G C 𝑜 rank y On G suc rank y y On suc ran G C 𝑜 rank y + 𝑜 G suc rank y y On
78 50 76 77 syl2anc φ y R1 C C = C suc ran G C 𝑜 rank y + 𝑜 G suc rank y y On
79 f1f F : 𝒫 har R1 A 1-1 On F : 𝒫 har R1 A On
80 2 79 syl φ F : 𝒫 har R1 A On
81 80 ad2antrr φ y R1 C ¬ C = C F : 𝒫 har R1 A On
82 imassrn H y ran H
83 fvex G C V
84 83 rnex ran G C V
85 fveq2 z = C G z = G C
86 f1eq1 G z = G C G z : R1 z 1-1 On G C : R1 z 1-1 On
87 85 86 syl z = C G z : R1 z 1-1 On G C : R1 z 1-1 On
88 fveq2 z = C R1 z = R1 C
89 f1eq2 R1 z = R1 C G C : R1 z 1-1 On G C : R1 C 1-1 On
90 88 89 syl z = C G C : R1 z 1-1 On G C : R1 C 1-1 On
91 87 90 bitrd z = C G z : R1 z 1-1 On G C : R1 C 1-1 On
92 7 ad2antrr φ y R1 C ¬ C = C z C G z : R1 z 1-1 On
93 4 ad2antrr φ y R1 C ¬ C = C C On
94 onuni C On C On
95 sucidg C On C suc C
96 93 94 95 3syl φ y R1 C ¬ C = C C suc C
97 64 adantr φ y R1 C Ord C
98 orduniorsuc Ord C C = C C = suc C
99 97 98 syl φ y R1 C C = C C = suc C
100 99 orcanai φ y R1 C ¬ C = C C = suc C
101 96 100 eleqtrrd φ y R1 C ¬ C = C C C
102 91 92 101 rspcdva φ y R1 C ¬ C = C G C : R1 C 1-1 On
103 f1f G C : R1 C 1-1 On G C : R1 C On
104 frn G C : R1 C On ran G C On
105 102 103 104 3syl φ y R1 C ¬ C = C ran G C On
106 epweon E We On
107 wess ran G C On E We On E We ran G C
108 105 106 107 mpisyl φ y R1 C ¬ C = C E We ran G C
109 eqid OrdIso E ran G C = OrdIso E ran G C
110 109 oiiso ran G C V E We ran G C OrdIso E ran G C Isom E , E dom OrdIso E ran G C ran G C
111 84 108 110 sylancr φ y R1 C ¬ C = C OrdIso E ran G C Isom E , E dom OrdIso E ran G C ran G C
112 isof1o OrdIso E ran G C Isom E , E dom OrdIso E ran G C ran G C OrdIso E ran G C : dom OrdIso E ran G C 1-1 onto ran G C
113 f1ocnv OrdIso E ran G C : dom OrdIso E ran G C 1-1 onto ran G C OrdIso E ran G C -1 : ran G C 1-1 onto dom OrdIso E ran G C
114 f1of1 OrdIso E ran G C -1 : ran G C 1-1 onto dom OrdIso E ran G C OrdIso E ran G C -1 : ran G C 1-1 dom OrdIso E ran G C
115 111 112 113 114 4syl φ y R1 C ¬ C = C OrdIso E ran G C -1 : ran G C 1-1 dom OrdIso E ran G C
116 f1f1orn G C : R1 C 1-1 On G C : R1 C 1-1 onto ran G C
117 f1of1 G C : R1 C 1-1 onto ran G C G C : R1 C 1-1 ran G C
118 102 116 117 3syl φ y R1 C ¬ C = C G C : R1 C 1-1 ran G C
119 f1co OrdIso E ran G C -1 : ran G C 1-1 dom OrdIso E ran G C G C : R1 C 1-1 ran G C OrdIso E ran G C -1 G C : R1 C 1-1 dom OrdIso E ran G C
120 115 118 119 syl2anc φ y R1 C ¬ C = C OrdIso E ran G C -1 G C : R1 C 1-1 dom OrdIso E ran G C
121 f1eq1 H = OrdIso E ran G C -1 G C H : R1 C 1-1 dom OrdIso E ran G C OrdIso E ran G C -1 G C : R1 C 1-1 dom OrdIso E ran G C
122 5 121 ax-mp H : R1 C 1-1 dom OrdIso E ran G C OrdIso E ran G C -1 G C : R1 C 1-1 dom OrdIso E ran G C
123 120 122 sylibr φ y R1 C ¬ C = C H : R1 C 1-1 dom OrdIso E ran G C
124 f1f H : R1 C 1-1 dom OrdIso E ran G C H : R1 C dom OrdIso E ran G C
125 frn H : R1 C dom OrdIso E ran G C ran H dom OrdIso E ran G C
126 123 124 125 3syl φ y R1 C ¬ C = C ran H dom OrdIso E ran G C
127 harcl har R1 A On
128 127 onordi Ord har R1 A
129 109 oion ran G C V dom OrdIso E ran G C On
130 84 129 mp1i φ y R1 C ¬ C = C dom OrdIso E ran G C On
131 109 oien ran G C V E We ran G C dom OrdIso E ran G C ran G C
132 84 108 131 sylancr φ y R1 C ¬ C = C dom OrdIso E ran G C ran G C
133 fvex R1 C V
134 133 f1oen G C : R1 C 1-1 onto ran G C R1 C ran G C
135 ensym R1 C ran G C ran G C R1 C
136 102 116 134 135 4syl φ y R1 C ¬ C = C ran G C R1 C
137 fvex R1 A V
138 1 ad2antrr φ y R1 C ¬ C = C A On
139 6 ad2antrr φ y R1 C ¬ C = C C A
140 139 101 sseldd φ y R1 C ¬ C = C C A
141 r1ord2 A On C A R1 C R1 A
142 138 140 141 sylc φ y R1 C ¬ C = C R1 C R1 A
143 ssdomg R1 A V R1 C R1 A R1 C R1 A
144 137 142 143 mpsyl φ y R1 C ¬ C = C R1 C R1 A
145 endomtr ran G C R1 C R1 C R1 A ran G C R1 A
146 136 144 145 syl2anc φ y R1 C ¬ C = C ran G C R1 A
147 endomtr dom OrdIso E ran G C ran G C ran G C R1 A dom OrdIso E ran G C R1 A
148 132 146 147 syl2anc φ y R1 C ¬ C = C dom OrdIso E ran G C R1 A
149 elharval dom OrdIso E ran G C har R1 A dom OrdIso E ran G C On dom OrdIso E ran G C R1 A
150 130 148 149 sylanbrc φ y R1 C ¬ C = C dom OrdIso E ran G C har R1 A
151 ordelss Ord har R1 A dom OrdIso E ran G C har R1 A dom OrdIso E ran G C har R1 A
152 128 150 151 sylancr φ y R1 C ¬ C = C dom OrdIso E ran G C har R1 A
153 126 152 sstrd φ y R1 C ¬ C = C ran H har R1 A
154 82 153 sstrid φ y R1 C ¬ C = C H y har R1 A
155 fvex har R1 A V
156 155 elpw2 H y 𝒫 har R1 A H y har R1 A
157 154 156 sylibr φ y R1 C ¬ C = C H y 𝒫 har R1 A
158 81 157 ffvelrnd φ y R1 C ¬ C = C F H y On
159 78 158 ifclda φ y R1 C if C = C suc ran G C 𝑜 rank y + 𝑜 G suc rank y y F H y On
160 159 ex φ y R1 C if C = C suc ran G C 𝑜 rank y + 𝑜 G suc rank y y F H y On
161 iftrue C = C if C = C suc ran G C 𝑜 rank y + 𝑜 G suc rank y y F H y = suc ran G C 𝑜 rank y + 𝑜 G suc rank y y
162 iftrue C = C if C = C suc ran G C 𝑜 rank z + 𝑜 G suc rank z z F H z = suc ran G C 𝑜 rank z + 𝑜 G suc rank z z
163 161 162 eqeq12d C = C if C = C suc ran G C 𝑜 rank y + 𝑜 G suc rank y y F H y = if C = C suc ran G C 𝑜 rank z + 𝑜 G suc rank z z F H z suc ran G C 𝑜 rank y + 𝑜 G suc rank y y = suc ran G C 𝑜 rank z + 𝑜 G suc rank z z
164 163 adantl φ y R1 C z R1 C C = C if C = C suc ran G C 𝑜 rank y + 𝑜 G suc rank y y F H y = if C = C suc ran G C 𝑜 rank z + 𝑜 G suc rank z z F H z suc ran G C 𝑜 rank y + 𝑜 G suc rank y y = suc ran G C 𝑜 rank z + 𝑜 G suc rank z z
165 46 ad2antrr φ y R1 C z R1 C C = C suc ran G C On
166 nsuceq0 suc ran G C
167 166 a1i φ y R1 C z R1 C C = C suc ran G C
168 48 a1i φ y R1 C z R1 C C = C rank y On
169 onsucuni ran G C On ran G C suc ran G C
170 42 169 syl φ ran G C suc ran G C
171 170 ad2antrr φ y R1 C C = C ran G C suc ran G C
172 30 ad2antrr φ y R1 C C = C C On
173 fnfvima G Fn On C On suc rank y C G suc rank y G C
174 8 172 68 173 mp3an2i φ y R1 C C = C G suc rank y G C
175 elssuni G suc rank y G C G suc rank y G C
176 rnss G suc rank y G C ran G suc rank y ran G C
177 174 175 176 3syl φ y R1 C C = C ran G suc rank y ran G C
178 f1fn G suc rank y : R1 suc rank y 1-1 On G suc rank y Fn R1 suc rank y
179 69 178 syl φ y R1 C C = C G suc rank y Fn R1 suc rank y
180 fnfvelrn G suc rank y Fn R1 suc rank y y R1 suc rank y G suc rank y y ran G suc rank y
181 179 75 180 syl2anc φ y R1 C C = C G suc rank y y ran G suc rank y
182 177 181 sseldd φ y R1 C C = C G suc rank y y ran G C
183 171 182 sseldd φ y R1 C C = C G suc rank y y suc ran G C
184 183 adantlrr φ y R1 C z R1 C C = C G suc rank y y suc ran G C
185 rankon rank z On
186 185 a1i φ y R1 C z R1 C C = C rank z On
187 eleq1w y = z y R1 C z R1 C
188 187 anbi2d y = z φ y R1 C φ z R1 C
189 188 anbi1d y = z φ y R1 C C = C φ z R1 C C = C
190 fveq2 y = z rank y = rank z
191 suceq rank y = rank z suc rank y = suc rank z
192 190 191 syl y = z suc rank y = suc rank z
193 192 fveq2d y = z G suc rank y = G suc rank z
194 id y = z y = z
195 193 194 fveq12d y = z G suc rank y y = G suc rank z z
196 195 eleq1d y = z G suc rank y y suc ran G C G suc rank z z suc ran G C
197 189 196 imbi12d y = z φ y R1 C C = C G suc rank y y suc ran G C φ z R1 C C = C G suc rank z z suc ran G C
198 197 183 chvarvv φ z R1 C C = C G suc rank z z suc ran G C
199 198 adantlrl φ y R1 C z R1 C C = C G suc rank z z suc ran G C
200 omopth2 suc ran G C On suc ran G C rank y On G suc rank y y suc ran G C rank z On G suc rank z z suc ran G C suc ran G C 𝑜 rank y + 𝑜 G suc rank y y = suc ran G C 𝑜 rank z + 𝑜 G suc rank z z rank y = rank z G suc rank y y = G suc rank z z
201 165 167 168 184 186 199 200 syl222anc φ y R1 C z R1 C C = C suc ran G C 𝑜 rank y + 𝑜 G suc rank y y = suc ran G C 𝑜 rank z + 𝑜 G suc rank z z rank y = rank z G suc rank y y = G suc rank z z
202 191 adantl φ y R1 C z R1 C C = C rank y = rank z suc rank y = suc rank z
203 202 fveq2d φ y R1 C z R1 C C = C rank y = rank z G suc rank y = G suc rank z
204 203 fveq1d φ y R1 C z R1 C C = C rank y = rank z G suc rank y z = G suc rank z z
205 204 eqeq2d φ y R1 C z R1 C C = C rank y = rank z G suc rank y y = G suc rank y z G suc rank y y = G suc rank z z
206 69 adantlrr φ y R1 C z R1 C C = C G suc rank y : R1 suc rank y 1-1 On
207 206 adantr φ y R1 C z R1 C C = C rank y = rank z G suc rank y : R1 suc rank y 1-1 On
208 75 adantlrr φ y R1 C z R1 C C = C y R1 suc rank y
209 208 adantr φ y R1 C z R1 C C = C rank y = rank z y R1 suc rank y
210 r1elwf z R1 C z R1 On
211 rankidb z R1 On z R1 suc rank z
212 210 211 syl z R1 C z R1 suc rank z
213 212 ad2antll φ y R1 C z R1 C z R1 suc rank z
214 213 ad2antrr φ y R1 C z R1 C C = C rank y = rank z z R1 suc rank z
215 202 fveq2d φ y R1 C z R1 C C = C rank y = rank z R1 suc rank y = R1 suc rank z
216 214 215 eleqtrrd φ y R1 C z R1 C C = C rank y = rank z z R1 suc rank y
217 f1fveq G suc rank y : R1 suc rank y 1-1 On y R1 suc rank y z R1 suc rank y G suc rank y y = G suc rank y z y = z
218 207 209 216 217 syl12anc φ y R1 C z R1 C C = C rank y = rank z G suc rank y y = G suc rank y z y = z
219 205 218 bitr3d φ y R1 C z R1 C C = C rank y = rank z G suc rank y y = G suc rank z z y = z
220 219 biimpd φ y R1 C z R1 C C = C rank y = rank z G suc rank y y = G suc rank z z y = z
221 220 expimpd φ y R1 C z R1 C C = C rank y = rank z G suc rank y y = G suc rank z z y = z
222 190 195 jca y = z rank y = rank z G suc rank y y = G suc rank z z
223 221 222 impbid1 φ y R1 C z R1 C C = C rank y = rank z G suc rank y y = G suc rank z z y = z
224 164 201 223 3bitrd φ y R1 C z R1 C C = C if C = C suc ran G C 𝑜 rank y + 𝑜 G suc rank y y F H y = if C = C suc ran G C 𝑜 rank z + 𝑜 G suc rank z z F H z y = z
225 iffalse ¬ C = C if C = C suc ran G C 𝑜 rank y + 𝑜 G suc rank y y F H y = F H y
226 iffalse ¬ C = C if C = C suc ran G C 𝑜 rank z + 𝑜 G suc rank z z F H z = F H z
227 225 226 eqeq12d ¬ C = C if C = C suc ran G C 𝑜 rank y + 𝑜 G suc rank y y F H y = if C = C suc ran G C 𝑜 rank z + 𝑜 G suc rank z z F H z F H y = F H z
228 227 adantl φ y R1 C z R1 C ¬ C = C if C = C suc ran G C 𝑜 rank y + 𝑜 G suc rank y y F H y = if C = C suc ran G C 𝑜 rank z + 𝑜 G suc rank z z F H z F H y = F H z
229 2 ad2antrr φ y R1 C z R1 C ¬ C = C F : 𝒫 har R1 A 1-1 On
230 157 adantlrr φ y R1 C z R1 C ¬ C = C H y 𝒫 har R1 A
231 188 anbi1d y = z φ y R1 C ¬ C = C φ z R1 C ¬ C = C
232 imaeq2 y = z H y = H z
233 232 eleq1d y = z H y 𝒫 har R1 A H z 𝒫 har R1 A
234 231 233 imbi12d y = z φ y R1 C ¬ C = C H y 𝒫 har R1 A φ z R1 C ¬ C = C H z 𝒫 har R1 A
235 234 157 chvarvv φ z R1 C ¬ C = C H z 𝒫 har R1 A
236 235 adantlrl φ y R1 C z R1 C ¬ C = C H z 𝒫 har R1 A
237 f1fveq F : 𝒫 har R1 A 1-1 On H y 𝒫 har R1 A H z 𝒫 har R1 A F H y = F H z H y = H z
238 229 230 236 237 syl12anc φ y R1 C z R1 C ¬ C = C F H y = F H z H y = H z
239 123 adantlrr φ y R1 C z R1 C ¬ C = C H : R1 C 1-1 dom OrdIso E ran G C
240 simplrl φ y R1 C z R1 C ¬ C = C y R1 C
241 100 fveq2d φ y R1 C ¬ C = C R1 C = R1 suc C
242 r1suc C On R1 suc C = 𝒫 R1 C
243 93 94 242 3syl φ y R1 C ¬ C = C R1 suc C = 𝒫 R1 C
244 241 243 eqtrd φ y R1 C ¬ C = C R1 C = 𝒫 R1 C
245 244 adantlrr φ y R1 C z R1 C ¬ C = C R1 C = 𝒫 R1 C
246 240 245 eleqtrd φ y R1 C z R1 C ¬ C = C y 𝒫 R1 C
247 246 elpwid φ y R1 C z R1 C ¬ C = C y R1 C
248 simplrr φ y R1 C z R1 C ¬ C = C z R1 C
249 248 245 eleqtrd φ y R1 C z R1 C ¬ C = C z 𝒫 R1 C
250 249 elpwid φ y R1 C z R1 C ¬ C = C z R1 C
251 f1imaeq H : R1 C 1-1 dom OrdIso E ran G C y R1 C z R1 C H y = H z y = z
252 239 247 250 251 syl12anc φ y R1 C z R1 C ¬ C = C H y = H z y = z
253 228 238 252 3bitrd φ y R1 C z R1 C ¬ C = C if C = C suc ran G C 𝑜 rank y + 𝑜 G suc rank y y F H y = if C = C suc ran G C 𝑜 rank z + 𝑜 G suc rank z z F H z y = z
254 224 253 pm2.61dan φ y R1 C z R1 C if C = C suc ran G C 𝑜 rank y + 𝑜 G suc rank y y F H y = if C = C suc ran G C 𝑜 rank z + 𝑜 G suc rank z z F H z y = z
255 254 ex φ y R1 C z R1 C if C = C suc ran G C 𝑜 rank y + 𝑜 G suc rank y y F H y = if C = C suc ran G C 𝑜 rank z + 𝑜 G suc rank z z F H z y = z
256 160 255 dom2lem φ y R1 C if C = C suc ran G C 𝑜 rank y + 𝑜 G suc rank y y F H y : R1 C 1-1 On
257 1 2 3 4 5 dfac12lem1 φ G C = y R1 C if C = C suc ran G C 𝑜 rank y + 𝑜 G suc rank y y F H y
258 f1eq1 G C = y R1 C if C = C suc ran G C 𝑜 rank y + 𝑜 G suc rank y y F H y G C : R1 C 1-1 On y R1 C if C = C suc ran G C 𝑜 rank y + 𝑜 G suc rank y y F H y : R1 C 1-1 On
259 257 258 syl φ G C : R1 C 1-1 On y R1 C if C = C suc ran G C 𝑜 rank y + 𝑜 G suc rank y y F H y : R1 C 1-1 On
260 256 259 mpbird φ G C : R1 C 1-1 On