Theorem ovmpodxf 7293

Description: Value of an operation given by a maps-to rule, deduction form. (Contributed by Mario Carneiro, 29-Dec-2014.)

Hypotheses

Ref	Expression
ovmpodx.1	⊢ (𝜑 → 𝐹 = (𝑥 ∈ 𝐶, 𝑦 ∈ 𝐷 ↦ 𝑅))
ovmpodx.2	⊢ ((𝜑 ∧ (𝑥 = 𝐴 ∧ 𝑦 = 𝐵)) → 𝑅 = 𝑆)
ovmpodx.3	⊢ ((𝜑 ∧ 𝑥 = 𝐴) → 𝐷 = 𝐿)
ovmpodx.4	⊢ (𝜑 → 𝐴 ∈ 𝐶)
ovmpodx.5	⊢ (𝜑 → 𝐵 ∈ 𝐿)
ovmpodx.6	⊢ (𝜑 → 𝑆 ∈ 𝑋)
ovmpodxf.px	⊢ Ⅎ𝑥𝜑
ovmpodxf.py	⊢ Ⅎ𝑦𝜑
ovmpodxf.ay	⊢ Ⅎ𝑦𝐴
ovmpodxf.bx	⊢ Ⅎ𝑥𝐵
ovmpodxf.sx	⊢ Ⅎ𝑥𝑆
ovmpodxf.sy	⊢ Ⅎ𝑦𝑆

Assertion

Ref	Expression
ovmpodxf	⊢ (𝜑 → (𝐴𝐹𝐵) = 𝑆)

Distinct variable groups:   𝑥,𝑦   𝑥,𝐴   𝑦,𝐵

Allowed substitution hints:   𝜑(𝑥,𝑦)   𝐴(𝑦)   𝐵(𝑥)   𝐶(𝑥,𝑦)   𝐷(𝑥,𝑦)   𝑅(𝑥,𝑦)   𝑆(𝑥,𝑦)   𝐹(𝑥,𝑦)   𝐿(𝑥,𝑦)   𝑋(𝑥,𝑦)

Proof of Theorem ovmpodxf

