Theorem fmpoco 6219

Description: Composition of two functions. Variation of fmptco 5684 when the second function has two arguments. (Contributed by Mario Carneiro, 8-Feb-2015.)

Hypotheses

Ref	Expression
fmpoco.1	⊢ ((𝜑 ∧ (𝑥 ∈ 𝐴 ∧ 𝑦 ∈ 𝐵)) → 𝑅 ∈ 𝐶)
fmpoco.2	⊢ (𝜑 → 𝐹 = (𝑥 ∈ 𝐴, 𝑦 ∈ 𝐵 ↦ 𝑅))
fmpoco.3	⊢ (𝜑 → 𝐺 = (𝑧 ∈ 𝐶 ↦ 𝑆))
fmpoco.4	⊢ (𝑧 = 𝑅 → 𝑆 = 𝑇)

Assertion

Ref	Expression
fmpoco	⊢ (𝜑 → (𝐺 ∘ 𝐹) = (𝑥 ∈ 𝐴, 𝑦 ∈ 𝐵 ↦ 𝑇))

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

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

Proof of Theorem fmpoco

Dummy variables 𝑣 𝑢 𝑤 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		fmpoco.1	. . . . . 6 ⊢ ((𝜑 ∧ (𝑥 ∈ 𝐴 ∧ 𝑦 ∈ 𝐵)) → 𝑅 ∈ 𝐶)
2	1	ralrimivva 2559	. . . . 5 ⊢ (𝜑 → ∀𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐵 𝑅 ∈ 𝐶)
3		eqid 2177	. . . . . 6 ⊢ (𝑥 ∈ 𝐴, 𝑦 ∈ 𝐵 ↦ 𝑅) = (𝑥 ∈ 𝐴, 𝑦 ∈ 𝐵 ↦ 𝑅)
4	3	fmpo 6204	. . . . 5 ⊢ (∀𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐵 𝑅 ∈ 𝐶 ↔ (𝑥 ∈ 𝐴, 𝑦 ∈ 𝐵 ↦ 𝑅):(𝐴 × 𝐵)⟶𝐶)
5	2, 4	sylib 122	. . . 4 ⊢ (𝜑 → (𝑥 ∈ 𝐴, 𝑦 ∈ 𝐵 ↦ 𝑅):(𝐴 × 𝐵)⟶𝐶)
6		nfcv 2319	. . . . . . 7 ⊢ Ⅎ𝑢𝑅
7		nfcv 2319	. . . . . . 7 ⊢ Ⅎ𝑣𝑅
8		nfcv 2319	. . . . . . . 8 ⊢ Ⅎ𝑥𝑣
9		nfcsb1v 3092	. . . . . . . 8 ⊢ Ⅎ𝑥⦋𝑢 / 𝑥⦌𝑅
10	8, 9	nfcsb 3096	. . . . . . 7 ⊢ Ⅎ𝑥⦋𝑣 / 𝑦⦌⦋𝑢 / 𝑥⦌𝑅
11		nfcsb1v 3092	. . . . . . 7 ⊢ Ⅎ𝑦⦋𝑣 / 𝑦⦌⦋𝑢 / 𝑥⦌𝑅
12		csbeq1a 3068	. . . . . . . 8 ⊢ (𝑥 = 𝑢 → 𝑅 = ⦋𝑢 / 𝑥⦌𝑅)
13		csbeq1a 3068	. . . . . . . 8 ⊢ (𝑦 = 𝑣 → ⦋𝑢 / 𝑥⦌𝑅 = ⦋𝑣 / 𝑦⦌⦋𝑢 / 𝑥⦌𝑅)
14	12, 13	sylan9eq 2230	. . . . . . 7 ⊢ ((𝑥 = 𝑢 ∧ 𝑦 = 𝑣) → 𝑅 = ⦋𝑣 / 𝑦⦌⦋𝑢 / 𝑥⦌𝑅)
15	6, 7, 10, 11, 14	cbvmpo 5956	. . . . . 6 ⊢ (𝑥 ∈ 𝐴, 𝑦 ∈ 𝐵 ↦ 𝑅) = (𝑢 ∈ 𝐴, 𝑣 ∈ 𝐵 ↦ ⦋𝑣 / 𝑦⦌⦋𝑢 / 𝑥⦌𝑅)
16		vex 2742	. . . . . . . . . 10 ⊢ 𝑢 ∈ V
17		vex 2742	. . . . . . . . . 10 ⊢ 𝑣 ∈ V
18	16, 17	op2ndd 6152	. . . . . . . . 9 ⊢ (𝑤 = ⟨𝑢, 𝑣⟩ → (2nd ‘𝑤) = 𝑣)
19	18	csbeq1d 3066	. . . . . . . 8 ⊢ (𝑤 = ⟨𝑢, 𝑣⟩ → ⦋(2nd ‘𝑤) / 𝑦⦌⦋(1st ‘𝑤) / 𝑥⦌𝑅 = ⦋𝑣 / 𝑦⦌⦋(1st ‘𝑤) / 𝑥⦌𝑅)
20	16, 17	op1std 6151	. . . . . . . . . 10 ⊢ (𝑤 = ⟨𝑢, 𝑣⟩ → (1st ‘𝑤) = 𝑢)
21	20	csbeq1d 3066	. . . . . . . . 9 ⊢ (𝑤 = ⟨𝑢, 𝑣⟩ → ⦋(1st ‘𝑤) / 𝑥⦌𝑅 = ⦋𝑢 / 𝑥⦌𝑅)
22	21	csbeq2dv 3085	. . . . . . . 8 ⊢ (𝑤 = ⟨𝑢, 𝑣⟩ → ⦋𝑣 / 𝑦⦌⦋(1st ‘𝑤) / 𝑥⦌𝑅 = ⦋𝑣 / 𝑦⦌⦋𝑢 / 𝑥⦌𝑅)
23	19, 22	eqtrd 2210	. . . . . . 7 ⊢ (𝑤 = ⟨𝑢, 𝑣⟩ → ⦋(2nd ‘𝑤) / 𝑦⦌⦋(1st ‘𝑤) / 𝑥⦌𝑅 = ⦋𝑣 / 𝑦⦌⦋𝑢 / 𝑥⦌𝑅)
24	23	mpompt 5969	. . . . . 6 ⊢ (𝑤 ∈ (𝐴 × 𝐵) ↦ ⦋(2nd ‘𝑤) / 𝑦⦌⦋(1st ‘𝑤) / 𝑥⦌𝑅) = (𝑢 ∈ 𝐴, 𝑣 ∈ 𝐵 ↦ ⦋𝑣 / 𝑦⦌⦋𝑢 / 𝑥⦌𝑅)
25	15, 24	eqtr4i 2201	. . . . 5 ⊢ (𝑥 ∈ 𝐴, 𝑦 ∈ 𝐵 ↦ 𝑅) = (𝑤 ∈ (𝐴 × 𝐵) ↦ ⦋(2nd ‘𝑤) / 𝑦⦌⦋(1st ‘𝑤) / 𝑥⦌𝑅)
26	25	fmpt 5668	. . . 4 ⊢ (∀𝑤 ∈ (𝐴 × 𝐵)⦋(2nd ‘𝑤) / 𝑦⦌⦋(1st ‘𝑤) / 𝑥⦌𝑅 ∈ 𝐶 ↔ (𝑥 ∈ 𝐴, 𝑦 ∈ 𝐵 ↦ 𝑅):(𝐴 × 𝐵)⟶𝐶)
27	5, 26	sylibr 134	. . 3 ⊢ (𝜑 → ∀𝑤 ∈ (𝐴 × 𝐵)⦋(2nd ‘𝑤) / 𝑦⦌⦋(1st ‘𝑤) / 𝑥⦌𝑅 ∈ 𝐶)
28		fmpoco.2	. . . 4 ⊢ (𝜑 → 𝐹 = (𝑥 ∈ 𝐴, 𝑦 ∈ 𝐵 ↦ 𝑅))
29	28, 25	eqtrdi 2226	. . 3 ⊢ (𝜑 → 𝐹 = (𝑤 ∈ (𝐴 × 𝐵) ↦ ⦋(2nd ‘𝑤) / 𝑦⦌⦋(1st ‘𝑤) / 𝑥⦌𝑅))
30		fmpoco.3	. . 3 ⊢ (𝜑 → 𝐺 = (𝑧 ∈ 𝐶 ↦ 𝑆))
31	27, 29, 30	fmptcos 5686	. 2 ⊢ (𝜑 → (𝐺 ∘ 𝐹) = (𝑤 ∈ (𝐴 × 𝐵) ↦ ⦋⦋(2nd ‘𝑤) / 𝑦⦌⦋(1st ‘𝑤) / 𝑥⦌𝑅 / 𝑧⦌𝑆))
32	23	csbeq1d 3066	. . . . 5 ⊢ (𝑤 = ⟨𝑢, 𝑣⟩ → ⦋⦋(2nd ‘𝑤) / 𝑦⦌⦋(1st ‘𝑤) / 𝑥⦌𝑅 / 𝑧⦌𝑆 = ⦋⦋𝑣 / 𝑦⦌⦋𝑢 / 𝑥⦌𝑅 / 𝑧⦌𝑆)
33	32	mpompt 5969	. . . 4 ⊢ (𝑤 ∈ (𝐴 × 𝐵) ↦ ⦋⦋(2nd ‘𝑤) / 𝑦⦌⦋(1st ‘𝑤) / 𝑥⦌𝑅 / 𝑧⦌𝑆) = (𝑢 ∈ 𝐴, 𝑣 ∈ 𝐵 ↦ ⦋⦋𝑣 / 𝑦⦌⦋𝑢 / 𝑥⦌𝑅 / 𝑧⦌𝑆)
34		nfcv 2319	. . . . 5 ⊢ Ⅎ𝑢⦋𝑅 / 𝑧⦌𝑆
35		nfcv 2319	. . . . 5 ⊢ Ⅎ𝑣⦋𝑅 / 𝑧⦌𝑆
36		nfcv 2319	. . . . . 6 ⊢ Ⅎ𝑥𝑆
37	10, 36	nfcsb 3096	. . . . 5 ⊢ Ⅎ𝑥⦋⦋𝑣 / 𝑦⦌⦋𝑢 / 𝑥⦌𝑅 / 𝑧⦌𝑆
38		nfcv 2319	. . . . . 6 ⊢ Ⅎ𝑦𝑆
39	11, 38	nfcsb 3096	. . . . 5 ⊢ Ⅎ𝑦⦋⦋𝑣 / 𝑦⦌⦋𝑢 / 𝑥⦌𝑅 / 𝑧⦌𝑆
40	14	csbeq1d 3066	. . . . 5 ⊢ ((𝑥 = 𝑢 ∧ 𝑦 = 𝑣) → ⦋𝑅 / 𝑧⦌𝑆 = ⦋⦋𝑣 / 𝑦⦌⦋𝑢 / 𝑥⦌𝑅 / 𝑧⦌𝑆)
41	34, 35, 37, 39, 40	cbvmpo 5956	. . . 4 ⊢ (𝑥 ∈ 𝐴, 𝑦 ∈ 𝐵 ↦ ⦋𝑅 / 𝑧⦌𝑆) = (𝑢 ∈ 𝐴, 𝑣 ∈ 𝐵 ↦ ⦋⦋𝑣 / 𝑦⦌⦋𝑢 / 𝑥⦌𝑅 / 𝑧⦌𝑆)
42	33, 41	eqtr4i 2201	. . 3 ⊢ (𝑤 ∈ (𝐴 × 𝐵) ↦ ⦋⦋(2nd ‘𝑤) / 𝑦⦌⦋(1st ‘𝑤) / 𝑥⦌𝑅 / 𝑧⦌𝑆) = (𝑥 ∈ 𝐴, 𝑦 ∈ 𝐵 ↦ ⦋𝑅 / 𝑧⦌𝑆)
43	1	3impb 1199	. . . . 5 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴 ∧ 𝑦 ∈ 𝐵) → 𝑅 ∈ 𝐶)
44		nfcvd 2320	. . . . . 6 ⊢ (𝑅 ∈ 𝐶 → Ⅎ𝑧𝑇)
45		fmpoco.4	. . . . . 6 ⊢ (𝑧 = 𝑅 → 𝑆 = 𝑇)
46	44, 45	csbiegf 3102	. . . . 5 ⊢ (𝑅 ∈ 𝐶 → ⦋𝑅 / 𝑧⦌𝑆 = 𝑇)
47	43, 46	syl 14	. . . 4 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴 ∧ 𝑦 ∈ 𝐵) → ⦋𝑅 / 𝑧⦌𝑆 = 𝑇)
48	47	mpoeq3dva 5941	. . 3 ⊢ (𝜑 → (𝑥 ∈ 𝐴, 𝑦 ∈ 𝐵 ↦ ⦋𝑅 / 𝑧⦌𝑆) = (𝑥 ∈ 𝐴, 𝑦 ∈ 𝐵 ↦ 𝑇))
49	42, 48	eqtrid 2222	. 2 ⊢ (𝜑 → (𝑤 ∈ (𝐴 × 𝐵) ↦ ⦋⦋(2nd ‘𝑤) / 𝑦⦌⦋(1st ‘𝑤) / 𝑥⦌𝑅 / 𝑧⦌𝑆) = (𝑥 ∈ 𝐴, 𝑦 ∈ 𝐵 ↦ 𝑇))
50	31, 49	eqtrd 2210	1 ⊢ (𝜑 → (𝐺 ∘ 𝐹) = (𝑥 ∈ 𝐴, 𝑦 ∈ 𝐵 ↦ 𝑇))

