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

Theorem mpomptx 5828
Description: Express a two-argument function as a one-argument function, or vice-versa. In this version 
B ( x ) is not assumed to be constant w.r.t  x. (Contributed by Mario Carneiro, 29-Dec-2014.)
Hypothesis
Ref Expression
mpompt.1  |-  ( z  =  <. x ,  y
>.  ->  C  =  D )
Assertion
Ref Expression
mpomptx  |-  ( z  e.  U_ x  e.  A  ( { x }  X.  B )  |->  C )  =  ( x  e.  A ,  y  e.  B  |->  D )
Distinct variable groups:    x, y, z, A    y, B, z   
x, C, y    z, D
Allowed substitution hints:    B( x)    C( z)    D( x, y)

Proof of Theorem mpomptx
Dummy variable  w is distinct from all other variables.
StepHypRef Expression
1 df-mpt 3959 . 2  |-  ( z  e.  U_ x  e.  A  ( { x }  X.  B )  |->  C )  =  { <. z ,  w >.  |  ( z  e.  U_ x  e.  A  ( {
x }  X.  B
)  /\  w  =  C ) }
2 df-mpo 5745 . . 3  |-  ( x  e.  A ,  y  e.  B  |->  D )  =  { <. <. x ,  y >. ,  w >.  |  ( ( x  e.  A  /\  y  e.  B )  /\  w  =  D ) }
3 eliunxp 4646 . . . . . . 7  |-  ( z  e.  U_ x  e.  A  ( { x }  X.  B )  <->  E. x E. y ( z  = 
<. x ,  y >.  /\  ( x  e.  A  /\  y  e.  B
) ) )
43anbi1i 451 . . . . . 6  |-  ( ( z  e.  U_ x  e.  A  ( {
x }  X.  B
)  /\  w  =  C )  <->  ( E. x E. y ( z  =  <. x ,  y
>.  /\  ( x  e.  A  /\  y  e.  B ) )  /\  w  =  C )
)
5 19.41vv 1857 . . . . . 6  |-  ( E. x E. y ( ( z  =  <. x ,  y >.  /\  (
x  e.  A  /\  y  e.  B )
)  /\  w  =  C )  <->  ( E. x E. y ( z  =  <. x ,  y
>.  /\  ( x  e.  A  /\  y  e.  B ) )  /\  w  =  C )
)
6 anass 396 . . . . . . . 8  |-  ( ( ( z  =  <. x ,  y >.  /\  (
x  e.  A  /\  y  e.  B )
)  /\  w  =  C )  <->  ( z  =  <. x ,  y
>.  /\  ( ( x  e.  A  /\  y  e.  B )  /\  w  =  C ) ) )
7 mpompt.1 . . . . . . . . . . 11  |-  ( z  =  <. x ,  y
>.  ->  C  =  D )
87eqeq2d 2127 . . . . . . . . . 10  |-  ( z  =  <. x ,  y
>.  ->  ( w  =  C  <->  w  =  D
) )
98anbi2d 457 . . . . . . . . 9  |-  ( z  =  <. x ,  y
>.  ->  ( ( ( x  e.  A  /\  y  e.  B )  /\  w  =  C
)  <->  ( ( x  e.  A  /\  y  e.  B )  /\  w  =  D ) ) )
109pm5.32i 447 . . . . . . . 8  |-  ( ( z  =  <. x ,  y >.  /\  (
( x  e.  A  /\  y  e.  B
)  /\  w  =  C ) )  <->  ( z  =  <. x ,  y
>.  /\  ( ( x  e.  A  /\  y  e.  B )  /\  w  =  D ) ) )
116, 10bitri 183 . . . . . . 7  |-  ( ( ( z  =  <. x ,  y >.  /\  (
x  e.  A  /\  y  e.  B )
)  /\  w  =  C )  <->  ( z  =  <. x ,  y
>.  /\  ( ( x  e.  A  /\  y  e.  B )  /\  w  =  D ) ) )
12112exbii 1568 . . . . . 6  |-  ( E. x E. y ( ( z  =  <. x ,  y >.  /\  (
x  e.  A  /\  y  e.  B )
)  /\  w  =  C )  <->  E. x E. y ( z  = 
<. x ,  y >.  /\  ( ( x  e.  A  /\  y  e.  B )  /\  w  =  D ) ) )
134, 5, 123bitr2i 207 . . . . 5  |-  ( ( z  e.  U_ x  e.  A  ( {
x }  X.  B
)  /\  w  =  C )  <->  E. x E. y ( z  = 
<. x ,  y >.  /\  ( ( x  e.  A  /\  y  e.  B )  /\  w  =  D ) ) )
1413opabbii 3963 . . . 4  |-  { <. z ,  w >.  |  ( z  e.  U_ x  e.  A  ( {
x }  X.  B
)  /\  w  =  C ) }  =  { <. z ,  w >.  |  E. x E. y ( z  = 
<. x ,  y >.  /\  ( ( x  e.  A  /\  y  e.  B )  /\  w  =  D ) ) }
15 dfoprab2 5784 . . . 4  |-  { <. <.
x ,  y >. ,  w >.  |  (
( x  e.  A  /\  y  e.  B
)  /\  w  =  D ) }  =  { <. z ,  w >.  |  E. x E. y ( z  = 
<. x ,  y >.  /\  ( ( x  e.  A  /\  y  e.  B )  /\  w  =  D ) ) }
1614, 15eqtr4i 2139 . . 3  |-  { <. z ,  w >.  |  ( z  e.  U_ x  e.  A  ( {
x }  X.  B
)  /\  w  =  C ) }  =  { <. <. x ,  y
>. ,  w >.  |  ( ( x  e.  A  /\  y  e.  B )  /\  w  =  D ) }
172, 16eqtr4i 2139 . 2  |-  ( x  e.  A ,  y  e.  B  |->  D )  =  { <. z ,  w >.  |  (
z  e.  U_ x  e.  A  ( {
x }  X.  B
)  /\  w  =  C ) }
181, 17eqtr4i 2139 1  |-  ( z  e.  U_ x  e.  A  ( { x }  X.  B )  |->  C )  =  ( x  e.  A ,  y  e.  B  |->  D )
Colors of variables: wff set class
Syntax hints:    -> wi 4    /\ wa 103    = wceq 1314   E.wex 1451    e. wcel 1463   {csn 3495   <.cop 3498   U_ciun 3781   {copab 3956    |-> cmpt 3957    X. cxp 4505   {coprab 5741    e. cmpo 5742
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-ia1 105  ax-ia2 106  ax-ia3 107  ax-io 681  ax-5 1406  ax-7 1407  ax-gen 1408  ax-ie1 1452  ax-ie2 1453  ax-8 1465  ax-10 1466  ax-11 1467  ax-i12 1468  ax-bndl 1469  ax-4 1470  ax-14 1475  ax-17 1489  ax-i9 1493  ax-ial 1497  ax-i5r 1498  ax-ext 2097  ax-sep 4014  ax-pow 4066  ax-pr 4099
This theorem depends on definitions:  df-bi 116  df-3an 947  df-tru 1317  df-nf 1420  df-sb 1719  df-clab 2102  df-cleq 2108  df-clel 2111  df-nfc 2245  df-ral 2396  df-rex 2397  df-v 2660  df-sbc 2881  df-csb 2974  df-un 3043  df-in 3045  df-ss 3052  df-pw 3480  df-sn 3501  df-pr 3502  df-op 3504  df-iun 3783  df-opab 3958  df-mpt 3959  df-xp 4513  df-rel 4514  df-oprab 5744  df-mpo 5745
This theorem is referenced by:  mpompt  5829  mpomptsx  6061  dmmpossx  6063  fmpox  6064
  Copyright terms: Public domain W3C validator