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

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

Proof of Theorem grothomex
StepHypRef Expression
1 r111 7415 . . . 4  |-  R1 : On
-1-1-> _V
2 omsson 4632 . . . 4  |-  om  C_  On
3 f1ores 5425 . . . 4  |-  ( ( R1 : On -1-1-> _V  /\ 
om  C_  On )  -> 
( R1  |`  om ) : om -1-1-onto-> ( R1 " om ) )
41, 2, 3mp2an 656 . . 3  |-  ( R1  |`  om ) : om -1-1-onto-> ( R1 " om )
5 f1of1 5409 . . 3  |-  ( ( R1  |`  om ) : om -1-1-onto-> ( R1 " om )  ->  ( R1  |`  om ) : om -1-1-> ( R1 " om ) )
64, 5ax-mp 10 . 2  |-  ( R1  |`  om ) : om -1-1-> ( R1 " om )
7 0ex 4124 . . . 4  |-  (/)  e.  _V
8 eleq1 2318 . . . . . 6  |-  ( x  =  (/)  ->  ( x  e.  y  <->  (/)  e.  y ) )
98anbi1d 688 . . . . 5  |-  ( x  =  (/)  ->  ( ( x  e.  y  /\  A. z  e.  y  ~P z  e.  y )  <-> 
( (/)  e.  y  /\  A. z  e.  y  ~P z  e.  y ) ) )
109exbidv 2006 . . . 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 8418 . . . . 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 449 . . . . . . . . 9  |-  ( ( ~P z  C_  y  /\  ~P z  e.  y )  ->  ~P z  e.  y )
1312ralimi 2593 . . . . . . . 8  |-  ( A. z  e.  y  ( ~P z  C_  y  /\  ~P z  e.  y
)  ->  A. z  e.  y  ~P z  e.  y )
1413anim2i 555 . . . . . . 7  |-  ( ( 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 980 . . . . . 6  |-  ( ( 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 ) )
1615eximi 1574 . . . . 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 ) )  ->  E. y ( x  e.  y  /\  A. z  e.  y  ~P z  e.  y ) )
1711, 16ax-mp 10 . . . 4  |-  E. y
( x  e.  y  /\  A. z  e.  y  ~P z  e.  y )
187, 10, 17vtocl 2813 . . 3  |-  E. y
( (/)  e.  y  /\  A. z  e.  y  ~P z  e.  y )
19 r1fnon 7407 . . . . . . . . 9  |-  R1  Fn  On
20 fvelimab 5512 . . . . . . . . 9  |-  ( ( R1  Fn  On  /\  om  C_  On )  ->  (
w  e.  ( R1
" om )  <->  E. x  e.  om  ( R1 `  x )  =  w ) )
2119, 2, 20mp2an 656 . . . . . . . 8  |-  ( w  e.  ( R1 " om )  <->  E. x  e.  om  ( R1 `  x )  =  w )
22 fveq2 5458 . . . . . . . . . . . 12  |-  ( x  =  (/)  ->  ( R1
`  x )  =  ( R1 `  (/) ) )
2322eleq1d 2324 . . . . . . . . . . 11  |-  ( x  =  (/)  ->  ( ( R1 `  x )  e.  y  <->  ( R1 `  (/) )  e.  y
) )
24 fveq2 5458 . . . . . . . . . . . 12  |-  ( x  =  w  ->  ( R1 `  x )  =  ( R1 `  w
) )
2524eleq1d 2324 . . . . . . . . . . 11  |-  ( x  =  w  ->  (
( R1 `  x
)  e.  y  <->  ( R1 `  w )  e.  y ) )
26 fveq2 5458 . . . . . . . . . . . 12  |-  ( x  =  suc  w  -> 
( R1 `  x
)  =  ( R1
`  suc  w )
)
2726eleq1d 2324 . . . . . . . . . . 11  |-  ( x  =  suc  w  -> 
( ( R1 `  x )  e.  y  <-> 
( R1 `  suc  w )  e.  y ) )
28 r10 7408 . . . . . . . . . . . . . 14  |-  ( R1
`  (/) )  =  (/)
2928eleq1i 2321 . . . . . . . . . . . . 13  |-  ( ( R1 `  (/) )  e.  y  <->  (/)  e.  y )
3029biimpri 199 . . . . . . . . . . . 12  |-  ( (/)  e.  y  ->  ( R1
`  (/) )  e.  y )
3130adantr 453 . . . . . . . . . . 11  |-  ( (
(/)  e.  y  /\  A. z  e.  y  ~P z  e.  y )  ->  ( R1 `  (/) )  e.  y )
32 pweq 3602 . . . . . . . . . . . . . . . 16  |-  ( z  =  ( R1 `  w )  ->  ~P z  =  ~P ( R1 `  w ) )
3332eleq1d 2324 . . . . . . . . . . . . . . 15  |-  ( z  =  ( R1 `  w )  ->  ( ~P z  e.  y  <->  ~P ( R1 `  w
)  e.  y ) )
3433rcla4cv 2856 . . . . . . . . . . . . . 14  |-  ( A. z  e.  y  ~P z  e.  y  ->  ( ( R1 `  w
)  e.  y  ->  ~P ( R1 `  w
)  e.  y ) )
35 nnon 4634 . . . . . . . . . . . . . . . . 17  |-  ( w  e.  om  ->  w  e.  On )
36 r1suc 7410 . . . . . . . . . . . . . . . . 17  |-  ( w  e.  On  ->  ( R1 `  suc  w )  =  ~P ( R1
`  w ) )
3735, 36syl 17 . . . . . . . . . . . . . . . 16  |-  ( w  e.  om  ->  ( R1 `  suc  w )  =  ~P ( R1
`  w ) )
3837eleq1d 2324 . . . . . . . . . . . . . . 15  |-  ( w  e.  om  ->  (
( R1 `  suc  w )  e.  y  <->  ~P ( R1 `  w
)  e.  y ) )
3938biimprcd 218 . . . . . . . . . . . . . 14  |-  ( ~P ( R1 `  w
)  e.  y  -> 
( w  e.  om  ->  ( R1 `  suc  w )  e.  y ) )
4034, 39syl6 31 . . . . . . . . . . . . 13  |-  ( A. z  e.  y  ~P z  e.  y  ->  ( ( R1 `  w
)  e.  y  -> 
( w  e.  om  ->  ( R1 `  suc  w )  e.  y ) ) )
4140com3r 75 . . . . . . . . . . . 12  |-  ( w  e.  om  ->  ( A. z  e.  y  ~P z  e.  y  ->  ( ( R1 `  w )  e.  y  ->  ( R1 `  suc  w )  e.  y ) ) )
4241adantld 455 . . . . . . . . . . 11  |-  ( w  e.  om  ->  (
( (/)  e.  y  /\  A. z  e.  y  ~P z  e.  y )  ->  ( ( R1
`  w )  e.  y  ->  ( R1 ` 
suc  w )  e.  y ) ) )
4323, 25, 27, 31, 42finds2 4656 . . . . . . . . . 10  |-  ( x  e.  om  ->  (
( (/)  e.  y  /\  A. z  e.  y  ~P z  e.  y )  ->  ( R1 `  x )  e.  y ) )
44 eleq1 2318 . . . . . . . . . . 11  |-  ( ( R1 `  x )  =  w  ->  (
( R1 `  x
)  e.  y  <->  w  e.  y ) )
4544biimpd 200 . . . . . . . . . 10  |-  ( ( R1 `  x )  =  w  ->  (
( R1 `  x
)  e.  y  ->  w  e.  y )
)
4643, 45syl9 68 . . . . . . . . 9  |-  ( x  e.  om  ->  (
( R1 `  x
)  =  w  -> 
( ( (/)  e.  y  /\  A. z  e.  y  ~P z  e.  y )  ->  w  e.  y ) ) )
4746rexlimiv 2636 . . . . . . . 8  |-  ( E. x  e.  om  ( R1 `  x )  =  w  ->  ( ( (/) 
e.  y  /\  A. z  e.  y  ~P z  e.  y )  ->  w  e.  y ) )
4821, 47sylbi 189 . . . . . . 7  |-  ( w  e.  ( R1 " om )  ->  ( (
(/)  e.  y  /\  A. z  e.  y  ~P z  e.  y )  ->  w  e.  y ) )
4948com12 29 . . . . . 6  |-  ( (
(/)  e.  y  /\  A. z  e.  y  ~P z  e.  y )  ->  ( w  e.  ( R1 " om )  ->  w  e.  y ) )
5049ssrdv 3160 . . . . 5  |-  ( (
(/)  e.  y  /\  A. z  e.  y  ~P z  e.  y )  ->  ( R1 " om )  C_  y )
51 vex 2766 . . . . . 6  |-  y  e. 
_V
5251ssex 4132 . . . . 5  |-  ( ( R1 " om )  C_  y  ->  ( R1 " om )  e.  _V )
5350, 52syl 17 . . . 4  |-  ( (
(/)  e.  y  /\  A. z  e.  y  ~P z  e.  y )  ->  ( R1 " om )  e.  _V )
5453exlimiv 2024 . . 3  |-  ( E. y ( (/)  e.  y  /\  A. z  e.  y  ~P z  e.  y )  ->  ( R1 " om )  e. 
_V )
5518, 54ax-mp 10 . 2  |-  ( R1
" om )  e. 
_V
56 f1dmex 5685 . 2  |-  ( ( ( R1  |`  om ) : om -1-1-> ( R1 " om )  /\  ( R1 " om )  e. 
_V )  ->  om  e.  _V )
576, 55, 56mp2an 656 1  |-  om  e.  _V
Colors of variables: wff set class
Syntax hints:    -> wi 6    <-> wb 178    /\ wa 360    /\ w3a 939   E.wex 1537    = wceq 1619    e. wcel 1621   A.wral 2518   E.wrex 2519   _Vcvv 2763    C_ wss 3127   (/)c0 3430   ~Pcpw 3599   class class class wbr 3997   Oncon0 4364   suc csuc 4366   omcom 4628    |` cres 4663   "cima 4664    Fn wfn 4668   -1-1->wf1 4670   -1-1-onto->wf1o 4672   ` cfv 4673    ~< csdm 6830   R1cr1 7402
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 1927  ax-ext 2239  ax-rep 4105  ax-sep 4115  ax-nul 4123  ax-pow 4160  ax-pr 4186  ax-un 4484  ax-groth 8413
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 1884  df-eu 2122  df-mo 2123  df-clab 2245  df-cleq 2251  df-clel 2254  df-nfc 2383  df-ne 2423  df-ral 2523  df-rex 2524  df-reu 2525  df-rab 2527  df-v 2765  df-sbc 2967  df-csb 3057  df-dif 3130  df-un 3132  df-in 3134  df-ss 3141  df-pss 3143  df-nul 3431  df-if 3540  df-pw 3601  df-sn 3620  df-pr 3621  df-tp 3622  df-op 3623  df-uni 3802  df-iun 3881  df-br 3998  df-opab 4052  df-mpt 4053  df-tr 4088  df-eprel 4277  df-id 4281  df-po 4286  df-so 4287  df-fr 4324  df-we 4326  df-ord 4367  df-on 4368  df-lim 4369  df-suc 4370  df-om 4629  df-xp 4675  df-rel 4676  df-cnv 4677  df-co 4678  df-dm 4679  df-rn 4680  df-res 4681  df-ima 4682  df-fun 4683  df-fn 4684  df-f 4685  df-f1 4686  df-fo 4687  df-f1o 4688  df-fv 4689  df-recs 6356  df-rdg 6391  df-er 6628  df-en 6832  df-dom 6833  df-sdom 6834  df-r1 7404
  Copyright terms: Public domain W3C validator