Syntax hints:   → wi 4   ∧ wa 104   ∧ w3a 978   = wceq 1353   ∈ wcel 2148  ∀wral 2455  ⦋csb 3059  ⟨cop 3597   ↦ cmpt 4066   × cxp 4626   ∘ ccom 4632  ⟶wf 5214  ‘cfv 5218   ∈ cmpo 5879  1^st c1st 6141  2^nd c2nd 6142

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 709  ax-5 1447  ax-7 1448  ax-gen 1449  ax-ie1 1493  ax-ie2 1494  ax-8 1504  ax-10 1505  ax-11 1506  ax-i12 1507  ax-bndl 1509  ax-4 1510  ax-17 1526  ax-i9 1530  ax-ial 1534  ax-i5r 1535  ax-13 2150  ax-14 2151  ax-ext 2159  ax-sep 4123  ax-pow 4176  ax-pr 4211  ax-un 4435

This theorem depends on definitions:  df-bi 117  df-3an 980  df-tru 1356  df-nf 1461  df-sb 1763  df-eu 2029  df-mo 2030  df-clab 2164  df-cleq 2170  df-clel 2173  df-nfc 2308  df-ral 2460  df-rex 2461  df-rab 2464  df-v 2741  df-sbc 2965  df-csb 3060  df-un 3135  df-in 3137  df-ss 3144  df-pw 3579  df-sn 3600  df-pr 3601  df-op 3603  df-uni 3812  df-iun 3890  df-br 4006  df-opab 4067  df-mpt 4068  df-id 4295  df-xp 4634  df-rel 4635  df-cnv 4636  df-co 4637  df-dm 4638  df-rn 4639  df-res 4640  df-ima 4641  df-iota 5180  df-fun 5220  df-fn 5221  df-f 5222  df-fv 5226  df-oprab 5881  df-mpo 5882  df-1st 6143  df-2nd 6144

This theorem is referenced by:  oprabco  6220  txswaphmeolem  13905  bdxmet  14086