Users' Mathboxes Mathbox for Thierry Arnoux < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >   Mathboxes  >  cnvoprab Structured version   Unicode version

Theorem cnvoprab 27204
Description: The converse of a class abstraction of nested ordered pairs. (Contributed by Thierry Arnoux, 17-Aug-2017.)
Hypotheses
Ref Expression
cnvoprab.x  |-  F/ x ps
cnvoprab.y  |-  F/ y ps
cnvoprab.1  |-  ( a  =  <. x ,  y
>.  ->  ( ps  <->  ph ) )
cnvoprab.2  |-  ( ps 
->  a  e.  ( _V  X.  _V ) )
Assertion
Ref Expression
cnvoprab  |-  `' { <. <. x ,  y
>. ,  z >.  | 
ph }  =  { <. z ,  a >.  |  ps }
Distinct variable groups:    x, a,
y, z    ph, a
Allowed substitution hints:    ph( x, y, z)    ps( x, y, z, a)

Proof of Theorem cnvoprab
Dummy variable  w is distinct from all other variables.
StepHypRef Expression
1 excom 1793 . . . . . 6  |-  ( E. a E. z ( w  =  <. a ,  z >.  /\  ps ) 
<->  E. z E. a
( w  =  <. a ,  z >.  /\  ps ) )
2 opex 4704 . . . . . . . . . . . . 13  |-  <. x ,  y >.  e.  _V
3 opeq1 4206 . . . . . . . . . . . . . . . 16  |-  ( a  =  <. x ,  y
>.  ->  <. a ,  z
>.  =  <. <. x ,  y >. ,  z
>. )
43eqeq2d 2474 . . . . . . . . . . . . . . 15  |-  ( a  =  <. x ,  y
>.  ->  ( w  = 
<. a ,  z >.  <->  w  =  <. <. x ,  y
>. ,  z >. ) )
5 cnvoprab.1 . . . . . . . . . . . . . . 15  |-  ( a  =  <. x ,  y
>.  ->  ( ps  <->  ph ) )
64, 5anbi12d 710 . . . . . . . . . . . . . 14  |-  ( a  =  <. x ,  y
>.  ->  ( ( w  =  <. a ,  z
>.  /\  ps )  <->  ( w  =  <. <. x ,  y
>. ,  z >.  /\ 
ph ) ) )
76spcegv 3192 . . . . . . . . . . . . 13  |-  ( <.
x ,  y >.  e.  _V  ->  ( (
w  =  <. <. x ,  y >. ,  z
>.  /\  ph )  ->  E. a ( w  = 
<. a ,  z >.  /\  ps ) ) )
82, 7ax-mp 5 . . . . . . . . . . . 12  |-  ( ( w  =  <. <. x ,  y >. ,  z
>.  /\  ph )  ->  E. a ( w  = 
<. a ,  z >.  /\  ps ) )
98eximi 1630 . . . . . . . . . . 11  |-  ( E. y ( w  = 
<. <. x ,  y
>. ,  z >.  /\ 
ph )  ->  E. y E. a ( w  = 
<. a ,  z >.  /\  ps ) )
10 nfv 1678 . . . . . . . . . . . . . 14  |-  F/ y  w  =  <. a ,  z >.
11 cnvoprab.y . . . . . . . . . . . . . 14  |-  F/ y ps
1210, 11nfan 1870 . . . . . . . . . . . . 13  |-  F/ y ( w  =  <. a ,  z >.  /\  ps )
1312nfex 1890 . . . . . . . . . . . 12  |-  F/ y E. a ( w  =  <. a ,  z
>.  /\  ps )
141319.9 1836 . . . . . . . . . . 11  |-  ( E. y E. a ( w  =  <. a ,  z >.  /\  ps ) 
<->  E. a ( w  =  <. a ,  z
>.  /\  ps ) )
159, 14sylib 196 . . . . . . . . . 10  |-  ( E. y ( w  = 
<. <. x ,  y
>. ,  z >.  /\ 
ph )  ->  E. a
( w  =  <. a ,  z >.  /\  ps ) )
1615eximi 1630 . . . . . . . . 9  |-  ( E. x E. y ( w  =  <. <. x ,  y >. ,  z
>.  /\  ph )  ->  E. x E. a ( w  =  <. a ,  z >.  /\  ps ) )
17 nfv 1678 . . . . . . . . . . . 12  |-  F/ x  w  =  <. a ,  z >.
18 cnvoprab.x . . . . . . . . . . . 12  |-  F/ x ps
1917, 18nfan 1870 . . . . . . . . . . 11  |-  F/ x
( w  =  <. a ,  z >.  /\  ps )
2019nfex 1890 . . . . . . . . . 10  |-  F/ x E. a ( w  = 
<. a ,  z >.  /\  ps )
212019.9 1836 . . . . . . . . 9  |-  ( E. x E. a ( w  =  <. a ,  z >.  /\  ps ) 
<->  E. a ( w  =  <. a ,  z
>.  /\  ps ) )
2216, 21sylib 196 . . . . . . . 8  |-  ( E. x E. y ( w  =  <. <. x ,  y >. ,  z
>.  /\  ph )  ->  E. a ( w  = 
<. a ,  z >.  /\  ps ) )
23 cnvoprab.2 . . . . . . . . . . 11  |-  ( ps 
->  a  e.  ( _V  X.  _V ) )
2423adantl 466 . . . . . . . . . 10  |-  ( ( w  =  <. a ,  z >.  /\  ps )  ->  a  e.  ( _V  X.  _V )
)
25 fvex 5867 . . . . . . . . . . 11  |-  ( 1st `  a )  e.  _V
26 fvex 5867 . . . . . . . . . . 11  |-  ( 2nd `  a )  e.  _V
27 eqcom 2469 . . . . . . . . . . . . . . . 16  |-  ( ( 1st `  a )  =  x  <->  x  =  ( 1st `  a ) )
28 eqcom 2469 . . . . . . . . . . . . . . . 16  |-  ( ( 2nd `  a )  =  y  <->  y  =  ( 2nd `  a ) )
2927, 28anbi12i 697 . . . . . . . . . . . . . . 15  |-  ( ( ( 1st `  a
)  =  x  /\  ( 2nd `  a )  =  y )  <->  ( x  =  ( 1st `  a
)  /\  y  =  ( 2nd `  a ) ) )
30 eqopi 6808 . . . . . . . . . . . . . . 15  |-  ( ( a  e.  ( _V 
X.  _V )  /\  (
( 1st `  a
)  =  x  /\  ( 2nd `  a )  =  y ) )  ->  a  =  <. x ,  y >. )
3129, 30sylan2br 476 . . . . . . . . . . . . . 14  |-  ( ( a  e.  ( _V 
X.  _V )  /\  (
x  =  ( 1st `  a )  /\  y  =  ( 2nd `  a
) ) )  -> 
a  =  <. x ,  y >. )
326bicomd 201 . . . . . . . . . . . . . 14  |-  ( a  =  <. x ,  y
>.  ->  ( ( w  =  <. <. x ,  y
>. ,  z >.  /\ 
ph )  <->  ( w  =  <. a ,  z
>.  /\  ps ) ) )
3331, 32syl 16 . . . . . . . . . . . . 13  |-  ( ( a  e.  ( _V 
X.  _V )  /\  (
x  =  ( 1st `  a )  /\  y  =  ( 2nd `  a
) ) )  -> 
( ( w  = 
<. <. x ,  y
>. ,  z >.  /\ 
ph )  <->  ( w  =  <. a ,  z
>.  /\  ps ) ) )
3419, 12, 33spc2ed 27034 . . . . . . . . . . . 12  |-  ( ( a  e.  ( _V 
X.  _V )  /\  (
( 1st `  a
)  e.  _V  /\  ( 2nd `  a )  e.  _V ) )  ->  ( ( w  =  <. a ,  z
>.  /\  ps )  ->  E. x E. y ( w  =  <. <. x ,  y >. ,  z
>.  /\  ph ) ) )
3534ex 434 . . . . . . . . . . 11  |-  ( a  e.  ( _V  X.  _V )  ->  ( ( ( 1st `  a
)  e.  _V  /\  ( 2nd `  a )  e.  _V )  -> 
( ( w  = 
<. a ,  z >.  /\  ps )  ->  E. x E. y ( w  = 
<. <. x ,  y
>. ,  z >.  /\ 
ph ) ) ) )
3625, 26, 35mp2ani 678 . . . . . . . . . 10  |-  ( a  e.  ( _V  X.  _V )  ->  ( ( w  =  <. a ,  z >.  /\  ps )  ->  E. x E. y
( w  =  <. <.
x ,  y >. ,  z >.  /\  ph ) ) )
3724, 36mpcom 36 . . . . . . . . 9  |-  ( ( w  =  <. a ,  z >.  /\  ps )  ->  E. x E. y
( w  =  <. <.
x ,  y >. ,  z >.  /\  ph ) )
3837exlimiv 1693 . . . . . . . 8  |-  ( E. a ( w  = 
<. a ,  z >.  /\  ps )  ->  E. x E. y ( w  = 
<. <. x ,  y
>. ,  z >.  /\ 
ph ) )
3922, 38impbii 188 . . . . . . 7  |-  ( E. x E. y ( w  =  <. <. x ,  y >. ,  z
>.  /\  ph )  <->  E. a
( w  =  <. a ,  z >.  /\  ps ) )
4039exbii 1639 . . . . . 6  |-  ( E. z E. x E. y ( w  = 
<. <. x ,  y
>. ,  z >.  /\ 
ph )  <->  E. z E. a ( w  = 
<. a ,  z >.  /\  ps ) )
41 excom 1793 . . . . . . . 8  |-  ( E. y E. z ( w  =  <. <. x ,  y >. ,  z
>.  /\  ph )  <->  E. z E. y ( w  = 
<. <. x ,  y
>. ,  z >.  /\ 
ph ) )
4241exbii 1639 . . . . . . 7  |-  ( E. x E. y E. z ( w  = 
<. <. x ,  y
>. ,  z >.  /\ 
ph )  <->  E. x E. z E. y ( w  =  <. <. x ,  y >. ,  z
>.  /\  ph ) )
43 excom 1793 . . . . . . 7  |-  ( E. x E. z E. y ( w  = 
<. <. x ,  y
>. ,  z >.  /\ 
ph )  <->  E. z E. x E. y ( w  =  <. <. x ,  y >. ,  z
>.  /\  ph ) )
4442, 43bitr2i 250 . . . . . 6  |-  ( E. z E. x E. y ( w  = 
<. <. x ,  y
>. ,  z >.  /\ 
ph )  <->  E. x E. y E. z ( w  =  <. <. x ,  y >. ,  z
>.  /\  ph ) )
451, 40, 443bitr2ri 274 . . . . 5  |-  ( E. x E. y E. z ( w  = 
<. <. x ,  y
>. ,  z >.  /\ 
ph )  <->  E. a E. z ( w  = 
<. a ,  z >.  /\  ps ) )
4645abbii 2594 . . . 4  |-  { w  |  E. x E. y E. z ( w  = 
<. <. x ,  y
>. ,  z >.  /\ 
ph ) }  =  { w  |  E. a E. z ( w  =  <. a ,  z
>.  /\  ps ) }
47 df-oprab 6279 . . . 4  |-  { <. <.
x ,  y >. ,  z >.  |  ph }  =  { w  |  E. x E. y E. z ( w  = 
<. <. x ,  y
>. ,  z >.  /\ 
ph ) }
48 df-opab 4499 . . . 4  |-  { <. a ,  z >.  |  ps }  =  { w  |  E. a E. z
( w  =  <. a ,  z >.  /\  ps ) }
4946, 47, 483eqtr4ri 2500 . . 3  |-  { <. a ,  z >.  |  ps }  =  { <. <. x ,  y >. ,  z
>.  |  ph }
5049cnveqi 5168 . 2  |-  `' { <. a ,  z >.  |  ps }  =  `' { <. <. x ,  y
>. ,  z >.  | 
ph }
51 cnvopab 5398 . 2  |-  `' { <. a ,  z >.  |  ps }  =  { <. z ,  a >.  |  ps }
5250, 51eqtr3i 2491 1  |-  `' { <. <. x ,  y
>. ,  z >.  | 
ph }  =  { <. z ,  a >.  |  ps }
Colors of variables: wff setvar class
Syntax hints:    -> wi 4    <-> wb 184    /\ wa 369    = wceq 1374   E.wex 1591   F/wnf 1594    e. wcel 1762   {cab 2445   _Vcvv 3106   <.cop 4026   {copab 4497    X. cxp 4990   `'ccnv 4991   ` cfv 5579   {coprab 6276   1stc1st 6772   2ndc2nd 6773
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1596  ax-4 1607  ax-5 1675  ax-6 1714  ax-7 1734  ax-8 1764  ax-9 1766  ax-10 1781  ax-11 1786  ax-12 1798  ax-13 1961  ax-ext 2438  ax-sep 4561  ax-nul 4569  ax-pow 4618  ax-pr 4679  ax-un 6567
This theorem depends on definitions:  df-bi 185  df-or 370  df-an 371  df-3an 970  df-tru 1377  df-ex 1592  df-nf 1595  df-sb 1707  df-eu 2272  df-mo 2273  df-clab 2446  df-cleq 2452  df-clel 2455  df-nfc 2610  df-ne 2657  df-ral 2812  df-rex 2813  df-rab 2816  df-v 3108  df-sbc 3325  df-dif 3472  df-un 3474  df-in 3476  df-ss 3483  df-nul 3779  df-if 3933  df-sn 4021  df-pr 4023  df-op 4027  df-uni 4239  df-br 4441  df-opab 4499  df-mpt 4500  df-id 4788  df-xp 4998  df-rel 4999  df-cnv 5000  df-co 5001  df-dm 5002  df-rn 5003  df-iota 5542  df-fun 5581  df-fv 5587  df-oprab 6279  df-1st 6774  df-2nd 6775
This theorem is referenced by:  f1od2  27205
  Copyright terms: Public domain W3C validator