Metamath Proof Explorer


Theorem cnheiborlem

Description: Lemma for cnheibor . (Contributed by Mario Carneiro, 14-Sep-2014)

Ref Expression
Hypotheses cnheibor.2 J=TopOpenfld
cnheibor.3 T=J𝑡X
cnheibor.4 F=x,yx+iy
cnheibor.5 Y=FRR×RR
Assertion cnheiborlem XClsdJRzXzRTComp

Proof

Step Hyp Ref Expression
1 cnheibor.2 J=TopOpenfld
2 cnheibor.3 T=J𝑡X
3 cnheibor.4 F=x,yx+iy
4 cnheibor.5 Y=FRR×RR
5 1 cnfldtop JTop
6 3 cnref1o F:21-1 onto
7 f1ofn F:21-1 ontoFFn2
8 elpreima FFn2uF-1Xu2FuX
9 6 7 8 mp2b uF-1Xu2FuX
10 1st2nd2 u2u=1stu2ndu
11 10 ad2antrl XClsdJRzXzRu2FuXu=1stu2ndu
12 xp1st u21stu
13 12 ad2antrl XClsdJRzXzRu2FuX1stu
14 13 recnd XClsdJRzXzRu2FuX1stu
15 14 abscld XClsdJRzXzRu2FuX1stu
16 1 cnfldtopon JTopOn
17 16 toponunii =J
18 17 cldss XClsdJX
19 18 adantr XClsdJRzXzRX
20 19 adantr XClsdJRzXzRu2FuXX
21 simprr XClsdJRzXzRu2FuXFuX
22 20 21 sseldd XClsdJRzXzRu2FuXFu
23 22 abscld XClsdJRzXzRu2FuXFu
24 simplrl XClsdJRzXzRu2FuXR
25 simprl XClsdJRzXzRu2FuXu2
26 f1ocnvfv1 F:21-1 ontou2F-1Fu=u
27 6 25 26 sylancr XClsdJRzXzRu2FuXF-1Fu=u
28 fveq2 z=Fuz=Fu
29 fveq2 z=Fuz=Fu
30 28 29 opeq12d z=Fuzz=FuFu
31 3 cnrecnv F-1=zzz
32 opex FuFuV
33 30 31 32 fvmpt FuF-1Fu=FuFu
34 22 33 syl XClsdJRzXzRu2FuXF-1Fu=FuFu
35 27 34 eqtr3d XClsdJRzXzRu2FuXu=FuFu
36 35 fveq2d XClsdJRzXzRu2FuX1stu=1stFuFu
37 fvex FuV
38 fvex FuV
39 37 38 op1st 1stFuFu=Fu
40 36 39 eqtrdi XClsdJRzXzRu2FuX1stu=Fu
41 40 fveq2d XClsdJRzXzRu2FuX1stu=Fu
42 absrele FuFuFu
43 22 42 syl XClsdJRzXzRu2FuXFuFu
44 41 43 eqbrtrd XClsdJRzXzRu2FuX1stuFu
45 fveq2 z=Fuz=Fu
46 45 breq1d z=FuzRFuR
47 simplrr XClsdJRzXzRu2FuXzXzR
48 46 47 21 rspcdva XClsdJRzXzRu2FuXFuR
49 15 23 24 44 48 letrd XClsdJRzXzRu2FuX1stuR
50 13 24 absled XClsdJRzXzRu2FuX1stuRR1stu1stuR
51 49 50 mpbid XClsdJRzXzRu2FuXR1stu1stuR
52 51 simpld XClsdJRzXzRu2FuXR1stu
53 51 simprd XClsdJRzXzRu2FuX1stuR
54 renegcl RR
55 24 54 syl XClsdJRzXzRu2FuXR
56 elicc2 RR1stuRR1stuR1stu1stuR
57 55 24 56 syl2anc XClsdJRzXzRu2FuX1stuRR1stuR1stu1stuR
58 13 52 53 57 mpbir3and XClsdJRzXzRu2FuX1stuRR
59 xp2nd u22ndu
60 59 ad2antrl XClsdJRzXzRu2FuX2ndu
61 60 recnd XClsdJRzXzRu2FuX2ndu
62 61 abscld XClsdJRzXzRu2FuX2ndu
63 35 fveq2d XClsdJRzXzRu2FuX2ndu=2ndFuFu
64 37 38 op2nd 2ndFuFu=Fu
65 63 64 eqtrdi XClsdJRzXzRu2FuX2ndu=Fu
66 65 fveq2d XClsdJRzXzRu2FuX2ndu=Fu
67 absimle FuFuFu
68 22 67 syl XClsdJRzXzRu2FuXFuFu
69 66 68 eqbrtrd XClsdJRzXzRu2FuX2nduFu
70 62 23 24 69 48 letrd XClsdJRzXzRu2FuX2nduR
71 60 24 absled XClsdJRzXzRu2FuX2nduRR2ndu2nduR
72 70 71 mpbid XClsdJRzXzRu2FuXR2ndu2nduR
73 72 simpld XClsdJRzXzRu2FuXR2ndu
74 72 simprd XClsdJRzXzRu2FuX2nduR
75 elicc2 RR2nduRR2nduR2ndu2nduR
76 55 24 75 syl2anc XClsdJRzXzRu2FuX2nduRR2nduR2ndu2nduR
77 60 73 74 76 mpbir3and XClsdJRzXzRu2FuX2nduRR
78 58 77 opelxpd XClsdJRzXzRu2FuX1stu2nduRR×RR
79 11 78 eqeltrd XClsdJRzXzRu2FuXuRR×RR
80 79 ex XClsdJRzXzRu2FuXuRR×RR
81 9 80 biimtrid XClsdJRzXzRuF-1XuRR×RR
82 81 ssrdv XClsdJRzXzRF-1XRR×RR
83 f1ofun F:21-1 ontoFunF
84 6 83 ax-mp FunF
85 f1ofo F:21-1 ontoF:2onto
86 forn F:2ontoranF=
87 6 85 86 mp2b ranF=
88 19 87 sseqtrrdi XClsdJRzXzRXranF
89 funimass1 FunFXranFF-1XRR×RRXFRR×RR
90 84 88 89 sylancr XClsdJRzXzRF-1XRR×RRXFRR×RR
91 82 90 mpd XClsdJRzXzRXFRR×RR
92 91 4 sseqtrrdi XClsdJRzXzRXY
93 eqid topGenran.=topGenran.
94 3 93 1 cnrehmeo FtopGenran.×ttopGenran.HomeoJ
95 imaexg FtopGenran.×ttopGenran.HomeoJFRR×RRV
96 94 95 ax-mp FRR×RRV
97 4 96 eqeltri YV
98 97 a1i XClsdJRzXzRYV
99 restabs JTopXYYVJ𝑡Y𝑡X=J𝑡X
100 5 92 98 99 mp3an2i XClsdJRzXzRJ𝑡Y𝑡X=J𝑡X
101 100 2 eqtr4di XClsdJRzXzRJ𝑡Y𝑡X=T
102 4 oveq2i J𝑡Y=J𝑡FRR×RR
103 ishmeo FtopGenran.×ttopGenran.HomeoJFtopGenran.×ttopGenran.CnJF-1JCntopGenran.×ttopGenran.
104 94 103 mpbi FtopGenran.×ttopGenran.CnJF-1JCntopGenran.×ttopGenran.
105 104 simpli FtopGenran.×ttopGenran.CnJ
106 iccssre RRRR
107 54 106 mpancom RRR
108 1 93 rerest RRJ𝑡RR=topGenran.𝑡RR
109 107 108 syl RJ𝑡RR=topGenran.𝑡RR
110 109 109 oveq12d RJ𝑡RR×tJ𝑡RR=topGenran.𝑡RR×ttopGenran.𝑡RR
111 retop topGenran.Top
112 ovex RRV
113 txrest topGenran.ToptopGenran.TopRRVRRVtopGenran.×ttopGenran.𝑡RR×RR=topGenran.𝑡RR×ttopGenran.𝑡RR
114 111 111 112 112 113 mp4an topGenran.×ttopGenran.𝑡RR×RR=topGenran.𝑡RR×ttopGenran.𝑡RR
115 110 114 eqtr4di RJ𝑡RR×tJ𝑡RR=topGenran.×ttopGenran.𝑡RR×RR
116 eqid topGenran.𝑡RR=topGenran.𝑡RR
117 93 116 icccmp RRtopGenran.𝑡RRComp
118 54 117 mpancom RtopGenran.𝑡RRComp
119 109 118 eqeltrd RJ𝑡RRComp
120 txcmp J𝑡RRCompJ𝑡RRCompJ𝑡RR×tJ𝑡RRComp
121 119 119 120 syl2anc RJ𝑡RR×tJ𝑡RRComp
122 115 121 eqeltrrd RtopGenran.×ttopGenran.𝑡RR×RRComp
123 imacmp FtopGenran.×ttopGenran.CnJtopGenran.×ttopGenran.𝑡RR×RRCompJ𝑡FRR×RRComp
124 105 122 123 sylancr RJ𝑡FRR×RRComp
125 102 124 eqeltrid RJ𝑡YComp
126 125 ad2antrl XClsdJRzXzRJ𝑡YComp
127 imassrn FRR×RRranF
128 4 127 eqsstri YranF
129 f1of F:21-1 ontoF:2
130 frn F:2ranF
131 6 129 130 mp2b ranF
132 128 131 sstri Y
133 simpl XClsdJRzXzRXClsdJ
134 17 restcldi YXClsdJXYXClsdJ𝑡Y
135 132 133 92 134 mp3an2i XClsdJRzXzRXClsdJ𝑡Y
136 cmpcld J𝑡YCompXClsdJ𝑡YJ𝑡Y𝑡XComp
137 126 135 136 syl2anc XClsdJRzXzRJ𝑡Y𝑡XComp
138 101 137 eqeltrrd XClsdJRzXzRTComp