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

Theorem asymref 4894
Description: Two ways of saying a relation is antisymmetric and reflexive.  U. U. R is the field of a relation by relfld 5037. (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 3900 . . . . . . . . . . 11  |-  ( x R y  <->  <. x ,  y >.  e.  R
)
2 vex 2663 . . . . . . . . . . . 12  |-  x  e. 
_V
3 vex 2663 . . . . . . . . . . . 12  |-  y  e. 
_V
42, 3opeluu 4341 . . . . . . . . . . 11  |-  ( <.
x ,  y >.  e.  R  ->  ( x  e.  U. U. R  /\  y  e.  U. U. R ) )
51, 4sylbi 120 . . . . . . . . . 10  |-  ( x R y  ->  (
x  e.  U. U. R  /\  y  e.  U. U. R ) )
65simpld 111 . . . . . . . . 9  |-  ( x R y  ->  x  e.  U. U. R )
76adantr 274 . . . . . . . 8  |-  ( ( x R y  /\  y R x )  ->  x  e.  U. U. R
)
87pm4.71ri 389 . . . . . . 7  |-  ( ( x R y  /\  y R x )  <->  ( x  e.  U. U. R  /\  ( x R y  /\  y R x ) ) )
98bibi1i 227 . . . . . 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 3229 . . . . . . . 8  |-  ( <.
x ,  y >.  e.  ( R  i^i  `' R )  <->  ( <. x ,  y >.  e.  R  /\  <. x ,  y
>.  e.  `' R ) )
112, 3brcnv 4692 . . . . . . . . . 10  |-  ( x `' R y  <->  y R x )
12 df-br 3900 . . . . . . . . . 10  |-  ( x `' R y  <->  <. x ,  y >.  e.  `' R )
1311, 12bitr3i 185 . . . . . . . . 9  |-  ( y R x  <->  <. x ,  y >.  e.  `' R )
141, 13anbi12i 455 . . . . . . . 8  |-  ( ( x R y  /\  y R x )  <->  ( <. x ,  y >.  e.  R  /\  <. x ,  y
>.  e.  `' R ) )
1510, 14bitr4i 186 . . . . . . 7  |-  ( <.
x ,  y >.  e.  ( R  i^i  `' R )  <->  ( x R y  /\  y R x ) )
163opelres 4794 . . . . . . . 8  |-  ( <.
x ,  y >.  e.  (  _I  |`  U. U. R )  <->  ( <. x ,  y >.  e.  _I  /\  x  e.  U. U. R ) )
17 df-br 3900 . . . . . . . . . 10  |-  ( x  _I  y  <->  <. x ,  y >.  e.  _I  )
183ideq 4661 . . . . . . . . . 10  |-  ( x  _I  y  <->  x  =  y )
1917, 18bitr3i 185 . . . . . . . . 9  |-  ( <.
x ,  y >.  e.  _I  <->  x  =  y
)
2019anbi2ci 454 . . . . . . . 8  |-  ( (
<. x ,  y >.  e.  _I  /\  x  e. 
U. U. R )  <->  ( x  e.  U. U. R  /\  x  =  y )
)
2116, 20bitri 183 . . . . . . 7  |-  ( <.
x ,  y >.  e.  (  _I  |`  U. U. R )  <->  ( x  e.  U. U. R  /\  x  =  y )
)
2215, 21bibi12i 228 . . . . . 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 448 . . . . . 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 211 . . . . 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 1431 . . . 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 1829 . . . 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 183 . . 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 1431 . 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 4887 . . . 4  |-  Rel  `' R
30 relin2 4628 . . . 4  |-  ( Rel  `' R  ->  Rel  ( R  i^i  `' R ) )
3129, 30ax-mp 5 . . 3  |-  Rel  ( R  i^i  `' R )
32 relres 4817 . . 3  |-  Rel  (  _I  |`  U. U. R
)
33 eqrel 4598 . . 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 422 . 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 2398 . 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 211 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 103    <-> wb 104   A.wal 1314    = wceq 1316    e. wcel 1465   A.wral 2393    i^i cin 3040   <.cop 3500   U.cuni 3706   class class class wbr 3899    _I cid 4180   `'ccnv 4508    |` cres 4511   Rel wrel 4514
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-ia1 105  ax-ia2 106  ax-ia3 107  ax-io 683  ax-5 1408  ax-7 1409  ax-gen 1410  ax-ie1 1454  ax-ie2 1455  ax-8 1467  ax-10 1468  ax-11 1469  ax-i12 1470  ax-bndl 1471  ax-4 1472  ax-14 1477  ax-17 1491  ax-i9 1495  ax-ial 1499  ax-i5r 1500  ax-ext 2099  ax-sep 4016  ax-pow 4068  ax-pr 4101
This theorem depends on definitions:  df-bi 116  df-3an 949  df-tru 1319  df-nf 1422  df-sb 1721  df-eu 1980  df-mo 1981  df-clab 2104  df-cleq 2110  df-clel 2113  df-nfc 2247  df-ral 2398  df-rex 2399  df-v 2662  df-un 3045  df-in 3047  df-ss 3054  df-pw 3482  df-sn 3503  df-pr 3504  df-op 3506  df-uni 3707  df-br 3900  df-opab 3960  df-id 4185  df-xp 4515  df-rel 4516  df-cnv 4517  df-res 4521
This theorem is referenced by: (None)
  Copyright terms: Public domain W3C validator