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

Theorem asymref 4710
Description: Two ways of saying a relation is antisymmetric and reflexive.  U. U. R is the field of a relation by relfld 4846. (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 3765 . . . . . . . . . . 11  |-  ( x R y  <->  <. x ,  y >.  e.  R
)
2 vex 2560 . . . . . . . . . . . 12  |-  x  e. 
_V
3 vex 2560 . . . . . . . . . . . 12  |-  y  e. 
_V
42, 3opeluu 4182 . . . . . . . . . . 11  |-  ( <.
x ,  y >.  e.  R  ->  ( x  e.  U. U. R  /\  y  e.  U. U. R ) )
51, 4sylbi 114 . . . . . . . . . 10  |-  ( x R y  ->  (
x  e.  U. U. R  /\  y  e.  U. U. R ) )
65simpld 105 . . . . . . . . 9  |-  ( x R y  ->  x  e.  U. U. R )
76adantr 261 . . . . . . . 8  |-  ( ( x R y  /\  y R x )  ->  x  e.  U. U. R
)
87pm4.71ri 372 . . . . . . 7  |-  ( ( x R y  /\  y R x )  <->  ( x  e.  U. U. R  /\  ( x R y  /\  y R x ) ) )
98bibi1i 217 . . . . . 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 3126 . . . . . . . 8  |-  ( <.
x ,  y >.  e.  ( R  i^i  `' R )  <->  ( <. x ,  y >.  e.  R  /\  <. x ,  y
>.  e.  `' R ) )
112, 3brcnv 4518 . . . . . . . . . 10  |-  ( x `' R y  <->  y R x )
12 df-br 3765 . . . . . . . . . 10  |-  ( x `' R y  <->  <. x ,  y >.  e.  `' R )
1311, 12bitr3i 175 . . . . . . . . 9  |-  ( y R x  <->  <. x ,  y >.  e.  `' R )
141, 13anbi12i 433 . . . . . . . 8  |-  ( ( x R y  /\  y R x )  <->  ( <. x ,  y >.  e.  R  /\  <. x ,  y
>.  e.  `' R ) )
1510, 14bitr4i 176 . . . . . . 7  |-  ( <.
x ,  y >.  e.  ( R  i^i  `' R )  <->  ( x R y  /\  y R x ) )
163opelres 4617 . . . . . . . 8  |-  ( <.
x ,  y >.  e.  (  _I  |`  U. U. R )  <->  ( <. x ,  y >.  e.  _I  /\  x  e.  U. U. R ) )
17 df-br 3765 . . . . . . . . . 10  |-  ( x  _I  y  <->  <. x ,  y >.  e.  _I  )
183ideq 4488 . . . . . . . . . 10  |-  ( x  _I  y  <->  x  =  y )
1917, 18bitr3i 175 . . . . . . . . 9  |-  ( <.
x ,  y >.  e.  _I  <->  x  =  y
)
2019anbi2ci 432 . . . . . . . 8  |-  ( (
<. x ,  y >.  e.  _I  /\  x  e. 
U. U. R )  <->  ( x  e.  U. U. R  /\  x  =  y )
)
2116, 20bitri 173 . . . . . . 7  |-  ( <.
x ,  y >.  e.  (  _I  |`  U. U. R )  <->  ( x  e.  U. U. R  /\  x  =  y )
)
2215, 21bibi12i 218 . . . . . 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 426 . . . . . 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 201 . . . . 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 1359 . . . 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 1753 . . . 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 173 . . 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 1359 . 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 4703 . . . 4  |-  Rel  `' R
30 relin2 4456 . . . 4  |-  ( Rel  `' R  ->  Rel  ( R  i^i  `' R ) )
3129, 30ax-mp 7 . . 3  |-  Rel  ( R  i^i  `' R )
32 relres 4639 . . 3  |-  Rel  (  _I  |`  U. U. R
)
33 eqrel 4429 . . 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 402 . 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 2311 . 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 201 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 97    <-> wb 98   A.wal 1241    = wceq 1243    e. wcel 1393   A.wral 2306    i^i cin 2916   <.cop 3378   U.cuni 3580   class class class wbr 3764    _I cid 4025   `'ccnv 4344    |` cres 4347   Rel wrel 4350
This theorem was proved from axioms:  ax-1 5  ax-2 6  ax-mp 7  ax-ia1 99  ax-ia2 100  ax-ia3 101  ax-io 630  ax-5 1336  ax-7 1337  ax-gen 1338  ax-ie1 1382  ax-ie2 1383  ax-8 1395  ax-10 1396  ax-11 1397  ax-i12 1398  ax-bndl 1399  ax-4 1400  ax-14 1405  ax-17 1419  ax-i9 1423  ax-ial 1427  ax-i5r 1428  ax-ext 2022  ax-sep 3875  ax-pow 3927  ax-pr 3944
This theorem depends on definitions:  df-bi 110  df-3an 887  df-tru 1246  df-nf 1350  df-sb 1646  df-eu 1903  df-mo 1904  df-clab 2027  df-cleq 2033  df-clel 2036  df-nfc 2167  df-ral 2311  df-rex 2312  df-v 2559  df-un 2922  df-in 2924  df-ss 2931  df-pw 3361  df-sn 3381  df-pr 3382  df-op 3384  df-uni 3581  df-br 3765  df-opab 3819  df-id 4030  df-xp 4351  df-rel 4352  df-cnv 4353  df-res 4357
This theorem is referenced by: (None)
  Copyright terms: Public domain W3C validator