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

Theorem hartogs 7143
Description: Given any set, the Hartogs number of the set is the least ordinal not dominated by that set. This theorem proves that there is always an ordinal which satisfies this. (This theorem can be proven trivially using the AC - see theorem ondomon 8067- but this proof works in ZF.) (Contributed by Jeff Hankins, 22-Oct-2009.) (Revised by Mario Carneiro, 15-May-2015.)
Assertion
Ref Expression
hartogs  |-  ( A  e.  V  ->  { x  e.  On  |  x  ~<_  A }  e.  On )
Distinct variable group:    x, A
Allowed substitution hint:    V( x)

Proof of Theorem hartogs
StepHypRef Expression
1 onelon 4310 . . . . . . . . . . . 12  |-  ( ( z  e.  On  /\  y  e.  z )  ->  y  e.  On )
2 vex 2730 . . . . . . . . . . . . 13  |-  z  e. 
_V
3 onelss 4327 . . . . . . . . . . . . . 14  |-  ( z  e.  On  ->  (
y  e.  z  -> 
y  C_  z )
)
43imp 420 . . . . . . . . . . . . 13  |-  ( ( z  e.  On  /\  y  e.  z )  ->  y  C_  z )
5 ssdomg 6793 . . . . . . . . . . . . 13  |-  ( z  e.  _V  ->  (
y  C_  z  ->  y  ~<_  z ) )
62, 4, 5mpsyl 61 . . . . . . . . . . . 12  |-  ( ( z  e.  On  /\  y  e.  z )  ->  y  ~<_  z )
71, 6jca 520 . . . . . . . . . . 11  |-  ( ( z  e.  On  /\  y  e.  z )  ->  ( y  e.  On  /\  y  ~<_  z ) )
8 domtr 6799 . . . . . . . . . . . . 13  |-  ( ( y  ~<_  z  /\  z  ~<_  A )  ->  y  ~<_  A )
98anim2i 555 . . . . . . . . . . . 12  |-  ( ( y  e.  On  /\  ( y  ~<_  z  /\  z  ~<_  A ) )  ->  ( y  e.  On  /\  y  ~<_  A ) )
109anassrs 632 . . . . . . . . . . 11  |-  ( ( ( y  e.  On  /\  y  ~<_  z )  /\  z  ~<_  A )  -> 
( y  e.  On  /\  y  ~<_  A ) )
117, 10sylan 459 . . . . . . . . . 10  |-  ( ( ( z  e.  On  /\  y  e.  z )  /\  z  ~<_  A )  ->  ( y  e.  On  /\  y  ~<_  A ) )
1211exp31 590 . . . . . . . . 9  |-  ( z  e.  On  ->  (
y  e.  z  -> 
( z  ~<_  A  -> 
( y  e.  On  /\  y  ~<_  A ) ) ) )
1312com12 29 . . . . . . . 8  |-  ( y  e.  z  ->  (
z  e.  On  ->  ( z  ~<_  A  ->  (
y  e.  On  /\  y  ~<_  A ) ) ) )
1413imp3a 422 . . . . . . 7  |-  ( y  e.  z  ->  (
( z  e.  On  /\  z  ~<_  A )  -> 
( y  e.  On  /\  y  ~<_  A ) ) )
15 breq1 3923 . . . . . . . 8  |-  ( x  =  z  ->  (
x  ~<_  A  <->  z  ~<_  A ) )
1615elrab 2860 . . . . . . 7  |-  ( z  e.  { x  e.  On  |  x  ~<_  A }  <->  ( z  e.  On  /\  z  ~<_  A ) )
17 breq1 3923 . . . . . . . 8  |-  ( x  =  y  ->  (
x  ~<_  A  <->  y  ~<_  A ) )
1817elrab 2860 . . . . . . 7  |-  ( y  e.  { x  e.  On  |  x  ~<_  A }  <->  ( y  e.  On  /\  y  ~<_  A ) )
1914, 16, 183imtr4g 263 . . . . . 6  |-  ( y  e.  z  ->  (
z  e.  { x  e.  On  |  x  ~<_  A }  ->  y  e.  { x  e.  On  |  x  ~<_  A } ) )
2019imp 420 . . . . 5  |-  ( ( y  e.  z  /\  z  e.  { x  e.  On  |  x  ~<_  A } )  ->  y  e.  { x  e.  On  |  x  ~<_  A }
)
2120gen2 1541 . . . 4  |-  A. y A. z ( ( y  e.  z  /\  z  e.  { x  e.  On  |  x  ~<_  A }
)  ->  y  e.  { x  e.  On  |  x  ~<_  A } )
22 dftr2 4012 . . . 4  |-  ( Tr 
{ x  e.  On  |  x  ~<_  A }  <->  A. y A. z ( ( y  e.  z  /\  z  e.  {
x  e.  On  |  x  ~<_  A } )  ->  y  e.  {
x  e.  On  |  x  ~<_  A } ) )
2321, 22mpbir 202 . . 3  |-  Tr  {
x  e.  On  |  x  ~<_  A }
24 ssrab2 3179 . . 3  |-  { x  e.  On  |  x  ~<_  A }  C_  On
25 ordon 4465 . . 3  |-  Ord  On
26 trssord 4302 . . 3  |-  ( ( Tr  { x  e.  On  |  x  ~<_  A }  /\  { x  e.  On  |  x  ~<_  A }  C_  On  /\  Ord  On )  ->  Ord  { x  e.  On  |  x  ~<_  A } )
2723, 24, 25, 26mp3an 1282 . 2  |-  Ord  {
x  e.  On  |  x  ~<_  A }
28 eqid 2253 . . . 4  |-  { <. r ,  y >.  |  ( ( ( dom  r  C_  A  /\  (  _I  |`  dom  r )  C_  r  /\  r  C_  ( dom  r  X.  dom  r
) )  /\  (
r  \  _I  )  We  dom  r )  /\  y  =  dom OrdIso ( ( r  \  _I  ) ,  dom  r ) ) }  =  { <. r ,  y >.  |  ( ( ( dom  r  C_  A  /\  (  _I  |`  dom  r )  C_  r  /\  r  C_  ( dom  r  X.  dom  r
) )  /\  (
r  \  _I  )  We  dom  r )  /\  y  =  dom OrdIso ( ( r  \  _I  ) ,  dom  r ) ) }
29 eqid 2253 . . . 4  |-  { <. s ,  t >.  |  E. w  e.  y  E. z  e.  y  (
( s  =  ( g `  w )  /\  t  =  ( g `  z ) )  /\  w  _E  z ) }  =  { <. s ,  t
>.  |  E. w  e.  y  E. z  e.  y  ( (
s  =  ( g `
 w )  /\  t  =  ( g `  z ) )  /\  w  _E  z ) }
