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

Theorem cnheibor 21540
Description: Heine-Borel theorem for complex numbers. A subset of  CC is compact iff it is closed and bounded. (Contributed by Mario Carneiro, 14-Sep-2014.)
Hypotheses
Ref Expression
cnheibor.2  |-  J  =  ( TopOpen ` fld )
cnheibor.3  |-  T  =  ( Jt  X )
Assertion
Ref Expression
cnheibor  |-  ( X 
C_  CC  ->  ( T  e.  Comp  <->  ( X  e.  ( Clsd `  J
)  /\  E. r  e.  RR  A. x  e.  X  ( abs `  x
)  <_  r )
) )
Distinct variable groups:    x, r, T    J, r, x    X, r, x

Proof of Theorem cnheibor
Dummy variables  f 
s  u  y  z are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 cnheibor.2 . . . . . 6  |-  J  =  ( TopOpen ` fld )
21cnfldhaus 21377 . . . . 5  |-  J  e. 
Haus
32a1i 11 . . . 4  |-  ( ( X  C_  CC  /\  T  e.  Comp )  ->  J  e.  Haus )
4 simpl 455 . . . 4  |-  ( ( X  C_  CC  /\  T  e.  Comp )  ->  X  C_  CC )
5 cnheibor.3 . . . . 5  |-  T  =  ( Jt  X )
6 simpr 459 . . . . 5  |-  ( ( X  C_  CC  /\  T  e.  Comp )  ->  T  e.  Comp )
75, 6syl5eqelr 2475 . . . 4  |-  ( ( X  C_  CC  /\  T  e.  Comp )  ->  ( Jt  X )  e.  Comp )
81cnfldtopon 21375 . . . . . 6  |-  J  e.  (TopOn `  CC )
98toponunii 19518 . . . . 5  |-  CC  =  U. J
109hauscmp 19993 . . . 4  |-  ( ( J  e.  Haus  /\  X  C_  CC  /\  ( Jt  X )  e.  Comp )  ->  X  e.  ( Clsd `  J ) )
113, 4, 7, 10syl3anc 1226 . . 3  |-  ( ( X  C_  CC  /\  T  e.  Comp )  ->  X  e.  ( Clsd `  J
) )
121cnfldtop 21376 . . . . . . . . . . 11  |-  J  e. 
Top
139restuni 19749 . . . . . . . . . . 11  |-  ( ( J  e.  Top  /\  X  C_  CC )  ->  X  =  U. ( Jt  X ) )
1412, 4, 13sylancr 661 . . . . . . . . . 10  |-  ( ( X  C_  CC  /\  T  e.  Comp )  ->  X  =  U. ( Jt  X ) )
155unieqi 4172 . . . . . . . . . 10  |-  U. T  =  U. ( Jt  X )
1614, 15syl6eqr 2441 . . . . . . . . 9  |-  ( ( X  C_  CC  /\  T  e.  Comp )  ->  X  =  U. T )
1716eleq2d 2452 . . . . . . . 8  |-  ( ( X  C_  CC  /\  T  e.  Comp )  ->  (
x  e.  X  <->  x  e.  U. T ) )
1817biimpar 483 . . . . . . 7  |-  ( ( ( X  C_  CC  /\  T  e.  Comp )  /\  x  e.  U. T
)  ->  x  e.  X )
1912a1i 11 . . . . . . . . . 10  |-  ( ( ( X  C_  CC  /\  T  e.  Comp )  /\  x  e.  X
)  ->  J  e.  Top )
20 cnex 9484 . . . . . . . . . . . 12  |-  CC  e.  _V
21 ssexg 4511 . . . . . . . . . . . 12  |-  ( ( X  C_  CC  /\  CC  e.  _V )  ->  X  e.  _V )
224, 20, 21sylancl 660 . . . . . . . . . . 11  |-  ( ( X  C_  CC  /\  T  e.  Comp )  ->  X  e.  _V )
2322adantr 463 . . . . . . . . . 10  |-  ( ( ( X  C_  CC  /\  T  e.  Comp )  /\  x  e.  X
)  ->  X  e.  _V )
24 cnxmet 21365 . . . . . . . . . . . 12  |-  ( abs 
o.  -  )  e.  ( *Met `  CC )
2524a1i 11 . . . . . . . . . . 11  |-  ( ( ( X  C_  CC  /\  T  e.  Comp )  /\  x  e.  X
)  ->  ( abs  o. 
-  )  e.  ( *Met `  CC ) )
26 0cnd 9500 . . . . . . . . . . 11  |-  ( ( ( X  C_  CC  /\  T  e.  Comp )  /\  x  e.  X
)  ->  0  e.  CC )
274sselda 3417 . . . . . . . . . . . . . 14  |-  ( ( ( X  C_  CC  /\  T  e.  Comp )  /\  x  e.  X
)  ->  x  e.  CC )
2827abscld 13269 . . . . . . . . . . . . 13  |-  ( ( ( X  C_  CC  /\  T  e.  Comp )  /\  x  e.  X
)  ->  ( abs `  x )  e.  RR )
29 peano2re 9664 . . . . . . . . . . . . 13  |-  ( ( abs `  x )  e.  RR  ->  (
( abs `  x
)  +  1 )  e.  RR )
3028, 29syl 16 . . . . . . . . . . . 12  |-  ( ( ( X  C_  CC  /\  T  e.  Comp )  /\  x  e.  X
)  ->  ( ( abs `  x )  +  1 )  e.  RR )
3130rexrd 9554 . . . . . . . . . . 11  |-  ( ( ( X  C_  CC  /\  T  e.  Comp )  /\  x  e.  X
)  ->  ( ( abs `  x )  +  1 )  e.  RR* )
321cnfldtopn 21374 . . . . . . . . . . . 12  |-  J  =  ( MetOpen `  ( abs  o. 
-  ) )
3332blopn 21088 . . . . . . . . . . 11  |-  ( ( ( abs  o.  -  )  e.  ( *Met `  CC )  /\  0  e.  CC  /\  (
( abs `  x
)  +  1 )  e.  RR* )  ->  (
0 ( ball `  ( abs  o.  -  ) ) ( ( abs `  x
)  +  1 ) )  e.  J )
3425, 26, 31, 33syl3anc 1226 . . . . . . . . . 10  |-  ( ( ( X  C_  CC  /\  T  e.  Comp )  /\  x  e.  X
)  ->  ( 0 ( ball `  ( abs  o.  -  ) ) ( ( abs `  x
)  +  1 ) )  e.  J )
35 elrestr 14836 . . . . . . . . . 10  |-  ( ( J  e.  Top  /\  X  e.  _V  /\  (
0 ( ball `  ( abs  o.  -  ) ) ( ( abs `  x
)  +  1 ) )  e.  J )  ->  ( ( 0 ( ball `  ( abs  o.  -  ) ) ( ( abs `  x
)  +  1 ) )  i^i  X )  e.  ( Jt  X ) )
3619, 23, 34, 35syl3anc 1226 . . . . . . . . 9  |-  ( ( ( X  C_  CC  /\  T  e.  Comp )  /\  x  e.  X
)  ->  ( (
0 ( ball `  ( abs  o.  -  ) ) ( ( abs `  x
)  +  1 ) )  i^i  X )  e.  ( Jt  X ) )
3736, 5syl6eleqr 2481 . . . . . . . 8  |-  ( ( ( X  C_  CC  /\  T  e.  Comp )  /\  x  e.  X
)  ->  ( (
0 ( ball `  ( abs  o.  -  ) ) ( ( abs `  x
)  +  1 ) )  i^i  X )  e.  T )
38 0cn 9499 . . . . . . . . . . . . . 14  |-  0  e.  CC
39 eqid 2382 . . . . . . . . . . . . . . 15  |-  ( abs 
o.  -  )  =  ( abs  o.  -  )
4039cnmetdval 21363 . . . . . . . . . . . . . 14  |-  ( ( 0  e.  CC  /\  x  e.  CC )  ->  ( 0 ( abs 
o.  -  ) x
)  =  ( abs `  ( 0  -  x
) ) )
4138, 40mpan 668 . . . . . . . . . . . . 13  |-  ( x  e.  CC  ->  (
0 ( abs  o.  -  ) x )  =  ( abs `  (
0  -  x ) ) )
42 df-neg 9721 . . . . . . . . . . . . . . 15  |-  -u x  =  ( 0  -  x )
4342fveq2i 5777 . . . . . . . . . . . . . 14  |-  ( abs `  -u x )  =  ( abs `  (
0  -  x ) )
44 absneg 13112 . . . . . . . . . . . . . 14  |-  ( x  e.  CC  ->  ( abs `  -u x )  =  ( abs `  x
) )
4543, 44syl5eqr 2437 . . . . . . . . . . . . 13  |-  ( x  e.  CC  ->  ( abs `  ( 0  -  x ) )  =  ( abs `  x
) )
4641, 45eqtrd 2423 . . . . . . . . . . . 12  |-  ( x  e.  CC  ->  (
0 ( abs  o.  -  ) x )  =  ( abs `  x
) )
4727, 46syl 16 . . . . . . . . . . 11  |-  ( ( ( X  C_  CC  /\  T  e.  Comp )  /\  x  e.  X
)  ->  ( 0 ( abs  o.  -  ) x )  =  ( abs `  x
) )
4828ltp1d 10392 . . . . . . . . . . 11  |-  ( ( ( X  C_  CC  /\  T  e.  Comp )  /\  x  e.  X
)  ->  ( abs `  x )  <  (
( abs `  x
)  +  1 ) )
4947, 48eqbrtrd 4387 . . . . . . . . . 10  |-  ( ( ( X  C_  CC  /\  T  e.  Comp )  /\  x  e.  X
)  ->  ( 0 ( abs  o.  -  ) x )  < 
( ( abs `  x
)  +  1 ) )
50 elbl 20976 . . . . . . . . . . 11  |-  ( ( ( abs  o.  -  )  e.  ( *Met `  CC )  /\  0  e.  CC  /\  (
( abs `  x
)  +  1 )  e.  RR* )  ->  (
x  e.  ( 0 ( ball `  ( abs  o.  -  ) ) ( ( abs `  x
)  +  1 ) )  <->  ( x  e.  CC  /\  ( 0 ( abs  o.  -  ) x )  < 
( ( abs `  x
)  +  1 ) ) ) )
5125, 26, 31, 50syl3anc 1226 . . . . . . . . . 10  |-  ( ( ( X  C_  CC  /\  T  e.  Comp )  /\  x  e.  X
)  ->  ( x  e.  ( 0 ( ball `  ( abs  o.  -  ) ) ( ( abs `  x )  +  1 ) )  <-> 
( x  e.  CC  /\  ( 0 ( abs 
o.  -  ) x
)  <  ( ( abs `  x )  +  1 ) ) ) )
5227, 49, 51mpbir2and 920 . . . . . . . . 9  |-  ( ( ( X  C_  CC  /\  T  e.  Comp )  /\  x  e.  X
)  ->  x  e.  ( 0 ( ball `  ( abs  o.  -  ) ) ( ( abs `  x )  +  1 ) ) )
53 simpr 459 . . . . . . . . 9  |-  ( ( ( X  C_  CC  /\  T  e.  Comp )  /\  x  e.  X
)  ->  x  e.  X )
5452, 53elind 3602 . . . . . . . 8  |-  ( ( ( X  C_  CC  /\  T  e.  Comp )  /\  x  e.  X
)  ->  x  e.  ( ( 0 (
ball `  ( abs  o. 
-  ) ) ( ( abs `  x
)  +  1 ) )  i^i  X ) )
5527absge0d 13277 . . . . . . . . . 10  |-  ( ( ( X  C_  CC  /\  T  e.  Comp )  /\  x  e.  X
)  ->  0  <_  ( abs `  x ) )
5628, 55ge0p1rpd 11203 . . . . . . . . 9  |-  ( ( ( X  C_  CC  /\  T  e.  Comp )  /\  x  e.  X
)  ->  ( ( abs `  x )  +  1 )  e.  RR+ )
57 eqid 2382 . . . . . . . . 9  |-  ( ( 0 ( ball `  ( abs  o.  -  ) ) ( ( abs `  x
)  +  1 ) )  i^i  X )  =  ( ( 0 ( ball `  ( abs  o.  -  ) ) ( ( abs `  x
)  +  1 ) )  i^i  X )
58 oveq2 6204 . . . . . . . . . . . 12  |-  ( r  =  ( ( abs `  x )  +  1 )  ->  ( 0 ( ball `  ( abs  o.  -  ) ) r )  =  ( 0 ( ball `  ( abs  o.  -  ) ) ( ( abs `  x
)  +  1 ) ) )
5958ineq1d 3613 . . . . . . . . . . 11  |-  ( r  =  ( ( abs `  x )  +  1 )  ->  ( (
0 ( ball `  ( abs  o.  -  ) ) r )  i^i  X
)  =  ( ( 0 ( ball `  ( abs  o.  -  ) ) ( ( abs `  x
)  +  1 ) )  i^i  X ) )
6059eqeq2d 2396 . . . . . . . . . 10  |-  ( r  =  ( ( abs `  x )  +  1 )  ->  ( (
( 0 ( ball `  ( abs  o.  -  ) ) ( ( abs `  x )  +  1 ) )  i^i  X )  =  ( ( 0 (
ball `  ( abs  o. 
-  ) ) r )  i^i  X )  <-> 
( ( 0 (
ball `  ( abs  o. 
-  ) ) ( ( abs `  x
)  +  1 ) )  i^i  X )  =  ( ( 0 ( ball `  ( abs  o.  -  ) ) ( ( abs `  x
)  +  1 ) )  i^i  X ) ) )
6160rspcev 3135 . . . . . . . . 9  |-  ( ( ( ( abs `  x
)  +  1 )  e.  RR+  /\  (
( 0 ( ball `  ( abs  o.  -  ) ) ( ( abs `  x )  +  1 ) )  i^i  X )  =  ( ( 0 (
ball `  ( abs  o. 
-  ) ) ( ( abs `  x
)  +  1 ) )  i^i  X ) )  ->  E. r  e.  RR+  ( ( 0 ( ball `  ( abs  o.  -  ) ) ( ( abs `  x
)  +  1 ) )  i^i  X )  =  ( ( 0 ( ball `  ( abs  o.  -  ) ) r )  i^i  X
) )
6256, 57, 61sylancl 660 . . . . . . . 8  |-  ( ( ( X  C_  CC  /\  T  e.  Comp )  /\  x  e.  X
)  ->  E. r  e.  RR+  ( ( 0 ( ball `  ( abs  o.  -  ) ) ( ( abs `  x
)  +  1 ) )  i^i  X )  =  ( ( 0 ( ball `  ( abs  o.  -  ) ) r )  i^i  X
) )
63 eleq2 2455 . . . . . . . . . 10  |-  ( u  =  ( ( 0 ( ball `  ( abs  o.  -  ) ) ( ( abs `  x
)  +  1 ) )  i^i  X )  ->  ( x  e.  u  <->  x  e.  (
( 0 ( ball `  ( abs  o.  -  ) ) ( ( abs `  x )  +  1 ) )  i^i  X ) ) )
64 eqeq1 2386 . . . . . . . . . . 11  |-  ( u  =  ( ( 0 ( ball `  ( abs  o.  -  ) ) ( ( abs `  x
)  +  1 ) )  i^i  X )  ->  ( u  =  ( ( 0 (
ball `  ( abs  o. 
-  ) ) r )  i^i  X )  <-> 
( ( 0 (
ball `  ( abs  o. 
-  ) ) ( ( abs `  x
)  +  1 ) )  i^i  X )  =  ( ( 0 ( ball `  ( abs  o.  -  ) ) r )  i^i  X
) ) )
6564rexbidv 2893 . . . . . . . . . 10  |-  ( u  =  ( ( 0 ( ball `  ( abs  o.  -  ) ) ( ( abs `  x
)  +  1 ) )  i^i  X )  ->  ( E. r  e.  RR+  u  =  ( ( 0 ( ball `  ( abs  o.  -  ) ) r )  i^i  X )  <->  E. r  e.  RR+  ( ( 0 ( ball `  ( abs  o.  -  ) ) ( ( abs `  x
)  +  1 ) )  i^i  X )  =  ( ( 0 ( ball `  ( abs  o.  -  ) ) r )  i^i  X
) ) )
6663, 65anbi12d 708 . . . . . . . . 9  |-  ( u  =  ( ( 0 ( ball `  ( abs  o.  -  ) ) ( ( abs `  x
)  +  1 ) )  i^i  X )  ->  ( ( x  e.  u  /\  E. r  e.  RR+  u  =  ( ( 0 (
ball `  ( abs  o. 
-  ) ) r )  i^i  X ) )  <->  ( x  e.  ( ( 0 (
ball `  ( abs  o. 
-  ) ) ( ( abs `  x
)  +  1 ) )  i^i  X )  /\  E. r  e.  RR+  ( ( 0 (
ball `  ( abs  o. 
-  ) ) ( ( abs `  x
)  +  1 ) )  i^i  X )  =  ( ( 0 ( ball `  ( abs  o.  -  ) ) r )  i^i  X
) ) ) )
6766rspcev 3135 . . . . . . . 8  |-  ( ( ( ( 0 (
ball `  ( abs  o. 
-  ) ) ( ( abs `  x
)  +  1 ) )  i^i  X )  e.  T  /\  (
x  e.  ( ( 0 ( ball `  ( abs  o.  -  ) ) ( ( abs `  x
)  +  1 ) )  i^i  X )  /\  E. r  e.  RR+  ( ( 0 (
ball `  ( abs  o. 
-  ) ) ( ( abs `  x
)  +  1 ) )  i^i  X )  =  ( ( 0 ( ball `  ( abs  o.  -  ) ) r )  i^i  X
) ) )  ->  E. u  e.  T  ( x  e.  u  /\  E. r  e.  RR+  u  =  ( (
0 ( ball `  ( abs  o.  -  ) ) r )  i^i  X
) ) )
6837, 54, 62, 67syl12anc 1224 . . . . . . 7  |-  ( ( ( X  C_  CC  /\  T  e.  Comp )  /\  x  e.  X
)  ->  E. u  e.  T  ( x  e.  u  /\  E. r  e.  RR+  u  =  ( ( 0 ( ball `  ( abs  o.  -  ) ) r )  i^i  X ) ) )
6918, 68syldan 468 . . . . . 6  |-  ( ( ( X  C_  CC  /\  T  e.  Comp )  /\  x  e.  U. T
)  ->  E. u  e.  T  ( x  e.  u  /\  E. r  e.  RR+  u  =  ( ( 0 ( ball `  ( abs  o.  -  ) ) r )  i^i  X ) ) )
7069ralrimiva 2796 . . . . 5  |-  ( ( X  C_  CC  /\  T  e.  Comp )  ->  A. x  e.  U. T E. u  e.  T  ( x  e.  u  /\  E. r  e.  RR+  u  =  ( ( 0 ( ball `  ( abs  o.  -  ) ) r )  i^i  X ) ) )
71 eqid 2382 . . . . . 6  |-  U. T  =  U. T
72 oveq2 6204 . . . . . . . 8  |-  ( r  =  ( f `  u )  ->  (
0 ( ball `  ( abs  o.  -  ) ) r )  =  ( 0 ( ball `  ( abs  o.  -  ) ) ( f `  u
) ) )
7372ineq1d 3613 . . . . . . 7  |-  ( r  =  ( f `  u )  ->  (
( 0 ( ball `  ( abs  o.  -  ) ) r )  i^i  X )  =  ( ( 0 (
ball `  ( abs  o. 
-  ) ) ( f `  u ) )  i^i  X ) )
7473eqeq2d 2396 . . . . . 6  |-  ( r  =  ( f `  u )  ->  (
u  =  ( ( 0 ( ball `  ( abs  o.  -  ) ) r )  i^i  X
)  <->  u  =  (
( 0 ( ball `  ( abs  o.  -  ) ) ( f `
 u ) )  i^i  X ) ) )
