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

Theorem cfss 8695
Description: There is a cofinal subset of  A of cardinality  ( cf `  A ). (Contributed by Mario Carneiro, 24-Jun-2013.)
Hypothesis
Ref Expression
cfss.1  |-  A  e. 
_V
Assertion
Ref Expression
cfss  |-  ( Lim 
A  ->  E. x
( x  C_  A  /\  x  ~~  ( cf `  A )  /\  U. x  =  A )
)
Distinct variable group:    x, A

Proof of Theorem cfss
Dummy variable  y is distinct from all other variables.
StepHypRef Expression
1 cfss.1 . . . . . 6  |-  A  e. 
_V
21cflim3 8692 . . . . 5  |-  ( Lim 
A  ->  ( cf `  A )  =  |^|_ x  e.  { x  e. 
~P A  |  U. x  =  A } 
( card `  x )
)
3 fvex 5887 . . . . . . 7  |-  ( card `  x )  e.  _V
43dfiin2 4331 . . . . . 6  |-  |^|_ x  e.  { x  e.  ~P A  |  U. x  =  A }  ( card `  x )  =  |^| { y  |  E. x  e.  { x  e.  ~P A  |  U. x  =  A } y  =  ( card `  x
) }
5 cardon 8379 . . . . . . . . . 10  |-  ( card `  x )  e.  On
6 eleq1 2494 . . . . . . . . . 10  |-  ( y  =  ( card `  x
)  ->  ( y  e.  On  <->  ( card `  x
)  e.  On ) )
75, 6mpbiri 236 . . . . . . . . 9  |-  ( y  =  ( card `  x
)  ->  y  e.  On )
87rexlimivw 2914 . . . . . . . 8  |-  ( E. x  e.  { x  e.  ~P A  |  U. x  =  A }
y  =  ( card `  x )  ->  y  e.  On )
98abssi 3536 . . . . . . 7  |-  { y  |  E. x  e. 
{ x  e.  ~P A  |  U. x  =  A } y  =  ( card `  x
) }  C_  On
10 limuni 5498 . . . . . . . . . . . 12  |-  ( Lim 
A  ->  A  =  U. A )
1110eqcomd 2430 . . . . . . . . . . 11  |-  ( Lim 
A  ->  U. A  =  A )
12 fveq2 5877 . . . . . . . . . . . . . . 15  |-  ( x  =  A  ->  ( card `  x )  =  ( card `  A
) )
1312eqcomd 2430 . . . . . . . . . . . . . 14  |-  ( x  =  A  ->  ( card `  A )  =  ( card `  x
) )
1413biantrud 509 . . . . . . . . . . . . 13  |-  ( x  =  A  ->  ( U. A  =  A  <->  ( U. A  =  A  /\  ( card `  A
)  =  ( card `  x ) ) ) )
15 unieq 4224 . . . . . . . . . . . . . . . 16  |-  ( x  =  A  ->  U. x  =  U. A )
1615eqeq1d 2424 . . . . . . . . . . . . . . 15  |-  ( x  =  A  ->  ( U. x  =  A  <->  U. A  =  A ) )
171pwid 3993 . . . . . . . . . . . . . . . . 17  |-  A  e. 
~P A
18 eleq1 2494 . . . . . . . . . . . . . . . . 17  |-  ( x  =  A  ->  (
x  e.  ~P A  <->  A  e.  ~P A ) )
1917, 18mpbiri 236 . . . . . . . . . . . . . . . 16  |-  ( x  =  A  ->  x  e.  ~P A )
2019biantrurd 510 . . . . . . . . . . . . . . 15  |-  ( x  =  A  ->  ( U. x  =  A  <->  ( x  e.  ~P A  /\  U. x  =  A ) ) )
2116, 20bitr3d 258 . . . . . . . . . . . . . 14  |-  ( x  =  A  ->  ( U. A  =  A  <->  ( x  e.  ~P A  /\  U. x  =  A ) ) )
2221anbi1d 709 . . . . . . . . . . . . 13  |-  ( x  =  A  ->  (
( U. A  =  A  /\  ( card `  A )  =  (
card `  x )
)  <->  ( ( x  e.  ~P A  /\  U. x  =  A )  /\  ( card `  A
)  =  ( card `  x ) ) ) )
2314, 22bitr2d 257 . . . . . . . . . . . 12  |-  ( x  =  A  ->  (
( ( x  e. 
~P A  /\  U. x  =  A )  /\  ( card `  A
)  =  ( card `  x ) )  <->  U. A  =  A ) )
241, 23spcev 3173 . . . . . . . . . . 11  |-  ( U. A  =  A  ->  E. x ( ( x  e.  ~P A  /\  U. x  =  A )  /\  ( card `  A
)  =  ( card `  x ) ) )
2511, 24syl 17 . . . . . . . . . 10  |-  ( Lim 
A  ->  E. x
( ( x  e. 
~P A  /\  U. x  =  A )  /\  ( card `  A
)  =  ( card `  x ) ) )
26 df-rex 2781 . . . . . . . . . . 11  |-  ( E. x  e.  { x  e.  ~P A  |  U. x  =  A } 
( card `  A )  =  ( card `  x
)  <->  E. x ( x  e.  { x  e. 
~P A  |  U. x  =  A }  /\  ( card `  A
)  =  ( card `  x ) ) )
27 rabid 3005 . . . . . . . . . . . . 13  |-  ( x  e.  { x  e. 
~P A  |  U. x  =  A }  <->  ( x  e.  ~P A  /\  U. x  =  A ) )
2827anbi1i 699 . . . . . . . . . . . 12  |-  ( ( x  e.  { x  e.  ~P A  |  U. x  =  A }  /\  ( card `  A
)  =  ( card `  x ) )  <->  ( (
x  e.  ~P A  /\  U. x  =  A )  /\  ( card `  A )  =  (
card `  x )
) )
2928exbii 1712 . . . . . . . . . . 11  |-  ( E. x ( x  e. 
{ x  e.  ~P A  |  U. x  =  A }  /\  ( card `  A )  =  ( card `  x
) )  <->  E. x
( ( x  e. 
~P A  /\  U. x  =  A )  /\  ( card `  A
)  =  ( card `  x ) ) )
3026, 29bitri 252 . . . . . . . . . 10  |-  ( E. x  e.  { x  e.  ~P A  |  U. x  =  A } 
( card `  A )  =  ( card `  x
)  <->  E. x ( ( x  e.  ~P A  /\  U. x  =  A )  /\  ( card `  A )  =  (
card `  x )
) )
3125, 30sylibr 215 . . . . . . . . 9  |-  ( Lim 
A  ->  E. x  e.  { x  e.  ~P A  |  U. x  =  A }  ( card `  A )  =  (
card `  x )
)
32 fvex 5887 . . . . . . . . . 10  |-  ( card `  A )  e.  _V
33 eqeq1 2426 . . . . . . . . . . 11  |-  ( y  =  ( card `  A
)  ->  ( y  =  ( card `  x
)  <->  ( card `  A
)  =  ( card `  x ) ) )
3433rexbidv 2939 . . . . . . . . . 10  |-  ( y  =  ( card `  A
)  ->  ( E. x  e.  { x  e.  ~P A  |  U. x  =  A }
y  =  ( card `  x )  <->  E. x  e.  { x  e.  ~P A  |  U. x  =  A }  ( card `  A )  =  (
card `  x )
) )
3532, 34spcev 3173 . . . . . . . . 9  |-  ( E. x  e.  { x  e.  ~P A  |  U. x  =  A } 
( card `  A )  =  ( card `  x
)  ->  E. y E. x  e.  { x  e.  ~P A  |  U. x  =  A }
y  =  ( card `  x ) )
3631, 35syl 17 . . . . . . . 8  |-  ( Lim 
A  ->  E. y E. x  e.  { x  e.  ~P A  |  U. x  =  A }
y  =  ( card `  x ) )
37 abn0 3781 . . . . . . . 8  |-  ( { y  |  E. x  e.  { x  e.  ~P A  |  U. x  =  A } y  =  ( card `  x
) }  =/=  (/)  <->  E. y E. x  e.  { x  e.  ~P A  |  U. x  =  A }
y  =  ( card `  x ) )
3836, 37sylibr 215 . . . . . . 7  |-  ( Lim 
A  ->  { y  |  E. x  e.  {
x  e.  ~P A  |  U. x  =  A } y  =  (
card `  x ) }  =/=  (/) )
39 onint 6632 . . . . . . 7  |-  ( ( { y  |  E. x  e.  { x  e.  ~P A  |  U. x  =  A }
y  =  ( card `  x ) }  C_  On  /\  { y  |  E. x  e.  {
x  e.  ~P A  |  U. x  =  A } y  =  (
card `  x ) }  =/=  (/) )  ->  |^| { y  |  E. x  e. 
{ x  e.  ~P A  |  U. x  =  A } y  =  ( card `  x
) }  e.  {
y  |  E. x  e.  { x  e.  ~P A  |  U. x  =  A } y  =  ( card `  x
) } )
409, 38, 39sylancr 667 . . . . . 6  |-  ( Lim 
A  ->  |^| { y  |  E. x  e. 
{ x  e.  ~P A  |  U. x  =  A } y  =  ( card `  x
) }  e.  {
y  |  E. x  e.  { x  e.  ~P A  |  U. x  =  A } y  =  ( card `  x
) } )
414, 40syl5eqel 2514 . . . . 5  |-  ( Lim 
A  ->  |^|_ x  e. 
{ x  e.  ~P A  |  U. x  =  A }  ( card `  x )  e.  {
y  |  E. x  e.  { x  e.  ~P A  |  U. x  =  A } y  =  ( card `  x
) } )
422, 41eqeltrd 2510 . . . 4  |-  ( Lim 
A  ->  ( cf `  A )  e.  {
y  |  E. x  e.  { x  e.  ~P A  |  U. x  =  A } y  =  ( card `  x
) } )
43 fvex 5887 . . . . 5  |-  ( cf `  A )  e.  _V
44 eqeq1 2426 . . . . . 6  |-  ( y  =  ( cf `  A
)  ->  ( y  =  ( card `  x
)  <->  ( cf `  A
)  =  ( card `  x ) ) )
4544rexbidv 2939 . . . . 5  |-  ( y  =  ( cf `  A
)  ->  ( E. x  e.  { x  e.  ~P A  |  U. x  =  A }
y  =  ( card `  x )  <->  E. x  e.  { x  e.  ~P A  |  U. x  =  A }  ( cf `  A )  =  (
card `  x )
) )
4643, 45elab 3218 . . . 4  |-  ( ( cf `  A )  e.  { y  |  E. x  e.  {
x  e.  ~P A  |  U. x  =  A } y  =  (
card `  x ) } 
<->  E. x  e.  {
x  e.  ~P A  |  U. x  =  A }  ( cf `  A
)  =  ( card `  x ) )
4742, 46sylib 199 . . 3  |-  ( Lim 
A  ->  E. x  e.  { x  e.  ~P A  |  U. x  =  A }  ( cf `  A )  =  (
card `  x )
)
48 df-rex 2781 . . 3  |-  ( E. x  e.  { x  e.  ~P A  |  U. x  =  A } 
( cf `  A
)  =  ( card `  x )  <->  E. x
( x  e.  {
x  e.  ~P A  |  U. x  =  A }  /\  ( cf `  A )  =  (
card `  x )
) )
4947, 48sylib 199 . 2  |-  ( Lim 
A  ->  E. x
( x  e.  {
x  e.  ~P A  |  U. x  =  A }  /\  ( cf `  A )  =  (
card `  x )
) )
50 simprl 762 . . . . . . . 8  |-  ( ( Lim  A  /\  (
x  e.  { x  e.  ~P A  |  U. x  =  A }  /\  ( cf `  A
)  =  ( card `  x ) ) )  ->  x  e.  {
x  e.  ~P A  |  U. x  =  A } )
5150, 27sylib 199 . . . . . . 7  |-  ( ( Lim  A  /\  (
x  e.  { x  e.  ~P A  |  U. x  =  A }  /\  ( cf `  A
)  =  ( card `  x ) ) )  ->  ( x  e. 
~P A  /\  U. x  =  A )
)
5251simpld 460 . . . . . 6  |-  ( ( Lim  A  /\  (
x  e.  { x  e.  ~P A  |  U. x  =  A }  /\  ( cf `  A
)  =  ( card `  x ) ) )  ->  x  e.  ~P A )
5352elpwid 3989 . . . . 5  |-  ( ( Lim  A  /\  (
x  e.  { x  e.  ~P A  |  U. x  =  A }  /\  ( cf `  A
)  =  ( card `  x ) ) )  ->  x  C_  A
)
54 simpl 458 . . . . . . 7  |-  ( ( Lim  A  /\  (
x  e.  { x  e.  ~P A  |  U. x  =  A }  /\  ( cf `  A
)  =  ( card `  x ) ) )  ->  Lim  A )
55 vex 3084 . . . . . . . . . 10  |-  x  e. 
_V
56 limord 5497 . . . . . . . . . . . 12  |-  ( Lim 
A  ->  Ord  A )
57 ordsson 6626 . . . . . . . . . . . 12  |-  ( Ord 
A  ->  A  C_  On )
5856, 57syl 17 . . . . . . . . . . 11  |-  ( Lim 
A  ->  A  C_  On )
59 sstr 3472 . . . . . . . . . . 11  |-  ( ( x  C_  A  /\  A  C_  On )  ->  x  C_  On )
6058, 59sylan2 476 . . . . . . . . . 10  |-  ( ( x  C_  A  /\  Lim  A )  ->  x  C_  On )
61 onssnum 8471 . . . . . . . . . 10  |-  ( ( x  e.  _V  /\  x  C_  On )  ->  x  e.  dom  card )
6255, 60, 61sylancr 667 . . . . . . . . 9  |-  ( ( x  C_  A  /\  Lim  A )  ->  x  e.  dom  card )
63 cardid2 8388 . . . . . . . . 9  |-  ( x  e.  dom  card  ->  (
card `  x )  ~~  x )
6462, 63syl 17 . . . . . . . 8  |-  ( ( x  C_  A  /\  Lim  A )  ->  ( card `  x )  ~~  x )
6564ensymd 7623 . . . . . . 7  |-  ( ( x  C_  A  /\  Lim  A )  ->  x  ~~  ( card `  x
) )
6653, 54, 65syl2anc 665 . . . . . 6  |-  ( ( Lim  A  /\  (
x  e.  { x  e.  ~P A  |  U. x  =  A }  /\  ( cf `  A
)  =  ( card `  x ) ) )  ->  x  ~~  ( card `  x ) )
67 simprr 764 . . . . . 6  |-  ( ( Lim  A  /\  (
x  e.  { x  e.  ~P A  |  U. x  =  A }  /\  ( cf `  A
)  =  ( card `  x ) ) )  ->  ( cf `  A
)  =  ( card `  x ) )
6866, 67breqtrrd 4447 . . . . 5  |-  ( ( Lim  A  /\  (
x  e.  { x  e.  ~P A  |  U. x  =  A }  /\  ( cf `  A
)  =  ( card `  x ) ) )  ->  x  ~~  ( cf `  A ) )
6951simprd 464 . . . . 5  |-  ( ( Lim  A  /\  (
x  e.  { x  e.  ~P A  |  U. x  =  A }  /\  ( cf `  A
)  =  ( card `  x ) ) )  ->  U. x  =  A )
7053, 68, 693jca 1185 . . . 4  |-  ( ( Lim  A  /\  (
x  e.  { x  e.  ~P A  |  U. x  =  A }  /\  ( cf `  A
)  =  ( card `  x ) ) )  ->  ( x  C_  A  /\  x  ~~  ( cf `  A )  /\  U. x  =  A ) )
7170ex 435 . . 3  |-  ( Lim 
A  ->  ( (
x  e.  { x  e.  ~P A  |  U. x  =  A }  /\  ( cf `  A
)  =  ( card `  x ) )  -> 
( x  C_  A  /\  x  ~~  ( cf `  A )  /\  U. x  =  A )
) )
7271eximdv 1754 . 2  |-  ( Lim 
A  ->  ( E. x ( x  e. 
{ x  e.  ~P A  |  U. x  =  A }  /\  ( cf `  A )  =  ( card `  x
) )  ->  E. x
( x  C_  A  /\  x  ~~  ( cf `  A )  /\  U. x  =  A )
) )
7349, 72mpd 15 1  |-  ( Lim 
A  ->  E. x
( x  C_  A  /\  x  ~~  ( cf `  A )  /\  U. x  =  A )
)
Colors of variables: wff setvar class
Syntax hints:    -> wi 4    /\ wa 370    /\ w3a 982    = wceq 1437   E.wex 1659    e. wcel 1868   {cab 2407    =/= wne 2618   E.wrex 2776   {crab 2779   _Vcvv 3081    C_ wss 3436   (/)c0 3761   ~Pcpw 3979   U.cuni 4216   |^|cint 4252   |^|_ciin 4297   class class class wbr 4420   dom cdm 4849   Ord word 5437   Oncon0 5438   Lim wlim 5439   ` cfv 5597    ~~ cen 7570   cardccrd 8370   cfccf 8372
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1665  ax-4 1678  ax-5 1748  ax-6 1794  ax-7 1839  ax-8 1870  ax-9 1872  ax-10 1887  ax-11 1892  ax-12 1905  ax-13 2053  ax-ext 2400  ax-rep 4533  ax-sep 4543  ax-nul 4551  ax-pow 4598  ax-pr 4656  ax-un 6593
This theorem depends on definitions:  df-bi 188  df-or 371  df-an 372  df-3or 983  df-3an 984  df-tru 1440  df-ex 1660  df-nf 1664  df-sb 1787  df-eu 2269  df-mo 2270  df-clab 2408  df-cleq 2414  df-clel 2417  df-nfc 2572  df-ne 2620  df-ral 2780  df-rex 2781  df-reu 2782  df-rmo 2783  df-rab 2784  df-v 3083  df-sbc 3300  df-csb 3396  df-dif 3439  df-un 3441  df-in 3443  df-ss 3450  df-pss 3452  df-nul 3762  df-if 3910  df-pw 3981  df-sn 3997  df-pr 3999  df-tp 4001  df-op 4003  df-uni 4217  df-int 4253  df-iun 4298  df-iin 4299  df-br 4421  df-opab 4480  df-mpt 4481  df-tr 4516  df-eprel 4760  df-id 4764  df-po 4770  df-so 4771  df-fr 4808  df-se 4809  df-we 4810  df-xp 4855  df-rel 4856  df-cnv 4857  df-co 4858  df-dm 4859  df-rn 4860  df-res 4861  df-ima 4862  df-pred 5395  df-ord 5441  df-on 5442  df-lim 5443  df-suc 5444  df-iota 5561  df-fun 5599  df-fn 5600  df-f 5601  df-f1 5602  df-fo 5603  df-f1o 5604  df-fv 5605  df-isom 5606  df-riota 6263  df-wrecs 7032  df-recs 7094  df-er 7367  df-en 7574  df-dom 7575  df-card 8374  df-cf 8376
This theorem is referenced by: (None)
  Copyright terms: Public domain W3C validator