Metamath Proof Explorer


Theorem cvmopnlem

Description: Lemma for cvmopn . (Contributed by Mario Carneiro, 7-May-2015)

Ref Expression
Hypotheses cvmcov.1 S=kJs𝒫C|s=F-1kusvsuuv=FuC𝑡uHomeoJ𝑡k
cvmseu.1 B=C
Assertion cvmopnlem FCCovMapJACFAJ

Proof

Step Hyp Ref Expression
1 cvmcov.1 S=kJs𝒫C|s=F-1kusvsuuv=FuC𝑡uHomeoJ𝑡k
2 cvmseu.1 B=C
3 simpll FCCovMapJACzAFCCovMapJ
4 cvmcn FCCovMapJFCCnJ
5 4 adantr FCCovMapJACFCCnJ
6 eqid J=J
7 2 6 cnf FCCnJF:BJ
8 5 7 syl FCCovMapJACF:BJ
9 8 adantr FCCovMapJACzAF:BJ
10 elssuni ACAC
11 10 2 sseqtrrdi ACAB
12 11 adantl FCCovMapJACAB
13 12 sselda FCCovMapJACzAzB
14 9 13 ffvelcdmd FCCovMapJACzAFzJ
15 1 6 cvmcov FCCovMapJFzJtJFztSt
16 3 14 15 syl2anc FCCovMapJACzAtJFztSt
17 n0 StwwSt
18 inss2 Aιxw|zxιxw|zx
19 resima2 Aιxw|zxιxw|zxFιxw|zxAιxw|zx=FAιxw|zx
20 18 19 ax-mp Fιxw|zxAιxw|zx=FAιxw|zx
21 simprr FCCovMapJACzAFztwStwSt
22 3 adantr FCCovMapJACzAFztwStFCCovMapJ
23 13 adantr FCCovMapJACzAFztwStzB
24 simprl FCCovMapJACzAFztwStFzt
25 eqid ιxw|zx=ιxw|zx
26 1 2 25 cvmsiota FCCovMapJwStzBFztιxw|zxwzιxw|zx
27 22 21 23 24 26 syl13anc FCCovMapJACzAFztwStιxw|zxwzιxw|zx
28 27 simpld FCCovMapJACzAFztwStιxw|zxw
29 1 cvmshmeo wStιxw|zxwFιxw|zxC𝑡ιxw|zxHomeoJ𝑡t
30 21 28 29 syl2anc FCCovMapJACzAFztwStFιxw|zxC𝑡ιxw|zxHomeoJ𝑡t
31 cvmtop1 FCCovMapJCTop
32 22 31 syl FCCovMapJACzAFztwStCTop
33 simpllr FCCovMapJACzAFztwStAC
34 elrestr CTopιxw|zxwACAιxw|zxC𝑡ιxw|zx
35 32 28 33 34 syl3anc FCCovMapJACzAFztwStAιxw|zxC𝑡ιxw|zx
36 hmeoima Fιxw|zxC𝑡ιxw|zxHomeoJ𝑡tAιxw|zxC𝑡ιxw|zxFιxw|zxAιxw|zxJ𝑡t
37 30 35 36 syl2anc FCCovMapJACzAFztwStFιxw|zxAιxw|zxJ𝑡t
38 20 37 eqeltrrid FCCovMapJACzAFztwStFAιxw|zxJ𝑡t
39 cvmtop2 FCCovMapJJTop
40 39 adantr FCCovMapJACJTop
41 40 ad2antrr FCCovMapJACzAFztwStJTop
42 1 cvmsrcl wSttJ
43 42 ad2antll FCCovMapJACzAFztwSttJ
44 restopn2 JToptJFAιxw|zxJ𝑡tFAιxw|zxJFAιxw|zxt
45 41 43 44 syl2anc FCCovMapJACzAFztwStFAιxw|zxJ𝑡tFAιxw|zxJFAιxw|zxt
46 38 45 mpbid FCCovMapJACzAFztwStFAιxw|zxJFAιxw|zxt
47 46 simpld FCCovMapJACzAFztwStFAιxw|zxJ
48 8 ffnd FCCovMapJACFFnB
49 48 ad2antrr FCCovMapJACzAFztwStFFnB
50 inss1 Aιxw|zxA
51 33 11 syl FCCovMapJACzAFztwStAB
52 50 51 sstrid FCCovMapJACzAFztwStAιxw|zxB
53 simplr FCCovMapJACzAFztwStzA
54 27 simprd FCCovMapJACzAFztwStzιxw|zx
55 53 54 elind FCCovMapJACzAFztwStzAιxw|zx
56 fnfvima FFnBAιxw|zxBzAιxw|zxFzFAιxw|zx
57 49 52 55 56 syl3anc FCCovMapJACzAFztwStFzFAιxw|zx
58 imass2 Aιxw|zxAFAιxw|zxFA
59 50 58 mp1i FCCovMapJACzAFztwStFAιxw|zxFA
60 eleq2 y=FAιxw|zxFzyFzFAιxw|zx
61 sseq1 y=FAιxw|zxyFAFAιxw|zxFA
62 60 61 anbi12d y=FAιxw|zxFzyyFAFzFAιxw|zxFAιxw|zxFA
63 62 rspcev FAιxw|zxJFzFAιxw|zxFAιxw|zxFAyJFzyyFA
64 47 57 59 63 syl12anc FCCovMapJACzAFztwStyJFzyyFA
65 64 expr FCCovMapJACzAFztwStyJFzyyFA
66 65 exlimdv FCCovMapJACzAFztwwStyJFzyyFA
67 17 66 biimtrid FCCovMapJACzAFztStyJFzyyFA
68 67 expimpd FCCovMapJACzAFztStyJFzyyFA
69 68 rexlimdvw FCCovMapJACzAtJFztStyJFzyyFA
70 16 69 mpd FCCovMapJACzAyJFzyyFA
71 70 ralrimiva FCCovMapJACzAyJFzyyFA
72 eleq1 x=FzxyFzy
73 72 anbi1d x=FzxyyFAFzyyFA
74 73 rexbidv x=FzyJxyyFAyJFzyyFA
75 74 ralima FFnBABxFAyJxyyFAzAyJFzyyFA
76 48 12 75 syl2anc FCCovMapJACxFAyJxyyFAzAyJFzyyFA
77 71 76 mpbird FCCovMapJACxFAyJxyyFA
78 eltop2 JTopFAJxFAyJxyyFA
79 40 78 syl FCCovMapJACFAJxFAyJxyyFA
80 77 79 mpbird FCCovMapJACFAJ