Step	Hyp	Ref	Expression
1		ovmpodx.1	. . 3 ⊢ (𝜑 → 𝐹 = (𝑥 ∈ 𝐶, 𝑦 ∈ 𝐷 ↦ 𝑅))
2	1	oveqd 7166	. 2 ⊢ (𝜑 → (𝐴𝐹𝐵) = (𝐴(𝑥 ∈ 𝐶, 𝑦 ∈ 𝐷 ↦ 𝑅)𝐵))
3		ovmpodx.4	. . . 4 ⊢ (𝜑 → 𝐴 ∈ 𝐶)
4		ovmpodxf.px	. . . . 5 ⊢ Ⅎ𝑥𝜑
5		ovmpodx.5	. . . . . 6 ⊢ (𝜑 → 𝐵 ∈ 𝐿)
6		ovmpodxf.py	. . . . . . 7 ⊢ Ⅎ𝑦𝜑
7		eqid 2820	. . . . . . . . 9 ⊢ (𝑥 ∈ 𝐶, 𝑦 ∈ 𝐷 ↦ 𝑅) = (𝑥 ∈ 𝐶, 𝑦 ∈ 𝐷 ↦ 𝑅)
8	7	ovmpt4g 7290	. . . . . . . 8 ⊢ ((𝑥 ∈ 𝐶 ∧ 𝑦 ∈ 𝐷 ∧ 𝑅 ∈ V) → (𝑥(𝑥 ∈ 𝐶, 𝑦 ∈ 𝐷 ↦ 𝑅)𝑦) = 𝑅)
9	8	a1i 11	. . . . . . 7 ⊢ (𝜑 → ((𝑥 ∈ 𝐶 ∧ 𝑦 ∈ 𝐷 ∧ 𝑅 ∈ V) → (𝑥(𝑥 ∈ 𝐶, 𝑦 ∈ 𝐷 ↦ 𝑅)𝑦) = 𝑅))
10	6, 9	alrimi 2212	. . . . . 6 ⊢ (𝜑 → ∀𝑦((𝑥 ∈ 𝐶 ∧ 𝑦 ∈ 𝐷 ∧ 𝑅 ∈ V) → (𝑥(𝑥 ∈ 𝐶, 𝑦 ∈ 𝐷 ↦ 𝑅)𝑦) = 𝑅))
11	5, 10	spsbcd 3782	. . . . 5 ⊢ (𝜑 → [𝐵 / 𝑦]((𝑥 ∈ 𝐶 ∧ 𝑦 ∈ 𝐷 ∧ 𝑅 ∈ V) → (𝑥(𝑥 ∈ 𝐶, 𝑦 ∈ 𝐷 ↦ 𝑅)𝑦) = 𝑅))
12	4, 11	alrimi 2212	. . . 4 ⊢ (𝜑 → ∀𝑥[𝐵 / 𝑦]((𝑥 ∈ 𝐶 ∧ 𝑦 ∈ 𝐷 ∧ 𝑅 ∈ V) → (𝑥(𝑥 ∈ 𝐶, 𝑦 ∈ 𝐷 ↦ 𝑅)𝑦) = 𝑅))
13	3, 12	spsbcd 3782	. . 3 ⊢ (𝜑 → [𝐴 / 𝑥][𝐵 / 𝑦]((𝑥 ∈ 𝐶 ∧ 𝑦 ∈ 𝐷 ∧ 𝑅 ∈ V) → (𝑥(𝑥 ∈ 𝐶, 𝑦 ∈ 𝐷 ↦ 𝑅)𝑦) = 𝑅))
14	5	adantr 483	. . . . 5 ⊢ ((𝜑 ∧ 𝑥 = 𝐴) → 𝐵 ∈ 𝐿)
15		simplr 767	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑥 = 𝐴) ∧ 𝑦 = 𝐵) → 𝑥 = 𝐴)
16	3	ad2antrr 724	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑥 = 𝐴) ∧ 𝑦 = 𝐵) → 𝐴 ∈ 𝐶)
17	15, 16	eqeltrd 2912	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑥 = 𝐴) ∧ 𝑦 = 𝐵) → 𝑥 ∈ 𝐶)
18	5	ad2antrr 724	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑥 = 𝐴) ∧ 𝑦 = 𝐵) → 𝐵 ∈ 𝐿)
19		simpr 487	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑥 = 𝐴) ∧ 𝑦 = 𝐵) → 𝑦 = 𝐵)
20		ovmpodx.3	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑥 = 𝐴) → 𝐷 = 𝐿)
21	20	adantr 483	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑥 = 𝐴) ∧ 𝑦 = 𝐵) → 𝐷 = 𝐿)
22	18, 19, 21	3eltr4d 2927	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑥 = 𝐴) ∧ 𝑦 = 𝐵) → 𝑦 ∈ 𝐷)
23		ovmpodx.2	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑥 = 𝐴 ∧ 𝑦 = 𝐵)) → 𝑅 = 𝑆)
24	23	anassrs 470	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑥 = 𝐴) ∧ 𝑦 = 𝐵) → 𝑅 = 𝑆)
25		ovmpodx.6	. . . . . . . . . 10 ⊢ (𝜑 → 𝑆 ∈ 𝑋)
26	25	elexd 3511	. . . . . . . . 9 ⊢ (𝜑 → 𝑆 ∈ V)
27	26	ad2antrr 724	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑥 = 𝐴) ∧ 𝑦 = 𝐵) → 𝑆 ∈ V)
28	24, 27	eqeltrd 2912	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑥 = 𝐴) ∧ 𝑦 = 𝐵) → 𝑅 ∈ V)
29		biimt 363	. . . . . . 7 ⊢ ((𝑥 ∈ 𝐶 ∧ 𝑦 ∈ 𝐷 ∧ 𝑅 ∈ V) → ((𝑥(𝑥 ∈ 𝐶, 𝑦 ∈ 𝐷 ↦ 𝑅)𝑦) = 𝑅 ↔ ((𝑥 ∈ 𝐶 ∧ 𝑦 ∈ 𝐷 ∧ 𝑅 ∈ V) → (𝑥(𝑥 ∈ 𝐶, 𝑦 ∈ 𝐷 ↦ 𝑅)𝑦) = 𝑅)))
30	17, 22, 28, 29	syl3anc 1366	. . . . . 6 ⊢ (((𝜑 ∧ 𝑥 = 𝐴) ∧ 𝑦 = 𝐵) → ((𝑥(𝑥 ∈ 𝐶, 𝑦 ∈ 𝐷 ↦ 𝑅)𝑦) = 𝑅 ↔ ((𝑥 ∈ 𝐶 ∧ 𝑦 ∈ 𝐷 ∧ 𝑅 ∈ V) → (𝑥(𝑥 ∈ 𝐶, 𝑦 ∈ 𝐷 ↦ 𝑅)𝑦) = 𝑅)))
31	15, 19	oveq12d 7167	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑥 = 𝐴) ∧ 𝑦 = 𝐵) → (𝑥(𝑥 ∈ 𝐶, 𝑦 ∈ 𝐷 ↦ 𝑅)𝑦) = (𝐴(𝑥 ∈ 𝐶, 𝑦 ∈ 𝐷 ↦ 𝑅)𝐵))
32	31, 24	eqeq12d 2836	. . . . . 6 ⊢ (((𝜑 ∧ 𝑥 = 𝐴) ∧ 𝑦 = 𝐵) → ((𝑥(𝑥 ∈ 𝐶, 𝑦 ∈ 𝐷 ↦ 𝑅)𝑦) = 𝑅 ↔ (𝐴(𝑥 ∈ 𝐶, 𝑦 ∈ 𝐷 ↦ 𝑅)𝐵) = 𝑆))
33	30, 32	bitr3d 283	. . . . 5 ⊢ (((𝜑 ∧ 𝑥 = 𝐴) ∧ 𝑦 = 𝐵) → (((𝑥 ∈ 𝐶 ∧ 𝑦 ∈ 𝐷 ∧ 𝑅 ∈ V) → (𝑥(𝑥 ∈ 𝐶, 𝑦 ∈ 𝐷 ↦ 𝑅)𝑦) = 𝑅) ↔ (𝐴(𝑥 ∈ 𝐶, 𝑦 ∈ 𝐷 ↦ 𝑅)𝐵) = 𝑆))
34		ovmpodxf.ay	. . . . . . 7 ⊢ Ⅎ𝑦𝐴
35	34	nfeq2 2994	. . . . . 6 ⊢ Ⅎ𝑦 𝑥 = 𝐴
36	6, 35	nfan 1899	. . . . 5 ⊢ Ⅎ𝑦(𝜑 ∧ 𝑥 = 𝐴)
37		nfmpo2 7228	. . . . . . . 8 ⊢ Ⅎ𝑦(𝑥 ∈ 𝐶, 𝑦 ∈ 𝐷 ↦ 𝑅)
38		nfcv 2976	. . . . . . . 8 ⊢ Ⅎ𝑦𝐵
39	34, 37, 38	nfov 7179	. . . . . . 7 ⊢ Ⅎ𝑦(𝐴(𝑥 ∈ 𝐶, 𝑦 ∈ 𝐷 ↦ 𝑅)𝐵)
40		ovmpodxf.sy	. . . . . . 7 ⊢ Ⅎ𝑦𝑆
41	39, 40	nfeq 2990	. . . . . 6 ⊢ Ⅎ𝑦(𝐴(𝑥 ∈ 𝐶, 𝑦 ∈ 𝐷 ↦ 𝑅)𝐵) = 𝑆
42	41	a1i 11	. . . . 5 ⊢ ((𝜑 ∧ 𝑥 = 𝐴) → Ⅎ𝑦(𝐴(𝑥 ∈ 𝐶, 𝑦 ∈ 𝐷 ↦ 𝑅)𝐵) = 𝑆)
43	14, 33, 36, 42	sbciedf 3809	. . . 4 ⊢ ((𝜑 ∧ 𝑥 = 𝐴) → ([𝐵 / 𝑦]((𝑥 ∈ 𝐶 ∧ 𝑦 ∈ 𝐷 ∧ 𝑅 ∈ V) → (𝑥(𝑥 ∈ 𝐶, 𝑦 ∈ 𝐷 ↦ 𝑅)𝑦) = 𝑅) ↔ (𝐴(𝑥 ∈ 𝐶, 𝑦 ∈ 𝐷 ↦ 𝑅)𝐵) = 𝑆))
44		nfcv 2976	. . . . . . 7 ⊢ Ⅎ𝑥𝐴
45		nfmpo1 7227	. . . . . . 7 ⊢ Ⅎ𝑥(𝑥 ∈ 𝐶, 𝑦 ∈ 𝐷 ↦ 𝑅)
46		ovmpodxf.bx	. . . . . . 7 ⊢ Ⅎ𝑥𝐵
47	44, 45, 46	nfov 7179	. . . . . 6 ⊢ Ⅎ𝑥(𝐴(𝑥 ∈ 𝐶, 𝑦 ∈ 𝐷 ↦ 𝑅)𝐵)
48		ovmpodxf.sx	. . . . . 6 ⊢ Ⅎ𝑥𝑆
49	47, 48	nfeq 2990	. . . . 5 ⊢ Ⅎ𝑥(𝐴(𝑥 ∈ 𝐶, 𝑦 ∈ 𝐷 ↦ 𝑅)𝐵) = 𝑆
50	49	a1i 11	. . . 4 ⊢ (𝜑 → Ⅎ𝑥(𝐴(𝑥 ∈ 𝐶, 𝑦 ∈ 𝐷 ↦ 𝑅)𝐵) = 𝑆)
51	3, 43, 4, 50	sbciedf 3809	. . 3 ⊢ (𝜑 → ([𝐴 / 𝑥][𝐵 / 𝑦]((𝑥 ∈ 𝐶 ∧ 𝑦 ∈ 𝐷 ∧ 𝑅 ∈ V) → (𝑥(𝑥 ∈ 𝐶, 𝑦 ∈ 𝐷 ↦ 𝑅)𝑦) = 𝑅) ↔ (𝐴(𝑥 ∈ 𝐶, 𝑦 ∈ 𝐷 ↦ 𝑅)𝐵) = 𝑆))
52	13, 51	mpbid 234	. 2 ⊢ (𝜑 → (𝐴(𝑥 ∈ 𝐶, 𝑦 ∈ 𝐷 ↦ 𝑅)𝐵) = 𝑆)
53	2, 52	eqtrd 2855	1 ⊢ (𝜑 → (𝐴𝐹𝐵) = 𝑆)