7571, 74cmpcovf 19977 . . . . 5  |-  ( ( T  e.  Comp  /\  A. x  e.  U. T E. u  e.  T  (
x  e.  u  /\  E. r  e.  RR+  u  =  ( ( 0 ( ball `  ( abs  o.  -  ) ) r )  i^i  X
) ) )  ->  E. s  e.  ( ~P T  i^i  Fin )
( U. T  = 
U. s  /\  E. f ( f : s --> RR+  /\  A. u  e.  s  u  =  ( ( 0 (
ball `  ( abs  o. 
-  ) ) ( f `  u ) )  i^i  X ) ) ) )
766, 70, 75syl2anc 659 . . . 4  |-  ( ( X  C_  CC  /\  T  e.  Comp )  ->  E. s  e.  ( ~P T  i^i  Fin ) ( U. T  =  U. s  /\  E. f ( f : s --> RR+  /\  A. u  e.  s  u  =  ( ( 0 (
ball `  ( abs  o. 
-  ) ) ( f `  u ) )  i^i  X ) ) ) )
7716ad4antr 729 . . . . . . . . . . . . . 14  |-  ( ( ( ( ( ( X  C_  CC  /\  T  e.  Comp )  /\  s  e.  ( ~P T  i^i  Fin ) )  /\  U. T  =  U. s
)  /\  ( f : s --> RR+  /\  A. u  e.  s  u  =  ( ( 0 ( ball `  ( abs  o.  -  ) ) ( f `  u
) )  i^i  X
) ) )  /\  ( r  e.  RR  /\ 
A. u  e.  s  ( f `  u
)  <_  r )
)  ->  X  =  U. T )
78 simpllr 758 . . . . . . . . . . . . . 14  |-  ( ( ( ( ( ( X  C_  CC  /\  T  e.  Comp )  /\  s  e.  ( ~P T  i^i  Fin ) )  /\  U. T  =  U. s
)  /\  ( f : s --> RR+  /\  A. u  e.  s  u  =  ( ( 0 ( ball `  ( abs  o.  -  ) ) ( f `  u
) )  i^i  X
) ) )  /\  ( r  e.  RR  /\ 
A. u  e.  s  ( f `  u
)  <_  r )
)  ->  U. T  = 
U. s )
7977, 78eqtrd 2423 . . . . . . . . . . . . 13  |-  ( ( ( ( ( ( X  C_  CC  /\  T  e.  Comp )  /\  s  e.  ( ~P T  i^i  Fin ) )  /\  U. T  =  U. s
)  /\  ( f : s --> RR+  /\  A. u  e.  s  u  =  ( ( 0 ( ball `  ( abs  o.  -  ) ) ( f `  u
) )  i^i  X
) ) )  /\  ( r  e.  RR  /\ 
A. u  e.  s  ( f `  u
)  <_  r )
)  ->  X  =  U. s )
8079eleq2d 2452 . . . . . . . . . . . 12  |-  ( ( ( ( ( ( X  C_  CC  /\  T  e.  Comp )  /\  s  e.  ( ~P T  i^i  Fin ) )  /\  U. T  =  U. s
)  /\  ( f : s --> RR+  /\  A. u  e.  s  u  =  ( ( 0 ( ball `  ( abs  o.  -  ) ) ( f `  u
) )  i^i  X
) ) )  /\  ( r  e.  RR  /\ 
A. u  e.  s  ( f `  u
)  <_  r )
)  ->  ( x  e.  X  <->  x  e.  U. s
) )
81 eluni2 4167 . . . . . . . . . . . 12  |-  ( x  e.  U. s  <->  E. z  e.  s  x  e.  z )
8280, 81syl6bb 261 . . . . . . . . . . 11  |-  ( ( ( ( ( ( X  C_  CC  /\  T  e.  Comp )  /\  s  e.  ( ~P T  i^i  Fin ) )  /\  U. T  =  U. s
)  /\  ( f : s --> RR+  /\  A. u  e.  s  u  =  ( ( 0 ( ball `  ( abs  o.  -  ) ) ( f `  u
) )  i^i  X
) ) )  /\  ( r  e.  RR  /\ 
A. u  e.  s  ( f `  u
)  <_  r )
)  ->  ( x  e.  X  <->  E. z  e.  s  x  e.  z ) )
83 elssuni 4192 . . . . . . . . . . . . . . . . . 18  |-  ( z  e.  s  ->  z  C_ 
U. s )
8483ad2antrl 725 . . . . . . . . . . . . . . . . 17  |-  ( ( ( ( ( ( ( X  C_  CC  /\  T  e.  Comp )  /\  s  e.  ( ~P T  i^i  Fin )
)  /\  U. T  = 
U. s )  /\  ( f : s -->
RR+  /\  A. u  e.  s  u  =  ( ( 0 (
ball `  ( abs  o. 
-  ) ) ( f `  u ) )  i^i  X ) ) )  /\  (
r  e.  RR  /\  A. u  e.  s  ( f `  u )  <_  r ) )  /\  ( z  e.  s  /\  x  e.  z ) )  -> 
z  C_  U. s
)
8579adantr 463 . . . . . . . . . . . . . . . . 17  |-  ( ( ( ( ( ( ( X  C_  CC  /\  T  e.  Comp )  /\  s  e.  ( ~P T  i^i  Fin )
)  /\  U. T  = 
U. s )  /\  ( f : s -->
RR+  /\  A. u  e.  s  u  =  ( ( 0 (
ball `  ( abs  o. 
-  ) ) ( f `  u ) )  i^i  X ) ) )  /\  (
r  e.  RR  /\  A. u  e.  s  ( f `  u )  <_  r ) )  /\  ( z  e.  s  /\  x  e.  z ) )  ->  X  =  U. s
)
8684, 85sseqtr4d 3454 . . . . . . . . . . . . . . . 16  |-  ( ( ( ( ( ( ( X  C_  CC  /\  T  e.  Comp )  /\  s  e.  ( ~P T  i^i  Fin )
)  /\  U. T  = 
U. s )  /\  ( f : s -->
RR+  /\  A. u  e.  s  u  =  ( ( 0 (
ball `  ( abs  o. 
-  ) ) ( f `  u ) )  i^i  X ) ) )  /\  (
r  e.  RR  /\  A. u  e.  s  ( f `  u )  <_  r ) )  /\  ( z  e.  s  /\  x  e.  z ) )  -> 
z  C_  X )
87 simp-6l 769 . . . . . . . . . . . . . . . 16  |-  ( ( ( ( ( ( ( X  C_  CC  /\  T  e.  Comp )  /\  s  e.  ( ~P T  i^i  Fin )
)  /\  U. T  = 
U. s )  /\  ( f : s -->
RR+  /\  A. u  e.  s  u  =  ( ( 0 (
ball `  ( abs  o. 
-  ) ) ( f `  u ) )  i^i  X ) ) )  /\  (
r  e.  RR  /\  A. u  e.  s  ( f `  u )  <_  r ) )  /\  ( z  e.  s  /\  x  e.  z ) )  ->  X  C_  CC )
8886, 87sstrd 3427 . . . . . . . . . . . . . . 15  |-  ( ( ( ( ( ( ( X  C_  CC  /\  T  e.  Comp )  /\  s  e.  ( ~P T  i^i  Fin )
)  /\  U. T  = 
U. s )  /\  ( f : s -->
RR+  /\  A. u  e.  s  u  =  ( ( 0 (
ball `  ( abs  o. 
-  ) ) ( f `  u ) )  i^i  X ) ) )  /\  (
r  e.  RR  /\  A. u  e.  s  ( f `  u )  <_  r ) )  /\  ( z  e.  s  /\  x  e.  z ) )  -> 
z  C_  CC )
89 simprr 755 . . . . . . . . . . . . . . 15  |-  ( ( ( ( ( ( ( X  C_  CC  /\  T  e.  Comp )  /\  s  e.  ( ~P T  i^i  Fin )
)  /\  U. T  = 
U. s )  /\  ( f : s -->
RR+  /\  A. u  e.  s  u  =  ( ( 0 (
ball `  ( abs  o. 
-  ) ) ( f `  u ) )  i^i  X ) ) )  /\  (
r  e.  RR  /\  A. u  e.  s  ( f `  u )  <_  r ) )  /\  ( z  e.  s  /\  x  e.  z ) )  ->  x  e.  z )
9088, 89sseldd 3418 . . . . . . . . . . . . . 14  |-  ( ( ( ( ( ( ( X  C_  CC  /\  T  e.  Comp )  /\  s  e.  ( ~P T  i^i  Fin )
)  /\  U. T  = 
U. s )  /\  ( f : s -->
RR+  /\  A. u  e.  s  u  =  ( ( 0 (
ball `  ( abs  o. 
-  ) ) ( f `  u ) )  i^i  X ) ) )  /\  (
r  e.  RR  /\  A. u  e.  s  ( f `  u )  <_  r ) )  /\  ( z  e.  s  /\  x  e.  z ) )  ->  x  e.  CC )
9190abscld 13269 . . . . . . . . . . . . 13  |-  ( ( ( ( ( ( ( X  C_  CC  /\  T  e.  Comp )  /\  s  e.  ( ~P T  i^i  Fin )
)  /\  U. T  = 
U. s )  /\  ( f : s -->
RR+  /\  A. u  e.  s  u  =  ( ( 0 (
ball `  ( abs  o. 
-  ) ) ( f `  u ) )  i^i  X ) ) )  /\  (
r  e.  RR  /\  A. u  e.  s  ( f `  u )  <_  r ) )  /\  ( z  e.  s  /\  x  e.  z ) )  -> 
( abs `  x
)  e.  RR )
92 simplrl 759 . . . . . . . . . . . . 13  |-  ( ( ( ( ( ( ( X  C_  CC  /\  T  e.  Comp )  /\  s  e.  ( ~P T  i^i  Fin )
)  /\  U. T  = 
U. s )  /\  ( f : s -->
RR+  /\  A. u  e.  s  u  =  ( ( 0 (
ball `  ( abs  o. 
-  ) ) ( f `  u ) )  i^i  X ) ) )  /\  (
r  e.  RR  /\  A. u  e.  s  ( f `  u )  <_  r ) )  /\  ( z  e.  s  /\  x  e.  z ) )  -> 
r  e.  RR )
93 simprl 754 . . . . . . . . . . . . . . . . 17  |-  ( ( ( ( ( X 
C_  CC  /\  T  e. 
Comp )  /\  s  e.  ( ~P T  i^i  Fin ) )  /\  U. T  =  U. s
)  /\  ( f : s --> RR+  /\  A. u  e.  s  u  =  ( ( 0 ( ball `  ( abs  o.  -  ) ) ( f `  u
) )  i^i  X
) ) )  -> 
f : s --> RR+ )
9493ad2antrr 723 . . . . . . . . . . . . . . . 16  |-  ( ( ( ( ( ( ( X  C_  CC  /\  T  e.  Comp )  /\  s  e.  ( ~P T  i^i  Fin )
)  /\  U. T  = 
U. s )  /\  ( f : s -->
RR+  /\  A. u  e.  s  u  =  ( ( 0 (
ball `  ( abs  o. 
-  ) ) ( f `  u ) )  i^i  X ) ) )  /\  (
r  e.  RR  /\  A. u  e.  s  ( f `  u )  <_  r ) )  /\  ( z  e.  s  /\  x  e.  z ) )  -> 
f : s --> RR+ )
95 simprl 754 . . . . . . . . . . . . . . . 16  |-  ( ( ( ( ( ( ( X  C_  CC  /\  T  e.  Comp )  /\  s  e.  ( ~P T  i^i  Fin )
)  /\  U. T  = 
U. s )  /\  ( f : s -->
RR+  /\  A. u  e.  s  u  =  ( ( 0 (
ball `  ( abs  o. 
-  ) ) ( f `  u ) )  i^i  X ) ) )  /\  (
r  e.  RR  /\  A. u  e.  s  ( f `  u )  <_  r ) )  /\  ( z  e.  s  /\  x  e.  z ) )  -> 
z  e.  s )
9694, 95ffvelrnd 5934 . . . . . . . . . . . . . . 15  |-  ( ( ( ( ( ( ( X  C_  CC  /\  T  e.  Comp )  /\  s  e.  ( ~P T  i^i  Fin )
)  /\  U. T  = 
U. s )  /\  ( f : s -->
RR+  /\  A. u  e.  s  u  =  ( ( 0 (
ball `  ( abs  o. 
-  ) ) ( f `  u ) )  i^i  X ) ) )  /\  (
r  e.  RR  /\  A. u  e.  s  ( f `  u )  <_  r ) )  /\  ( z  e.  s  /\  x  e.  z ) )  -> 
( f `  z
)  e.  RR+ )
9796rpred 11177 . . . . . . . . . . . . . 14  |-  ( ( ( ( ( ( ( X  C_  CC  /\  T  e.  Comp )  /\  s  e.  ( ~P T  i^i  Fin )
)  /\  U. T  = 
U. s )  /\  ( f : s -->
RR+  /\  A. u  e.  s  u  =  ( ( 0 (
ball `  ( abs  o. 
-  ) ) ( f `  u ) )  i^i  X ) ) )  /\  (
r  e.  RR  /\  A. u  e.  s  ( f `  u )  <_  r ) )  /\  ( z  e.  s  /\  x  e.  z ) )  -> 
( f `  z
)  e.  RR )
9890, 46syl 16 . . . . . . . . . . . . . . 15  |-  ( ( ( ( ( ( ( X  C_  CC  /\  T  e.  Comp )  /\  s  e.  ( ~P T  i^i  Fin )
)  /\  U. T  = 
U. s )  /\  ( f : s -->
RR+  /\  A. u  e.  s  u  =  ( ( 0 (
ball `  ( abs  o. 
-  ) ) ( f `  u ) )  i^i  X ) ) )  /\  (
r  e.  RR  /\  A. u  e.  s  ( f `  u )  <_  r ) )  /\  ( z  e.  s  /\  x  e.  z ) )  -> 
( 0 ( abs 
o.  -  ) x
)  =  ( abs `  x ) )
99 inss1 3632 . . . . . . . . . . . . . . . . . 18  |-  ( ( 0 ( ball `  ( abs  o.  -  ) ) ( f `  z
) )  i^i  X
)  C_  ( 0 ( ball `  ( abs  o.  -  ) ) ( f `  z
) )
100 simprr 755 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( ( ( ( X 
C_  CC  /\  T  e. 
Comp )  /\  s  e.  ( ~P T  i^i  Fin ) )  /\  U. T  =  U. s
)  /\  ( f : s --> RR+  /\  A. u  e.  s  u  =  ( ( 0 ( ball `  ( abs  o.  -  ) ) ( f `  u
) )  i^i  X
) ) )  ->  A. u  e.  s  u  =  ( (
0 ( ball `  ( abs  o.  -  ) ) ( f `  u
) )  i^i  X
) )
101100ad2antrr 723 . . . . . . . . . . . . . . . . . . . 20  |-  ( ( ( ( ( ( ( X  C_  CC  /\  T  e.  Comp )  /\  s  e.  ( ~P T  i^i  Fin )
)  /\  U. T  = 
U. s )  /\  ( f : s -->
RR+  /\  A. u  e.  s  u  =  ( ( 0 (
ball `  ( abs  o. 
-  ) ) ( f `  u ) )  i^i  X ) ) )  /\  (
r  e.  RR  /\  A. u  e.  s  ( f `  u )  <_  r ) )  /\  ( z  e.  s  /\  x  e.  z ) )  ->  A. u  e.  s  u  =  ( (
0 ( ball `  ( abs  o.  -  ) ) ( f `  u
) )  i^i  X
) )
102 id 22 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( u  =  z  ->  u  =  z )
103 fveq2 5774 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( u  =  z  ->  (
f `  u )  =  ( f `  z ) )
104103oveq2d 6212 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( u  =  z  ->  (
0 ( ball `  ( abs  o.  -  ) ) ( f `  u
) )  =  ( 0 ( ball `  ( abs  o.  -  ) ) ( f `  z
) ) )
105104ineq1d 3613 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( u  =  z  ->  (
( 0 ( ball `  ( abs  o.  -  ) ) ( f `
 u ) )  i^i  X )  =  ( ( 0 (
ball `  ( abs  o. 
-  ) ) ( f `  z ) )  i^i  X ) )
106102, 105eqeq12d 2404 . . . . . . . . . . . . . . . . . . . . 21  |-  ( u  =  z  ->  (
u  =  ( ( 0 ( ball `  ( abs  o.  -  ) ) ( f `  u
) )  i^i  X
)  <->  z  =  ( ( 0 ( ball `  ( abs  o.  -  ) ) ( f `
 z ) )  i^i  X ) ) )
107106rspcv 3131 . . . . . . . . . . . . . . . . . . . 20  |-  ( z  e.  s  ->  ( A. u  e.  s  u  =  ( (
0 ( ball `  ( abs  o.  -  ) ) ( f `  u
) )  i^i  X
)  ->  z  =  ( ( 0 (
ball `  ( abs  o. 
-  ) ) ( f `  z ) )  i^i  X ) ) )
10895, 101, 107sylc 60 . . . . . . . . . . . . . . . . . . 19  |-  ( ( ( ( ( ( ( X  C_  CC  /\  T  e.  Comp )  /\  s  e.  ( ~P T  i^i  Fin )
)  /\  U. T  = 
U. s )  /\  ( f : s -->
RR+  /\  A. u  e.  s  u  =  ( ( 0 (
ball `  ( abs  o. 
-  ) ) ( f `  u ) )  i^i  X ) ) )  /\  (
r  e.  RR  /\  A. u  e.  s  ( f `  u )  <_  r ) )  /\  ( z  e.  s  /\  x  e.  z ) )  -> 
z  =  ( ( 0 ( ball `  ( abs  o.  -  ) ) ( f `  z
) )  i^i  X
) )
10989, 108eleqtrd 2472 . . . . . . . . . . . . . . . . . 18  |-  ( ( ( ( ( ( ( X  C_  CC  /\  T  e.  Comp )  /\  s  e.  ( ~P T  i^i  Fin )
)  /\  U. T  = 
U. s )  /\  ( f : s -->
RR+  /\  A. u  e.  s  u  =  ( ( 0 (
ball `  ( abs  o. 
-  ) ) ( f `  u ) )  i^i  X ) ) )  /\  (
r  e.  RR  /\  A. u  e.  s  ( f `  u )  <_  r ) )  /\  ( z  e.  s  /\  x  e.  z ) )  ->  x  e.  ( (
0 ( ball `  ( abs  o.  -  ) ) ( f `  z
) )  i^i  X
) )
11099, 109sseldi 3415 . . . . . . . . . . . . . . . . 17  |-  ( ( ( ( ( ( ( X  C_  CC  /\  T  e.  Comp )  /\  s  e.  ( ~P T  i^i  Fin )
)  /\  U. T  = 
U. s )  /\  ( f : s -->
RR+  /\  A. u  e.  s  u  =  ( ( 0 (
ball `  ( abs  o. 
-  ) ) ( f `  u ) )  i^i  X ) ) )  /\  (
r  e.  RR  /\  A. u  e.  s  ( f `  u )  <_  r ) )  /\  ( z  e.  s  /\  x  e.  z ) )  ->  x  e.  ( 0 ( ball `  ( abs  o.  -  ) ) ( f `  z
) ) )
11124a1i 11 . . . . . . . . . . . . . . . . . 18  |-  ( ( ( ( ( ( ( X  C_  CC  /\  T  e.  Comp )  /\  s  e.  ( ~P T  i^i  Fin )
)  /\  U. T  = 
U. s )  /\  ( f : s -->
RR+  /\  A. u  e.  s  u  =  ( ( 0 (
ball `  ( abs  o. 
-  ) ) ( f `  u ) )  i^i  X ) ) )  /\  (
r  e.  RR  /\  A. u  e.  s  ( f `  u )  <_  r ) )  /\  ( z  e.  s  /\  x  e.  z ) )  -> 
( abs  o.  -  )  e.  ( *Met `  CC ) )
112 0cnd 9500 . . . . . . . . . . . . . . . . . 18  |-  ( ( ( ( ( ( ( X  C_  CC  /\  T  e.  Comp )  /\  s  e.  ( ~P T  i^i  Fin )
)  /\  U. T  = 
U. s )  /\  ( f : s -->
RR+  /\  A. u  e.  s  u  =  ( ( 0 (
ball `  ( abs  o. 
-  ) ) ( f `  u ) )  i^i  X ) ) )  /\  (
r  e.  RR  /\  A. u  e.  s  ( f `  u )  <_  r ) )  /\  ( z  e.  s  /\  x  e.  z ) )  -> 
0  e.  CC )
11396rpxrd 11178 . . . . . . . . . . . . . . . . . 18  |-  ( ( ( ( ( ( ( X  C_  CC  /\  T  e.  Comp )  /\  s  e.  ( ~P T  i^i  Fin )
)  /\  U. T  = 
U. s )  /\  ( f : s -->
RR+  /\  A. u  e.  s  u  =  ( ( 0 (
ball `  ( abs  o. 
-  ) ) ( f `  u ) )  i^i  X ) ) )  /\  (
r  e.  RR  /\  A. u  e.  s  ( f `  u )  <_  r ) )  /\  ( z  e.  s  /\  x  e.  z ) )  -> 
( f `  z
)  e.  RR* )
114 elbl 20976 . . . . . . . . . . . . . . . . . 18  |-  ( ( ( abs  o.  -  )  e.  ( *Met `  CC )  /\  0  e.  CC  /\  (
f `  z )  e.  RR* )  ->  (
x  e.  ( 0 ( ball `  ( abs  o.  -  ) ) ( f `  z
) )  <->  ( x  e.  CC  /\  ( 0 ( abs  o.  -  ) x )  < 
( f `  z
) ) ) )
115111, 112, 113, 114syl3anc 1226 . . . . . . . . . . . . . . . . 17  |-  ( ( ( ( ( ( ( X  C_  CC  /\  T  e.  Comp )  /\  s  e.  ( ~P T  i^i  Fin )
)  /\  U. T  = 
U. s )  /\  ( f : s -->
RR+  /\  A. u  e.  s  u  =  ( ( 0 (
ball `  ( abs  o. 
-  ) ) ( f `  u ) )  i^i  X ) ) )  /\  (
r  e.  RR  /\  A. u  e.  s  ( f `  u )  <_  r ) )  /\  ( z  e.  s  /\  x  e.  z ) )  -> 
( x  e.  ( 0 ( ball `  ( abs  o.  -  ) ) ( f `  z
) )  <->  ( x  e.  CC  /\  ( 0 ( abs  o.  -  ) x )  < 
( f `  z
) ) ) )
116110, 115mpbid 210 . . . . . . . . . . . . . . . 16  |-  ( ( ( ( ( ( ( X  C_  CC  /\  T  e.  Comp )  /\  s  e.  ( ~P T  i^i  Fin )
)  /\  U. T  = 
U. s )  /\  ( f : s -->
RR+  /\  A. u  e.  s  u  =  ( ( 0 (
ball `  ( abs  o. 
-  ) ) ( f `  u ) )  i^i  X ) ) )  /\  (
r  e.  RR  /\  A. u  e.  s  ( f `  u )  <_  r ) )  /\  ( z  e.  s  /\  x  e.  z ) )  -> 
( x  e.  CC  /\  ( 0 ( abs 
o.  -  ) x
)  <  ( f `  z ) ) )
117116simprd 461 . . . . . . . . . . . . . . 15  |-  ( ( ( ( ( ( ( X  C_  CC  /\  T  e.  Comp )  /\  s  e.  ( ~P T  i^i  Fin )
)  /\  U. T  = 
U. s )  /\  ( f : s -->
RR+  /\  A. u  e.  s  u  =  ( ( 0 (
ball `  ( abs  o. 
-  ) ) ( f `  u ) )  i^i  X ) ) )  /\  (
r  e.  RR  /\  A. u  e.  s  ( f `  u )  <_  r ) )  /\  ( z  e.  s  /\  x  e.  z ) )  -> 
( 0 ( abs 
o.  -  ) x
)  <  ( f `  z ) )
11898, 117eqbrtrrd 4389 . . . . . . . . . . . . . 14  |-  ( ( ( ( ( ( ( X  C_  CC  /\  T  e.  Comp )  /\  s  e.  ( ~P T  i^i  Fin )
)  /\  U. T  = 
U. s )  /\  ( f : s -->
RR+  /\  A. u  e.  s  u  =  ( ( 0 (
ball `  ( abs  o. 
-  ) ) ( f `  u ) )  i^i  X ) ) )  /\  (
r  e.  RR  /\  A. u  e.  s  ( f `  u )  <_  r ) )  /\  ( z  e.  s  /\  x  e.  z ) )  -> 
( abs `  x
)  <  ( f `  z ) )
119 simplrr 760 . . . . . . . . . . . . . . 15  |-  ( ( ( ( ( ( ( X  C_  CC  /\  T  e.  Comp )  /\  s  e.  ( ~P T  i^i  Fin )
)  /\  U. T  = 
U. s )  /\  ( f : s -->
RR+  /\  A. u  e.  s  u  =  ( ( 0 (
ball `  ( abs  o. 
-  ) ) ( f `  u ) )  i^i  X ) ) )  /\  (
r  e.  RR  /\  A. u  e.  s  ( f `  u )  <_  r ) )  /\  ( z  e.  s  /\  x  e.  z ) )  ->  A. u  e.  s 
( f `  u
)  <_  r )
120103breq1d 4377 . . . . . . . . . . . . . . . 16  |-  ( u  =  z  ->  (
( f `  u
)  <_  r  <->  ( f `  z )  <_  r
) )
121120rspcv 3131 . . . . . . . . . . . . . . 15  |-  ( z  e.  s  ->  ( A. u  e.  s 
( f `  u
)  <_  r  ->  ( f `  z )  <_  r ) )
12295, 119, 121sylc 60 . . . . . . . . . . . . . 14  |-  ( ( ( ( ( ( ( X  C_  CC  /\  T  e.  Comp )  /\  s  e.  ( ~P T  i^i  Fin )
)  /\  U. T  = 
U. s )  /\  ( f : s -->
RR+  /\  A. u  e.  s  u  =  ( ( 0 (
ball `  ( abs  o. 
-  ) ) ( f `  u ) )  i^i  X ) ) )  /\  (
r  e.  RR  /\  A. u  e.  s  ( f `  u )  <_  r ) )  /\  ( z  e.  s  /\  x  e.  z ) )  -> 
( f `  z
)  <_  r )
12391, 97, 92, 118, 122ltletrd 9653 . . . . . . . . . . . . 13  |-  ( ( ( ( ( ( ( X  C_  CC  /\  T  e.  Comp )  /\  s  e.  ( ~P T  i^i  Fin )
)  /\  U. T  = 
U. s )  /\  ( f : s -->
RR+  /\  A. u  e.  s  u  =  ( ( 0 (
ball `  ( abs  o. 
-  ) ) ( f `  u ) )  i^i  X ) ) )  /\  (
r  e.  RR  /\  A. u  e.  s  ( f `  u )  <_  r ) )  /\  ( z  e.  s  /\  x  e.  z ) )  -> 
( abs `  x
)  <  r )
12491, 92, 123ltled 9644 . . . . . . . . . . . 12  |-  ( ( ( ( ( ( ( X  C_  CC  /\  T  e.  Comp )  /\  s  e.  ( ~P T  i^i  Fin )
)  /\  U. T  = 
U. s )  /\  ( f : s -->
RR+  /\  A. u  e.  s  u  =  ( ( 0 (
ball `  ( abs  o. 
-  ) ) ( f `  u ) )  i^i  X ) ) )  /\  (
r  e.  RR  /\  A. u  e.  s  ( f `  u )  <_  r ) )  /\  ( z  e.  s  /\  x  e.  z ) )  -> 
( abs `  x
)  <_  r )
125124rexlimdvaa 2875 . . . . . . . . . . 11  |-  ( ( ( ( ( ( X  C_  CC  /\  T  e.  Comp )  /\  s  e.  ( ~P T  i^i  Fin ) )  /\  U. T  =  U. s
)  /\  ( f : s --> RR+  /\  A. u  e.  s  u  =  ( ( 0 ( ball `  ( abs  o.  -  ) ) ( f `  u
) )  i^i  X
) ) )  /\  ( r  e.  RR  /\ 
A. u  e.  s  ( f `  u
)  <_  r )
)  ->  ( E. z  e.  s  x  e.  z  ->  ( abs `  x )  <_  r
) )
12682, 125sylbid 215 . . . . . . . . . 10  |-  ( ( ( ( ( ( X  C_  CC  /\  T  e.  Comp )  /\  s  e.  ( ~P T  i^i  Fin ) )  /\  U. T  =  U. s
)  /\  ( f : s --> RR+  /\  A. u  e.  s  u  =  ( ( 0 ( ball `  ( abs  o.  -  ) ) ( f `  u
) )  i^i  X
) ) )  /\  ( r  e.  RR  /\ 
A. u  e.  s  ( f `  u
)  <_  r )
)  ->  ( x  e.  X  ->  ( abs `  x )  <_  r
) )
127126ralrimiv 2794 . . . . . . . . 9  |-  ( ( ( ( ( ( X  C_  CC  /\  T  e.  Comp )  /\  s  e.  ( ~P T  i^i  Fin ) )  /\  U. T  =  U. s
)  /\  ( f : s --> RR+  /\  A. u  e.  s  u  =  ( ( 0 ( ball `  ( abs  o.  -  ) ) ( f `  u
) )  i^i  X
) ) )  /\  ( r  e.  RR  /\ 
A. u  e.  s  ( f `  u
)  <_  r )
)  ->  A. x  e.  X  ( abs `  x )  <_  r
)
128 inss2 3633 . . . . . . . . . . 11  |-  ( ~P T  i^i  Fin )  C_ 
Fin
129 simpllr 758 . . . . . . . . . . 11  |-  ( ( ( ( ( X 
C_  CC  /\  T  e. 
Comp )  /\  s  e.  ( ~P T  i^i  Fin ) )  /\  U. T  =  U. s
)  /\  ( f : s --> RR+  /\  A. u  e.  s  u  =  ( ( 0 ( ball `  ( abs  o.  -  ) ) ( f `  u
) )  i^i  X
) ) )  -> 
s  e.  ( ~P T  i^i  Fin )
)
130128, 129sseldi 3415 . . . . . . . . . 10  |-  ( ( ( ( ( X 
C_  CC  /\  T  e. 
Comp )  /\  s  e.  ( ~P T  i^i  Fin ) )  /\  U. T  =  U. s
)  /\  ( f : s --> RR+  /\  A. u  e.  s  u  =  ( ( 0 ( ball `  ( abs  o.  -  ) ) ( f `  u
) )  i^i  X
) ) )  -> 
s  e.  Fin )
131 ffvelrn 5931 . . . . . . . . . . . . 13  |-  ( ( f : s --> RR+  /\  u  e.  s )  ->  ( f `  u )  e.  RR+ )
132131rpred 11177 . . . . . . . . . . . 12  |-  ( ( f : s --> RR+  /\  u  e.  s )  ->  ( f `  u )  e.  RR )
133132ralrimiva 2796 . . . . . . . . . . 11  |-  ( f : s --> RR+  ->  A. u  e.  s  ( f `  u )  e.  RR )
134133ad2antrl 725 . . . . . . . . . 10  |-  ( ( ( ( ( X 
C_  CC  /\  T  e. 
Comp )  /\  s  e.  ( ~P T  i^i  Fin ) )  /\  U. T  =  U. s
)  /\  ( f : s --> RR+  /\  A. u  e.  s  u  =  ( ( 0 ( ball `  ( abs  o.  -  ) ) ( f `  u
) )  i^i  X
) ) )  ->  A. u  e.  s 
( f `  u
)  e.  RR )
135 fimaxre3 10408 . . . . . . . . . 10  |-  ( ( s  e.  Fin  /\  A. u  e.  s  ( f `  u )  e.  RR )  ->  E. r  e.  RR  A. u  e.  s  ( f `  u )  <_  r )
136130, 134, 135syl2anc 659 . . . . . . . . 9  |-  ( ( ( ( ( X 
C_  CC  /\  T  e. 
Comp )  /\  s  e.  ( ~P T  i^i  Fin ) )  /\  U. T  =  U. s
)  /\  ( f : s --> RR+  /\  A. u  e.  s  u  =  ( ( 0 ( ball `  ( abs  o.  -  ) ) ( f `  u
) )  i^i  X
) ) )  ->  E. r  e.  RR  A. u  e.  s  ( f `  u )  <_  r )
137127, 136reximddv 2858 . . . . . . . 8  |-  ( ( ( ( ( X 
C_  CC  /\  T  e. 
Comp )  /\  s  e.  ( ~P T  i^i  Fin ) )  /\  U. T  =  U. s
)  /\  ( f : s --> RR+  /\  A. u  e.  s  u  =  ( ( 0 ( ball `  ( abs  o.  -  ) ) ( f `  u
) )  i^i  X
) ) )  ->  E. r  e.  RR  A. x  e.  X  ( abs `  x )  <_  r )
138137ex 432 . . . . . . 7  |-  ( ( ( ( X  C_  CC  /\  T  e.  Comp )  /\  s  e.  ( ~P T  i^i  Fin ) )  /\  U. T  =  U. s
)  ->  ( (
f : s --> RR+  /\ 
A. u  e.  s  u  =  ( ( 0 ( ball `  ( abs  o.  -  ) ) ( f `  u
) )  i^i  X
) )  ->  E. r  e.  RR  A. x  e.  X  ( abs `  x
)  <_  r )
)
139138exlimdv 1732 . . . . . 6  |-  ( ( ( ( X  C_  CC  /\  T  e.  Comp )  /\  s  e.  ( ~P T  i^i  Fin ) )  /\  U. T  =  U. s
)  ->  ( E. f ( f : s --> RR+  /\  A. u  e.  s  u  =  ( ( 0 (
ball `  ( abs  o. 
-  ) ) ( f `  u ) )  i^i  X ) )  ->  E. r  e.  RR  A. x  e.  X  ( abs `  x
)  <_  r )
)
140139expimpd 601 . . . . 5  |-  ( ( ( X  C_  CC  /\  T  e.  Comp )  /\  s  e.  ( ~P T  i^i  Fin )
)  ->  ( ( U. T  =  U. s  /\  E. f ( f : s --> RR+  /\ 
A. u  e.  s  u  =  ( ( 0 ( ball `  ( abs  o.  -  ) ) ( f `  u
) )  i^i  X
) ) )  ->  E. r  e.  RR  A. x  e.  X  ( abs `  x )  <_  r ) )
141140rexlimdva 2874 . . . 4  |-  ( ( X  C_  CC  /\  T  e.  Comp )  ->  ( E. s  e.  ( ~P T  i^i  Fin )
( U. T  = 
U. s  /\  E. f ( f : s --> RR+  /\  A. u  e.  s  u  =  ( ( 0 (
ball `  ( abs  o. 
-  ) ) ( f `  u ) )  i^i  X ) ) )  ->  E. r  e.  RR  A. x  e.  X  ( abs `  x
)  <_  r )
)
14276, 141mpd 15 . . 3  |-  ( ( X  C_  CC  /\  T  e.  Comp )  ->  E. r  e.  RR  A. x  e.  X  ( abs `  x
)  <_  r )
14311, 142jca 530 . 2  |-  ( ( X  C_  CC  /\  T  e.  Comp )  ->  ( X  e.  ( Clsd `  J )  /\  E. r  e.  RR  A. x  e.  X  ( abs `  x )  <_  r
) )
144 eqid 2382 . . . . . 6  |-  ( y  e.  RR ,  z  e.  RR  |->  ( y  +  ( _i  x.  z ) ) )  =  ( y  e.  RR ,  z  e.  RR  |->  ( y  +  ( _i  x.  z
) ) )
145 eqid 2382 . . . . . 6  |-  ( ( y  e.  RR , 
z  e.  RR  |->  ( y  +  ( _i  x.  z ) ) ) " ( (
-u r [,] r
)  X.  ( -u r [,] r ) ) )  =  ( ( y  e.  RR , 
z  e.  RR  |->  ( y  +  ( _i  x.  z ) ) ) " ( (
-u r [,] r
)  X.  ( -u r [,] r ) ) )
1461, 5, 144, 145cnheiborlem 21539 . . . . 5  |-  ( ( X  e.  ( Clsd `  J )  /\  (
r  e.  RR  /\  A. x  e.  X  ( abs `  x )  <_  r ) )  ->  T  e.  Comp )
147146rexlimdvaa 2875 . . . 4  |-  ( X  e.  ( Clsd `  J
)  ->  ( E. r  e.  RR  A. x  e.  X  ( abs `  x )  <_  r  ->  T  e.  Comp )
)
148147imp 427 . . 3  |-  ( ( X  e.  ( Clsd `  J )  /\  E. r  e.  RR  A. x  e.  X  ( abs `  x )  <_  r
)  ->  T  e.  Comp )
149148adantl 464 . 2  |-  ( ( X  C_  CC  /\  ( X  e.  ( Clsd `  J )  /\  E. r  e.  RR  A. x  e.  X  ( abs `  x )  <_  r
) )  ->  T  e.  Comp )
150143, 149impbida 830 1  |-  ( X 
C_  CC  ->  ( T  e.  Comp  <->  ( X  e.  ( Clsd `  J
)  /\  E. r  e.  RR  A. x  e.  X  ( abs `  x
)  <_  r )
) )
Colors of variables: wff setvar class
Syntax hints:    -> wi 4    <-> wb 184    /\ wa 367    = wceq 1399   E.wex 1620    e. wcel 1826   A.wral 2732   E.wrex 2733   _Vcvv 3034    i^i cin 3388    C_ wss 3389   ~Pcpw 3927   U.cuni 4163   class class class wbr 4367    X. cxp 4911   "cima 4916    o. ccom 4917   -->wf 5492   ` cfv 5496  (class class class)co 6196    |-> cmpt2 6198   Fincfn 7435   CCcc 9401   RRcr 9402   0cc0 9403   1c1 9404   _ici 9405    + caddc 9406    x. cmul 9408   RR*cxr 9538    < clt 9539    <_ cle 9540    - cmin 9718   -ucneg 9719   RR+crp 11139   [,]cicc 11453   abscabs 13069   ↾t crest 14828   TopOpenctopn 14829   *Metcxmt 18516   ballcbl 18518  ℂfldccnfld 18533   Topctop 19479   Clsdccld 19602   Hauscha 19895   Compccmp 19972
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1626  ax-4 1639  ax-5 1712  ax-6 1755  ax-7 1798  ax-8 1828  ax-9 1830  ax-10 1845  ax-11 1850  ax-12 1862  ax-13 2006  ax-ext 2360  ax-rep 4478  ax-sep 4488  ax-nul 4496  ax-pow 4543  ax-pr 4601  ax-un 6491  ax-inf2 7972  ax-cnex 9459  ax-resscn 9460  ax-1cn 9461  ax-icn 9462  ax-addcl 9463  ax-addrcl 9464  ax-mulcl 9465  ax-mulrcl 9466  ax-mulcom 9467  ax-addass 9468  ax-mulass 9469  ax-distr 9470  ax-i2m1 9471  ax-1ne0 9472  ax-1rid 9473  ax-rnegex 9474  ax-rrecex 9475  ax-cnre 9476  ax-pre-lttri 9477  ax-pre-lttrn 9478  ax-pre-ltadd 9479  ax-pre-mulgt0 9480  ax-pre-sup 9481  ax-addf 9482  ax-mulf 9483
This theorem depends on definitions:  df-bi 185  df-or 368  df-an 369  df-3or 972  df-3an 973  df-tru 1402  df-ex 1621  df-nf 1625  df-sb 1748  df-eu 2222  df-mo 2223  df-clab 2368  df-cleq 2374  df-clel 2377  df-nfc 2532  df-ne 2579  df-nel 2580  df-ral 2737  df-rex 2738  df-reu 2739  df-rmo 2740  df-rab 2741  df-v 3036  df-sbc 3253  df-csb 3349  df-dif 3392  df-un 3394  df-in 3396  df-ss 3403  df-pss 3405  df-nul 3712  df-if 3858  df-pw 3929  df-sn 3945  df-pr 3947  df-tp 3949  df-op 3951  df-uni 4164  df-int 4200  df-iun 4245  df-iin 4246  df-br 4368  df-opab 4426  df-mpt 4427  df-tr 4461  df-eprel 4705  df-id 4709  df-po 4714  df-so 4715  df-fr 4752  df-se 4753  df-we 4754  df-ord 4795  df-on 4796  df-lim 4797  df-suc 4798  df-xp 4919  df-rel 4920  df-cnv 4921  df-co 4922  df-dm 4923  df-rn 4924  df-res 4925  df-ima 4926  df-iota 5460  df-fun 5498  df-fn 5499  df-f 5500  df-f1 5501  df-fo 5502  df-f1o 5503  df-fv 5504  df-isom 5505  df-riota 6158  df-ov 6199  df-oprab 6200  df-mpt2 6201  df-of 6439  df-om 6600  df-1st 6699  df-2nd 6700  df-supp 6818  df-recs 6960  df-rdg 6994  df-1o 7048  df-2o 7049  df-oadd 7052  df-er 7229  df-map 7340  df-ixp 7389  df-en 7436  df-dom 7437  df-sdom 7438  df-fin 7439  df-fsupp 7745  df-fi 7786  df-sup 7816  df-oi 7850  df-card 8233  df-cda 8461  df-pnf 9541  df-mnf 9542  df-xr 9543  df-ltxr 9544  df-le 9545  df-sub 9720  df-neg 9721  df-div 10124  df-nn 10453  df-2 10511  df-3 10512  df-4 10513  df-5 10514  df-6 10515  df-7 10516  df-8 10517  df-9 10518  df-10 10519  df-n0 10713  df-z 10782  df-dec 10896  df-uz 11002  df-q 11102  df-rp 11140  df-xneg 11239  df-xadd 11240  df-xmul 11241  df-ioo 11454  df-icc 11457  df-fz 11594  df-fzo 11718  df-seq 12011  df-exp 12070  df-hash 12308  df-cj 12934  df-re 12935  df-im 12936  df-sqrt 13070  df-abs 13071  df-struct 14636  df-ndx 14637  df-slot 14638  df-base 14639  df-sets 14640  df-ress 14641  df-plusg 14715  df-mulr 14716  df-starv 14717  df-sca 14718  df-vsca 14719  df-ip 14720  df-tset 14721  df-ple 14722  df-ds 14724  df-unif 14725  df-hom 14726  df-cco 14727  df-rest 14830  df-topn 14831  df-0g 14849  df-gsum 14850  df-topgen 14851  df-pt 14852  df-prds 14855  df-xrs 14909  df-qtop 14914  df-imas 14915  df-xps 14917  df-mre 14993  df-mrc 14994  df-acs 14996  df-mgm 15989  df-sgrp 16028  df-mnd 16038  df-submnd 16084  df-mulg 16177  df-cntz 16472  df-cmn 16917  df-psmet 18524  df-xmet 18525  df-met 18526  df-bl 18527  df-mopn 18528  df-cnfld 18534  df-top 19484  df-bases 19486  df-topon 19487  df-topsp 19488  df-cld 19605  df-cls 19607  df-cn 19814  df-cnp 19815  df-haus 19902  df-cmp 19973  df-tx 20148  df-hmeo 20341  df-xms 20908  df-ms 20909  df-tms 20910  df-cncf 21467
This theorem is referenced by:  cnllycmp  21541  cncmet  21846  ftalem3  23465
  Copyright terms: Public domain W3C validator