Theorem fmptcof 7120

Description: Version of fmptco 7119 where 𝜑 needn't be distinct from 𝑥. (Contributed by NM, 27-Dec-2014.)

Hypotheses

Ref	Expression
fmptcof.1	⊢ (𝜑 → ∀𝑥 ∈ 𝐴 𝑅 ∈ 𝐵)
fmptcof.2	⊢ (𝜑 → 𝐹 = (𝑥 ∈ 𝐴 ↦ 𝑅))
fmptcof.3	⊢ (𝜑 → 𝐺 = (𝑦 ∈ 𝐵 ↦ 𝑆))
fmptcof.4	⊢ (𝑦 = 𝑅 → 𝑆 = 𝑇)

Assertion

Ref	Expression
fmptcof	⊢ (𝜑 → (𝐺 ∘ 𝐹) = (𝑥 ∈ 𝐴 ↦ 𝑇))

Distinct variable groups:   𝑥,𝑦,𝐵   𝑦,𝑅   𝑥,𝑆   𝑥,𝐴   𝑦,𝑇

Allowed substitution hints:   𝜑(𝑥,𝑦)   𝐴(𝑦)   𝑅(𝑥)   𝑆(𝑦)   𝑇(𝑥)   𝐹(𝑥,𝑦)   𝐺(𝑥,𝑦)

Proof of Theorem fmptcof

Dummy variables 𝑤 𝑧 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		fmptcof.1	. . . . 5 ⊢ (𝜑 → ∀𝑥 ∈ 𝐴 𝑅 ∈ 𝐵)
2		nfcsb1v 3910	. . . . . . 7 ⊢ Ⅎ𝑥⦋𝑧 / 𝑥⦌𝑅
3	2	nfel1 2911	. . . . . 6 ⊢ Ⅎ𝑥⦋𝑧 / 𝑥⦌𝑅 ∈ 𝐵
4		csbeq1a 3899	. . . . . . 7 ⊢ (𝑥 = 𝑧 → 𝑅 = ⦋𝑧 / 𝑥⦌𝑅)
5	4	eleq1d 2810	. . . . . 6 ⊢ (𝑥 = 𝑧 → (𝑅 ∈ 𝐵 ↔ ⦋𝑧 / 𝑥⦌𝑅 ∈ 𝐵))
6	3, 5	rspc 3592	. . . . 5 ⊢ (𝑧 ∈ 𝐴 → (∀𝑥 ∈ 𝐴 𝑅 ∈ 𝐵 → ⦋𝑧 / 𝑥⦌𝑅 ∈ 𝐵))
7	1, 6	mpan9 506	. . . 4 ⊢ ((𝜑 ∧ 𝑧 ∈ 𝐴) → ⦋𝑧 / 𝑥⦌𝑅 ∈ 𝐵)
8		fmptcof.2	. . . . 5 ⊢ (𝜑 → 𝐹 = (𝑥 ∈ 𝐴 ↦ 𝑅))
9		nfcv 2895	. . . . . 6 ⊢ Ⅎ𝑧𝑅
10	9, 2, 4	cbvmpt 5249	. . . . 5 ⊢ (𝑥 ∈ 𝐴 ↦ 𝑅) = (𝑧 ∈ 𝐴 ↦ ⦋𝑧 / 𝑥⦌𝑅)
11	8, 10	eqtrdi 2780	. . . 4 ⊢ (𝜑 → 𝐹 = (𝑧 ∈ 𝐴 ↦ ⦋𝑧 / 𝑥⦌𝑅))
12		fmptcof.3	. . . . 5 ⊢ (𝜑 → 𝐺 = (𝑦 ∈ 𝐵 ↦ 𝑆))
13		nfcv 2895	. . . . . 6 ⊢ Ⅎ𝑤𝑆
14		nfcsb1v 3910	. . . . . 6 ⊢ Ⅎ𝑦⦋𝑤 / 𝑦⦌𝑆
15		csbeq1a 3899	. . . . . 6 ⊢ (𝑦 = 𝑤 → 𝑆 = ⦋𝑤 / 𝑦⦌𝑆)
16	13, 14, 15	cbvmpt 5249	. . . . 5 ⊢ (𝑦 ∈ 𝐵 ↦ 𝑆) = (𝑤 ∈ 𝐵 ↦ ⦋𝑤 / 𝑦⦌𝑆)
17	12, 16	eqtrdi 2780	. . . 4 ⊢ (𝜑 → 𝐺 = (𝑤 ∈ 𝐵 ↦ ⦋𝑤 / 𝑦⦌𝑆))
18		csbeq1 3888	. . . 4 ⊢ (𝑤 = ⦋𝑧 / 𝑥⦌𝑅 → ⦋𝑤 / 𝑦⦌𝑆 = ⦋⦋𝑧 / 𝑥⦌𝑅 / 𝑦⦌𝑆)
19	7, 11, 17, 18	fmptco 7119	. . 3 ⊢ (𝜑 → (𝐺 ∘ 𝐹) = (𝑧 ∈ 𝐴 ↦ ⦋⦋𝑧 / 𝑥⦌𝑅 / 𝑦⦌𝑆))
20		nfcv 2895	. . . 4 ⊢ Ⅎ𝑧⦋𝑅 / 𝑦⦌𝑆
21		nfcv 2895	. . . . 5 ⊢ Ⅎ𝑥𝑆
22	2, 21	nfcsbw 3912	. . . 4 ⊢ Ⅎ𝑥⦋⦋𝑧 / 𝑥⦌𝑅 / 𝑦⦌𝑆
23	4	csbeq1d 3889	. . . 4 ⊢ (𝑥 = 𝑧 → ⦋𝑅 / 𝑦⦌𝑆 = ⦋⦋𝑧 / 𝑥⦌𝑅 / 𝑦⦌𝑆)
24	20, 22, 23	cbvmpt 5249	. . 3 ⊢ (𝑥 ∈ 𝐴 ↦ ⦋𝑅 / 𝑦⦌𝑆) = (𝑧 ∈ 𝐴 ↦ ⦋⦋𝑧 / 𝑥⦌𝑅 / 𝑦⦌𝑆)
25	19, 24	eqtr4di 2782	. 2 ⊢ (𝜑 → (𝐺 ∘ 𝐹) = (𝑥 ∈ 𝐴 ↦ ⦋𝑅 / 𝑦⦌𝑆))
26		eqid 2724	. . . 4 ⊢ 𝐴 = 𝐴
27		nfcvd 2896	. . . . . 6 ⊢ (𝑅 ∈ 𝐵 → Ⅎ𝑦𝑇)
28		fmptcof.4	. . . . . 6 ⊢ (𝑦 = 𝑅 → 𝑆 = 𝑇)
29	27, 28	csbiegf 3919	. . . . 5 ⊢ (𝑅 ∈ 𝐵 → ⦋𝑅 / 𝑦⦌𝑆 = 𝑇)
30	29	ralimi 3075	. . . 4 ⊢ (∀𝑥 ∈ 𝐴 𝑅 ∈ 𝐵 → ∀𝑥 ∈ 𝐴 ⦋𝑅 / 𝑦⦌𝑆 = 𝑇)
31		mpteq12 5230	. . . 4 ⊢ ((𝐴 = 𝐴 ∧ ∀𝑥 ∈ 𝐴 ⦋𝑅 / 𝑦⦌𝑆 = 𝑇) → (𝑥 ∈ 𝐴 ↦ ⦋𝑅 / 𝑦⦌𝑆) = (𝑥 ∈ 𝐴 ↦ 𝑇))
32	26, 30, 31	sylancr 586	. . 3 ⊢ (∀𝑥 ∈ 𝐴 𝑅 ∈ 𝐵 → (𝑥 ∈ 𝐴 ↦ ⦋𝑅 / 𝑦⦌𝑆) = (𝑥 ∈ 𝐴 ↦ 𝑇))
33	1, 32	syl 17	. 2 ⊢ (𝜑 → (𝑥 ∈ 𝐴 ↦ ⦋𝑅 / 𝑦⦌𝑆) = (𝑥 ∈ 𝐴 ↦ 𝑇))
34	25, 33	eqtrd 2764	1 ⊢ (𝜑 → (𝐺 ∘ 𝐹) = (𝑥 ∈ 𝐴 ↦ 𝑇))

