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

Theorem cnvpom 5226
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 2632 . . . . . . 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 3561 . . . . . . . . 9  |-  ( A. w  e.  A  A. w  e.  A  -.  w R w  <->  A. w  e.  A  -.  w R w )
3 r19.3rmv 3551 . . . . . . . . . 10  |-  ( E. x  x  e.  A  ->  ( -.  w R w  <->  A. z  e.  A  -.  w R w ) )
43ralbidv 2506 . . . . . . . . 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 2632 . . . . . . 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 2512 . . . . . 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 2632 . . . . . 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 2632 . . . . . . . 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 2775 . . . . . . . . . . . . 13  |-  z  e. 
_V
1413, 13brcnv 4862 . . . . . . . . . . . 12  |-  ( z `' R z  <->  z R
z )
15 id 19 . . . . . . . . . . . . 13  |-  ( z  =  w  ->  z  =  w )
1615, 15breq12d 4058 . . . . . . . . . . . 12  |-  ( z  =  w  ->  (
z R z  <->  w R w ) )
1714, 16bitrid 192 . . . . . . . . . . 11  |-  ( z  =  w  ->  (
z `' R z  <-> 
w R w ) )
1817notbid 669 . . . . . . . . . 10  |-  ( z  =  w  ->  ( -.  z `' R z  <->  -.  w R w ) )
1918cbvralv 2738 . . . . . . . . 9  |-  ( A. z  e.  A  -.  z `' R z  <->  A. w  e.  A  -.  w R w )
20 vex 2775 . . . . . . . . . . . . 13  |-  y  e. 
_V
2113, 20brcnv 4862 . . . . . . . . . . . 12  |-  ( z `' R y  <->  y R
z )
22 vex 2775 . . . . . . . . . . . . 13  |-  w  e. 
_V
2320, 22brcnv 4862 . . . . . . . . . . . 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 4862 . . . . . . . . . . 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 2512 . . . . . . . . 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 2512 . . . . . 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 2669 . . . . . 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 2506 . . 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 2669 . . 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 2669 . . 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 4344 . 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 4344 . 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 1515    e. wcel 2176   A.wral 2484   class class class wbr 4045    Po wpo 4342   `'ccnv 4675
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 615  ax-in2 616  ax-io 711  ax-5 1470  ax-7 1471  ax-gen 1472  ax-ie1 1516  ax-ie2 1517  ax-8 1527  ax-10 1528  ax-11 1529  ax-i12 1530  ax-bndl 1532  ax-4 1533  ax-17 1549  ax-i9 1553  ax-ial 1557  ax-i5r 1558  ax-14 2179  ax-ext 2187  ax-sep 4163  ax-pow 4219  ax-pr 4254
This theorem depends on definitions:  df-bi 117  df-3an 983  df-tru 1376  df-nf 1484  df-sb 1786  df-eu 2057  df-mo 2058  df-clab 2192  df-cleq 2198  df-clel 2201  df-nfc 2337  df-ral 2489  df-v 2774  df-un 3170  df-in 3172  df-ss 3179  df-pw 3618  df-sn 3639  df-pr 3640  df-op 3642  df-br 4046  df-opab 4107  df-po 4344  df-cnv 4684
This theorem is referenced by:  cnvsom  5227
  Copyright terms: Public domain W3C validator