Theorem cbvmpt 4129

Description: Rule to change the bound variable in a maps-to function, using implicit substitution. This version has bound-variable hypotheses in place of distinct variable conditions. (Contributed by NM, 11-Sep-2011.)

Hypotheses

Ref	Expression
cbvmpt.1	|- F/_ y B
cbvmpt.2	|- F/_ x C
cbvmpt.3	|- ( x = y -> B = C )

Assertion

Ref	Expression
cbvmpt	|- ( x e. A |-> B ) = ( y e. A |-> C )

Distinct variable groups:   x, A   y, A

Allowed substitution hints:   B( x, y)   C( x, y)

Proof of Theorem cbvmpt

Dummy variables z w are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		nfv 1542	. . . 4 |- F/ w ( x e. A /\ z = B )
2		nfv 1542	. . . . 5 |- F/ x w e. A
3		nfs1v 1958	. . . . 5 |- F/ x [ w / x ] z = B
4	2, 3	nfan 1579	. . . 4 |- F/ x ( w e. A /\ [ w / x ] z = B )
5		eleq1 2259	. . . . 5 |- ( x = w -> ( x e. A <-> w e. A ) )
6		sbequ12 1785	. . . . 5 |- ( x = w -> ( z = B <-> [ w / x ] z = B ) )
7	5, 6	anbi12d 473	. . . 4 |- ( x = w -> ( ( x e. A /\ z = B ) <-> ( w e. A /\ [ w / x ] z = B ) ) )
8	1, 4, 7	cbvopab1 4107	. . 3 |- { <. x , z >. | ( x e. A /\ z = B ) } = { <. w , z >. | ( w e. A /\ [ w / x ] z = B ) }
9		nfv 1542	. . . . 5 |- F/ y w e. A
10		cbvmpt.1	. . . . . . 7 |- F/_ y B
11	10	nfeq2 2351	. . . . . 6 |- F/ y z = B
12	11	nfsb 1965	. . . . 5 |- F/ y [ w / x ] z = B
13	9, 12	nfan 1579	. . . 4 |- F/ y ( w e. A /\ [ w / x ] z = B )
14		nfv 1542	. . . 4 |- F/ w ( y e. A /\ z = C )
15		eleq1 2259	. . . . 5 |- ( w = y -> ( w e. A <-> y e. A ) )
16		sbequ 1854	. . . . . 6 |- ( w = y -> ( [ w / x ] z = B <-> [ y / x ] z = B ) )
17		cbvmpt.2	. . . . . . . 8 |- F/_ x C
18	17	nfeq2 2351	. . . . . . 7 |- F/ x z = C
19		cbvmpt.3	. . . . . . . 8 |- ( x = y -> B = C )
20	19	eqeq2d 2208	. . . . . . 7 |- ( x = y -> ( z = B <-> z = C ) )
21	18, 20	sbie 1805	. . . . . 6 |- ( [ y / x ] z = B <-> z = C )
22	16, 21	bitrdi 196	. . . . 5 |- ( w = y -> ( [ w / x ] z = B <-> z = C ) )
23	15, 22	anbi12d 473	. . . 4 |- ( w = y -> ( ( w e. A /\ [ w / x ] z = B ) <-> ( y e. A /\ z = C ) ) )
24	13, 14, 23	cbvopab1 4107	. . 3 |- { <. w , z >. | ( w e. A /\ [ w / x ] z = B ) } = { <. y , z >. | ( y e. A /\ z = C ) }
25	8, 24	eqtri 2217	. 2 |- { <. x , z >. | ( x e. A /\ z = B ) } = { <. y , z >. | ( y e. A /\ z = C ) }
26		df-mpt 4097	. 2 |- ( x e. A |-> B ) = { <. x , z >. | ( x e. A /\ z = B ) }
27		df-mpt 4097	. 2 |- ( y e. A |-> C ) = { <. y , z >. | ( y e. A /\ z = C ) }
28	25, 26, 27	3eqtr4i 2227	1 |- ( x e. A |-> B ) = ( y e. A |-> C )

Syntax hints:   -> wi 4   /\ wa 104   = wceq 1364   [wsb 1776   e. wcel 2167   F/_wnfc 2326   {copab 4094   |-> cmpt 4095

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-io 710  ax-5 1461  ax-7 1462  ax-gen 1463  ax-ie1 1507  ax-ie2 1508  ax-8 1518  ax-10 1519  ax-11 1520  ax-i12 1521  ax-bndl 1523  ax-4 1524  ax-17 1540  ax-i9 1544  ax-ial 1548  ax-i5r 1549  ax-ext 2178

This theorem depends on definitions:  df-bi 117  df-3an 982  df-tru 1367  df-nf 1475  df-sb 1777  df-clab 2183  df-cleq 2189  df-clel 2192  df-nfc 2328  df-v 2765  df-un 3161  df-sn 3629  df-pr 3630  df-op 3632  df-opab 4096  df-mpt 4097

This theorem is referenced by:  cbvmptv  4130  dffn5imf  5619  fvmpts  5642  fvmpt2  5648  mptfvex  5650  fmptcof  5732  fmptcos  5733  fliftfuns  5848  offval2  6155  qliftfuns  6687  cc2  7350  summodclem2a  11563  zsumdc  11566  fsum3cvg2  11576  cbvprod  11740  zproddc  11761  fprodseq  11765  pcmptdvds  12539  gsumfzconstf  13548  cnmpt1t  14605  fsumcncntop  14887  limcmpted  14983  dvmptfsum  15045