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

Theorem asymref 5016
Description: Two ways of saying a relation is antisymmetric and reflexive.  U. U. R is the field of a relation by relfld 5159. (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 4006 . . . . . . . . . . 11  |-  ( x R y  <->  <. x ,  y >.  e.  R
)
2 vex 2742 . . . . . . . . . . . 12  |-  x  e. 
_V
3 vex 2742 . . . . . . . . . . . 12  |-  y  e. 
_V
42, 3opeluu 4452 . . . . . . . . . . 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 3320 . . . . . . . 8  |-  ( <.
x ,  y >.  e.  ( R  i^i  `' R )  <->  ( <. x ,  y >.  e.  R  /\  <. x ,  y
>.  e.  `' R ) )
112, 3brcnv 4812 . . . . . . . . . 10  |-  ( x `' R y  <->  y R x )
12 df-br 4006 . . . . . . . . . 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 4914 . . . . . . . 8  |-  ( <.
x ,  y >.  e.  (  _I  |`  U. U. R )  <->  ( <. x ,  y >.  e.  _I  /\  x  e.  U. U. R ) )
17 df-br 4006 . . . . . . . . . 10  |-  ( x  _I  y  <->  <. x ,  y >.  e.  _I  )
183ideq 4781 . . . . . . . . . 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 1470 . . . 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 1873 . . . 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 1470 . 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 5008 . . . 4  |-  Rel  `' R
30 relin2 4747 . . . 4  |-  ( Rel  `' R  ->  Rel  ( R  i^i  `' R ) )
3129, 30ax-mp 5 . . 3  |-  Rel  ( R  i^i  `' R )
32 relres 4937 . . 3  |-  Rel  (  _I  |`  U. U. R
)
33 eqrel 4717 . . 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 2460 . 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 1351    = wceq 1353    e. wcel 2148   A.wral 2455    i^i cin 3130   <.cop 3597   U.cuni 3811   class class class wbr 4005    _I cid 4290   `'ccnv 4627    |` cres 4630   Rel wrel 4633
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 709  ax-5 1447  ax-7 1448  ax-gen 1449  ax-ie1 1493  ax-ie2 1494  ax-8 1504  ax-10 1505  ax-11 1506  ax-i12 1507  ax-bndl 1509  ax-4 1510  ax-17 1526  ax-i9 1530  ax-ial 1534  ax-i5r 1535  ax-14 2151  ax-ext 2159  ax-sep 4123  ax-pow 4176  ax-pr 4211
This theorem depends on definitions:  df-bi 117  df-3an 980  df-tru 1356  df-nf 1461  df-sb 1763  df-eu 2029  df-mo 2030  df-clab 2164  df-cleq 2170  df-clel 2173  df-nfc 2308  df-ral 2460  df-rex 2461  df-v 2741  df-un 3135  df-in 3137  df-ss 3144  df-pw 3579  df-sn 3600  df-pr 3601  df-op 3603  df-uni 3812  df-br 4006  df-opab 4067  df-id 4295  df-xp 4634  df-rel 4635  df-cnv 4636  df-res 4640
This theorem is referenced by: (None)
  Copyright terms: Public domain W3C validator