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

Theorem reu6 3249
Description: A way to express restricted uniqueness. (Contributed by NM, 20-Oct-2006.)
Assertion
Ref Expression
reu6  |-  ( E! x  e.  A  ph  <->  E. y  e.  A  A. x  e.  A  ( ph 
<->  x  =  y ) )
Distinct variable groups:    x, y, A    ph, y
Allowed substitution hint:    ph( x)

Proof of Theorem reu6
StepHypRef Expression
1 df-reu 2803 . 2  |-  ( E! x  e.  A  ph  <->  E! x ( x  e.  A  /\  ph )
)
2 19.28v 1925 . . . . 5  |-  ( A. x ( y  e.  A  /\  ( x  e.  A  ->  ( ph 
<->  x  =  y ) ) )  <->  ( y  e.  A  /\  A. x
( x  e.  A  ->  ( ph  <->  x  =  y ) ) ) )
3 eleq1 2524 . . . . . . . . . . . 12  |-  ( x  =  y  ->  (
x  e.  A  <->  y  e.  A ) )
4 sbequ12 1947 . . . . . . . . . . . 12  |-  ( x  =  y  ->  ( ph 
<->  [ y  /  x ] ph ) )
53, 4anbi12d 710 . . . . . . . . . . 11  |-  ( x  =  y  ->  (
( x  e.  A  /\  ph )  <->  ( y  e.  A  /\  [ y  /  x ] ph ) ) )
6 equequ1 1738 . . . . . . . . . . 11  |-  ( x  =  y  ->  (
x  =  y  <->  y  =  y ) )
75, 6bibi12d 321 . . . . . . . . . 10  |-  ( x  =  y  ->  (
( ( x  e.  A  /\  ph )  <->  x  =  y )  <->  ( (
y  e.  A  /\  [ y  /  x ] ph )  <->  y  =  y ) ) )
8 equid 1731 . . . . . . . . . . . 12  |-  y  =  y
98tbt 344 . . . . . . . . . . 11  |-  ( ( y  e.  A  /\  [ y  /  x ] ph )  <->  ( ( y  e.  A  /\  [
y  /  x ] ph )  <->  y  =  y ) )
10 simpl 457 . . . . . . . . . . 11  |-  ( ( y  e.  A  /\  [ y  /  x ] ph )  ->  y  e.  A )
119, 10sylbir 213 . . . . . . . . . 10  |-  ( ( ( y  e.  A  /\  [ y  /  x ] ph )  <->  y  =  y )  ->  y  e.  A )
127, 11syl6bi 228 . . . . . . . . 9  |-  ( x  =  y  ->  (
( ( x  e.  A  /\  ph )  <->  x  =  y )  -> 
y  e.  A ) )
1312spimv 1964 . . . . . . . 8  |-  ( A. x ( ( x  e.  A  /\  ph ) 
<->  x  =  y )  ->  y  e.  A
)
14 bi1 186 . . . . . . . . . . . 12  |-  ( ( ( x  e.  A  /\  ph )  <->  x  =  y )  ->  (
( x  e.  A  /\  ph )  ->  x  =  y ) )
1514expdimp 437 . . . . . . . . . . 11  |-  ( ( ( ( x  e.  A  /\  ph )  <->  x  =  y )  /\  x  e.  A )  ->  ( ph  ->  x  =  y ) )
16 bi2 198 . . . . . . . . . . . . 13  |-  ( ( ( x  e.  A  /\  ph )  <->  x  =  y )  ->  (
x  =  y  -> 
( x  e.  A  /\  ph ) ) )
17 simpr 461 . . . . . . . . . . . . 13  |-  ( ( x  e.  A  /\  ph )  ->  ph )
1816, 17syl6 33 . . . . . . . . . . . 12  |-  ( ( ( x  e.  A  /\  ph )  <->  x  =  y )  ->  (
x  =  y  ->  ph ) )
1918adantr 465 . . . . . . . . . . 11  |-  ( ( ( ( x  e.  A  /\  ph )  <->  x  =  y )  /\  x  e.  A )  ->  ( x  =  y  ->  ph ) )
2015, 19impbid 191 . . . . . . . . . 10  |-  ( ( ( ( x  e.  A  /\  ph )  <->  x  =  y )  /\  x  e.  A )  ->  ( ph  <->  x  =  y ) )
2120ex 434 . . . . . . . . 9  |-  ( ( ( x  e.  A  /\  ph )  <->  x  =  y )  ->  (
x  e.  A  -> 
( ph  <->  x  =  y
) ) )
2221sps 1804 . . . . . . . 8  |-  ( A. x ( ( x  e.  A  /\  ph ) 
<->  x  =  y )  ->  ( x  e.  A  ->  ( ph  <->  x  =  y ) ) )
2313, 22jca 532 . . . . . . 7  |-  ( A. x ( ( x  e.  A  /\  ph ) 
<->  x  =  y )  ->  ( y  e.  A  /\  ( x  e.  A  ->  ( ph 
<->  x  =  y ) ) ) )
2423axc4i 1836 . . . . . 6  |-  ( A. x ( ( x  e.  A  /\  ph ) 
<->  x  =  y )  ->  A. x ( y  e.  A  /\  (
x  e.  A  -> 
( ph  <->  x  =  y
) ) ) )
25 bi1 186 . . . . . . . . . . 11  |-  ( (
ph 
<->  x  =  y )  ->  ( ph  ->  x  =  y ) )
2625imim2i 14 . . . . . . . . . 10  |-  ( ( x  e.  A  -> 
( ph  <->  x  =  y
) )  ->  (
x  e.  A  -> 
( ph  ->  x  =  y ) ) )
2726impd 431 . . . . . . . . 9  |-  ( ( x  e.  A  -> 
( ph  <->  x  =  y
) )  ->  (
( x  e.  A  /\  ph )  ->  x  =  y ) )
2827adantl 466 . . . . . . . 8  |-  ( ( y  e.  A  /\  ( x  e.  A  ->  ( ph  <->  x  =  y ) ) )  ->  ( ( x  e.  A  /\  ph )  ->  x  =  y ) )
29 eleq1a 2535 . . . . . . . . . . . 12  |-  ( y  e.  A  ->  (
x  =  y  ->  x  e.  A )
)
3029adantr 465 . . . . . . . . . . 11  |-  ( ( y  e.  A  /\  ( x  e.  A  ->  ( ph  <->  x  =  y ) ) )  ->  ( x  =  y  ->  x  e.  A ) )
3130imp 429 . . . . . . . . . 10  |-  ( ( ( y  e.  A  /\  ( x  e.  A  ->  ( ph  <->  x  =  y ) ) )  /\  x  =  y )  ->  x  e.  A )
32 bi2 198 . . . . . . . . . . . . . 14  |-  ( (
ph 
<->  x  =  y )  ->  ( x  =  y  ->  ph ) )
3332imim2i 14 . . . . . . . . . . . . 13  |-  ( ( x  e.  A  -> 
( ph  <->  x  =  y
) )  ->  (
x  e.  A  -> 
( x  =  y  ->  ph ) ) )
3433com23 78 . . . . . . . . . . . 12  |-  ( ( x  e.  A  -> 
( ph  <->  x  =  y
) )  ->  (
x  =  y  -> 
( x  e.  A  ->  ph ) ) )
3534imp 429 . . . . . . . . . . 11  |-  ( ( ( x  e.  A  ->  ( ph  <->  x  =  y ) )  /\  x  =  y )  ->  ( x  e.  A  ->  ph ) )
3635adantll 713 . . . . . . . . . 10  |-  ( ( ( y  e.  A  /\  ( x  e.  A  ->  ( ph  <->  x  =  y ) ) )  /\  x  =  y )  ->  ( x  e.  A  ->  ph )
)
3731, 36jcai 536 . . . . . . . . 9  |-  ( ( ( y  e.  A  /\  ( x  e.  A  ->  ( ph  <->  x  =  y ) ) )  /\  x  =  y )  ->  ( x  e.  A  /\  ph )
)
3837ex 434 . . . . . . . 8  |-  ( ( y  e.  A  /\  ( x  e.  A  ->  ( ph  <->  x  =  y ) ) )  ->  ( x  =  y  ->  ( x  e.  A  /\  ph )
) )
3928, 38impbid 191 . . . . . . 7  |-  ( ( y  e.  A  /\  ( x  e.  A  ->  ( ph  <->  x  =  y ) ) )  ->  ( ( x  e.  A  /\  ph ) 
<->  x  =  y ) )
4039alimi 1605 . . . . . 6  |-  ( A. x ( y  e.  A  /\  ( x  e.  A  ->  ( ph 
<->  x  =  y ) ) )  ->  A. x
( ( x  e.  A  /\  ph )  <->  x  =  y ) )
4124, 40impbii 188 . . . . 5  |-  ( A. x ( ( x  e.  A  /\  ph ) 
<->  x  =  y )  <->  A. x ( y  e.  A  /\  ( x  e.  A  ->  ( ph 
<->  x  =  y ) ) ) )
42 df-ral 2801 . . . . . 6  |-  ( A. x  e.  A  ( ph 
<->  x  =  y )  <->  A. x ( x  e.  A  ->  ( ph  <->  x  =  y ) ) )
4342anbi2i 694 . . . . 5  |-  ( ( y  e.  A  /\  A. x  e.  A  (
ph 
<->  x  =  y ) )  <->  ( y  e.  A  /\  A. x
( x  e.  A  ->  ( ph  <->  x  =  y ) ) ) )
442, 41, 433bitr4i 277 . . . 4  |-  ( A. x ( ( x  e.  A  /\  ph ) 
<->  x  =  y )  <-> 
( y  e.  A  /\  A. x  e.  A  ( ph  <->  x  =  y
) ) )
4544exbii 1635 . . 3  |-  ( E. y A. x ( ( x  e.  A  /\  ph )  <->  x  =  y )  <->  E. y
( y  e.  A  /\  A. x  e.  A  ( ph  <->  x  =  y
) ) )
46 df-eu 2265 . . 3  |-  ( E! x ( x  e.  A  /\  ph )  <->  E. y A. x ( ( x  e.  A  /\  ph )  <->  x  =  y ) )
47 df-rex 2802 . . 3  |-  ( E. y  e.  A  A. x  e.  A  ( ph 
<->  x  =  y )  <->  E. y ( y  e.  A  /\  A. x  e.  A  ( ph  <->  x  =  y ) ) )
4845, 46, 473bitr4i 277 . 2  |-  ( E! x ( x  e.  A  /\  ph )  <->  E. y  e.  A  A. x  e.  A  ( ph 
<->  x  =  y ) )
491, 48bitri 249 1  |-  ( E! x  e.  A  ph  <->  E. y  e.  A  A. x  e.  A  ( ph 
<->  x  =  y ) )
Colors of variables: wff setvar class
Syntax hints:    -> wi 4    <-> wb 184    /\ wa 369   A.wal 1368   E.wex 1587   [wsb 1702    e. wcel 1758   E!weu 2261   A.wral 2796   E.wrex 2797   E!wreu 2798
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1592  ax-4 1603  ax-5 1671  ax-6 1710  ax-7 1730  ax-10 1777  ax-12 1794  ax-13 1954  ax-ext 2431
This theorem depends on definitions:  df-bi 185  df-an 371  df-ex 1588  df-nf 1591  df-sb 1703  df-eu 2265  df-cleq 2444  df-clel 2447  df-ral 2801  df-rex 2802  df-reu 2803
This theorem is referenced by:  reu3  3250  reu6i  3251  reu8  3256  xpf1o  7578  ufileu  19619  isppw2  22581  cusgrafilem2  23535  fgreu  26136  fcnvgreu  26137
  Copyright terms: Public domain W3C validator