MPE Home Metamath Proof Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >  fmptpr Structured version   Unicode version

Theorem fmptpr 6077
Description: Express a pair function in maps-to notation. (Contributed by Thierry Arnoux, 3-Jan-2017.)
Hypotheses
Ref Expression
fmptpr.1  |-  ( ph  ->  A  e.  V )
fmptpr.2  |-  ( ph  ->  B  e.  W )
fmptpr.3  |-  ( ph  ->  C  e.  X )
fmptpr.4  |-  ( ph  ->  D  e.  Y )
fmptpr.5  |-  ( (
ph  /\  x  =  A )  ->  E  =  C )
fmptpr.6  |-  ( (
ph  /\  x  =  B )  ->  E  =  D )
Assertion
Ref Expression
fmptpr  |-  ( ph  ->  { <. A ,  C >. ,  <. B ,  D >. }  =  ( x  e.  { A ,  B }  |->  E ) )
Distinct variable groups:    x, A    x, B    x, C    x, D    ph, x
Allowed substitution hints:    E( x)    V( x)    W( x)    X( x)    Y( x)

Proof of Theorem fmptpr
StepHypRef Expression
1 df-pr 4013 . . 3  |-  { <. A ,  C >. ,  <. B ,  D >. }  =  ( { <. A ,  C >. }  u.  { <. B ,  D >. } )
21a1i 11 . 2  |-  ( ph  ->  { <. A ,  C >. ,  <. B ,  D >. }  =  ( {
<. A ,  C >. }  u.  { <. B ,  D >. } ) )
3 fmptpr.5 . . . 4  |-  ( (
ph  /\  x  =  A )  ->  E  =  C )
4 fmptpr.1 . . . 4  |-  ( ph  ->  A  e.  V )
5 fmptpr.3 . . . 4  |-  ( ph  ->  C  e.  X )
63, 4, 5fmptsnd 6074 . . 3  |-  ( ph  ->  { <. A ,  C >. }  =  ( x  e.  { A }  |->  E ) )
76uneq1d 3639 . 2  |-  ( ph  ->  ( { <. A ,  C >. }  u.  { <. B ,  D >. } )  =  ( ( x  e.  { A }  |->  E )  u. 
{ <. B ,  D >. } ) )
8 fmptpr.2 . . . 4  |-  ( ph  ->  B  e.  W )
9 elex 3102 . . . 4  |-  ( B  e.  W  ->  B  e.  _V )
108, 9syl 16 . . 3  |-  ( ph  ->  B  e.  _V )
11 fmptpr.4 . . . 4  |-  ( ph  ->  D  e.  Y )
12 elex 3102 . . . 4  |-  ( D  e.  Y  ->  D  e.  _V )
1311, 12syl 16 . . 3  |-  ( ph  ->  D  e.  _V )
14 df-pr 4013 . . . . 5  |-  { A ,  B }  =  ( { A }  u.  { B } )
1514eqcomi 2454 . . . 4  |-  ( { A }  u.  { B } )  =  { A ,  B }
1615a1i 11 . . 3  |-  ( ph  ->  ( { A }  u.  { B } )  =  { A ,  B } )
17 fmptpr.6 . . 3  |-  ( (
ph  /\  x  =  B )  ->  E  =  D )
1810, 13, 16, 17fmptapd 6076 . 2  |-  ( ph  ->  ( ( x  e. 
{ A }  |->  E )  u.  { <. B ,  D >. } )  =  ( x  e. 
{ A ,  B }  |->  E ) )
192, 7, 183eqtrd 2486 1  |-  ( ph  ->  { <. A ,  C >. ,  <. B ,  D >. }  =  ( x  e.  { A ,  B }  |->  E ) )
Colors of variables: wff setvar class
Syntax hints:    -> wi 4    /\ wa 369    = wceq 1381    e. wcel 1802   _Vcvv 3093    u. cun 3456   {csn 4010   {cpr 4012   <.cop 4016    |-> cmpt 4491
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1603  ax-4 1616  ax-5 1689  ax-6 1732  ax-7 1774  ax-9 1806  ax-10 1821  ax-11 1826  ax-12 1838  ax-13 1983  ax-ext 2419  ax-sep 4554  ax-nul 4562  ax-pr 4672
This theorem depends on definitions:  df-bi 185  df-or 370  df-an 371  df-3an 974  df-tru 1384  df-ex 1598  df-nf 1602  df-sb 1725  df-eu 2270  df-mo 2271  df-clab 2427  df-cleq 2433  df-clel 2436  df-nfc 2591  df-ne 2638  df-ral 2796  df-rex 2797  df-rab 2800  df-v 3095  df-sbc 3312  df-dif 3461  df-un 3463  df-in 3465  df-ss 3472  df-nul 3768  df-if 3923  df-sn 4011  df-pr 4013  df-op 4017  df-opab 4492  df-mpt 4493
This theorem is referenced by:  pmtrprfvalrn  16382  esumsn  27938  zlmodzxzscm  32654  zlmodzxzadd  32655
  Copyright terms: Public domain W3C validator