Syntax hints:   → wi 4   = wceq 1533   ∈ wcel 2098  ∀wral 3053  ⦋csb 3885   ↦ cmpt 5221   ∘ ccom 5670

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1789  ax-4 1803  ax-5 1905  ax-6 1963  ax-7 2003  ax-8 2100  ax-9 2108  ax-10 2129  ax-11 2146  ax-12 2163  ax-ext 2695  ax-sep 5289  ax-nul 5296  ax-pr 5417

This theorem depends on definitions:  df-bi 206  df-an 396  df-or 845  df-3an 1086  df-tru 1536  df-fal 1546  df-ex 1774  df-nf 1778  df-sb 2060  df-mo 2526  df-eu 2555  df-clab 2702  df-cleq 2716  df-clel 2802  df-nfc 2877  df-ne 2933  df-ral 3054  df-rex 3063  df-rab 3425  df-v 3468  df-sbc 3770  df-csb 3886  df-dif 3943  df-un 3945  df-in 3947  df-ss 3957  df-nul 4315  df-if 4521  df-sn 4621  df-pr 4623  df-op 4627  df-uni 4900  df-br 5139  df-opab 5201  df-mpt 5222  df-id 5564  df-xp 5672  df-rel 5673  df-cnv 5674  df-co 5675  df-dm 5676  df-rn 5677  df-res 5678  df-ima 5679  df-iota 6485  df-fun 6535  df-fn 6536  df-f 6537  df-fv 6541

This theorem is referenced by:  fmptcos  7121  yonedalem3b  18233  gsumcom2  19884  evl1sca  22174  cnmptk1  23506  cnmpt1k  23507  cnmptkk  23508  cncfcompt2  24749  cncfmpt1f  24755  copco  24866  pcoass  24872  sincn  26297  coscn  26298  lgseisenlem3  27225  fcomptf  32318  eulerpartgbij  33826