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

Theorem cnvpom 5208
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 2620 . . . . . . 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 3547 . . . . . . . . 9  |-  ( A. w  e.  A  A. w  e.  A  -.  w R w  <->  A. w  e.  A  -.  w R w )
3 r19.3rmv 3537 . . . . . . . . . 10  |-  ( E. x  x  e.  A  ->  ( -.  w R w  <->  A. z  e.  A  -.  w R w ) )
43ralbidv 2494 . . . . . . . . 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 2620 . . . . . . 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 2500 . . . . . 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 2620 . . . . . 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 2620 . . . . . . . 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 2763 . . . . . . . . . . . . 13  |-  z  e. 
_V
1413, 13brcnv 4845 . . . . . . . . . . . 12  |-  ( z `' R z  <->  z R
z )
15 id 19 . . . . . . . . . . . . 13  |-  ( z  =  w  ->  z  =  w )
1615, 15breq12d 4042 . . . . . . . . . . . 12  |-  ( z  =  w  ->  (
z R z  <->  w R w ) )
1714, 16bitrid 192 . . . . . . . . . . 11  |-  ( z  =  w  ->  (
z `' R z  <-> 
w R w ) )
1817notbid 668 . . . . . . . . . 10  |-  ( z  =  w  ->  ( -.  z `' R z  <->  -.  w R w ) )
1918cbvralv 2726 . . . . . . . . 9  |-  ( A. z  e.  A  -.  z `' R z  <->  A. w  e.  A  -.  w R w )
20 vex 2763 . . . . . . . . . . . . 13  |-  y  e. 
_V
2113, 20brcnv 4845 . . . . . . . . . . . 12  |-  ( z `' R y  <->  y R
z )
22 vex 2763 . . . . . . . . . . . . 13  |-  w  e. 
_V
2320, 22brcnv 4845 . . . . . . . . . . . 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 4845 . . . . . . . . . . 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 2500 . . . . . . . . 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 2500 . . . . . 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 2657 . . . . . 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 2494 . . 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 2657 . . 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 2657 . . 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 4327 . 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 4327 . 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 1503    e. wcel 2164   A.wral 2472   class class class wbr 4029    Po wpo 4325   `'ccnv 4658
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 710  ax-5 1458  ax-7 1459  ax-gen 1460  ax-ie1 1504  ax-ie2 1505  ax-8 1515  ax-10 1516  ax-11 1517  ax-i12 1518  ax-bndl 1520  ax-4 1521  ax-17 1537  ax-i9 1541  ax-ial 1545  ax-i5r 1546  ax-14 2167  ax-ext 2175  ax-sep 4147  ax-pow 4203  ax-pr 4238
This theorem depends on definitions:  df-bi 117  df-3an 982  df-tru 1367  df-nf 1472  df-sb 1774  df-eu 2045  df-mo 2046  df-clab 2180  df-cleq 2186  df-clel 2189  df-nfc 2325  df-ral 2477  df-v 2762  df-un 3157  df-in 3159  df-ss 3166  df-pw 3603  df-sn 3624  df-pr 3625  df-op 3627  df-br 4030  df-opab 4091  df-po 4327  df-cnv 4667
This theorem is referenced by:  cnvsom  5209
  Copyright terms: Public domain W3C validator