Theorem fsum2dlem 14983

Description: Lemma for fsum2d 14984- induction step. (Contributed by Mario Carneiro, 23-Apr-2014.)

Hypotheses

Ref	Expression
fsum2d.1	⊢ (𝑧 = ⟨𝑗, 𝑘⟩ → 𝐷 = 𝐶)
fsum2d.2	⊢ (𝜑 → 𝐴 ∈ Fin)
fsum2d.3	⊢ ((𝜑 ∧ 𝑗 ∈ 𝐴) → 𝐵 ∈ Fin)
fsum2d.4	⊢ ((𝜑 ∧ (𝑗 ∈ 𝐴 ∧ 𝑘 ∈ 𝐵)) → 𝐶 ∈ ℂ)
fsum2d.5	⊢ (𝜑 → ¬ 𝑦 ∈ 𝑥)
fsum2d.6	⊢ (𝜑 → (𝑥 ∪ {𝑦}) ⊆ 𝐴)
fsum2d.7	⊢ (𝜓 ↔ Σ𝑗 ∈ 𝑥 Σ𝑘 ∈ 𝐵 𝐶 = Σ𝑧 ∈ ∪ 𝑗 ∈ 𝑥 ({𝑗} × 𝐵)𝐷)

Assertion

Ref	Expression
fsum2dlem	⊢ ((𝜑 ∧ 𝜓) → Σ𝑗 ∈ (𝑥 ∪ {𝑦})Σ𝑘 ∈ 𝐵 𝐶 = Σ𝑧 ∈ ∪ 𝑗 ∈ (𝑥 ∪ {𝑦})({𝑗} × 𝐵)𝐷)

Distinct variable groups:   𝑗,𝑘,𝑥,𝑦,𝑧,𝐴   𝐵,𝑘,𝑥,𝑦,𝑧   𝐷,𝑗,𝑘,𝑥,𝑦   𝑥,𝐶,𝑦,𝑧   𝜑,𝑗,𝑘,𝑧

Allowed substitution hints:   𝜑(𝑥,𝑦)   𝜓(𝑥,𝑦,𝑧,𝑗,𝑘)   𝐵(𝑗)   𝐶(𝑗,𝑘)   𝐷(𝑧)

Proof of Theorem fsum2dlem

Dummy variable 𝑚 is distinct from all other variables.

