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

Theorem zfpair 4693
Description: The Axiom of Pairing of Zermelo-Fraenkel set theory. Axiom 2 of [TakeutiZaring] p. 15. In some textbooks this is stated as a separate axiom; here we show it is redundant since it can be derived from the other axioms.

This theorem should not be referenced by any proof other than axpr 4694. Instead, use zfpair2 4696 below so that the uses of the Axiom of Pairing can be more easily identified. (Contributed by NM, 18-Oct-1995.) (New usage is discouraged.)

Assertion
Ref Expression
zfpair  |-  { x ,  y }  e.  _V

Proof of Theorem zfpair
Dummy variables  z  w  v are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 dfpr2 4047 . 2  |-  { x ,  y }  =  { w  |  (
w  =  x  \/  w  =  y ) }
2 19.43 1694 . . . . 5  |-  ( E. z ( ( z  =  (/)  /\  w  =  x )  \/  (
z  =  { (/) }  /\  w  =  y ) )  <->  ( E. z ( z  =  (/)  /\  w  =  x )  \/  E. z
( z  =  { (/)
}  /\  w  =  y ) ) )
3 prlem2 963 . . . . . 6  |-  ( ( ( z  =  (/)  /\  w  =  x )  \/  ( z  =  { (/) }  /\  w  =  y ) )  <-> 
( ( z  =  (/)  \/  z  =  { (/)
} )  /\  (
( z  =  (/)  /\  w  =  x )  \/  ( z  =  { (/) }  /\  w  =  y ) ) ) )
43exbii 1668 . . . . 5  |-  ( E. z ( ( z  =  (/)  /\  w  =  x )  \/  (
z  =  { (/) }  /\  w  =  y ) )  <->  E. z
( ( z  =  (/)  \/  z  =  { (/)
} )  /\  (
( z  =  (/)  /\  w  =  x )  \/  ( z  =  { (/) }  /\  w  =  y ) ) ) )
5 0ex 4587 . . . . . . . 8  |-  (/)  e.  _V
65isseti 3115 . . . . . . 7  |-  E. z 
z  =  (/)
7 19.41v 1772 . . . . . . 7  |-  ( E. z ( z  =  (/)  /\  w  =  x )  <->  ( E. z 
z  =  (/)  /\  w  =  x ) )
86, 7mpbiran 918 . . . . . 6  |-  ( E. z ( z  =  (/)  /\  w  =  x )  <->  w  =  x
)
9 p0ex 4643 . . . . . . . 8  |-  { (/) }  e.  _V
109isseti 3115 . . . . . . 7  |-  E. z 
z  =  { (/) }
11 19.41v 1772 . . . . . . 7  |-  ( E. z ( z  =  { (/) }  /\  w  =  y )  <->  ( E. z  z  =  { (/)
}  /\  w  =  y ) )
1210, 11mpbiran 918 . . . . . 6  |-  ( E. z ( z  =  { (/) }  /\  w  =  y )  <->  w  =  y )
138, 12orbi12i 521 . . . . 5  |-  ( ( E. z ( z  =  (/)  /\  w  =  x )  \/  E. z ( z  =  { (/) }  /\  w  =  y ) )  <-> 
( w  =  x  \/  w  =  y ) )
142, 4, 133bitr3ri 276 . . . 4  |-  ( ( w  =  x  \/  w  =  y )  <->  E. z ( ( z  =  (/)  \/  z  =  { (/) } )  /\  ( ( z  =  (/)  /\  w  =  x )  \/  ( z  =  { (/) }  /\  w  =  y )
) ) )
1514abbii 2591 . . 3  |-  { w  |  ( w  =  x  \/  w  =  y ) }  =  { w  |  E. z ( ( z  =  (/)  \/  z  =  { (/) } )  /\  ( ( z  =  (/)  /\  w  =  x )  \/  ( z  =  { (/) }  /\  w  =  y )
) ) }
16 dfpr2 4047 . . . . 5  |-  { (/) ,  { (/) } }  =  { z  |  ( z  =  (/)  \/  z  =  { (/) } ) }
17 pp0ex 4645 . . . . 5  |-  { (/) ,  { (/) } }  e.  _V
1816, 17eqeltrri 2542 . . . 4  |-  { z  |  ( z  =  (/)  \/  z  =  { (/)
} ) }  e.  _V
19 equequ2 1800 . . . . . . . 8  |-  ( v  =  x  ->  (
w  =  v  <->  w  =  x ) )
20 0inp0 4628 . . . . . . . 8  |-  ( z  =  (/)  ->  -.  z  =  { (/) } )
2119, 20prlem1 962 . . . . . . 7  |-  ( v  =  x  ->  (
z  =  (/)  ->  (
( ( z  =  (/)  /\  w  =  x )  \/  ( z  =  { (/) }  /\  w  =  y )
)  ->  w  =  v ) ) )
2221alrimdv 1722 . . . . . 6  |-  ( v  =  x  ->  (
z  =  (/)  ->  A. w
( ( ( z  =  (/)  /\  w  =  x )  \/  (
z  =  { (/) }  /\  w  =  y ) )  ->  w  =  v ) ) )
2322spimev 2011 . . . . 5  |-  ( z  =  (/)  ->  E. v A. w ( ( ( z  =  (/)  /\  w  =  x )  \/  (
z  =  { (/) }  /\  w  =  y ) )  ->  w  =  v ) )
24 orcom 387 . . . . . . . 8  |-  ( ( ( z  =  (/)  /\  w  =  x )  \/  ( z  =  { (/) }  /\  w  =  y ) )  <-> 
( ( z  =  { (/) }  /\  w  =  y )  \/  ( z  =  (/)  /\  w  =  x ) ) )
25 equequ2 1800 . . . . . . . . 9  |-  ( v  =  y  ->  (
w  =  v  <->  w  =  y ) )
2620con2i 120 . . . . . . . . 9  |-  ( z  =  { (/) }  ->  -.  z  =  (/) )
2725, 26prlem1 962 . . . . . . . 8  |-  ( v  =  y  ->  (
z  =  { (/) }  ->  ( ( ( z  =  { (/) }  /\  w  =  y )  \/  ( z  =  (/)  /\  w  =  x ) )  ->  w  =  v )
) )
2824, 27syl7bi 230 . . . . . . 7  |-  ( v  =  y  ->  (
z  =  { (/) }  ->  ( ( ( z  =  (/)  /\  w  =  x )  \/  (
z  =  { (/) }  /\  w  =  y ) )  ->  w  =  v ) ) )
2928alrimdv 1722 . . . . . 6  |-  ( v  =  y  ->  (
z  =  { (/) }  ->  A. w ( ( ( z  =  (/)  /\  w  =  x )  \/  ( z  =  { (/) }  /\  w  =  y ) )  ->  w  =  v ) ) )
3029spimev 2011 . . . . 5  |-  ( z  =  { (/) }  ->  E. v A. w ( ( ( z  =  (/)  /\  w  =  x )  \/  ( z  =  { (/) }  /\  w  =  y )
)  ->  w  =  v ) )
3123, 30jaoi 379 . . . 4  |-  ( ( z  =  (/)  \/  z  =  { (/) } )  ->  E. v A. w ( ( ( z  =  (/)  /\  w  =  x )  \/  ( z  =  { (/) }  /\  w  =  y )
)  ->  w  =  v ) )
3218, 31zfrep4 4576 . . 3  |-  { w  |  E. z ( ( z  =  (/)  \/  z  =  { (/) } )  /\  ( ( z  =  (/)  /\  w  =  x )  \/  ( z  =  { (/) }  /\  w  =  y )
) ) }  e.  _V
3315, 32eqeltri 2541 . 2  |-  { w  |  ( w  =  x  \/  w  =  y ) }  e.  _V
341, 33eqeltri 2541 1  |-  { x ,  y }  e.  _V
Colors of variables: wff setvar class
Syntax hints:    -> wi 4    \/ wo 368    /\ wa 369   A.wal 1393    = wceq 1395   E.wex 1613    e. wcel 1819   {cab 2442   _Vcvv 3109   (/)c0 3793   {csn 4032   {cpr 4034
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1619  ax-4 1632  ax-5 1705  ax-6 1748  ax-7 1791  ax-9 1823  ax-10 1838  ax-11 1843  ax-12 1855  ax-13 2000  ax-ext 2435  ax-rep 4568  ax-sep 4578  ax-nul 4586  ax-pow 4634
This theorem depends on definitions:  df-bi 185  df-or 370  df-an 371  df-3an 975  df-tru 1398  df-ex 1614  df-nf 1618  df-sb 1741  df-clab 2443  df-cleq 2449  df-clel 2452  df-nfc 2607  df-ne 2654  df-v 3111  df-dif 3474  df-un 3476  df-in 3478  df-ss 3485  df-nul 3794  df-pw 4017  df-sn 4033  df-pr 4035
This theorem is referenced by:  axpr  4694
  Copyright terms: Public domain W3C validator