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

Theorem cnvpom 5271
Description: The converse of a partial order relation is a partial order relation. (Contributed by NM, 15-Jun-2005.)
Assertion
Ref Expression
cnvpom  |-  ( E. x  x  e.  A  ->  ( R  Po  A  <->  `' R  Po  A ) )
Distinct variable groups:    x, A    x, R

Proof of Theorem cnvpom
Dummy variables  y  z  w are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 r19.26 2657 . . . . . . 7  |-  ( A. w  e.  A  ( A. z  e.  A  -.  w R w  /\  A. z  e.  A  ( ( w R y  /\  y R z )  ->  w R
z ) )  <->  ( A. w  e.  A  A. z  e.  A  -.  w R w  /\  A. w  e.  A  A. z  e.  A  (
( w R y  /\  y R z )  ->  w R
z ) ) )
2 ralidm 3592 . . . . . . . . 9  |-  ( A. w  e.  A  A. w  e.  A  -.  w R w  <->  A. w  e.  A  -.  w R w )
3 r19.3rmv 3582 . . . . . . . . . 10  |-  ( E. x  x  e.  A  ->  ( -.  w R w  <->  A. z  e.  A  -.  w R w ) )
43ralbidv 2530 . . . . . . . . 9  |-  ( E. x  x  e.  A  ->  ( A. w  e.  A  -.  w R w  <->  A. w  e.  A  A. z  e.  A  -.  w R w ) )
52, 4bitr2id 193 . . . . . . . 8  |-  ( E. x  x  e.  A  ->  ( A. w  e.  A  A. z  e.  A  -.  w R w  <->  A. w  e.  A  A. w  e.  A  -.  w R w ) )
65anbi1d 465 . . . . . . 7  |-  ( E. x  x  e.  A  ->  ( ( A. w  e.  A  A. z  e.  A  -.  w R w  /\  A. w  e.  A  A. z  e.  A  ( (
w R y  /\  y R z )  ->  w R z ) )  <-> 
( A. w  e.  A  A. w  e.  A  -.  w R w  /\  A. w  e.  A  A. z  e.  A  ( (
w R y  /\  y R z )  ->  w R z ) ) ) )
71, 6bitrid 192 . . . . . 6  |-  ( E. x  x  e.  A  ->  ( A. w  e.  A  ( A. z  e.  A  -.  w R w  /\  A. z  e.  A  ( (
w R y  /\  y R z )  ->  w R z ) )  <-> 
( A. w  e.  A  A. w  e.  A  -.  w R w  /\  A. w  e.  A  A. z  e.  A  ( (
w R y  /\  y R z )  ->  w R z ) ) ) )
8 r19.26 2657 . . . . . . 7  |-  ( A. z  e.  A  ( -.  w R w  /\  ( ( w R y  /\  y R z )  ->  w R z ) )  <-> 
( A. z  e.  A  -.  w R w  /\  A. z  e.  A  ( (
w R y  /\  y R z )  ->  w R z ) ) )
98ralbii 2536 . . . . . 6  |-  ( A. w  e.  A  A. z  e.  A  ( -.  w R w  /\  ( ( w R y  /\  y R z )  ->  w R z ) )  <->  A. w  e.  A  ( A. z  e.  A  -.  w R w  /\  A. z  e.  A  ( ( w R y  /\  y R z )  ->  w R
z ) ) )
10 r19.26 2657 . . . . . 6  |-  ( A. w  e.  A  ( A. w  e.  A  -.  w R w  /\  A. z  e.  A  ( ( w R y  /\  y R z )  ->  w R
z ) )  <->  ( A. w  e.  A  A. w  e.  A  -.  w R w  /\  A. w  e.  A  A. z  e.  A  (
( w R y  /\  y R z )  ->  w R
z ) ) )
117, 9, 103bitr4g 223 . . . . 5  |-  ( E. x  x  e.  A  ->  ( A. w  e.  A  A. z  e.  A  ( -.  w R w  /\  (
( w R y  /\  y R z )  ->  w R
z ) )  <->  A. w  e.  A  ( A. w  e.  A  -.  w R w  /\  A. z  e.  A  (
( w R y  /\  y R z )  ->  w R
z ) ) ) )
12 r19.26 2657 . . . . . . . 8  |-  ( A. z  e.  A  ( -.  z `' R z  /\  ( ( z `' R y  /\  y `' R w )  -> 
z `' R w ) )  <->  ( A. z  e.  A  -.  z `' R z  /\  A. z  e.  A  (
( z `' R
y  /\  y `' R w )  -> 
z `' R w ) ) )
13 vex 2802 . . . . . . . . . . . . 13  |-  z  e. 
_V
1413, 13brcnv 4905 . . . . . . . . . . . 12  |-  ( z `' R z  <->  z R
z )
15 id 19 . . . . . . . . . . . . 13  |-  ( z  =  w  ->  z  =  w )
1615, 15breq12d 4096 . . . . . . . . . . . 12  |-  ( z  =  w  ->  (
z R z  <->  w R w ) )
1714, 16bitrid 192 . . . . . . . . . . 11  |-  ( z  =  w  ->  (
z `' R z  <-> 
w R w ) )
1817notbid 671 . . . . . . . . . 10  |-  ( z  =  w  ->  ( -.  z `' R z  <->  -.  w R w ) )
1918cbvralv 2765 . . . . . . . . 9  |-  ( A. z  e.  A  -.  z `' R z  <->  A. w  e.  A  -.  w R w )
20 vex 2802 . . . . . . . . . . . . 13  |-  y  e. 
_V
2113, 20brcnv 4905 . . . . . . . . . . . 12  |-  ( z `' R y  <->  y R
z )
22 vex 2802 . . . . . . . . . . . . 13  |-  w  e. 
_V
2320, 22brcnv 4905 . . . . . . . . . . . 12  |-  ( y `' R w  <->  w R
y )
2421, 23anbi12ci 461 . . . . . . . . . . 11  |-  ( ( z `' R y  /\  y `' R w )  <->  ( w R y  /\  y R z ) )
2513, 22brcnv 4905 . . . . . . . . . . 11  |-  ( z `' R w  <->  w R
z )
2624, 25imbi12i 239 . . . . . . . . . 10  |-  ( ( ( z `' R
y  /\  y `' R w )  -> 
z `' R w )  <->  ( ( w R y  /\  y R z )  ->  w R z ) )
2726ralbii 2536 . . . . . . . . 9  |-  ( A. z  e.  A  (
( z `' R
y  /\  y `' R w )  -> 
z `' R w )  <->  A. z  e.  A  ( ( w R y  /\  y R z )  ->  w R z ) )
2819, 27anbi12i 460 . . . . . . . 8  |-  ( ( A. z  e.  A  -.  z `' R z  /\  A. z  e.  A  ( ( z `' R y  /\  y `' R w )  -> 
z `' R w ) )  <->  ( A. w  e.  A  -.  w R w  /\  A. z  e.  A  (
( w R y  /\  y R z )  ->  w R
z ) ) )
2912, 28bitr2i 185 . . . . . . 7  |-  ( ( A. w  e.  A  -.  w R w  /\  A. z  e.  A  ( ( w R y  /\  y R z )  ->  w R
z ) )  <->  A. z  e.  A  ( -.  z `' R z  /\  (
( z `' R
y  /\  y `' R w )  -> 
z `' R w ) ) )
3029ralbii 2536 . . . . . 6  |-  ( A. w  e.  A  ( A. w  e.  A  -.  w R w  /\  A. z  e.  A  ( ( w R y  /\  y R z )  ->  w R
z ) )  <->  A. w  e.  A  A. z  e.  A  ( -.  z `' R z  /\  (
( z `' R
y  /\  y `' R w )  -> 
z `' R w ) ) )
31 ralcom 2694 . . . . . 6  |-  ( A. w  e.  A  A. z  e.  A  ( -.  z `' R z  /\  ( ( z `' R y  /\  y `' R w )  -> 
z `' R w ) )  <->  A. z  e.  A  A. w  e.  A  ( -.  z `' R z  /\  (
( z `' R
y  /\  y `' R w )  -> 
z `' R w ) ) )
3230, 31bitri 184 . . . . 5  |-  ( A. w  e.  A  ( A. w  e.  A  -.  w R w  /\  A. z  e.  A  ( ( w R y  /\  y R z )  ->  w R
z ) )  <->  A. z  e.  A  A. w  e.  A  ( -.  z `' R z  /\  (
( z `' R
y  /\  y `' R w )  -> 
z `' R w ) ) )
3311, 32bitrdi 196 . . . 4  |-  ( E. x  x  e.  A  ->  ( A. w  e.  A  A. z  e.  A  ( -.  w R w  /\  (
( w R y  /\  y R z )  ->  w R
z ) )  <->  A. z  e.  A  A. w  e.  A  ( -.  z `' R z  /\  (
( z `' R
y  /\  y `' R w )  -> 
z `' R w ) ) ) )
3433ralbidv 2530 . . 3  |-  ( E. x  x  e.  A  ->  ( A. y  e.  A  A. w  e.  A  A. z  e.  A  ( -.  w R w  /\  (
( w R y  /\  y R z )  ->  w R
z ) )  <->  A. y  e.  A  A. z  e.  A  A. w  e.  A  ( -.  z `' R z  /\  (
( z `' R
y  /\  y `' R w )  -> 
z `' R w ) ) ) )
35 ralcom 2694 . . 3  |-  ( A. w  e.  A  A. y  e.  A  A. z  e.  A  ( -.  w R w  /\  ( ( w R y  /\  y R z )  ->  w R z ) )  <->  A. y  e.  A  A. w  e.  A  A. z  e.  A  ( -.  w R w  /\  ( ( w R y  /\  y R z )  ->  w R z ) ) )
36 ralcom 2694 . . 3  |-  ( A. z  e.  A  A. y  e.  A  A. w  e.  A  ( -.  z `' R z  /\  ( ( z `' R y  /\  y `' R w )  -> 
z `' R w ) )  <->  A. y  e.  A  A. z  e.  A  A. w  e.  A  ( -.  z `' R z  /\  (
( z `' R
y  /\  y `' R w )  -> 
z `' R w ) ) )
3734, 35, 363bitr4g 223 . 2  |-  ( E. x  x  e.  A  ->  ( A. w  e.  A  A. y  e.  A  A. z  e.  A  ( -.  w R w  /\  (
( w R y  /\  y R z )  ->  w R
z ) )  <->  A. z  e.  A  A. y  e.  A  A. w  e.  A  ( -.  z `' R z  /\  (
( z `' R
y  /\  y `' R w )  -> 
z `' R w ) ) ) )
38 df-po 4387 . 2  |-  ( R  Po  A  <->  A. w  e.  A  A. y  e.  A  A. z  e.  A  ( -.  w R w  /\  (
( w R y  /\  y R z )  ->  w R
z ) ) )
39 df-po 4387 . 2  |-  ( `' R  Po  A  <->  A. z  e.  A  A. y  e.  A  A. w  e.  A  ( -.  z `' R z  /\  (
( z `' R
y  /\  y `' R w )  -> 
z `' R w ) ) )
4037, 38, 393bitr4g 223 1  |-  ( E. x  x  e.  A  ->  ( R  Po  A  <->  `' R  Po  A ) )
Colors of variables: wff set class
Syntax hints:   -. wn 3    -> wi 4    /\ wa 104    <-> wb 105   E.wex 1538    e. wcel 2200   A.wral 2508   class class class wbr 4083    Po wpo 4385   `'ccnv 4718
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-in1 617  ax-in2 618  ax-io 714  ax-5 1493  ax-7 1494  ax-gen 1495  ax-ie1 1539  ax-ie2 1540  ax-8 1550  ax-10 1551  ax-11 1552  ax-i12 1553  ax-bndl 1555  ax-4 1556  ax-17 1572  ax-i9 1576  ax-ial 1580  ax-i5r 1581  ax-14 2203  ax-ext 2211  ax-sep 4202  ax-pow 4258  ax-pr 4293
This theorem depends on definitions:  df-bi 117  df-3an 1004  df-tru 1398  df-nf 1507  df-sb 1809  df-eu 2080  df-mo 2081  df-clab 2216  df-cleq 2222  df-clel 2225  df-nfc 2361  df-ral 2513  df-v 2801  df-un 3201  df-in 3203  df-ss 3210  df-pw 3651  df-sn 3672  df-pr 3673  df-op 3675  df-br 4084  df-opab 4146  df-po 4387  df-cnv 4727
This theorem is referenced by:  cnvsom  5272
  Copyright terms: Public domain W3C validator