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

Theorem grothomex 9237
Description: The Tarski-Grothendieck Axiom implies the Axiom of Infinity (in the form of omex 8093). Note that our proof depends on neither the Axiom of Infinity nor Regularity. (Contributed by Mario Carneiro, 19-Apr-2013.) (New usage is discouraged.)
Assertion
Ref Expression
grothomex  |-  om  e.  _V

Proof of Theorem grothomex
Dummy variables  x  y  z  w are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 r111 8225 . . . 4  |-  R1 : On
-1-1-> _V
2 omsson 6687 . . . 4  |-  om  C_  On
3 f1ores 5813 . . . 4  |-  ( ( R1 : On -1-1-> _V  /\ 
om  C_  On )  -> 
( R1  |`  om ) : om -1-1-onto-> ( R1 " om ) )
41, 2, 3mp2an 670 . . 3  |-  ( R1  |`  om ) : om -1-1-onto-> ( R1 " om )
5 f1of1 5798 . . 3  |-  ( ( R1  |`  om ) : om -1-1-onto-> ( R1 " om )  ->  ( R1  |`  om ) : om -1-1-> ( R1 " om ) )
64, 5ax-mp 5 . 2  |-  ( R1  |`  om ) : om -1-1-> ( R1 " om )
7 0ex 4526 . . . 4  |-  (/)  e.  _V
8 eleq1 2474 . . . . . 6  |-  ( x  =  (/)  ->  ( x  e.  y  <->  (/)  e.  y ) )
98anbi1d 703 . . . . 5  |-  ( x  =  (/)  ->  ( ( x  e.  y  /\  A. z  e.  y  ~P z  e.  y )  <-> 
( (/)  e.  y  /\  A. z  e.  y  ~P z  e.  y ) ) )
109exbidv 1735 . . . 4  |-  ( x  =  (/)  ->  ( E. y ( x  e.  y  /\  A. z  e.  y  ~P z  e.  y )  <->  E. y
( (/)  e.  y  /\  A. z  e.  y  ~P z  e.  y ) ) )
11 axgroth6 9236 . . . . 5  |-  E. y
( x  e.  y  /\  A. z  e.  y  ( ~P z  C_  y  /\  ~P z  e.  y )  /\  A. z  e.  ~P  y
( z  ~<  y  ->  z  e.  y ) )
12 simpr 459 . . . . . . . 8  |-  ( ( ~P z  C_  y  /\  ~P z  e.  y )  ->  ~P z  e.  y )
1312ralimi 2797 . . . . . . 7  |-  ( A. z  e.  y  ( ~P z  C_  y  /\  ~P z  e.  y
)  ->  A. z  e.  y  ~P z  e.  y )
1413anim2i 567 . . . . . 6  |-  ( ( x  e.  y  /\  A. z  e.  y  ( ~P z  C_  y  /\  ~P z  e.  y ) )  ->  (
x  e.  y  /\  A. z  e.  y  ~P z  e.  y ) )
15143adant3 1017 . . . . 5  |-  ( ( x  e.  y  /\  A. z  e.  y  ( ~P z  C_  y  /\  ~P z  e.  y )  /\  A. z  e.  ~P  y ( z 
~<  y  ->  z  e.  y ) )  -> 
( x  e.  y  /\  A. z  e.  y  ~P z  e.  y ) )
1611, 15eximii 1679 . . . 4  |-  E. y
( x  e.  y  /\  A. z  e.  y  ~P z  e.  y )
177, 10, 16vtocl 3111 . . 3  |-  E. y
( (/)  e.  y  /\  A. z  e.  y  ~P z  e.  y )
18 r1fnon 8217 . . . . . . . . 9  |-  R1  Fn  On
19 fvelimab 5905 . . . . . . . . 9  |-  ( ( R1  Fn  On  /\  om  C_  On )  ->  (
w  e.  ( R1
" om )  <->  E. x  e.  om  ( R1 `  x )  =  w ) )
2018, 2, 19mp2an 670 . . . . . . . 8  |-  ( w  e.  ( R1 " om )  <->  E. x  e.  om  ( R1 `  x )  =  w )
21 fveq2 5849 . . . . . . . . . . . 12  |-  ( x  =  (/)  ->  ( R1
`  x )  =  ( R1 `  (/) ) )
2221eleq1d 2471 . . . . . . . . . . 11  |-  ( x  =  (/)  ->  ( ( R1 `  x )  e.  y  <->  ( R1 `  (/) )  e.  y
) )
23 fveq2 5849 . . . . . . . . . . . 12  |-  ( x  =  w  ->  ( R1 `  x )  =  ( R1 `  w
) )
2423eleq1d 2471 . . . . . . . . . . 11  |-  ( x  =  w  ->  (
( R1 `  x
)  e.  y  <->  ( R1 `  w )  e.  y ) )
25 fveq2 5849 . . . . . . . . . . . 12  |-  ( x  =  suc  w  -> 
( R1 `  x
)  =  ( R1
`  suc  w )
)
2625eleq1d 2471 . . . . . . . . . . 11  |-  ( x  =  suc  w  -> 
( ( R1 `  x )  e.  y  <-> 
( R1 `  suc  w )  e.  y ) )
27 r10 8218 . . . . . . . . . . . . . 14  |-  ( R1
`  (/) )  =  (/)
2827eleq1i 2479 . . . . . . . . . . . . 13  |-  ( ( R1 `  (/) )  e.  y  <->  (/)  e.  y )
2928biimpri 206 . . . . . . . . . . . 12  |-  ( (/)  e.  y  ->  ( R1
`  (/) )  e.  y )
3029adantr 463 . . . . . . . . . . 11  |-  ( (
(/)  e.  y  /\  A. z  e.  y  ~P z  e.  y )  ->  ( R1 `  (/) )  e.  y )
31 pweq 3958 . . . . . . . . . . . . . . . 16  |-  ( z  =  ( R1 `  w )  ->  ~P z  =  ~P ( R1 `  w ) )
3231eleq1d 2471 . . . . . . . . . . . . . . 15  |-  ( z  =  ( R1 `  w )  ->  ( ~P z  e.  y  <->  ~P ( R1 `  w
)  e.  y ) )
3332rspccv 3157 . . . . . . . . . . . . . 14  |-  ( A. z  e.  y  ~P z  e.  y  ->  ( ( R1 `  w
)  e.  y  ->  ~P ( R1 `  w
)  e.  y ) )
34 nnon 6689 . . . . . . . . . . . . . . . . 17  |-  ( w  e.  om  ->  w  e.  On )
35 r1suc 8220 . . . . . . . . . . . . . . . . 17  |-  ( w  e.  On  ->  ( R1 `  suc  w )  =  ~P ( R1
`  w ) )
3634, 35syl 17 . . . . . . . . . . . . . . . 16  |-  ( w  e.  om  ->  ( R1 `  suc  w )  =  ~P ( R1
`  w ) )
3736eleq1d 2471 . . . . . . . . . . . . . . 15  |-  ( w  e.  om  ->  (
( R1 `  suc  w )  e.  y  <->  ~P ( R1 `  w
)  e.  y ) )
3837biimprcd 225 . . . . . . . . . . . . . 14  |-  ( ~P ( R1 `  w
)  e.  y  -> 
( w  e.  om  ->  ( R1 `  suc  w )  e.  y ) )
3933, 38syl6 31 . . . . . . . . . . . . 13  |-  ( A. z  e.  y  ~P z  e.  y  ->  ( ( R1 `  w
)  e.  y  -> 
( w  e.  om  ->  ( R1 `  suc  w )  e.  y ) ) )
4039com3r 79 . . . . . . . . . . . 12  |-  ( w  e.  om  ->  ( A. z  e.  y  ~P z  e.  y  ->  ( ( R1 `  w )  e.  y  ->  ( R1 `  suc  w )  e.  y ) ) )
4140adantld 465 . . . . . . . . . . 11  |-  ( w  e.  om  ->  (
( (/)  e.  y  /\  A. z  e.  y  ~P z  e.  y )  ->  ( ( R1
`  w )  e.  y  ->  ( R1 ` 
suc  w )  e.  y ) ) )
4222, 24, 26, 30, 41finds2 6712 . . . . . . . . . 10  |-  ( x  e.  om  ->  (
( (/)  e.  y  /\  A. z  e.  y  ~P z  e.  y )  ->  ( R1 `  x )  e.  y ) )
43 eleq1 2474 . . . . . . . . . . 11  |-  ( ( R1 `  x )  =  w  ->  (
( R1 `  x
)  e.  y  <->  w  e.  y ) )
4443biimpd 207 . . . . . . . . . 10  |-  ( ( R1 `  x )  =  w  ->  (
( R1 `  x
)  e.  y  ->  w  e.  y )
)
4542, 44syl9 70 . . . . . . . . 9  |-  ( x  e.  om  ->  (
( R1 `  x
)  =  w  -> 
( ( (/)  e.  y  /\  A. z  e.  y  ~P z  e.  y )  ->  w  e.  y ) ) )
4645rexlimiv 2890 . . . . . . . 8  |-  ( E. x  e.  om  ( R1 `  x )  =  w  ->  ( ( (/) 
e.  y  /\  A. z  e.  y  ~P z  e.  y )  ->  w  e.  y ) )
4720, 46sylbi 195 . . . . . . 7  |-  ( w  e.  ( R1 " om )  ->  ( (
(/)  e.  y  /\  A. z  e.  y  ~P z  e.  y )  ->  w  e.  y ) )
4847com12 29 . . . . . 6  |-  ( (
(/)  e.  y  /\  A. z  e.  y  ~P z  e.  y )  ->  ( w  e.  ( R1 " om )  ->  w  e.  y ) )
4948ssrdv 3448 . . . . 5  |-  ( (
(/)  e.  y  /\  A. z  e.  y  ~P z  e.  y )  ->  ( R1 " om )  C_  y )
50 vex 3062 . . . . . 6  |-  y  e. 
_V
5150ssex 4538 . . . . 5  |-  ( ( R1 " om )  C_  y  ->  ( R1 " om )  e.  _V )
5249, 51syl 17 . . . 4  |-  ( (
(/)  e.  y  /\  A. z  e.  y  ~P z  e.  y )  ->  ( R1 " om )  e.  _V )
5352exlimiv 1743 . . 3  |-  ( E. y ( (/)  e.  y  /\  A. z  e.  y  ~P z  e.  y )  ->  ( R1 " om )  e. 
_V )
5417, 53ax-mp 5 . 2  |-  ( R1
" om )  e. 
_V
55 f1dmex 6754 . 2  |-  ( ( ( R1  |`  om ) : om -1-1-> ( R1 " om )  /\  ( R1 " om )  e. 
_V )  ->  om  e.  _V )
566, 54, 55mp2an 670 1  |-  om  e.  _V
Colors of variables: wff setvar class
Syntax hints:    -> wi 4    <-> wb 184    /\ wa 367    /\ w3a 974    = wceq 1405   E.wex 1633    e. wcel 1842   A.wral 2754   E.wrex 2755   _Vcvv 3059    C_ wss 3414   (/)c0 3738   ~Pcpw 3955   class class class wbr 4395    |` cres 4825   "cima 4826   Oncon0 5410   suc csuc 5412    Fn wfn 5564   -1-1->wf1 5566   -1-1-onto->wf1o 5568   ` cfv 5569   omcom 6683    ~< csdm 7553   R1cr1 8212
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1639  ax-4 1652  ax-5 1725  ax-6 1771  ax-7 1814  ax-8 1844  ax-9 1846  ax-10 1861  ax-11 1866  ax-12 1878  ax-13 2026  ax-ext 2380  ax-rep 4507  ax-sep 4517  ax-nul 4525  ax-pow 4572  ax-pr 4630  ax-un 6574  ax-groth 9231
This theorem depends on definitions:  df-bi 185  df-or 368  df-an 369  df-3or 975  df-3an 976  df-tru 1408  df-ex 1634  df-nf 1638  df-sb 1764  df-eu 2242  df-mo 2243  df-clab 2388  df-cleq 2394  df-clel 2397  df-nfc 2552  df-ne 2600  df-ral 2759  df-rex 2760  df-reu 2761  df-rab 2763  df-v 3061  df-sbc 3278  df-csb 3374  df-dif 3417  df-un 3419  df-in 3421  df-ss 3428  df-pss 3430  df-nul 3739  df-if 3886  df-pw 3957  df-sn 3973  df-pr 3975  df-tp 3977  df-op 3979  df-uni 4192  df-iun 4273  df-br 4396  df-opab 4454  df-mpt 4455  df-tr 4490  df-eprel 4734  df-id 4738  df-po 4744  df-so 4745  df-fr 4782  df-we 4784  df-xp 4829  df-rel 4830  df-cnv 4831  df-co 4832  df-dm 4833  df-rn 4834  df-res 4835  df-ima 4836  df-pred 5367  df-ord 5413  df-on 5414  df-lim 5415  df-suc 5416  df-iota 5533  df-fun 5571  df-fn 5572  df-f 5573  df-f1 5574  df-fo 5575  df-f1o 5576  df-fv 5577  df-om 6684  df-wrecs 7013  df-recs 7075  df-rdg 7113  df-er 7348  df-en 7555  df-dom 7556  df-sdom 7557  df-r1 8214
This theorem is referenced by: (None)
  Copyright terms: Public domain W3C validator