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

Theorem cnvpom 5279
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 2659 . . . . . . 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 3595 . . . . . . . . 9  |-  ( A. w  e.  A  A. w  e.  A  -.  w R w  <->  A. w  e.  A  -.  w R w )
3 r19.3rmv 3585 . . . . . . . . . 10  |-  ( E. x  x  e.  A  ->  ( -.  w R w  <->  A. z  e.  A  -.  w R w ) )
43ralbidv 2532 . . . . . . . . 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 2659 . . . . . . 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 2538 . . . . . 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 2659 . . . . . 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 2659 . . . . . . . 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 2805 . . . . . . . . . . . . 13  |-  z  e. 
_V
1413, 13brcnv 4913 . . . . . . . . . . . 12  |-  ( z `' R z  <->  z R
z )
15 id 19 . . . . . . . . . . . . 13  |-  ( z  =  w  ->  z  =  w )
1615, 15breq12d 4101 . . . . . . . . . . . 12  |-  ( z  =  w  ->  (
z R z  <->  w R w ) )
1714, 16bitrid 192 . . . . . . . . . . 11  |-  ( z  =  w  ->  (
z `' R z  <-> 
w R w ) )
1817notbid 673 . . . . . . . . . 10  |-  ( z  =  w  ->  ( -.  z `' R z  <->  -.  w R w ) )
1918cbvralv 2767 . . . . . . . . 9  |-  ( A. z  e.  A  -.  z `' R z  <->  A. w  e.  A  -.  w R w )
20 vex 2805 . . . . . . . . . . . . 13  |-  y  e. 
_V
2113, 20brcnv 4913 . . . . . . . . . . . 12  |-  ( z `' R y  <->  y R
z )
22 vex 2805 . . . . . . . . . . . . 13  |-  w  e. 
_V
2320, 22brcnv 4913 . . . . . . . . . . . 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 4913 . . . . . . . . . . 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 2538 . . . . . . . . 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 2538 . . . . . 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 2696 . . . . . 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 2532 . . 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 2696 . . 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 2696 . . 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 4393 . 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 4393 . 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 1540    e. wcel 2202   A.wral 2510   class class class wbr 4088    Po wpo 4391   `'ccnv 4724
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 619  ax-in2 620  ax-io 716  ax-5 1495  ax-7 1496  ax-gen 1497  ax-ie1 1541  ax-ie2 1542  ax-8 1552  ax-10 1553  ax-11 1554  ax-i12 1555  ax-bndl 1557  ax-4 1558  ax-17 1574  ax-i9 1578  ax-ial 1582  ax-i5r 1583  ax-14 2205  ax-ext 2213  ax-sep 4207  ax-pow 4264  ax-pr 4299
This theorem depends on definitions:  df-bi 117  df-3an 1006  df-tru 1400  df-nf 1509  df-sb 1811  df-eu 2082  df-mo 2083  df-clab 2218  df-cleq 2224  df-clel 2227  df-nfc 2363  df-ral 2515  df-v 2804  df-un 3204  df-in 3206  df-ss 3213  df-pw 3654  df-sn 3675  df-pr 3676  df-op 3678  df-br 4089  df-opab 4151  df-po 4393  df-cnv 4733
This theorem is referenced by:  cnvsom  5280
  Copyright terms: Public domain W3C validator