Step	Hyp	Ref	Expression
1		simpr 477	. . . 4 ⊢ ((𝜑 ∧ 𝜓) → 𝜓)
2		fsum2d.7	. . . 4 ⊢ (𝜓 ↔ Σ𝑗 ∈ 𝑥 Σ𝑘 ∈ 𝐵 𝐶 = Σ𝑧 ∈ ∪ 𝑗 ∈ 𝑥 ({𝑗} × 𝐵)𝐷)
3	1, 2	sylib 210	. . 3 ⊢ ((𝜑 ∧ 𝜓) → Σ𝑗 ∈ 𝑥 Σ𝑘 ∈ 𝐵 𝐶 = Σ𝑧 ∈ ∪ 𝑗 ∈ 𝑥 ({𝑗} × 𝐵)𝐷)
4		nfcv 2926	. . . . . 6 ⊢ Ⅎ𝑚Σ𝑘 ∈ 𝐵 𝐶
5		nfcsb1v 3798	. . . . . . 7 ⊢ Ⅎ𝑗⦋𝑚 / 𝑗⦌𝐵
6		nfcsb1v 3798	. . . . . . 7 ⊢ Ⅎ𝑗⦋𝑚 / 𝑗⦌𝐶
7	5, 6	nfsum 14906	. . . . . 6 ⊢ Ⅎ𝑗Σ𝑘 ∈ ⦋ 𝑚 / 𝑗⦌𝐵⦋𝑚 / 𝑗⦌𝐶
8		csbeq1a 3789	. . . . . . 7 ⊢ (𝑗 = 𝑚 → 𝐵 = ⦋𝑚 / 𝑗⦌𝐵)
9		csbeq1a 3789	. . . . . . . 8 ⊢ (𝑗 = 𝑚 → 𝐶 = ⦋𝑚 / 𝑗⦌𝐶)
10	9	adantr 473	. . . . . . 7 ⊢ ((𝑗 = 𝑚 ∧ 𝑘 ∈ 𝐵) → 𝐶 = ⦋𝑚 / 𝑗⦌𝐶)
11	8, 10	sumeq12dv 14921	. . . . . 6 ⊢ (𝑗 = 𝑚 → Σ𝑘 ∈ 𝐵 𝐶 = Σ𝑘 ∈ ⦋ 𝑚 / 𝑗⦌𝐵⦋𝑚 / 𝑗⦌𝐶)
12	4, 7, 11	cbvsumi 14912	. . . . 5 ⊢ Σ𝑗 ∈ {𝑦}Σ𝑘 ∈ 𝐵 𝐶 = Σ𝑚 ∈ {𝑦}Σ𝑘 ∈ ⦋ 𝑚 / 𝑗⦌𝐵⦋𝑚 / 𝑗⦌𝐶
13		fsum2d.6	. . . . . . . . 9 ⊢ (𝜑 → (𝑥 ∪ {𝑦}) ⊆ 𝐴)
14	13	unssbd 4046	. . . . . . . 8 ⊢ (𝜑 → {𝑦} ⊆ 𝐴)
15		vex 3412	. . . . . . . . 9 ⊢ 𝑦 ∈ V
16	15	snss 4588	. . . . . . . 8 ⊢ (𝑦 ∈ 𝐴 ↔ {𝑦} ⊆ 𝐴)
17	14, 16	sylibr 226	. . . . . . 7 ⊢ (𝜑 → 𝑦 ∈ 𝐴)
18		fsum2d.3	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑗 ∈ 𝐴) → 𝐵 ∈ Fin)
19	18	ralrimiva 3126	. . . . . . . . 9 ⊢ (𝜑 → ∀𝑗 ∈ 𝐴 𝐵 ∈ Fin)
20		nfcsb1v 3798	. . . . . . . . . . 11 ⊢ Ⅎ𝑗⦋𝑦 / 𝑗⦌𝐵
21	20	nfel1 2940	. . . . . . . . . 10 ⊢ Ⅎ𝑗⦋𝑦 / 𝑗⦌𝐵 ∈ Fin
22		csbeq1a 3789	. . . . . . . . . . 11 ⊢ (𝑗 = 𝑦 → 𝐵 = ⦋𝑦 / 𝑗⦌𝐵)
23	22	eleq1d 2844	. . . . . . . . . 10 ⊢ (𝑗 = 𝑦 → (𝐵 ∈ Fin ↔ ⦋𝑦 / 𝑗⦌𝐵 ∈ Fin))
24	21, 23	rspc 3523	. . . . . . . . 9 ⊢ (𝑦 ∈ 𝐴 → (∀𝑗 ∈ 𝐴 𝐵 ∈ Fin → ⦋𝑦 / 𝑗⦌𝐵 ∈ Fin))
25	17, 19, 24	sylc 65	. . . . . . . 8 ⊢ (𝜑 → ⦋𝑦 / 𝑗⦌𝐵 ∈ Fin)
26		fsum2d.4	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ (𝑗 ∈ 𝐴 ∧ 𝑘 ∈ 𝐵)) → 𝐶 ∈ ℂ)
27	26	ralrimivva 3135	. . . . . . . . . 10 ⊢ (𝜑 → ∀𝑗 ∈ 𝐴 ∀𝑘 ∈ 𝐵 𝐶 ∈ ℂ)
28		nfcsb1v 3798	. . . . . . . . . . . . 13 ⊢ Ⅎ𝑗⦋𝑦 / 𝑗⦌𝐶
29	28	nfel1 2940	. . . . . . . . . . . 12 ⊢ Ⅎ𝑗⦋𝑦 / 𝑗⦌𝐶 ∈ ℂ
30	20, 29	nfral 3168	. . . . . . . . . . 11 ⊢ Ⅎ𝑗∀𝑘 ∈ ⦋ 𝑦 / 𝑗⦌𝐵⦋𝑦 / 𝑗⦌𝐶 ∈ ℂ
31		csbeq1a 3789	. . . . . . . . . . . . 13 ⊢ (𝑗 = 𝑦 → 𝐶 = ⦋𝑦 / 𝑗⦌𝐶)
32	31	eleq1d 2844	. . . . . . . . . . . 12 ⊢ (𝑗 = 𝑦 → (𝐶 ∈ ℂ ↔ ⦋𝑦 / 𝑗⦌𝐶 ∈ ℂ))
33	22, 32	raleqbidv 3335	. . . . . . . . . . 11 ⊢ (𝑗 = 𝑦 → (∀𝑘 ∈ 𝐵 𝐶 ∈ ℂ ↔ ∀𝑘 ∈ ⦋ 𝑦 / 𝑗⦌𝐵⦋𝑦 / 𝑗⦌𝐶 ∈ ℂ))
34	30, 33	rspc 3523	. . . . . . . . . 10 ⊢ (𝑦 ∈ 𝐴 → (∀𝑗 ∈ 𝐴 ∀𝑘 ∈ 𝐵 𝐶 ∈ ℂ → ∀𝑘 ∈ ⦋ 𝑦 / 𝑗⦌𝐵⦋𝑦 / 𝑗⦌𝐶 ∈ ℂ))
35	17, 27, 34	sylc 65	. . . . . . . . 9 ⊢ (𝜑 → ∀𝑘 ∈ ⦋ 𝑦 / 𝑗⦌𝐵⦋𝑦 / 𝑗⦌𝐶 ∈ ℂ)
36	35	r19.21bi 3152	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑘 ∈ ⦋𝑦 / 𝑗⦌𝐵) → ⦋𝑦 / 𝑗⦌𝐶 ∈ ℂ)
37	25, 36	fsumcl 14948	. . . . . . 7 ⊢ (𝜑 → Σ𝑘 ∈ ⦋ 𝑦 / 𝑗⦌𝐵⦋𝑦 / 𝑗⦌𝐶 ∈ ℂ)
38		csbeq1 3783	. . . . . . . . 9 ⊢ (𝑚 = 𝑦 → ⦋𝑚 / 𝑗⦌𝐵 = ⦋𝑦 / 𝑗⦌𝐵)
39		csbeq1 3783	. . . . . . . . . 10 ⊢ (𝑚 = 𝑦 → ⦋𝑚 / 𝑗⦌𝐶 = ⦋𝑦 / 𝑗⦌𝐶)
40	39	adantr 473	. . . . . . . . 9 ⊢ ((𝑚 = 𝑦 ∧ 𝑘 ∈ ⦋𝑚 / 𝑗⦌𝐵) → ⦋𝑚 / 𝑗⦌𝐶 = ⦋𝑦 / 𝑗⦌𝐶)
41	38, 40	sumeq12dv 14921	. . . . . . . 8 ⊢ (𝑚 = 𝑦 → Σ𝑘 ∈ ⦋ 𝑚 / 𝑗⦌𝐵⦋𝑚 / 𝑗⦌𝐶 = Σ𝑘 ∈ ⦋ 𝑦 / 𝑗⦌𝐵⦋𝑦 / 𝑗⦌𝐶)
42	41	sumsn 14959	. . . . . . 7 ⊢ ((𝑦 ∈ 𝐴 ∧ Σ𝑘 ∈ ⦋ 𝑦 / 𝑗⦌𝐵⦋𝑦 / 𝑗⦌𝐶 ∈ ℂ) → Σ𝑚 ∈ {𝑦}Σ𝑘 ∈ ⦋ 𝑚 / 𝑗⦌𝐵⦋𝑚 / 𝑗⦌𝐶 = Σ𝑘 ∈ ⦋ 𝑦 / 𝑗⦌𝐵⦋𝑦 / 𝑗⦌𝐶)
43	17, 37, 42	syl2anc 576	. . . . . 6 ⊢ (𝜑 → Σ𝑚 ∈ {𝑦}Σ𝑘 ∈ ⦋ 𝑚 / 𝑗⦌𝐵⦋𝑚 / 𝑗⦌𝐶 = Σ𝑘 ∈ ⦋ 𝑦 / 𝑗⦌𝐵⦋𝑦 / 𝑗⦌𝐶)
44		nfcv 2926	. . . . . . . 8 ⊢ Ⅎ𝑚⦋𝑦 / 𝑗⦌𝐶
45		nfcsb1v 3798	. . . . . . . 8 ⊢ Ⅎ𝑘⦋𝑚 / 𝑘⦌⦋𝑦 / 𝑗⦌𝐶
46		csbeq1a 3789	. . . . . . . 8 ⊢ (𝑘 = 𝑚 → ⦋𝑦 / 𝑗⦌𝐶 = ⦋𝑚 / 𝑘⦌⦋𝑦 / 𝑗⦌𝐶)
47	44, 45, 46	cbvsumi 14912	. . . . . . 7 ⊢ Σ𝑘 ∈ ⦋ 𝑦 / 𝑗⦌𝐵⦋𝑦 / 𝑗⦌𝐶 = Σ𝑚 ∈ ⦋ 𝑦 / 𝑗⦌𝐵⦋𝑚 / 𝑘⦌⦋𝑦 / 𝑗⦌𝐶
48		csbeq1 3783	. . . . . . . . 9 ⊢ (𝑚 = (2nd ‘𝑧) → ⦋𝑚 / 𝑘⦌⦋𝑦 / 𝑗⦌𝐶 = ⦋(2nd ‘𝑧) / 𝑘⦌⦋𝑦 / 𝑗⦌𝐶)
49		snfi 8389	. . . . . . . . . 10 ⊢ {𝑦} ∈ Fin
50		xpfi 8582	. . . . . . . . . 10 ⊢ (({𝑦} ∈ Fin ∧ ⦋𝑦 / 𝑗⦌𝐵 ∈ Fin) → ({𝑦} × ⦋𝑦 / 𝑗⦌𝐵) ∈ Fin)
51	49, 25, 50	sylancr 578	. . . . . . . . 9 ⊢ (𝜑 → ({𝑦} × ⦋𝑦 / 𝑗⦌𝐵) ∈ Fin)
52		2ndconst 7602	. . . . . . . . . 10 ⊢ (𝑦 ∈ 𝐴 → (2nd ↾ ({𝑦} × ⦋𝑦 / 𝑗⦌𝐵)):({𝑦} × ⦋𝑦 / 𝑗⦌𝐵)–1-1-onto→⦋𝑦 / 𝑗⦌𝐵)
53	17, 52	syl 17	. . . . . . . . 9 ⊢ (𝜑 → (2nd ↾ ({𝑦} × ⦋𝑦 / 𝑗⦌𝐵)):({𝑦} × ⦋𝑦 / 𝑗⦌𝐵)–1-1-onto→⦋𝑦 / 𝑗⦌𝐵)
54		fvres 6515	. . . . . . . . . 10 ⊢ (𝑧 ∈ ({𝑦} × ⦋𝑦 / 𝑗⦌𝐵) → ((2nd ↾ ({𝑦} × ⦋𝑦 / 𝑗⦌𝐵))‘𝑧) = (2nd ‘𝑧))
55	54	adantl 474	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑧 ∈ ({𝑦} × ⦋𝑦 / 𝑗⦌𝐵)) → ((2nd ↾ ({𝑦} × ⦋𝑦 / 𝑗⦌𝐵))‘𝑧) = (2nd ‘𝑧))
56	45	nfel1 2940	. . . . . . . . . . 11 ⊢ Ⅎ𝑘⦋𝑚 / 𝑘⦌⦋𝑦 / 𝑗⦌𝐶 ∈ ℂ
57	46	eleq1d 2844	. . . . . . . . . . 11 ⊢ (𝑘 = 𝑚 → (⦋𝑦 / 𝑗⦌𝐶 ∈ ℂ ↔ ⦋𝑚 / 𝑘⦌⦋𝑦 / 𝑗⦌𝐶 ∈ ℂ))
58	56, 57	rspc 3523	. . . . . . . . . 10 ⊢ (𝑚 ∈ ⦋𝑦 / 𝑗⦌𝐵 → (∀𝑘 ∈ ⦋ 𝑦 / 𝑗⦌𝐵⦋𝑦 / 𝑗⦌𝐶 ∈ ℂ → ⦋𝑚 / 𝑘⦌⦋𝑦 / 𝑗⦌𝐶 ∈ ℂ))
59	35, 58	mpan9 499	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑚 ∈ ⦋𝑦 / 𝑗⦌𝐵) → ⦋𝑚 / 𝑘⦌⦋𝑦 / 𝑗⦌𝐶 ∈ ℂ)
60	48, 51, 53, 55, 59	fsumf1o 14938	. . . . . . . 8 ⊢ (𝜑 → Σ𝑚 ∈ ⦋ 𝑦 / 𝑗⦌𝐵⦋𝑚 / 𝑘⦌⦋𝑦 / 𝑗⦌𝐶 = Σ𝑧 ∈ ({𝑦} × ⦋𝑦 / 𝑗⦌𝐵)⦋(2nd ‘𝑧) / 𝑘⦌⦋𝑦 / 𝑗⦌𝐶)
61		elxp 5426	. . . . . . . . . . . 12 ⊢ (𝑧 ∈ ({𝑦} × ⦋𝑦 / 𝑗⦌𝐵) ↔ ∃𝑚∃𝑘(𝑧 = ⟨𝑚, 𝑘⟩ ∧ (𝑚 ∈ {𝑦} ∧ 𝑘 ∈ ⦋𝑦 / 𝑗⦌𝐵)))
62		nfv 1873	. . . . . . . . . . . . . . 15 ⊢ Ⅎ𝑗 𝑧 = ⟨𝑚, 𝑘⟩
63		nfv 1873	. . . . . . . . . . . . . . . 16 ⊢ Ⅎ𝑗 𝑚 ∈ {𝑦}
64	20	nfcri 2920	. . . . . . . . . . . . . . . 16 ⊢ Ⅎ𝑗 𝑘 ∈ ⦋𝑦 / 𝑗⦌𝐵
65	63, 64	nfan 1862	. . . . . . . . . . . . . . 15 ⊢ Ⅎ𝑗(𝑚 ∈ {𝑦} ∧ 𝑘 ∈ ⦋𝑦 / 𝑗⦌𝐵)
66	62, 65	nfan 1862	. . . . . . . . . . . . . 14 ⊢ Ⅎ𝑗(𝑧 = ⟨𝑚, 𝑘⟩ ∧ (𝑚 ∈ {𝑦} ∧ 𝑘 ∈ ⦋𝑦 / 𝑗⦌𝐵))
67	66	nfex 2264	. . . . . . . . . . . . 13 ⊢ Ⅎ𝑗∃𝑘(𝑧 = ⟨𝑚, 𝑘⟩ ∧ (𝑚 ∈ {𝑦} ∧ 𝑘 ∈ ⦋𝑦 / 𝑗⦌𝐵))
68		nfv 1873	. . . . . . . . . . . . 13 ⊢ Ⅎ𝑚∃𝑘(𝑧 = ⟨𝑗, 𝑘⟩ ∧ (𝑗 = 𝑦 ∧ 𝑘 ∈ 𝐵))
69		opeq1 4673	. . . . . . . . . . . . . . . 16 ⊢ (𝑚 = 𝑗 → ⟨𝑚, 𝑘⟩ = ⟨𝑗, 𝑘⟩)
70	69	eqeq2d 2782	. . . . . . . . . . . . . . 15 ⊢ (𝑚 = 𝑗 → (𝑧 = ⟨𝑚, 𝑘⟩ ↔ 𝑧 = ⟨𝑗, 𝑘⟩))
71		eqtr2 2794	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝑚 = 𝑗 ∧ 𝑚 = 𝑦) → 𝑗 = 𝑦)
72	71, 22	syl 17	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝑚 = 𝑗 ∧ 𝑚 = 𝑦) → 𝐵 = ⦋𝑦 / 𝑗⦌𝐵)
73	72	eleq2d 2845	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑚 = 𝑗 ∧ 𝑚 = 𝑦) → (𝑘 ∈ 𝐵 ↔ 𝑘 ∈ ⦋𝑦 / 𝑗⦌𝐵))
74	73	pm5.32da 571	. . . . . . . . . . . . . . . . 17 ⊢ (𝑚 = 𝑗 → ((𝑚 = 𝑦 ∧ 𝑘 ∈ 𝐵) ↔ (𝑚 = 𝑦 ∧ 𝑘 ∈ ⦋𝑦 / 𝑗⦌𝐵)))
75		velsn 4451	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑚 ∈ {𝑦} ↔ 𝑚 = 𝑦)
76	75	anbi1i 614	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑚 ∈ {𝑦} ∧ 𝑘 ∈ ⦋𝑦 / 𝑗⦌𝐵) ↔ (𝑚 = 𝑦 ∧ 𝑘 ∈ ⦋𝑦 / 𝑗⦌𝐵))
77	74, 76	syl6rbbr 282	. . . . . . . . . . . . . . . 16 ⊢ (𝑚 = 𝑗 → ((𝑚 ∈ {𝑦} ∧ 𝑘 ∈ ⦋𝑦 / 𝑗⦌𝐵) ↔ (𝑚 = 𝑦 ∧ 𝑘 ∈ 𝐵)))
78		equequ1 1982	. . . . . . . . . . . . . . . . 17 ⊢ (𝑚 = 𝑗 → (𝑚 = 𝑦 ↔ 𝑗 = 𝑦))
79	78	anbi1d 620	. . . . . . . . . . . . . . . 16 ⊢ (𝑚 = 𝑗 → ((𝑚 = 𝑦 ∧ 𝑘 ∈ 𝐵) ↔ (𝑗 = 𝑦 ∧ 𝑘 ∈ 𝐵)))
80	77, 79	bitrd 271	. . . . . . . . . . . . . . 15 ⊢ (𝑚 = 𝑗 → ((𝑚 ∈ {𝑦} ∧ 𝑘 ∈ ⦋𝑦 / 𝑗⦌𝐵) ↔ (𝑗 = 𝑦 ∧ 𝑘 ∈ 𝐵)))
81	70, 80	anbi12d 621	. . . . . . . . . . . . . 14 ⊢ (𝑚 = 𝑗 → ((𝑧 = ⟨𝑚, 𝑘⟩ ∧ (𝑚 ∈ {𝑦} ∧ 𝑘 ∈ ⦋𝑦 / 𝑗⦌𝐵)) ↔ (𝑧 = ⟨𝑗, 𝑘⟩ ∧ (𝑗 = 𝑦 ∧ 𝑘 ∈ 𝐵))))
82	81	exbidv 1880	. . . . . . . . . . . . 13 ⊢ (𝑚 = 𝑗 → (∃𝑘(𝑧 = ⟨𝑚, 𝑘⟩ ∧ (𝑚 ∈ {𝑦} ∧ 𝑘 ∈ ⦋𝑦 / 𝑗⦌𝐵)) ↔ ∃𝑘(𝑧 = ⟨𝑗, 𝑘⟩ ∧ (𝑗 = 𝑦 ∧ 𝑘 ∈ 𝐵))))
83	67, 68, 82	cbvexv1 2278	. . . . . . . . . . . 12 ⊢ (∃𝑚∃𝑘(𝑧 = ⟨𝑚, 𝑘⟩ ∧ (𝑚 ∈ {𝑦} ∧ 𝑘 ∈ ⦋𝑦 / 𝑗⦌𝐵)) ↔ ∃𝑗∃𝑘(𝑧 = ⟨𝑗, 𝑘⟩ ∧ (𝑗 = 𝑦 ∧ 𝑘 ∈ 𝐵)))
84	61, 83	bitri 267	. . . . . . . . . . 11 ⊢ (𝑧 ∈ ({𝑦} × ⦋𝑦 / 𝑗⦌𝐵) ↔ ∃𝑗∃𝑘(𝑧 = ⟨𝑗, 𝑘⟩ ∧ (𝑗 = 𝑦 ∧ 𝑘 ∈ 𝐵)))
85		nfv 1873	. . . . . . . . . . . 12 ⊢ Ⅎ𝑗𝜑
86		nfcv 2926	. . . . . . . . . . . . . 14 ⊢ Ⅎ𝑗(2nd ‘𝑧)
87	86, 28	nfcsb 3800	. . . . . . . . . . . . 13 ⊢ Ⅎ𝑗⦋(2nd ‘𝑧) / 𝑘⦌⦋𝑦 / 𝑗⦌𝐶
88	87	nfeq2 2941	. . . . . . . . . . . 12 ⊢ Ⅎ𝑗 𝐷 = ⦋(2nd ‘𝑧) / 𝑘⦌⦋𝑦 / 𝑗⦌𝐶
89		nfv 1873	. . . . . . . . . . . . 13 ⊢ Ⅎ𝑘𝜑
90		nfcsb1v 3798	. . . . . . . . . . . . . 14 ⊢ Ⅎ𝑘⦋(2nd ‘𝑧) / 𝑘⦌⦋𝑦 / 𝑗⦌𝐶
91	90	nfeq2 2941	. . . . . . . . . . . . 13 ⊢ Ⅎ𝑘 𝐷 = ⦋(2nd ‘𝑧) / 𝑘⦌⦋𝑦 / 𝑗⦌𝐶
92		fsum2d.1	. . . . . . . . . . . . . . . 16 ⊢ (𝑧 = ⟨𝑗, 𝑘⟩ → 𝐷 = 𝐶)
93	92	ad2antlr 714	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑧 = ⟨𝑗, 𝑘⟩) ∧ (𝑗 = 𝑦 ∧ 𝑘 ∈ 𝐵)) → 𝐷 = 𝐶)
94	31	ad2antrl 715	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑧 = ⟨𝑗, 𝑘⟩) ∧ (𝑗 = 𝑦 ∧ 𝑘 ∈ 𝐵)) → 𝐶 = ⦋𝑦 / 𝑗⦌𝐶)
95		fveq2 6496	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑧 = ⟨𝑗, 𝑘⟩ → (2nd ‘𝑧) = (2nd ‘⟨𝑗, 𝑘⟩))
96		vex 3412	. . . . . . . . . . . . . . . . . . 19 ⊢ 𝑗 ∈ V
97		vex 3412	. . . . . . . . . . . . . . . . . . 19 ⊢ 𝑘 ∈ V
98	96, 97	op2nd 7508	. . . . . . . . . . . . . . . . . 18 ⊢ (2nd ‘⟨𝑗, 𝑘⟩) = 𝑘
99	95, 98	syl6req 2825	. . . . . . . . . . . . . . . . 17 ⊢ (𝑧 = ⟨𝑗, 𝑘⟩ → 𝑘 = (2nd ‘𝑧))
100	99	ad2antlr 714	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑧 = ⟨𝑗, 𝑘⟩) ∧ (𝑗 = 𝑦 ∧ 𝑘 ∈ 𝐵)) → 𝑘 = (2nd ‘𝑧))
101		csbeq1a 3789	. . . . . . . . . . . . . . . 16 ⊢ (𝑘 = (2nd ‘𝑧) → ⦋𝑦 / 𝑗⦌𝐶 = ⦋(2nd ‘𝑧) / 𝑘⦌⦋𝑦 / 𝑗⦌𝐶)
102	100, 101	syl 17	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑧 = ⟨𝑗, 𝑘⟩) ∧ (𝑗 = 𝑦 ∧ 𝑘 ∈ 𝐵)) → ⦋𝑦 / 𝑗⦌𝐶 = ⦋(2nd ‘𝑧) / 𝑘⦌⦋𝑦 / 𝑗⦌𝐶)
103	93, 94, 102	3eqtrd 2812	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑧 = ⟨𝑗, 𝑘⟩) ∧ (𝑗 = 𝑦 ∧ 𝑘 ∈ 𝐵)) → 𝐷 = ⦋(2nd ‘𝑧) / 𝑘⦌⦋𝑦 / 𝑗⦌𝐶)
104	103	expl 450	. . . . . . . . . . . . 13 ⊢ (𝜑 → ((𝑧 = ⟨𝑗, 𝑘⟩ ∧ (𝑗 = 𝑦 ∧ 𝑘 ∈ 𝐵)) → 𝐷 = ⦋(2nd ‘𝑧) / 𝑘⦌⦋𝑦 / 𝑗⦌𝐶))
105	89, 91, 104	exlimd 2148	. . . . . . . . . . . 12 ⊢ (𝜑 → (∃𝑘(𝑧 = ⟨𝑗, 𝑘⟩ ∧ (𝑗 = 𝑦 ∧ 𝑘 ∈ 𝐵)) → 𝐷 = ⦋(2nd ‘𝑧) / 𝑘⦌⦋𝑦 / 𝑗⦌𝐶))
106	85, 88, 105	exlimd 2148	. . . . . . . . . . 11 ⊢ (𝜑 → (∃𝑗∃𝑘(𝑧 = ⟨𝑗, 𝑘⟩ ∧ (𝑗 = 𝑦 ∧ 𝑘 ∈ 𝐵)) → 𝐷 = ⦋(2nd ‘𝑧) / 𝑘⦌⦋𝑦 / 𝑗⦌𝐶))
107	84, 106	syl5bi 234	. . . . . . . . . 10 ⊢ (𝜑 → (𝑧 ∈ ({𝑦} × ⦋𝑦 / 𝑗⦌𝐵) → 𝐷 = ⦋(2nd ‘𝑧) / 𝑘⦌⦋𝑦 / 𝑗⦌𝐶))
108	107	imp 398	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑧 ∈ ({𝑦} × ⦋𝑦 / 𝑗⦌𝐵)) → 𝐷 = ⦋(2nd ‘𝑧) / 𝑘⦌⦋𝑦 / 𝑗⦌𝐶)
109	108	sumeq2dv 14918	. . . . . . . 8 ⊢ (𝜑 → Σ𝑧 ∈ ({𝑦} × ⦋𝑦 / 𝑗⦌𝐵)𝐷 = Σ𝑧 ∈ ({𝑦} × ⦋𝑦 / 𝑗⦌𝐵)⦋(2nd ‘𝑧) / 𝑘⦌⦋𝑦 / 𝑗⦌𝐶)
110	60, 109	eqtr4d 2811	. . . . . . 7 ⊢ (𝜑 → Σ𝑚 ∈ ⦋ 𝑦 / 𝑗⦌𝐵⦋𝑚 / 𝑘⦌⦋𝑦 / 𝑗⦌𝐶 = Σ𝑧 ∈ ({𝑦} × ⦋𝑦 / 𝑗⦌𝐵)𝐷)
111	47, 110	syl5eq 2820	. . . . . 6 ⊢ (𝜑 → Σ𝑘 ∈ ⦋ 𝑦 / 𝑗⦌𝐵⦋𝑦 / 𝑗⦌𝐶 = Σ𝑧 ∈ ({𝑦} × ⦋𝑦 / 𝑗⦌𝐵)𝐷)
112	43, 111	eqtrd 2808	. . . . 5 ⊢ (𝜑 → Σ𝑚 ∈ {𝑦}Σ𝑘 ∈ ⦋ 𝑚 / 𝑗⦌𝐵⦋𝑚 / 𝑗⦌𝐶 = Σ𝑧 ∈ ({𝑦} × ⦋𝑦 / 𝑗⦌𝐵)𝐷)
113	12, 112	syl5eq 2820	. . . 4 ⊢ (𝜑 → Σ𝑗 ∈ {𝑦}Σ𝑘 ∈ 𝐵 𝐶 = Σ𝑧 ∈ ({𝑦} × ⦋𝑦 / 𝑗⦌𝐵)𝐷)
114	113	adantr 473	. . 3 ⊢ ((𝜑 ∧ 𝜓) → Σ𝑗 ∈ {𝑦}Σ𝑘 ∈ 𝐵 𝐶 = Σ𝑧 ∈ ({𝑦} × ⦋𝑦 / 𝑗⦌𝐵)𝐷)
115	3, 114	oveq12d 6992	. 2 ⊢ ((𝜑 ∧ 𝜓) → (Σ𝑗 ∈ 𝑥 Σ𝑘 ∈ 𝐵 𝐶 + Σ𝑗 ∈ {𝑦}Σ𝑘 ∈ 𝐵 𝐶) = (Σ𝑧 ∈ ∪ 𝑗 ∈ 𝑥 ({𝑗} × 𝐵)𝐷 + Σ𝑧 ∈ ({𝑦} × ⦋𝑦 / 𝑗⦌𝐵)𝐷))
116		fsum2d.5	. . . . 5 ⊢ (𝜑 → ¬ 𝑦 ∈ 𝑥)
117		disjsn 4517	. . . . 5 ⊢ ((𝑥 ∩ {𝑦}) = ∅ ↔ ¬ 𝑦 ∈ 𝑥)
118	116, 117	sylibr 226	. . . 4 ⊢ (𝜑 → (𝑥 ∩ {𝑦}) = ∅)
119		eqidd 2773	. . . 4 ⊢ (𝜑 → (𝑥 ∪ {𝑦}) = (𝑥 ∪ {𝑦}))
120		fsum2d.2	. . . . 5 ⊢ (𝜑 → 𝐴 ∈ Fin)
121	120, 13	ssfid 8534	. . . 4 ⊢ (𝜑 → (𝑥 ∪ {𝑦}) ∈ Fin)
122	13	sselda 3852	. . . . 5 ⊢ ((𝜑 ∧ 𝑗 ∈ (𝑥 ∪ {𝑦})) → 𝑗 ∈ 𝐴)
123	26	anassrs 460	. . . . . 6 ⊢ (((𝜑 ∧ 𝑗 ∈ 𝐴) ∧ 𝑘 ∈ 𝐵) → 𝐶 ∈ ℂ)
124	18, 123	fsumcl 14948	. . . . 5 ⊢ ((𝜑 ∧ 𝑗 ∈ 𝐴) → Σ𝑘 ∈ 𝐵 𝐶 ∈ ℂ)
125	122, 124	syldan 582	. . . 4 ⊢ ((𝜑 ∧ 𝑗 ∈ (𝑥 ∪ {𝑦})) → Σ𝑘 ∈ 𝐵 𝐶 ∈ ℂ)
126	118, 119, 121, 125	fsumsplit 14955	. . 3 ⊢ (𝜑 → Σ𝑗 ∈ (𝑥 ∪ {𝑦})Σ𝑘 ∈ 𝐵 𝐶 = (Σ𝑗 ∈ 𝑥 Σ𝑘 ∈ 𝐵 𝐶 + Σ𝑗 ∈ {𝑦}Σ𝑘 ∈ 𝐵 𝐶))
127	126	adantr 473	. 2 ⊢ ((𝜑 ∧ 𝜓) → Σ𝑗 ∈ (𝑥 ∪ {𝑦})Σ𝑘 ∈ 𝐵 𝐶 = (Σ𝑗 ∈ 𝑥 Σ𝑘 ∈ 𝐵 𝐶 + Σ𝑗 ∈ {𝑦}Σ𝑘 ∈ 𝐵 𝐶))
128		eliun 4792	. . . . . . . . . 10 ⊢ (𝑧 ∈ ∪ 𝑗 ∈ 𝑥 ({𝑗} × 𝐵) ↔ ∃𝑗 ∈ 𝑥 𝑧 ∈ ({𝑗} × 𝐵))
129		xp1st 7531	. . . . . . . . . . . . . 14 ⊢ (𝑧 ∈ ({𝑗} × 𝐵) → (1st ‘𝑧) ∈ {𝑗})
130		elsni 4452	. . . . . . . . . . . . . 14 ⊢ ((1st ‘𝑧) ∈ {𝑗} → (1st ‘𝑧) = 𝑗)
131	129, 130	syl 17	. . . . . . . . . . . . 13 ⊢ (𝑧 ∈ ({𝑗} × 𝐵) → (1st ‘𝑧) = 𝑗)
132	131	adantl 474	. . . . . . . . . . . 12 ⊢ ((𝑗 ∈ 𝑥 ∧ 𝑧 ∈ ({𝑗} × 𝐵)) → (1st ‘𝑧) = 𝑗)
133		simpl 475	. . . . . . . . . . . 12 ⊢ ((𝑗 ∈ 𝑥 ∧ 𝑧 ∈ ({𝑗} × 𝐵)) → 𝑗 ∈ 𝑥)
134	132, 133	eqeltrd 2860	. . . . . . . . . . 11 ⊢ ((𝑗 ∈ 𝑥 ∧ 𝑧 ∈ ({𝑗} × 𝐵)) → (1st ‘𝑧) ∈ 𝑥)
135	134	rexlimiva 3220	. . . . . . . . . 10 ⊢ (∃𝑗 ∈ 𝑥 𝑧 ∈ ({𝑗} × 𝐵) → (1st ‘𝑧) ∈ 𝑥)
136	128, 135	sylbi 209	. . . . . . . . 9 ⊢ (𝑧 ∈ ∪ 𝑗 ∈ 𝑥 ({𝑗} × 𝐵) → (1st ‘𝑧) ∈ 𝑥)
137		xp1st 7531	. . . . . . . . 9 ⊢ (𝑧 ∈ ({𝑦} × ⦋𝑦 / 𝑗⦌𝐵) → (1st ‘𝑧) ∈ {𝑦})
138	136, 137	anim12i 603	. . . . . . . 8 ⊢ ((𝑧 ∈ ∪ 𝑗 ∈ 𝑥 ({𝑗} × 𝐵) ∧ 𝑧 ∈ ({𝑦} × ⦋𝑦 / 𝑗⦌𝐵)) → ((1st ‘𝑧) ∈ 𝑥 ∧ (1st ‘𝑧) ∈ {𝑦}))
139		elin 4051	. . . . . . . 8 ⊢ (𝑧 ∈ (∪ 𝑗 ∈ 𝑥 ({𝑗} × 𝐵) ∩ ({𝑦} × ⦋𝑦 / 𝑗⦌𝐵)) ↔ (𝑧 ∈ ∪ 𝑗 ∈ 𝑥 ({𝑗} × 𝐵) ∧ 𝑧 ∈ ({𝑦} × ⦋𝑦 / 𝑗⦌𝐵)))
140		elin 4051	. . . . . . . 8 ⊢ ((1st ‘𝑧) ∈ (𝑥 ∩ {𝑦}) ↔ ((1st ‘𝑧) ∈ 𝑥 ∧ (1st ‘𝑧) ∈ {𝑦}))
141	138, 139, 140	3imtr4i 284	. . . . . . 7 ⊢ (𝑧 ∈ (∪ 𝑗 ∈ 𝑥 ({𝑗} × 𝐵) ∩ ({𝑦} × ⦋𝑦 / 𝑗⦌𝐵)) → (1st ‘𝑧) ∈ (𝑥 ∩ {𝑦}))
142	118	eleq2d 2845	. . . . . . . 8 ⊢ (𝜑 → ((1st ‘𝑧) ∈ (𝑥 ∩ {𝑦}) ↔ (1st ‘𝑧) ∈ ∅))
143		noel 4177	. . . . . . . . 9 ⊢ ¬ (1st ‘𝑧) ∈ ∅
144	143	pm2.21i 117	. . . . . . . 8 ⊢ ((1st ‘𝑧) ∈ ∅ → 𝑧 ∈ ∅)
145	142, 144	syl6bi 245	. . . . . . 7 ⊢ (𝜑 → ((1st ‘𝑧) ∈ (𝑥 ∩ {𝑦}) → 𝑧 ∈ ∅))
146	141, 145	syl5 34	. . . . . 6 ⊢ (𝜑 → (𝑧 ∈ (∪ 𝑗 ∈ 𝑥 ({𝑗} × 𝐵) ∩ ({𝑦} × ⦋𝑦 / 𝑗⦌𝐵)) → 𝑧 ∈ ∅))
147	146	ssrdv 3858	. . . . 5 ⊢ (𝜑 → (∪ 𝑗 ∈ 𝑥 ({𝑗} × 𝐵) ∩ ({𝑦} × ⦋𝑦 / 𝑗⦌𝐵)) ⊆ ∅)
148		ss0 4232	. . . . 5 ⊢ ((∪ 𝑗 ∈ 𝑥 ({𝑗} × 𝐵) ∩ ({𝑦} × ⦋𝑦 / 𝑗⦌𝐵)) ⊆ ∅ → (∪ 𝑗 ∈ 𝑥 ({𝑗} × 𝐵) ∩ ({𝑦} × ⦋𝑦 / 𝑗⦌𝐵)) = ∅)
149	147, 148	syl 17	. . . 4 ⊢ (𝜑 → (∪ 𝑗 ∈ 𝑥 ({𝑗} × 𝐵) ∩ ({𝑦} × ⦋𝑦 / 𝑗⦌𝐵)) = ∅)
150		iunxun 4878	. . . . . 6 ⊢ ∪ 𝑗 ∈ (𝑥 ∪ {𝑦})({𝑗} × 𝐵) = (∪ 𝑗 ∈ 𝑥 ({𝑗} × 𝐵) ∪ ∪ 𝑗 ∈ {𝑦} ({𝑗} × 𝐵))
151		nfcv 2926	. . . . . . . . 9 ⊢ Ⅎ𝑚({𝑗} × 𝐵)
152		nfcv 2926	. . . . . . . . . 10 ⊢ Ⅎ𝑗{𝑚}
153	152, 5	nfxp 5436	. . . . . . . . 9 ⊢ Ⅎ𝑗({𝑚} × ⦋𝑚 / 𝑗⦌𝐵)
154		sneq 4445	. . . . . . . . . 10 ⊢ (𝑗 = 𝑚 → {𝑗} = {𝑚})
155	154, 8	xpeq12d 5434	. . . . . . . . 9 ⊢ (𝑗 = 𝑚 → ({𝑗} × 𝐵) = ({𝑚} × ⦋𝑚 / 𝑗⦌𝐵))
156	151, 153, 155	cbviun 4827	. . . . . . . 8 ⊢ ∪ 𝑗 ∈ {𝑦} ({𝑗} × 𝐵) = ∪ 𝑚 ∈ {𝑦} ({𝑚} × ⦋𝑚 / 𝑗⦌𝐵)
157		sneq 4445	. . . . . . . . . 10 ⊢ (𝑚 = 𝑦 → {𝑚} = {𝑦})
158	157, 38	xpeq12d 5434	. . . . . . . . 9 ⊢ (𝑚 = 𝑦 → ({𝑚} × ⦋𝑚 / 𝑗⦌𝐵) = ({𝑦} × ⦋𝑦 / 𝑗⦌𝐵))
159	15, 158	iunxsn 4875	. . . . . . . 8 ⊢ ∪ 𝑚 ∈ {𝑦} ({𝑚} × ⦋𝑚 / 𝑗⦌𝐵) = ({𝑦} × ⦋𝑦 / 𝑗⦌𝐵)
160	156, 159	eqtri 2796	. . . . . . 7 ⊢ ∪ 𝑗 ∈ {𝑦} ({𝑗} × 𝐵) = ({𝑦} × ⦋𝑦 / 𝑗⦌𝐵)
161	160	uneq2i 4019	. . . . . 6 ⊢ (∪ 𝑗 ∈ 𝑥 ({𝑗} × 𝐵) ∪ ∪ 𝑗 ∈ {𝑦} ({𝑗} × 𝐵)) = (∪ 𝑗 ∈ 𝑥 ({𝑗} × 𝐵) ∪ ({𝑦} × ⦋𝑦 / 𝑗⦌𝐵))
162	150, 161	eqtri 2796	. . . . 5 ⊢ ∪ 𝑗 ∈ (𝑥 ∪ {𝑦})({𝑗} × 𝐵) = (∪ 𝑗 ∈ 𝑥 ({𝑗} × 𝐵) ∪ ({𝑦} × ⦋𝑦 / 𝑗⦌𝐵))
163	162	a1i 11	. . . 4 ⊢ (𝜑 → ∪ 𝑗 ∈ (𝑥 ∪ {𝑦})({𝑗} × 𝐵) = (∪ 𝑗 ∈ 𝑥 ({𝑗} × 𝐵) ∪ ({𝑦} × ⦋𝑦 / 𝑗⦌𝐵)))
164		snfi 8389	. . . . . . 7 ⊢ {𝑗} ∈ Fin
165	122, 18	syldan 582	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑗 ∈ (𝑥 ∪ {𝑦})) → 𝐵 ∈ Fin)
166		xpfi 8582	. . . . . . 7 ⊢ (({𝑗} ∈ Fin ∧ 𝐵 ∈ Fin) → ({𝑗} × 𝐵) ∈ Fin)
167	164, 165, 166	sylancr 578	. . . . . 6 ⊢ ((𝜑 ∧ 𝑗 ∈ (𝑥 ∪ {𝑦})) → ({𝑗} × 𝐵) ∈ Fin)
168	167	ralrimiva 3126	. . . . 5 ⊢ (𝜑 → ∀𝑗 ∈ (𝑥 ∪ {𝑦})({𝑗} × 𝐵) ∈ Fin)
169		iunfi 8605	. . . . 5 ⊢ (((𝑥 ∪ {𝑦}) ∈ Fin ∧ ∀𝑗 ∈ (𝑥 ∪ {𝑦})({𝑗} × 𝐵) ∈ Fin) → ∪ 𝑗 ∈ (𝑥 ∪ {𝑦})({𝑗} × 𝐵) ∈ Fin)
170	121, 168, 169	syl2anc 576	. . . 4 ⊢ (𝜑 → ∪ 𝑗 ∈ (𝑥 ∪ {𝑦})({𝑗} × 𝐵) ∈ Fin)
171		eliun 4792	. . . . . 6 ⊢ (𝑧 ∈ ∪ 𝑗 ∈ (𝑥 ∪ {𝑦})({𝑗} × 𝐵) ↔ ∃𝑗 ∈ (𝑥 ∪ {𝑦})𝑧 ∈ ({𝑗} × 𝐵))
172		elxp 5426	. . . . . . . 8 ⊢ (𝑧 ∈ ({𝑗} × 𝐵) ↔ ∃𝑚∃𝑘(𝑧 = ⟨𝑚, 𝑘⟩ ∧ (𝑚 ∈ {𝑗} ∧ 𝑘 ∈ 𝐵)))
173		simprl 758	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑗 ∈ (𝑥 ∪ {𝑦})) ∧ (𝑧 = ⟨𝑚, 𝑘⟩ ∧ (𝑚 ∈ {𝑗} ∧ 𝑘 ∈ 𝐵))) → 𝑧 = ⟨𝑚, 𝑘⟩)
174		simprrl 768	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑗 ∈ (𝑥 ∪ {𝑦})) ∧ (𝑧 = ⟨𝑚, 𝑘⟩ ∧ (𝑚 ∈ {𝑗} ∧ 𝑘 ∈ 𝐵))) → 𝑚 ∈ {𝑗})
175		elsni 4452	. . . . . . . . . . . . . . 15 ⊢ (𝑚 ∈ {𝑗} → 𝑚 = 𝑗)
176	174, 175	syl 17	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑗 ∈ (𝑥 ∪ {𝑦})) ∧ (𝑧 = ⟨𝑚, 𝑘⟩ ∧ (𝑚 ∈ {𝑗} ∧ 𝑘 ∈ 𝐵))) → 𝑚 = 𝑗)
177	176	opeq1d 4679	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑗 ∈ (𝑥 ∪ {𝑦})) ∧ (𝑧 = ⟨𝑚, 𝑘⟩ ∧ (𝑚 ∈ {𝑗} ∧ 𝑘 ∈ 𝐵))) → ⟨𝑚, 𝑘⟩ = ⟨𝑗, 𝑘⟩)
178	173, 177	eqtrd 2808	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑗 ∈ (𝑥 ∪ {𝑦})) ∧ (𝑧 = ⟨𝑚, 𝑘⟩ ∧ (𝑚 ∈ {𝑗} ∧ 𝑘 ∈ 𝐵))) → 𝑧 = ⟨𝑗, 𝑘⟩)
179	178, 92	syl 17	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑗 ∈ (𝑥 ∪ {𝑦})) ∧ (𝑧 = ⟨𝑚, 𝑘⟩ ∧ (𝑚 ∈ {𝑗} ∧ 𝑘 ∈ 𝐵))) → 𝐷 = 𝐶)
180		simpll 754	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑗 ∈ (𝑥 ∪ {𝑦})) ∧ (𝑧 = ⟨𝑚, 𝑘⟩ ∧ (𝑚 ∈ {𝑗} ∧ 𝑘 ∈ 𝐵))) → 𝜑)
181	122	adantr 473	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑗 ∈ (𝑥 ∪ {𝑦})) ∧ (𝑧 = ⟨𝑚, 𝑘⟩ ∧ (𝑚 ∈ {𝑗} ∧ 𝑘 ∈ 𝐵))) → 𝑗 ∈ 𝐴)
182		simprrr 769	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑗 ∈ (𝑥 ∪ {𝑦})) ∧ (𝑧 = ⟨𝑚, 𝑘⟩ ∧ (𝑚 ∈ {𝑗} ∧ 𝑘 ∈ 𝐵))) → 𝑘 ∈ 𝐵)
183	180, 181, 182, 26	syl12anc 824	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑗 ∈ (𝑥 ∪ {𝑦})) ∧ (𝑧 = ⟨𝑚, 𝑘⟩ ∧ (𝑚 ∈ {𝑗} ∧ 𝑘 ∈ 𝐵))) → 𝐶 ∈ ℂ)
184	179, 183	eqeltrd 2860	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑗 ∈ (𝑥 ∪ {𝑦})) ∧ (𝑧 = ⟨𝑚, 𝑘⟩ ∧ (𝑚 ∈ {𝑗} ∧ 𝑘 ∈ 𝐵))) → 𝐷 ∈ ℂ)
185	184	ex 405	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑗 ∈ (𝑥 ∪ {𝑦})) → ((𝑧 = ⟨𝑚, 𝑘⟩ ∧ (𝑚 ∈ {𝑗} ∧ 𝑘 ∈ 𝐵)) → 𝐷 ∈ ℂ))
186	185	exlimdvv 1893	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑗 ∈ (𝑥 ∪ {𝑦})) → (∃𝑚∃𝑘(𝑧 = ⟨𝑚, 𝑘⟩ ∧ (𝑚 ∈ {𝑗} ∧ 𝑘 ∈ 𝐵)) → 𝐷 ∈ ℂ))
187	172, 186	syl5bi 234	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑗 ∈ (𝑥 ∪ {𝑦})) → (𝑧 ∈ ({𝑗} × 𝐵) → 𝐷 ∈ ℂ))
188	187	rexlimdva 3223	. . . . . 6 ⊢ (𝜑 → (∃𝑗 ∈ (𝑥 ∪ {𝑦})𝑧 ∈ ({𝑗} × 𝐵) → 𝐷 ∈ ℂ))
189	171, 188	syl5bi 234	. . . . 5 ⊢ (𝜑 → (𝑧 ∈ ∪ 𝑗 ∈ (𝑥 ∪ {𝑦})({𝑗} × 𝐵) → 𝐷 ∈ ℂ))
190	189	imp 398	. . . 4 ⊢ ((𝜑 ∧ 𝑧 ∈ ∪ 𝑗 ∈ (𝑥 ∪ {𝑦})({𝑗} × 𝐵)) → 𝐷 ∈ ℂ)
191	149, 163, 170, 190	fsumsplit 14955	. . 3 ⊢ (𝜑 → Σ𝑧 ∈ ∪ 𝑗 ∈ (𝑥 ∪ {𝑦})({𝑗} × 𝐵)𝐷 = (Σ𝑧 ∈ ∪ 𝑗 ∈ 𝑥 ({𝑗} × 𝐵)𝐷 + Σ𝑧 ∈ ({𝑦} × ⦋𝑦 / 𝑗⦌𝐵)𝐷))
192	191	adantr 473	. 2 ⊢ ((𝜑 ∧ 𝜓) → Σ𝑧 ∈ ∪ 𝑗 ∈ (𝑥 ∪ {𝑦})({𝑗} × 𝐵)𝐷 = (Σ𝑧 ∈ ∪ 𝑗 ∈ 𝑥 ({𝑗} × 𝐵)𝐷 + Σ𝑧 ∈ ({𝑦} × ⦋𝑦 / 𝑗⦌𝐵)𝐷))
193	115, 127, 192	3eqtr4d 2818	1 ⊢ ((𝜑 ∧ 𝜓) → Σ𝑗 ∈ (𝑥 ∪ {𝑦})Σ𝑘 ∈ 𝐵 𝐶 = Σ𝑧 ∈ ∪ 𝑗 ∈ (𝑥 ∪ {𝑦})({𝑗} × 𝐵)𝐷)