3028, 29hartogslem2 7142 . . 3  |-  ( A  e.  V  ->  { x  e.  On  |  x  ~<_  A }  e.  _V )
31 elong 4293 . . 3  |-  ( { x  e.  On  |  x  ~<_  A }  e.  _V  ->  ( { x  e.  On  |  x  ~<_  A }  e.  On  <->  Ord  { x  e.  On  |  x  ~<_  A } ) )
3230, 31syl 17 . 2  |-  ( A  e.  V  ->  ( { x  e.  On  |  x  ~<_  A }  e.  On  <->  Ord  { x  e.  On  |  x  ~<_  A } ) )
3327, 32mpbiri 226 1  |-  ( A  e.  V  ->  { x  e.  On  |  x  ~<_  A }  e.  On )
Colors of variables: wff set class
Syntax hints:    -> wi 6    <-> wb 178    /\ wa 360    /\ w3a 939   A.wal 1532    = wceq 1619    e. wcel 1621   E.wrex 2510   {crab 2512   _Vcvv 2727    \ cdif 3075    C_ wss 3078   class class class wbr 3920   {copab 3973   Tr wtr 4010    _E cep 4196    _I cid 4197    We wwe 4244   Ord word 4284   Oncon0 4285    X. cxp 4578   dom cdm 4580    |` cres 4582   ` cfv 4592    ~<_ cdom 6747  OrdIsocoi 7108
This theorem is referenced by:  card2on  7152  harf  7158  harval  7160
This theorem was proved from axioms:  ax-1 7  ax-2 8  ax-3 9  ax-mp 10  ax-5 1533  ax-6 1534  ax-7 1535  ax-gen 1536  ax-8 1623  ax-11 1624  ax-13 1625  ax-14 1626  ax-17 1628  ax-12o 1664  ax-10 1678  ax-9 1684  ax-4 1692  ax-16 1926  ax-ext 2234  ax-rep 4028  ax-sep 4038  ax-nul 4046  ax-pow 4082  ax-pr 4108  ax-un 4403
This theorem depends on definitions:  df-bi 179  df-or 361  df-an 362  df-3or 940  df-3an 941  df-tru 1315  df-ex 1538  df-nf 1540  df-sb 1883  df-eu 2118  df-mo 2119  df-clab 2240  df-cleq 2246  df-clel 2249  df-nfc 2374  df-ne 2414  df-ral 2513  df-rex 2514  df-reu 2515  df-rab 2516  df-v 2729  df-sbc 2922  df-csb 3010  df-dif 3081  df-un 3083  df-in 3085  df-ss 3089  df-pss 3091  df-nul 3363  df-if 3471  df-pw 3532  df-sn 3550  df-pr 3551  df-tp 3552  df-op 3553  df-uni 3728  df-iun 3805  df-br 3921  df-opab 3975  df-mpt 3976  df-tr 4011  df-eprel 4198  df-id 4202  df-po 4207  df-so 4208  df-fr 4245  df-se 4246  df-we 4247  df-ord 4288  df-on 4289  df-lim 4290  df-suc 4291  df-xp 4594  df-rel 4595  df-cnv 4596  df-co 4597  df-dm 4598  df-rn 4599  df-res 4600  df-ima 4601  df-fun 4602  df-fn 4603  df-f 4604  df-f1 4605  df-fo 4606  df-f1o 4607  df-fv 4608  df-isom 4609  df-iota 6143  df-riota 6190  df-recs 6274  df-en 6750  df-dom 6751  df-oi 7109
  Copyright terms: Public domain W3C validator