MPE Home Metamath Proof Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >  tgcmp Structured version   Unicode version

Theorem tgcmp 19129
Description: A topology generated by a basis is compact iff open covers drawn from the basis have finite subcovers. (See also alexsub 19742, which further specializes to subbases, assuming the ultrafilter lemma.) (Contributed by Mario Carneiro, 26-Aug-2015.)
Assertion
Ref Expression
tgcmp  |-  ( ( B  e.  TopBases  /\  X  =  U. B )  -> 
( ( topGen `  B
)  e.  Comp  <->  A. y  e.  ~P  B ( X  =  U. y  ->  E. z  e.  ( ~P y  i^i  Fin ) X  =  U. z
) ) )
Distinct variable groups:    y, z, B    y, X, z

Proof of Theorem tgcmp
Dummy variables  t 
f  u  v  w are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 eqid 2451 . . . . 5  |-  U. ( topGen `
 B )  = 
U. ( topGen `  B
)
21iscmp 19116 . . . 4  |-  ( (
topGen `  B )  e. 
Comp 
<->  ( ( topGen `  B
)  e.  Top  /\  A. y  e.  ~P  ( topGen `
 B ) ( U. ( topGen `  B
)  =  U. y  ->  E. z  e.  ( ~P y  i^i  Fin ) U. ( topGen `  B
)  =  U. z
) ) )
32simprbi 464 . . 3  |-  ( (
topGen `  B )  e. 
Comp  ->  A. y  e.  ~P  ( topGen `  B )
( U. ( topGen `  B )  =  U. y  ->  E. z  e.  ( ~P y  i^i  Fin ) U. ( topGen `  B
)  =  U. z
) )
4 unitg 18697 . . . . . . . 8  |-  ( B  e.  TopBases  ->  U. ( topGen `  B
)  =  U. B
)
5 eqtr3 2479 . . . . . . . 8  |-  ( ( U. ( topGen `  B
)  =  U. B  /\  X  =  U. B )  ->  U. ( topGen `
 B )  =  X )
64, 5sylan 471 . . . . . . 7  |-  ( ( B  e.  TopBases  /\  X  =  U. B )  ->  U. ( topGen `  B )  =  X )
76eqeq1d 2453 . . . . . 6  |-  ( ( B  e.  TopBases  /\  X  =  U. B )  -> 
( U. ( topGen `  B )  =  U. y 
<->  X  =  U. y
) )
86eqeq1d 2453 . . . . . . 7  |-  ( ( B  e.  TopBases  /\  X  =  U. B )  -> 
( U. ( topGen `  B )  =  U. z 
<->  X  =  U. z
) )
98rexbidv 2855 . . . . . 6  |-  ( ( B  e.  TopBases  /\  X  =  U. B )  -> 
( E. z  e.  ( ~P y  i^i 
Fin ) U. ( topGen `
 B )  = 
U. z  <->  E. z  e.  ( ~P y  i^i 
Fin ) X  = 
U. z ) )
107, 9imbi12d 320 . . . . 5  |-  ( ( B  e.  TopBases  /\  X  =  U. B )  -> 
( ( U. ( topGen `
 B )  = 
U. y  ->  E. z  e.  ( ~P y  i^i 
Fin ) U. ( topGen `
 B )  = 
U. z )  <->  ( X  =  U. y  ->  E. z  e.  ( ~P y  i^i 
Fin ) X  = 
U. z ) ) )
1110ralbidv 2841 . . . 4  |-  ( ( B  e.  TopBases  /\  X  =  U. B )  -> 
( A. y  e. 
~P  ( topGen `  B
) ( U. ( topGen `
 B )  = 
U. y  ->  E. z  e.  ( ~P y  i^i 
Fin ) U. ( topGen `
 B )  = 
U. z )  <->  A. y  e.  ~P  ( topGen `  B
) ( X  = 
U. y  ->  E. z  e.  ( ~P y  i^i 
Fin ) X  = 
U. z ) ) )
12 bastg 18696 . . . . . . 7  |-  ( B  e.  TopBases  ->  B  C_  ( topGen `
 B ) )
1312adantr 465 . . . . . 6  |-  ( ( B  e.  TopBases  /\  X  =  U. B )  ->  B  C_  ( topGen `  B
) )
14 sspwb 4642 . . . . . 6  |-  ( B 
C_  ( topGen `  B
)  <->  ~P B  C_  ~P ( topGen `  B )
)
1513, 14sylib 196 . . . . 5  |-  ( ( B  e.  TopBases  /\  X  =  U. B )  ->  ~P B  C_  ~P ( topGen `
 B ) )
16 ssralv 3517 . . . . 5  |-  ( ~P B  C_  ~P ( topGen `
 B )  -> 
( A. y  e. 
~P  ( topGen `  B
) ( X  = 
U. y  ->  E. z  e.  ( ~P y  i^i 
Fin ) X  = 
U. z )  ->  A. y  e.  ~P  B ( X  = 
U. y  ->  E. z  e.  ( ~P y  i^i 
Fin ) X  = 
U. z ) ) )
1715, 16syl 16 . . . 4  |-  ( ( B  e.  TopBases  /\  X  =  U. B )  -> 
( A. y  e. 
~P  ( topGen `  B
) ( X  = 
U. y  ->  E. z  e.  ( ~P y  i^i 
Fin ) X  = 
U. z )  ->  A. y  e.  ~P  B ( X  = 
U. y  ->  E. z  e.  ( ~P y  i^i 
Fin ) X  = 
U. z ) ) )
1811, 17sylbid 215 . . 3  |-  ( ( B  e.  TopBases  /\  X  =  U. B )  -> 
( A. y  e. 
~P  ( topGen `  B
) ( U. ( topGen `
 B )  = 
U. y  ->  E. z  e.  ( ~P y  i^i 
Fin ) U. ( topGen `
 B )  = 
U. z )  ->  A. y  e.  ~P  B ( X  = 
U. y  ->  E. z  e.  ( ~P y  i^i 
Fin ) X  = 
U. z ) ) )
193, 18syl5 32 . 2  |-  ( ( B  e.  TopBases  /\  X  =  U. B )  -> 
( ( topGen `  B
)  e.  Comp  ->  A. y  e.  ~P  B
( X  =  U. y  ->  E. z  e.  ( ~P y  i^i  Fin ) X  =  U. z ) ) )
20 elpwi 3970 . . . . 5  |-  ( u  e.  ~P ( topGen `  B )  ->  u  C_  ( topGen `  B )
)
21 simprr 756 . . . . . . . . . . 11  |-  ( ( ( B  e.  TopBases  /\  X  =  U. B )  /\  ( u  C_  ( topGen `  B )  /\  X  =  U. u ) )  ->  X  =  U. u
)
22 simprl 755 . . . . . . . . . . . . . . . . . 18  |-  ( ( ( B  e.  TopBases  /\  X  =  U. B )  /\  ( u  C_  ( topGen `  B )  /\  X  =  U. u ) )  ->  u  C_  ( topGen `  B
) )
2322sselda 3457 . . . . . . . . . . . . . . . . 17  |-  ( ( ( ( B  e.  TopBases 
/\  X  =  U. B )  /\  (
u  C_  ( topGen `  B )  /\  X  =  U. u ) )  /\  t  e.  u
)  ->  t  e.  ( topGen `  B )
)
2423adantrr 716 . . . . . . . . . . . . . . . 16  |-  ( ( ( ( B  e.  TopBases 
/\  X  =  U. B )  /\  (
u  C_  ( topGen `  B )  /\  X  =  U. u ) )  /\  ( t  e.  u  /\  y  e.  t ) )  -> 
t  e.  ( topGen `  B ) )
25 simprr 756 . . . . . . . . . . . . . . . 16  |-  ( ( ( ( B  e.  TopBases 
/\  X  =  U. B )  /\  (
u  C_  ( topGen `  B )  /\  X  =  U. u ) )  /\  ( t  e.  u  /\  y  e.  t ) )  -> 
y  e.  t )
26 tg2 18695 . . . . . . . . . . . . . . . 16  |-  ( ( t  e.  ( topGen `  B )  /\  y  e.  t )  ->  E. w  e.  B  ( y  e.  w  /\  w  C_  t ) )
2724, 25, 26syl2anc 661 . . . . . . . . . . . . . . 15  |-  ( ( ( ( B  e.  TopBases 
/\  X  =  U. B )  /\  (
u  C_  ( topGen `  B )  /\  X  =  U. u ) )  /\  ( t  e.  u  /\  y  e.  t ) )  ->  E. w  e.  B  ( y  e.  w  /\  w  C_  t ) )
2827expr 615 . . . . . . . . . . . . . 14  |-  ( ( ( ( B  e.  TopBases 
/\  X  =  U. B )  /\  (
u  C_  ( topGen `  B )  /\  X  =  U. u ) )  /\  t  e.  u
)  ->  ( y  e.  t  ->  E. w  e.  B  ( y  e.  w  /\  w  C_  t ) ) )
2928reximdva 2927 . . . . . . . . . . . . 13  |-  ( ( ( B  e.  TopBases  /\  X  =  U. B )  /\  ( u  C_  ( topGen `  B )  /\  X  =  U. u ) )  -> 
( E. t  e.  u  y  e.  t  ->  E. t  e.  u  E. w  e.  B  ( y  e.  w  /\  w  C_  t ) ) )
30 eluni2 4196 . . . . . . . . . . . . 13  |-  ( y  e.  U. u  <->  E. t  e.  u  y  e.  t )
31 elunirab 4204 . . . . . . . . . . . . . 14  |-  ( y  e.  U. { w  e.  B  |  E. t  e.  u  w  C_  t }  <->  E. w  e.  B  ( y  e.  w  /\  E. t  e.  u  w  C_  t
) )
32 r19.42v 2974 . . . . . . . . . . . . . . 15  |-  ( E. t  e.  u  ( y  e.  w  /\  w  C_  t )  <->  ( y  e.  w  /\  E. t  e.  u  w  C_  t
) )
3332rexbii 2859 . . . . . . . . . . . . . 14  |-  ( E. w  e.  B  E. t  e.  u  (
y  e.  w  /\  w  C_  t )  <->  E. w  e.  B  ( y  e.  w  /\  E. t  e.  u  w  C_  t
) )
34 rexcom 2981 . . . . . . . . . . . . . 14  |-  ( E. w  e.  B  E. t  e.  u  (
y  e.  w  /\  w  C_  t )  <->  E. t  e.  u  E. w  e.  B  ( y  e.  w  /\  w  C_  t ) )
3531, 33, 343bitr2i 273 . . . . . . . . . . . . 13  |-  ( y  e.  U. { w  e.  B  |  E. t  e.  u  w  C_  t }  <->  E. t  e.  u  E. w  e.  B  ( y  e.  w  /\  w  C_  t ) )
3629, 30, 353imtr4g 270 . . . . . . . . . . . 12  |-  ( ( ( B  e.  TopBases  /\  X  =  U. B )  /\  ( u  C_  ( topGen `  B )  /\  X  =  U. u ) )  -> 
( y  e.  U. u  ->  y  e.  U. { w  e.  B  |  E. t  e.  u  w  C_  t } ) )
3736ssrdv 3463 . . . . . . . . . . 11  |-  ( ( ( B  e.  TopBases  /\  X  =  U. B )  /\  ( u  C_  ( topGen `  B )  /\  X  =  U. u ) )  ->  U. u  C_  U. {
w  e.  B  |  E. t  e.  u  w  C_  t } )
3821, 37eqsstrd 3491 . . . . . . . . . 10  |-  ( ( ( B  e.  TopBases  /\  X  =  U. B )  /\  ( u  C_  ( topGen `  B )  /\  X  =  U. u ) )  ->  X  C_  U. { w  e.  B  |  E. t  e.  u  w  C_  t } )
39 ssrab2 3538 . . . . . . . . . . . 12  |-  { w  e.  B  |  E. t  e.  u  w  C_  t }  C_  B
4039unissi 4215 . . . . . . . . . . 11  |-  U. {
w  e.  B  |  E. t  e.  u  w  C_  t }  C_  U. B
41 simplr 754 . . . . . . . . . . 11  |-  ( ( ( B  e.  TopBases  /\  X  =  U. B )  /\  ( u  C_  ( topGen `  B )  /\  X  =  U. u ) )  ->  X  =  U. B )
4240, 41syl5sseqr 3506 . . . . . . . . . 10  |-  ( ( ( B  e.  TopBases  /\  X  =  U. B )  /\  ( u  C_  ( topGen `  B )  /\  X  =  U. u ) )  ->  U. { w  e.  B  |  E. t  e.  u  w  C_  t }  C_  X )
4338, 42eqssd 3474 . . . . . . . . 9  |-  ( ( ( B  e.  TopBases  /\  X  =  U. B )  /\  ( u  C_  ( topGen `  B )  /\  X  =  U. u ) )  ->  X  =  U. { w  e.  B  |  E. t  e.  u  w  C_  t } )
44 elpw2g 4556 . . . . . . . . . . . 12  |-  ( B  e.  TopBases  ->  ( { w  e.  B  |  E. t  e.  u  w  C_  t }  e.  ~P B 
<->  { w  e.  B  |  E. t  e.  u  w  C_  t }  C_  B ) )
4544ad2antrr 725 . . . . . . . . . . 11  |-  ( ( ( B  e.  TopBases  /\  X  =  U. B )  /\  ( u  C_  ( topGen `  B )  /\  X  =  U. u ) )  -> 
( { w  e.  B  |  E. t  e.  u  w  C_  t }  e.  ~P B  <->  { w  e.  B  |  E. t  e.  u  w  C_  t }  C_  B ) )
4639, 45mpbiri 233 . . . . . . . . . 10  |-  ( ( ( B  e.  TopBases  /\  X  =  U. B )  /\  ( u  C_  ( topGen `  B )  /\  X  =  U. u ) )  ->  { w  e.  B  |  E. t  e.  u  w  C_  t }  e.  ~P B )
47 unieq 4200 . . . . . . . . . . . . 13  |-  ( y  =  { w  e.  B  |  E. t  e.  u  w  C_  t }  ->  U. y  =  U. { w  e.  B  |  E. t  e.  u  w  C_  t } )
4847eqeq2d 2465 . . . . . . . . . . . 12  |-  ( y  =  { w  e.  B  |  E. t  e.  u  w  C_  t }  ->  ( X  = 
U. y  <->  X  =  U. { w  e.  B  |  E. t  e.  u  w  C_  t } ) )
49 pweq 3964 . . . . . . . . . . . . . 14  |-  ( y  =  { w  e.  B  |  E. t  e.  u  w  C_  t }  ->  ~P y  =  ~P { w  e.  B  |  E. t  e.  u  w  C_  t } )
5049ineq1d 3652 . . . . . . . . . . . . 13  |-  ( y  =  { w  e.  B  |  E. t  e.  u  w  C_  t }  ->  ( ~P y  i^i  Fin )  =  ( ~P { w  e.  B  |  E. t  e.  u  w  C_  t }  i^i  Fin ) )
5150rexeqdv 3023 . . . . . . . . . . . 12  |-  ( y  =  { w  e.  B  |  E. t  e.  u  w  C_  t }  ->  ( E. z  e.  ( ~P y  i^i 
Fin ) X  = 
U. z  <->  E. z  e.  ( ~P { w  e.  B  |  E. t  e.  u  w  C_  t }  i^i  Fin ) X  =  U. z ) )
5248, 51imbi12d 320 . . . . . . . . . . 11  |-  ( y  =  { w  e.  B  |  E. t  e.  u  w  C_  t }  ->  ( ( X  =  U. y  ->  E. z  e.  ( ~P y  i^i  Fin ) X  =  U. z
)  <->  ( X  = 
U. { w  e.  B  |  E. t  e.  u  w  C_  t }  ->  E. z  e.  ( ~P { w  e.  B  |  E. t  e.  u  w  C_  t }  i^i  Fin ) X  =  U. z ) ) )
5352rspcv 3168 . . . . . . . . . 10  |-  ( { w  e.  B  |  E. t  e.  u  w  C_  t }  e.  ~P B  ->  ( A. y  e.  ~P  B
( X  =  U. y  ->  E. z  e.  ( ~P y  i^i  Fin ) X  =  U. z )  ->  ( X  =  U. { w  e.  B  |  E. t  e.  u  w  C_  t }  ->  E. z  e.  ( ~P { w  e.  B  |  E. t  e.  u  w  C_  t }  i^i  Fin ) X  =  U. z ) ) )
5446, 53syl 16 . . . . . . . . 9  |-  ( ( ( B  e.  TopBases  /\  X  =  U. B )  /\  ( u  C_  ( topGen `  B )  /\  X  =  U. u ) )  -> 
( A. y  e. 
~P  B ( X  =  U. y  ->  E. z  e.  ( ~P y  i^i  Fin ) X  =  U. z
)  ->  ( X  =  U. { w  e.  B  |  E. t  e.  u  w  C_  t }  ->  E. z  e.  ( ~P { w  e.  B  |  E. t  e.  u  w  C_  t }  i^i  Fin ) X  =  U. z ) ) )
5543, 54mpid 41 . . . . . . . 8  |-  ( ( ( B  e.  TopBases  /\  X  =  U. B )  /\  ( u  C_  ( topGen `  B )  /\  X  =  U. u ) )  -> 
( A. y  e. 
~P  B ( X  =  U. y  ->  E. z  e.  ( ~P y  i^i  Fin ) X  =  U. z
)  ->  E. z  e.  ( ~P { w  e.  B  |  E. t  e.  u  w  C_  t }  i^i  Fin ) X  =  U. z ) )
56 elfpw 7717 . . . . . . . . . . . . 13  |-  ( z  e.  ( ~P {
w  e.  B  |  E. t  e.  u  w  C_  t }  i^i  Fin )  <->  ( z  C_  { w  e.  B  |  E. t  e.  u  w  C_  t }  /\  z  e.  Fin )
)
5756simprbi 464 . . . . . . . . . . . 12  |-  ( z  e.  ( ~P {
w  e.  B  |  E. t  e.  u  w  C_  t }  i^i  Fin )  ->  z  e.  Fin )
5857ad2antrl 727 . . . . . . . . . . 11  |-  ( ( ( ( B  e.  TopBases 
/\  X  =  U. B )  /\  (
u  C_  ( topGen `  B )  /\  X  =  U. u ) )  /\  ( z  e.  ( ~P { w  e.  B  |  E. t  e.  u  w  C_  t }  i^i  Fin )  /\  X  =  U. z ) )  -> 
z  e.  Fin )
5956simplbi 460 . . . . . . . . . . . . 13  |-  ( z  e.  ( ~P {
w  e.  B  |  E. t  e.  u  w  C_  t }  i^i  Fin )  ->  z  C_  { w  e.  B  |  E. t  e.  u  w  C_  t } )
6059ad2antrl 727 . . . . . . . . . . . 12  |-  ( ( ( ( B  e.  TopBases 
/\  X  =  U. B )  /\  (
u  C_  ( topGen `  B )  /\  X  =  U. u ) )  /\  ( z  e.  ( ~P { w  e.  B  |  E. t  e.  u  w  C_  t }  i^i  Fin )  /\  X  =  U. z ) )  -> 
z  C_  { w  e.  B  |  E. t  e.  u  w  C_  t } )
61 ssrab 3531 . . . . . . . . . . . . 13  |-  ( z 
C_  { w  e.  B  |  E. t  e.  u  w  C_  t } 
<->  ( z  C_  B  /\  A. w  e.  z  E. t  e.  u  w  C_  t ) )
6261simprbi 464 . . . . . . . . . . . 12  |-  ( z 
C_  { w  e.  B  |  E. t  e.  u  w  C_  t }  ->  A. w  e.  z  E. t  e.  u  w  C_  t )
6360, 62syl 16 . . . . . . . . . . 11  |-  ( ( ( ( B  e.  TopBases 
/\  X  =  U. B )  /\  (
u  C_  ( topGen `  B )  /\  X  =  U. u ) )  /\  ( z  e.  ( ~P { w  e.  B  |  E. t  e.  u  w  C_  t }  i^i  Fin )  /\  X  =  U. z ) )  ->  A. w  e.  z  E. t  e.  u  w  C_  t )
64 sseq2 3479 . . . . . . . . . . . 12  |-  ( t  =  ( f `  w )  ->  (
w  C_  t  <->  w  C_  (
f `  w )
) )
6564ac6sfi 7660 . . . . . . . . . . 11  |-  ( ( z  e.  Fin  /\  A. w  e.  z  E. t  e.  u  w  C_  t )  ->  E. f
( f : z --> u  /\  A. w  e.  z  w  C_  (
f `  w )
) )
6658, 63, 65syl2anc 661 . . . . . . . . . 10  |-  ( ( ( ( B  e.  TopBases 
/\  X  =  U. B )  /\  (
u  C_  ( topGen `  B )  /\  X  =  U. u ) )  /\  ( z  e.  ( ~P { w  e.  B  |  E. t  e.  u  w  C_  t }  i^i  Fin )  /\  X  =  U. z ) )  ->  E. f ( f : z --> u  /\  A. w  e.  z  w  C_  ( f `  w
) ) )
67 frn 5666 . . . . . . . . . . . . 13  |-  ( f : z --> u  ->  ran  f  C_  u )
6867ad2antrl 727 . . . . . . . . . . . 12  |-  ( ( ( ( ( B  e.  TopBases  /\  X  =  U. B )  /\  (
u  C_  ( topGen `  B )  /\  X  =  U. u ) )  /\  ( z  e.  ( ~P { w  e.  B  |  E. t  e.  u  w  C_  t }  i^i  Fin )  /\  X  =  U. z ) )  /\  ( f : z --> u  /\  A. w  e.  z  w  C_  (
f `  w )
) )  ->  ran  f  C_  u )
69 ffn 5660 . . . . . . . . . . . . . . 15  |-  ( f : z --> u  -> 
f  Fn  z )
70 dffn4 5727 . . . . . . . . . . . . . . 15  |-  ( f  Fn  z  <->  f :
z -onto-> ran  f )
7169, 70sylib 196 . . . . . . . . . . . . . 14  |-  ( f : z --> u  -> 
f : z -onto-> ran  f )
7271adantr 465 . . . . . . . . . . . . 13  |-  ( ( f : z --> u  /\  A. w  e.  z  w  C_  (
f `  w )
)  ->  f :
z -onto-> ran  f )
73 fofi 7701 . . . . . . . . . . . . 13  |-  ( ( z  e.  Fin  /\  f : z -onto-> ran  f
)  ->  ran  f  e. 
Fin )
7458, 72, 73syl2an 477 . . . . . . . . . . . 12  |-  ( ( ( ( ( B  e.  TopBases  /\  X  =  U. B )  /\  (
u  C_  ( topGen `  B )  /\  X  =  U. u ) )  /\  ( z  e.  ( ~P { w  e.  B  |  E. t  e.  u  w  C_  t }  i^i  Fin )  /\  X  =  U. z ) )  /\  ( f : z --> u  /\  A. w  e.  z  w  C_  (
f `  w )
) )  ->  ran  f  e.  Fin )
75 elfpw 7717 . . . . . . . . . . . 12  |-  ( ran  f  e.  ( ~P u  i^i  Fin )  <->  ( ran  f  C_  u  /\  ran  f  e.  Fin ) )
7668, 74, 75sylanbrc 664 . . . . . . . . . . 11  |-  ( ( ( ( ( B  e.  TopBases  /\  X  =  U. B )  /\  (
u  C_  ( topGen `  B )  /\  X  =  U. u ) )  /\  ( z  e.  ( ~P { w  e.  B  |  E. t  e.  u  w  C_  t }  i^i  Fin )  /\  X  =  U. z ) )  /\  ( f : z --> u  /\  A. w  e.  z  w  C_  (
f `  w )
) )  ->  ran  f  e.  ( ~P u  i^i  Fin ) )
77 simplrr 760 . . . . . . . . . . . . 13  |-  ( ( ( ( ( B  e.  TopBases  /\  X  =  U. B )  /\  (
u  C_  ( topGen `  B )  /\  X  =  U. u ) )  /\  ( z  e.  ( ~P { w  e.  B  |  E. t  e.  u  w  C_  t }  i^i  Fin )  /\  X  =  U. z ) )  /\  ( f : z --> u  /\  A. w  e.  z  w  C_  (
f `  w )
) )  ->  X  =  U. z )
78 uniiun 4324 . . . . . . . . . . . . . . . 16  |-  U. z  =  U_ w  e.  z  w
79 ss2iun 4287 . . . . . . . . . . . . . . . 16  |-  ( A. w  e.  z  w  C_  ( f `  w
)  ->  U_ w  e.  z  w  C_  U_ w  e.  z  ( f `  w ) )
8078, 79syl5eqss 3501 . . . . . . . . . . . . . . 15  |-  ( A. w  e.  z  w  C_  ( f `  w
)  ->  U. z  C_ 
U_ w  e.  z  ( f `  w
) )
8180ad2antll 728 . . . . . . . . . . . . . 14  |-  ( ( ( ( ( B  e.  TopBases  /\  X  =  U. B )  /\  (
u  C_  ( topGen `  B )  /\  X  =  U. u ) )  /\  ( z  e.  ( ~P { w  e.  B  |  E. t  e.  u  w  C_  t }  i^i  Fin )  /\  X  =  U. z ) )  /\  ( f : z --> u  /\  A. w  e.  z  w  C_  (
f `  w )
) )  ->  U. z  C_ 
U_ w  e.  z  ( f `  w
) )
82 fniunfv 6066 . . . . . . . . . . . . . . . 16  |-  ( f  Fn  z  ->  U_ w  e.  z  ( f `  w )  =  U. ran  f )
8369, 82syl 16 . . . . . . . . . . . . . . 15  |-  ( f : z --> u  ->  U_ w  e.  z 
( f `  w
)  =  U. ran  f )
8483ad2antrl 727 . . . . . . . . . . . . . 14  |-  ( ( ( ( ( B  e.  TopBases  /\  X  =  U. B )  /\  (
u  C_  ( topGen `  B )  /\  X  =  U. u ) )  /\  ( z  e.  ( ~P { w  e.  B  |  E. t  e.  u  w  C_  t }  i^i  Fin )  /\  X  =  U. z ) )  /\  ( f : z --> u  /\  A. w  e.  z  w  C_  (
f `  w )
) )  ->  U_ w  e.  z  ( f `  w )  =  U. ran  f )
8581, 84sseqtrd 3493 . . . . . . . . . . . . 13  |-  ( ( ( ( ( B  e.  TopBases  /\  X  =  U. B )  /\  (
u  C_  ( topGen `  B )  /\  X  =  U. u ) )  /\  ( z  e.  ( ~P { w  e.  B  |  E. t  e.  u  w  C_  t }  i^i  Fin )  /\  X  =  U. z ) )  /\  ( f : z --> u  /\  A. w  e.  z  w  C_  (
f `  w )
) )  ->  U. z  C_ 
U. ran  f )
8677, 85eqsstrd 3491 . . . . . . . . . . . 12  |-  ( ( ( ( ( B  e.  TopBases  /\  X  =  U. B )  /\  (
u  C_  ( topGen `  B )  /\  X  =  U. u ) )  /\  ( z  e.  ( ~P { w  e.  B  |  E. t  e.  u  w  C_  t }  i^i  Fin )  /\  X  =  U. z ) )  /\  ( f : z --> u  /\  A. w  e.  z  w  C_  (
f `  w )
) )  ->  X  C_ 
U. ran  f )
8768unissd 4216 . . . . . . . . . . . . 13  |-  ( ( ( ( ( B  e.  TopBases  /\  X  =  U. B )  /\  (
u  C_  ( topGen `  B )  /\  X  =  U. u ) )  /\  ( z  e.  ( ~P { w  e.  B  |  E. t  e.  u  w  C_  t }  i^i  Fin )  /\  X  =  U. z ) )  /\  ( f : z --> u  /\  A. w  e.  z  w  C_  (
f `  w )
) )  ->  U. ran  f  C_  U. u )
8821ad2antrr 725 . . . . . . . . . . . . 13  |-  ( ( ( ( ( B  e.  TopBases  /\  X  =  U. B )  /\  (
u  C_  ( topGen `  B )  /\  X  =  U. u ) )  /\  ( z  e.  ( ~P { w  e.  B  |  E. t  e.  u  w  C_  t }  i^i  Fin )  /\  X  =  U. z ) )  /\  ( f : z --> u  /\  A. w  e.  z  w  C_  (
f `  w )
) )  ->  X  =  U. u )
8987, 88sseqtr4d 3494 . . . . . . . . . . . 12  |-  ( ( ( ( ( B  e.  TopBases  /\  X  =  U. B )  /\  (
u  C_  ( topGen `  B )  /\  X  =  U. u ) )  /\  ( z  e.  ( ~P { w  e.  B  |  E. t  e.  u  w  C_  t }  i^i  Fin )  /\  X  =  U. z ) )  /\  ( f : z --> u  /\  A. w  e.  z  w  C_  (
f `  w )
) )  ->  U. ran  f  C_  X )
9086, 89eqssd 3474 . . . . . . . . . . 11  |-  ( ( ( ( ( B  e.  TopBases  /\  X  =  U. B )  /\  (
u  C_  ( topGen `  B )  /\  X  =  U. u ) )  /\  ( z  e.  ( ~P { w  e.  B  |  E. t  e.  u  w  C_  t }  i^i  Fin )  /\  X  =  U. z ) )  /\  ( f : z --> u  /\  A. w  e.  z  w  C_  (
f `  w )
) )  ->  X  =  U. ran  f )
91 unieq 4200 . . . . . . . . . . . . 13  |-  ( v  =  ran  f  ->  U. v  =  U. ran  f )
9291eqeq2d 2465 . . . . . . . . . . . 12  |-  ( v  =  ran  f  -> 
( X  =  U. v 
<->  X  =  U. ran  f ) )
9392rspcev 3172 . . . . . . . . . . 11  |-  ( ( ran  f  e.  ( ~P u  i^i  Fin )  /\  X  =  U. ran  f )  ->  E. v  e.  ( ~P u  i^i 
Fin ) X  = 
U. v )
9476, 90, 93syl2anc 661 . . . . . . . . . 10  |-  ( ( ( ( ( B  e.  TopBases  /\  X  =  U. B )  /\  (
u  C_  ( topGen `  B )  /\  X  =  U. u ) )  /\  ( z  e.  ( ~P { w  e.  B  |  E. t  e.  u  w  C_  t }  i^i  Fin )  /\  X  =  U. z ) )  /\  ( f : z --> u  /\  A. w  e.  z  w  C_  (
f `  w )
) )  ->  E. v  e.  ( ~P u  i^i 
Fin ) X  = 
U. v )
9566, 94exlimddv 1693 . . . . . . . . 9  |-  ( ( ( ( B  e.  TopBases 
/\  X  =  U. B )  /\  (
u  C_  ( topGen `  B )  /\  X  =  U. u ) )  /\  ( z  e.  ( ~P { w  e.  B  |  E. t  e.  u  w  C_  t }  i^i  Fin )  /\  X  =  U. z ) )  ->  E. v  e.  ( ~P u  i^i  Fin ) X  =  U. v
)
9695rexlimdvaa 2941 . . . . . . . 8  |-  ( ( ( B  e.  TopBases  /\  X  =  U. B )  /\  ( u  C_  ( topGen `  B )  /\  X  =  U. u ) )  -> 
( E. z  e.  ( ~P { w  e.  B  |  E. t  e.  u  w  C_  t }  i^i  Fin ) X  =  U. z  ->  E. v  e.  ( ~P u  i^i  Fin ) X  =  U. v ) )
9755, 96syld 44 . . . . . . 7  |-  ( ( ( B  e.  TopBases  /\  X  =  U. B )  /\  ( u  C_  ( topGen `  B )  /\  X  =  U. u ) )  -> 
( A. y  e. 
~P  B ( X  =  U. y  ->  E. z  e.  ( ~P y  i^i  Fin ) X  =  U. z
)  ->  E. v  e.  ( ~P u  i^i 
Fin ) X  = 
U. v ) )
9897expr 615 . . . . . 6  |-  ( ( ( B  e.  TopBases  /\  X  =  U. B )  /\  u  C_  ( topGen `
 B ) )  ->  ( X  = 
U. u  ->  ( A. y  e.  ~P  B ( X  = 
U. y  ->  E. z  e.  ( ~P y  i^i 
Fin ) X  = 
U. z )  ->  E. v  e.  ( ~P u  i^i  Fin ) X  =  U. v
) ) )
9998com23 78 . . . . 5  |-  ( ( ( B  e.  TopBases  /\  X  =  U. B )  /\  u  C_  ( topGen `
 B ) )  ->  ( A. y  e.  ~P  B ( X  =  U. y  ->  E. z  e.  ( ~P y  i^i  Fin ) X  =  U. z
)  ->  ( X  =  U. u  ->  E. v  e.  ( ~P u  i^i 
Fin ) X  = 
U. v ) ) )
10020, 99sylan2 474 . . . 4  |-  ( ( ( B  e.  TopBases  /\  X  =  U. B )  /\  u  e.  ~P ( topGen `  B )
)  ->  ( A. y  e.  ~P  B
( X  =  U. y  ->  E. z  e.  ( ~P y  i^i  Fin ) X  =  U. z )  ->  ( X  =  U. u  ->  E. v  e.  ( ~P u  i^i  Fin ) X  =  U. v ) ) )
101100ralrimdva 2905 . . 3  |-  ( ( B  e.  TopBases  /\  X  =  U. B )  -> 
( A. y  e. 
~P  B ( X  =  U. y  ->  E. z  e.  ( ~P y  i^i  Fin ) X  =  U. z
)  ->  A. u  e.  ~P  ( topGen `  B
) ( X  = 
U. u  ->  E. v  e.  ( ~P u  i^i 
Fin ) X  = 
U. v ) ) )
102 tgcl 18699 . . . . . 6  |-  ( B  e.  TopBases  ->  ( topGen `  B
)  e.  Top )
103102adantr 465 . . . . 5  |-  ( ( B  e.  TopBases  /\  X  =  U. B )  -> 
( topGen `  B )  e.  Top )
1041iscmp 19116 . . . . . 6  |-  ( (
topGen `  B )  e. 
Comp 
<->  ( ( topGen `  B
)  e.  Top  /\  A. u  e.  ~P  ( topGen `
 B ) ( U. ( topGen `  B
)  =  U. u  ->  E. v  e.  ( ~P u  i^i  Fin ) U. ( topGen `  B
)  =  U. v
) ) )
105104baib 896 . . . . 5  |-  ( (
topGen `  B )  e. 
Top  ->  ( ( topGen `  B )  e.  Comp  <->  A. u  e.  ~P  ( topGen `
 B ) ( U. ( topGen `  B
)  =  U. u  ->  E. v  e.  ( ~P u  i^i  Fin ) U. ( topGen `  B
)  =  U. v
) ) )
106103, 105syl 16 . . . 4  |-  ( ( B  e.  TopBases  /\  X  =  U. B )  -> 
( ( topGen `  B
)  e.  Comp  <->  A. u  e.  ~P  ( topGen `  B
) ( U. ( topGen `
 B )  = 
U. u  ->  E. v  e.  ( ~P u  i^i 
Fin ) U. ( topGen `
 B )  = 
U. v ) ) )
1076eqeq1d 2453 . . . . . 6  |-  ( ( B  e.  TopBases  /\  X  =  U. B )  -> 
( U. ( topGen `  B )  =  U. u 
<->  X  =  U. u
) )
1086eqeq1d 2453 . . . . . . 7  |-  ( ( B  e.  TopBases  /\  X  =  U. B )  -> 
( U. ( topGen `  B )  =  U. v 
<->  X  =  U. v
) )
109108rexbidv 2855 . . . . . 6  |-  ( ( B  e.  TopBases  /\  X  =  U. B )  -> 
( E. v  e.  ( ~P u  i^i 
Fin ) U. ( topGen `
 B )  = 
U. v  <->  E. v  e.  ( ~P u  i^i 
Fin ) X  = 
U. v ) )
110107, 109imbi12d 320 . . . . 5  |-  ( ( B  e.  TopBases  /\  X  =  U. B )  -> 
( ( U. ( topGen `
 B )  = 
U. u  ->  E. v  e.  ( ~P u  i^i 
Fin ) U. ( topGen `
 B )  = 
U. v )  <->  ( X  =  U. u  ->  E. v  e.  ( ~P u  i^i 
Fin ) X  = 
U. v ) ) )
111110ralbidv 2841 . . . 4  |-  ( ( B  e.  TopBases  /\  X  =  U. B )  -> 
( A. u  e. 
~P  ( topGen `  B
) ( U. ( topGen `
 B )  = 
U. u  ->  E. v  e.  ( ~P u  i^i 
Fin ) U. ( topGen `
 B )  = 
U. v )  <->  A. u  e.  ~P  ( topGen `  B
) ( X  = 
U. u  ->  E. v  e.  ( ~P u  i^i 
Fin ) X  = 
U. v ) ) )
112106, 111bitrd 253 . . 3  |-  ( ( B  e.  TopBases  /\  X  =  U. B )  -> 
( ( topGen `  B
)  e.  Comp  <->  A. u  e.  ~P  ( topGen `  B
) ( X  = 
U. u  ->  E. v  e.  ( ~P u  i^i 
Fin ) X  = 
U. v ) ) )
113101, 112sylibrd 234 . 2  |-  ( ( B  e.  TopBases  /\  X  =  U. B )  -> 
( A. y  e. 
~P  B ( X  =  U. y  ->  E. z  e.  ( ~P y  i^i  Fin ) X  =  U. z
)  ->  ( topGen `  B )  e.  Comp ) )
11419, 113impbid 191 1  |-  ( ( B  e.  TopBases  /\  X  =  U. B )  -> 
( ( topGen `  B
)  e.  Comp  <->  A. y  e.  ~P  B ( X  =  U. y  ->  E. z  e.  ( ~P y  i^i  Fin ) X  =  U. z
) ) )
Colors of variables: wff setvar class
Syntax hints:    -> wi 4    <-> wb 184    /\ wa 369    = wceq 1370   E.wex 1587    e. wcel 1758   A.wral 2795   E.wrex 2796   {crab 2799    i^i cin 3428    C_ wss 3429   ~Pcpw 3961   U.cuni 4192   U_ciun 4272   ran crn 4942    Fn wfn 5514   -->wf 5515   -onto->wfo 5517   ` cfv 5519   Fincfn 7413   topGenctg 14487   Topctop 18623   TopBasesctb 18627   Compccmp 19114
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1592  ax-4 1603  ax-5 1671  ax-6 1710  ax-7 1730  ax-8 1760  ax-9 1762  ax-10 1777  ax-11 1782  ax-12 1794  ax-13 1952  ax-ext 2430  ax-sep 4514  ax-nul 4522  ax-pow 4571  ax-pr 4632  ax-un 6475
This theorem depends on definitions:  df-bi 185  df-or 370  df-an 371  df-3or 966  df-3an 967  df-tru 1373  df-ex 1588  df-nf 1591  df-sb 1703  df-eu 2264  df-mo 2265  df-clab 2437  df-cleq 2443  df-clel 2446  df-nfc 2601  df-ne 2646  df-ral 2800  df-rex 2801  df-reu 2802  df-rab 2804  df-v 3073  df-sbc 3288  df-dif 3432  df-un 3434  df-in 3436  df-ss 3443  df-pss 3445  df-nul 3739  df-if 3893  df-pw 3963  df-sn 3979  df-pr 3981  df-tp 3983  df-op 3985  df-uni 4193  df-iun 4274  df-br 4394  df-opab 4452  df-mpt 4453  df-tr 4487  df-eprel 4733  df-id 4737  df-po 4742  df-so 4743  df-fr 4780  df-we 4782  df-ord 4823  df-on 4824  df-lim 4825  df-suc 4826  df-xp 4947  df-rel 4948  df-cnv 4949  df-co 4950  df-dm 4951  df-rn 4952  df-res 4953  df-ima 4954  df-iota 5482  df-fun 5521  df-fn 5522  df-f 5523  df-f1 5524  df-fo 5525  df-f1o 5526  df-fv 5527  df-om 6580  df-1o 7023  df-er 7204  df-en 7414  df-dom 7415  df-fin 7417  df-topgen 14493  df-top 18628  df-bases 18630  df-cmp 19115
This theorem is referenced by: (None)
  Copyright terms: Public domain W3C validator