Syntax hints:   → wi 4   ↔ wb 208   ∧ wa 398   ∧ w3a 1082   = wceq 1536  Ⅎwnf 1783   ∈ wcel 2113  Ⅎwnfc 2960  Vcvv 3491  [wsbc 3768  (class class class)co 7149   ∈ cmpo 7151

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1795  ax-4 1809  ax-5 1910  ax-6 1969  ax-7 2014  ax-8 2115  ax-9 2123  ax-10 2144  ax-11 2160  ax-12 2176  ax-ext 2792  ax-sep 5196  ax-nul 5203  ax-pr 5323

This theorem depends on definitions:  df-bi 209  df-an 399  df-or 844  df-3an 1084  df-tru 1539  df-ex 1780  df-nf 1784  df-sb 2069  df-mo 2621  df-eu 2653  df-clab 2799  df-cleq 2813  df-clel 2892  df-nfc 2962  df-ral 3142  df-rex 3143  df-rab 3146  df-v 3493  df-sbc 3769  df-dif 3932  df-un 3934  df-in 3936  df-ss 3945  df-nul 4285  df-if 4461  df-sn 4561  df-pr 4563  df-op 4567  df-uni 4832  df-br 5060  df-opab 5122  df-id 5453  df-xp 5554  df-rel 5555  df-cnv 5556  df-co 5557  df-dm 5558  df-iota 6307  df-fun 6350  df-fv 6356  df-ov 7152  df-oprab 7153  df-mpo 7154

This theorem is referenced by:  ovmpodx  7294  elovmporab  7384  elovmporab1w  7385  elovmporab1  7386  ovmpt3rab1  7396  mpoxopoveq  7878  fvmpocurryd  7930  mdetralt2  21213  mdetunilem2  21217  gsummatr01lem4  21262