Metamath Proof Explorer


Theorem 1stckgenlem

Description: The one-point compactification of NN is compact. (Contributed by Mario Carneiro, 21-Mar-2015)

Ref Expression
Hypotheses 1stckgen.1 φJTopOnX
1stckgen.2 φF:X
1stckgen.3 φFtJA
Assertion 1stckgenlem φJ𝑡ranFAComp

Proof

Step Hyp Ref Expression
1 1stckgen.1 φJTopOnX
2 1stckgen.2 φF:X
3 1stckgen.3 φFtJA
4 simprr φu𝒫JranFAuranFAu
5 ssun2 AranFA
6 lmcl JTopOnXFtJAAX
7 1 3 6 syl2anc φAX
8 snssg AXAranFAAranFA
9 7 8 syl φAranFAAranFA
10 5 9 mpbiri φAranFA
11 10 adantr φu𝒫JranFAuAranFA
12 4 11 sseldd φu𝒫JranFAuAu
13 eluni2 AuwuAw
14 12 13 sylib φu𝒫JranFAuwuAw
15 nnuz =1
16 simprr φu𝒫JranFAuwuAwAw
17 1zzd φu𝒫JranFAuwuAw1
18 3 ad2antrr φu𝒫JranFAuwuAwFtJA
19 simplrl φu𝒫JranFAuwuAwu𝒫J
20 19 elpwid φu𝒫JranFAuwuAwuJ
21 simprl φu𝒫JranFAuwuAwwu
22 20 21 sseldd φu𝒫JranFAuwuAwwJ
23 15 16 17 18 22 lmcvg φu𝒫JranFAuwuAwjkjFkw
24 imassrn F1jranF
25 ssun1 ranFranFA
26 24 25 sstri F1jranFA
27 id ranFAuranFAu
28 26 27 sstrid ranFAuF1ju
29 2 frnd φranFX
30 24 29 sstrid φF1jX
31 resttopon JTopOnXF1jXJ𝑡F1jTopOnF1j
32 1 30 31 syl2anc φJ𝑡F1jTopOnF1j
33 topontop J𝑡F1jTopOnF1jJ𝑡F1jTop
34 32 33 syl φJ𝑡F1jTop
35 fzfid φ1jFin
36 2 ffund φFunF
37 fz1ssnn 1j
38 2 fdmd φdomF=
39 37 38 sseqtrrid φ1jdomF
40 fores FunF1jdomFF1j:1jontoF1j
41 36 39 40 syl2anc φF1j:1jontoF1j
42 fofi 1jFinF1j:1jontoF1jF1jFin
43 35 41 42 syl2anc φF1jFin
44 pwfi F1jFin𝒫F1jFin
45 43 44 sylib φ𝒫F1jFin
46 restsspw J𝑡F1j𝒫F1j
47 ssfi 𝒫F1jFinJ𝑡F1j𝒫F1jJ𝑡F1jFin
48 45 46 47 sylancl φJ𝑡F1jFin
49 34 48 elind φJ𝑡F1jTopFin
50 fincmp J𝑡F1jTopFinJ𝑡F1jComp
51 49 50 syl φJ𝑡F1jComp
52 topontop JTopOnXJTop
53 1 52 syl φJTop
54 toponuni JTopOnXX=J
55 1 54 syl φX=J
56 30 55 sseqtrd φF1jJ
57 eqid J=J
58 57 cmpsub JTopF1jJJ𝑡F1jCompu𝒫JF1jus𝒫uFinF1js
59 53 56 58 syl2anc φJ𝑡F1jCompu𝒫JF1jus𝒫uFinF1js
60 51 59 mpbid φu𝒫JF1jus𝒫uFinF1js
61 60 r19.21bi φu𝒫JF1jus𝒫uFinF1js
62 28 61 syl5 φu𝒫JranFAus𝒫uFinF1js
63 62 impr φu𝒫JranFAus𝒫uFinF1js
64 63 adantr φu𝒫JranFAuwuAwjkjFkws𝒫uFinF1js
65 simprl φu𝒫JranFAuwuAwjkjFkws𝒫uFinF1jss𝒫uFin
66 65 elin1d φu𝒫JranFAuwuAwjkjFkws𝒫uFinF1jss𝒫u
67 66 elpwid φu𝒫JranFAuwuAwjkjFkws𝒫uFinF1jssu
68 simprll φu𝒫JranFAuwuAwjkjFkwwu
69 68 adantr φu𝒫JranFAuwuAwjkjFkws𝒫uFinF1jswu
70 69 snssd φu𝒫JranFAuwuAwjkjFkws𝒫uFinF1jswu
71 67 70 unssd φu𝒫JranFAuwuAwjkjFkws𝒫uFinF1jsswu
72 vex uV
73 72 elpw2 sw𝒫uswu
74 71 73 sylibr φu𝒫JranFAuwuAwjkjFkws𝒫uFinF1jssw𝒫u
75 65 elin2d φu𝒫JranFAuwuAwjkjFkws𝒫uFinF1jssFin
76 snfi wFin
77 unfi sFinwFinswFin
78 75 76 77 sylancl φu𝒫JranFAuwuAwjkjFkws𝒫uFinF1jsswFin
79 74 78 elind φu𝒫JranFAuwuAwjkjFkws𝒫uFinF1jssw𝒫uFin
80 2 ffnd φFFn
81 80 ad3antrrr φu𝒫JranFAuwuAwjkjFkws𝒫uFinF1jsFFn
82 simprrr φu𝒫JranFAuwuAwjkjFkwkjFkw
83 82 adantr φu𝒫JranFAuwuAwjkjFkws𝒫uFinF1jskjFkw
84 fveq2 k=nFk=Fn
85 84 eleq1d k=nFkwFnw
86 85 rspccva kjFkwnjFnw
87 83 86 sylan φu𝒫JranFAuwuAwjkjFkws𝒫uFinF1jsnjFnw
88 elun2 FnwFnsw
89 87 88 syl φu𝒫JranFAuwuAwjkjFkws𝒫uFinF1jsnjFnsw
90 89 adantlr φu𝒫JranFAuwuAwjkjFkws𝒫uFinF1jsnnjFnsw
91 elnnuz nn1
92 91 anbi1i njnn1jn
93 elfzuzb n1jn1jn
94 92 93 bitr4i njnn1j
95 simprr φu𝒫JranFAuwuAwjkjFkws𝒫uFinF1jsF1js
96 funimass4 FunF1jdomFF1jsn1jFns
97 36 39 96 syl2anc φF1jsn1jFns
98 97 ad3antrrr φu𝒫JranFAuwuAwjkjFkws𝒫uFinF1jsF1jsn1jFns
99 95 98 mpbid φu𝒫JranFAuwuAwjkjFkws𝒫uFinF1jsn1jFns
100 99 r19.21bi φu𝒫JranFAuwuAwjkjFkws𝒫uFinF1jsn1jFns
101 elun1 FnsFnsw
102 100 101 syl φu𝒫JranFAuwuAwjkjFkws𝒫uFinF1jsn1jFnsw
103 94 102 sylan2b φu𝒫JranFAuwuAwjkjFkws𝒫uFinF1jsnjnFnsw
104 103 anassrs φu𝒫JranFAuwuAwjkjFkws𝒫uFinF1jsnjnFnsw
105 simprl wuAwjkjFkwj
106 105 ad2antlr φu𝒫JranFAuwuAwjkjFkws𝒫uFinF1jsj
107 nnz jj
108 nnz nn
109 uztric jnnjjn
110 107 108 109 syl2an jnnjjn
111 106 110 sylan φu𝒫JranFAuwuAwjkjFkws𝒫uFinF1jsnnjjn
112 90 104 111 mpjaodan φu𝒫JranFAuwuAwjkjFkws𝒫uFinF1jsnFnsw
113 112 ralrimiva φu𝒫JranFAuwuAwjkjFkws𝒫uFinF1jsnFnsw
114 fnfvrnss FFnnFnswranFsw
115 81 113 114 syl2anc φu𝒫JranFAuwuAwjkjFkws𝒫uFinF1jsranFsw
116 elun2 AwAsw
117 116 ad2antlr wuAwjkjFkwAsw
118 117 ad2antlr φu𝒫JranFAuwuAwjkjFkws𝒫uFinF1jsAsw
119 118 snssd φu𝒫JranFAuwuAwjkjFkws𝒫uFinF1jsAsw
120 115 119 unssd φu𝒫JranFAuwuAwjkjFkws𝒫uFinF1jsranFAsw
121 uniun sw=sw
122 unisnv w=w
123 122 uneq2i sw=sw
124 121 123 eqtri sw=sw
125 120 124 sseqtrrdi φu𝒫JranFAuwuAwjkjFkws𝒫uFinF1jsranFAsw
126 unieq v=swv=sw
127 126 sseq2d v=swranFAvranFAsw
128 127 rspcev sw𝒫uFinranFAswv𝒫uFinranFAv
129 79 125 128 syl2anc φu𝒫JranFAuwuAwjkjFkws𝒫uFinF1jsv𝒫uFinranFAv
130 64 129 rexlimddv φu𝒫JranFAuwuAwjkjFkwv𝒫uFinranFAv
131 130 anassrs φu𝒫JranFAuwuAwjkjFkwv𝒫uFinranFAv
132 23 131 rexlimddv φu𝒫JranFAuwuAwv𝒫uFinranFAv
133 14 132 rexlimddv φu𝒫JranFAuv𝒫uFinranFAv
134 133 expr φu𝒫JranFAuv𝒫uFinranFAv
135 134 ralrimiva φu𝒫JranFAuv𝒫uFinranFAv
136 7 snssd φAX
137 29 136 unssd φranFAX
138 137 55 sseqtrd φranFAJ
139 57 cmpsub JTopranFAJJ𝑡ranFACompu𝒫JranFAuv𝒫uFinranFAv
140 53 138 139 syl2anc φJ𝑡ranFACompu𝒫JranFAuv𝒫uFinranFAv
141 135 140 mpbird φJ𝑡ranFAComp