Syntax hints:  ¬ wn 3   → wi 4   ↔ wb 198   ∧ wa 387   = wceq 1507  ∃wex 1742   ∈ wcel 2050  ∀wral 3082  ∃wrex 3083  ⦋csb 3780   ∪ cun 3821   ∩ cin 3822   ⊆ wss 3823  ∅c0 4172  {csn 4435  ⟨cop 4441  ∪ ciun 4788   × cxp 5401   ↾ cres 5405  –1-1-onto→wf1o 6184  ‘cfv 6185  (class class class)co 6974  1^st c1st 7497  2^nd c2nd 7498  Fincfn 8304  ℂcc 10331   + caddc 10336  Σcsu 14901

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1758  ax-4 1772  ax-5 1869  ax-6 1928  ax-7 1965  ax-8 2052  ax-9 2059  ax-10 2079  ax-11 2093  ax-12 2106  ax-13 2301  ax-ext 2744  ax-rep 5045  ax-sep 5056  ax-nul 5063  ax-pow 5115  ax-pr 5182  ax-un 7277  ax-inf2 8896  ax-cnex 10389  ax-resscn 10390  ax-1cn 10391  ax-icn 10392  ax-addcl 10393  ax-addrcl 10394  ax-mulcl 10395  ax-mulrcl 10396  ax-mulcom 10397  ax-addass 10398  ax-mulass 10399  ax-distr 10400  ax-i2m1 10401  ax-1ne0 10402  ax-1rid 10403  ax-rnegex 10404  ax-rrecex 10405  ax-cnre 10406  ax-pre-lttri 10407  ax-pre-lttrn 10408  ax-pre-ltadd 10409  ax-pre-mulgt0 10410  ax-pre-sup 10411

This theorem depends on definitions:  df-bi 199  df-an 388  df-or 834  df-3or 1069  df-3an 1070  df-tru 1510  df-fal 1520  df-ex 1743  df-nf 1747  df-sb 2016  df-mo 2547  df-eu 2584  df-clab 2753  df-cleq 2765  df-clel 2840  df-nfc 2912  df-ne 2962  df-nel 3068  df-ral 3087  df-rex 3088  df-reu 3089  df-rmo 3090  df-rab 3091  df-v 3411  df-sbc 3676  df-csb 3781  df-dif 3826  df-un 3828  df-in 3830  df-ss 3837  df-pss 3839  df-nul 4173  df-if 4345  df-pw 4418  df-sn 4436  df-pr 4438  df-tp 4440  df-op 4442  df-uni 4709  df-int 4746  df-iun 4790  df-br 4926  df-opab 4988  df-mpt 5005  df-tr 5027  df-id 5308  df-eprel 5313  df-po 5322  df-so 5323  df-fr 5362  df-se 5363  df-we 5364  df-xp 5409  df-rel 5410  df-cnv 5411  df-co 5412  df-dm 5413  df-rn 5414  df-res 5415  df-ima 5416  df-pred 5983  df-ord 6029  df-on 6030  df-lim 6031  df-suc 6032  df-iota 6149  df-fun 6187  df-fn 6188  df-f 6189  df-f1 6190  df-fo 6191  df-f1o 6192  df-fv 6193  df-isom 6194  df-riota 6935  df-ov 6977  df-oprab 6978  df-mpo 6979  df-om 7395  df-1st 7499  df-2nd 7500  df-wrecs 7748  df-recs 7810  df-rdg 7848  df-1o 7903  df-oadd 7907  df-er 8087  df-en 8305  df-dom 8306  df-sdom 8307  df-fin 8308  df-sup 8699  df-oi 8767  df-card 9160  df-pnf 10474  df-mnf 10475  df-xr 10476  df-ltxr 10477  df-le 10478  df-sub 10670  df-neg 10671  df-div 11097  df-nn 11438  df-2 11501  df-3 11502  df-n0 11706  df-z 11792  df-uz 12057  df-rp 12203  df-fz 12707  df-fzo 12848  df-seq 13183  df-exp 13243  df-hash 13504  df-cj 14317  df-re 14318  df-im 14319  df-sqrt 14453  df-abs 14454  df-clim 14704  df-sum 14902

This theorem is referenced by:  fsum2d  14984