ILE Home Intuitionistic Logic Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  ILE Home  >  Th. List  >  asymref Unicode version

Theorem asymref 5129
Description: Two ways of saying a relation is antisymmetric and reflexive.  U. U. R is the field of a relation by relfld 5272. (Contributed by NM, 6-May-2008.) (Proof shortened by Andrew Salmon, 27-Aug-2011.)
Assertion
Ref Expression
asymref  |-  ( ( R  i^i  `' R
)  =  (  _I  |`  U. U. R )  <->  A. x  e.  U. U. R A. y ( ( x R y  /\  y R x )  <->  x  =  y ) )
Distinct variable group:    x, y, R

Proof of Theorem asymref
StepHypRef Expression
1 df-br 4094 . . . . . . . . . . 11  |-  ( x R y  <->  <. x ,  y >.  e.  R
)
2 vex 2806 . . . . . . . . . . . 12  |-  x  e. 
_V
3 vex 2806 . . . . . . . . . . . 12  |-  y  e. 
_V
42, 3opeluu 4553 . . . . . . . . . . 11  |-  ( <.
x ,  y >.  e.  R  ->  ( x  e.  U. U. R  /\  y  e.  U. U. R ) )
51, 4sylbi 121 . . . . . . . . . 10  |-  ( x R y  ->  (
x  e.  U. U. R  /\  y  e.  U. U. R ) )
65simpld 112 . . . . . . . . 9  |-  ( x R y  ->  x  e.  U. U. R )
76adantr 276 . . . . . . . 8  |-  ( ( x R y  /\  y R x )  ->  x  e.  U. U. R
)
87pm4.71ri 392 . . . . . . 7  |-  ( ( x R y  /\  y R x )  <->  ( x  e.  U. U. R  /\  ( x R y  /\  y R x ) ) )
98bibi1i 228 . . . . . 6  |-  ( ( ( x R y  /\  y R x )  <->  ( x  e. 
U. U. R  /\  x  =  y ) )  <-> 
( ( x  e. 
U. U. R  /\  (
x R y  /\  y R x ) )  <-> 
( x  e.  U. U. R  /\  x  =  y ) ) )
10 elin 3392 . . . . . . . 8  |-  ( <.
x ,  y >.  e.  ( R  i^i  `' R )  <->  ( <. x ,  y >.  e.  R  /\  <. x ,  y
>.  e.  `' R ) )
112, 3brcnv 4919 . . . . . . . . . 10  |-  ( x `' R y  <->  y R x )
12 df-br 4094 . . . . . . . . . 10  |-  ( x `' R y  <->  <. x ,  y >.  e.  `' R )
1311, 12bitr3i 186 . . . . . . . . 9  |-  ( y R x  <->  <. x ,  y >.  e.  `' R )
141, 13anbi12i 460 . . . . . . . 8  |-  ( ( x R y  /\  y R x )  <->  ( <. x ,  y >.  e.  R  /\  <. x ,  y
>.  e.  `' R ) )
1510, 14bitr4i 187 . . . . . . 7  |-  ( <.
x ,  y >.  e.  ( R  i^i  `' R )  <->  ( x R y  /\  y R x ) )
163opelres 5024 . . . . . . . 8  |-  ( <.
x ,  y >.  e.  (  _I  |`  U. U. R )  <->  ( <. x ,  y >.  e.  _I  /\  x  e.  U. U. R ) )
17 df-br 4094 . . . . . . . . . 10  |-  ( x  _I  y  <->  <. x ,  y >.  e.  _I  )
183ideq 4888 . . . . . . . . . 10  |-  ( x  _I  y  <->  x  =  y )
1917, 18bitr3i 186 . . . . . . . . 9  |-  ( <.
x ,  y >.  e.  _I  <->  x  =  y
)
2019anbi2ci 459 . . . . . . . 8  |-  ( (
<. x ,  y >.  e.  _I  /\  x  e. 
U. U. R )  <->  ( x  e.  U. U. R  /\  x  =  y )
)
2116, 20bitri 184 . . . . . . 7  |-  ( <.
x ,  y >.  e.  (  _I  |`  U. U. R )  <->  ( x  e.  U. U. R  /\  x  =  y )
)
2215, 21bibi12i 229 . . . . . 6  |-  ( (
<. x ,  y >.  e.  ( R  i^i  `' R )  <->  <. x ,  y >.  e.  (  _I  |`  U. U. R
) )  <->  ( (
x R y  /\  y R x )  <->  ( x  e.  U. U. R  /\  x  =  y )
) )
23 pm5.32 453 . . . . . 6  |-  ( ( x  e.  U. U. R  ->  ( ( x R y  /\  y R x )  <->  x  =  y ) )  <->  ( (
x  e.  U. U. R  /\  ( x R y  /\  y R x ) )  <->  ( x  e.  U. U. R  /\  x  =  y )
) )
249, 22, 233bitr4i 212 . . . . 5  |-  ( (
<. x ,  y >.  e.  ( R  i^i  `' R )  <->  <. x ,  y >.  e.  (  _I  |`  U. U. R
) )  <->  ( x  e.  U. U. R  -> 
( ( x R y  /\  y R x )  <->  x  =  y ) ) )
2524albii 1519 . . . 4  |-  ( A. y ( <. x ,  y >.  e.  ( R  i^i  `' R
)  <->  <. x ,  y
>.  e.  (  _I  |`  U. U. R ) )  <->  A. y
( x  e.  U. U. R  ->  ( (
x R y  /\  y R x )  <->  x  =  y ) ) )
26 19.21v 1921 . . . 4  |-  ( A. y ( x  e. 
U. U. R  ->  (
( x R y  /\  y R x )  <->  x  =  y
) )  <->  ( x  e.  U. U. R  ->  A. y ( ( x R y  /\  y R x )  <->  x  =  y ) ) )
2725, 26bitri 184 . . 3  |-  ( A. y ( <. x ,  y >.  e.  ( R  i^i  `' R
)  <->  <. x ,  y
>.  e.  (  _I  |`  U. U. R ) )  <->  ( x  e.  U. U. R  ->  A. y ( ( x R y  /\  y R x )  <->  x  =  y ) ) )
2827albii 1519 . 2  |-  ( A. x A. y ( <.
x ,  y >.  e.  ( R  i^i  `' R )  <->  <. x ,  y >.  e.  (  _I  |`  U. U. R
) )  <->  A. x
( x  e.  U. U. R  ->  A. y
( ( x R y  /\  y R x )  <->  x  =  y ) ) )
29 relcnv 5121 . . . 4  |-  Rel  `' R
30 relin2 4852 . . . 4  |-  ( Rel  `' R  ->  Rel  ( R  i^i  `' R ) )
3129, 30ax-mp 5 . . 3  |-  Rel  ( R  i^i  `' R )
32 relres 5047 . . 3  |-  Rel  (  _I  |`  U. U. R
)
33 eqrel 4821 . . 3  |-  ( ( Rel  ( R  i^i  `' R )  /\  Rel  (  _I  |`  U. U. R ) )  -> 
( ( R  i^i  `' R )  =  (  _I  |`  U. U. R
)  <->  A. x A. y
( <. x ,  y
>.  e.  ( R  i^i  `' R )  <->  <. x ,  y >.  e.  (  _I  |`  U. U. R
) ) ) )
3431, 32, 33mp2an 426 . 2  |-  ( ( R  i^i  `' R
)  =  (  _I  |`  U. U. R )  <->  A. x A. y (
<. x ,  y >.  e.  ( R  i^i  `' R )  <->  <. x ,  y >.  e.  (  _I  |`  U. U. R
) ) )
35 df-ral 2516 . 2  |-  ( A. x  e.  U. U. R A. y ( ( x R y  /\  y R x )  <->  x  =  y )  <->  A. x
( x  e.  U. U. R  ->  A. y
( ( x R y  /\  y R x )  <->  x  =  y ) ) )
3628, 34, 353bitr4i 212 1  |-  ( ( R  i^i  `' R
)  =  (  _I  |`  U. U. R )  <->  A. x  e.  U. U. R A. y ( ( x R y  /\  y R x )  <->  x  =  y ) )
Colors of variables: wff set class
Syntax hints:    -> wi 4    /\ wa 104    <-> wb 105   A.wal 1396    = wceq 1398    e. wcel 2202   A.wral 2511    i^i cin 3200   <.cop 3676   U.cuni 3898   class class class wbr 4093    _I cid 4391   `'ccnv 4730    |` cres 4733   Rel wrel 4736
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-ia1 106  ax-ia2 107  ax-ia3 108  ax-io 717  ax-5 1496  ax-7 1497  ax-gen 1498  ax-ie1 1542  ax-ie2 1543  ax-8 1553  ax-10 1554  ax-11 1555  ax-i12 1556  ax-bndl 1558  ax-4 1559  ax-17 1575  ax-i9 1579  ax-ial 1583  ax-i5r 1584  ax-14 2205  ax-ext 2213  ax-sep 4212  ax-pow 4270  ax-pr 4305
This theorem depends on definitions:  df-bi 117  df-3an 1007  df-tru 1401  df-nf 1510  df-sb 1811  df-eu 2082  df-mo 2083  df-clab 2218  df-cleq 2224  df-clel 2227  df-nfc 2364  df-ral 2516  df-rex 2517  df-v 2805  df-un 3205  df-in 3207  df-ss 3214  df-pw 3658  df-sn 3679  df-pr 3680  df-op 3682  df-uni 3899  df-br 4094  df-opab 4156  df-id 4396  df-xp 4737  df-rel 4738  df-cnv 4739  df-res 4743
This theorem is referenced by: (None)
  Copyright terms: Public domain W3C validator