Theorem fsumcom2 15920

Description: Interchange order of summation. Note that 𝐵(𝑗) and 𝐷(𝑘) are not necessarily constant expressions. (Contributed by Mario Carneiro, 28-Apr-2014.) (Revised by Mario Carneiro, 8-Apr-2016.) (Proof shortened by JJ, 2-Aug-2021.)

Hypotheses

Ref	Expression
fsumcom2.1	⊢ (𝜑 → 𝐴 ∈ Fin)
fsumcom2.2	⊢ (𝜑 → 𝐶 ∈ Fin)
fsumcom2.3	⊢ ((𝜑 ∧ 𝑗 ∈ 𝐴) → 𝐵 ∈ Fin)
fsumcom2.4	⊢ (𝜑 → ((𝑗 ∈ 𝐴 ∧ 𝑘 ∈ 𝐵) ↔ (𝑘 ∈ 𝐶 ∧ 𝑗 ∈ 𝐷)))
fsumcom2.5	⊢ ((𝜑 ∧ (𝑗 ∈ 𝐴 ∧ 𝑘 ∈ 𝐵)) → 𝐸 ∈ ℂ)

Assertion

Ref	Expression
fsumcom2	⊢ (𝜑 → Σ𝑗 ∈ 𝐴 Σ𝑘 ∈ 𝐵 𝐸 = Σ𝑘 ∈ 𝐶 Σ𝑗 ∈ 𝐷 𝐸)

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

Allowed substitution hints:   𝐵(𝑗)   𝐷(𝑘)   𝐸(𝑗, 𝑘)

Proof of Theorem fsumcom2

Dummy variables 𝑚 𝑛 𝑥 𝑦 𝑧 𝑤 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		relxp 5669	. . . . . . . . 9 ⊢ Rel ({𝑗} × 𝐵)
2	1	rgenw 3081	. . . . . . . 8 ⊢ ∀𝑗 ∈ 𝐴 Rel ({𝑗} × 𝐵)
3		reliun 5794	. . . . . . . 8 ⊢ (Rel ∪ 𝑗 ∈ 𝐴 ({𝑗} × 𝐵) ↔ ∀𝑗 ∈ 𝐴 Rel ({𝑗} × 𝐵))
4	2, 3	mpbir 234	. . . . . . 7 ⊢ Rel ∪ 𝑗 ∈ 𝐴 ({𝑗} × 𝐵)
5		relcnv 6098	. . . . . . 7 ⊢ Rel ◡∪ 𝑘 ∈ 𝐶 ({𝑘} × 𝐷)
6		ancom 466	. . . . . . . . . . . 12 ⊢ ((𝑥 = 𝑗 ∧ 𝑦 = 𝑘) ↔ (𝑦 = 𝑘 ∧ 𝑥 = 𝑗))
7		vex 3455	. . . . . . . . . . . . 13 ⊢ 𝑥 ∈ V
8		vex 3455	. . . . . . . . . . . . 13 ⊢ 𝑦 ∈ V
9	7, 8	opth 5445	. . . . . . . . . . . 12 ⊢ (⟨𝑥, 𝑦⟩ = ⟨𝑗, 𝑘⟩ ↔ (𝑥 = 𝑗 ∧ 𝑦 = 𝑘))
10	8, 7	opth 5445	. . . . . . . . . . . 12 ⊢ (⟨𝑦, 𝑥⟩ = ⟨𝑘, 𝑗⟩ ↔ (𝑦 = 𝑘 ∧ 𝑥 = 𝑗))
11	6, 9, 10	3bitr4i 306	. . . . . . . . . . 11 ⊢ (⟨𝑥, 𝑦⟩ = ⟨𝑗, 𝑘⟩ ↔ ⟨𝑦, 𝑥⟩ = ⟨𝑘, 𝑗⟩)
12	11	a1i 11	. . . . . . . . . 10 ⊢ (𝜑 → (⟨𝑥, 𝑦⟩ = ⟨𝑗, 𝑘⟩ ↔ ⟨𝑦, 𝑥⟩ = ⟨𝑘, 𝑗⟩))
13		fsumcom2.4	. . . . . . . . . 10 ⊢ (𝜑 → ((𝑗 ∈ 𝐴 ∧ 𝑘 ∈ 𝐵) ↔ (𝑘 ∈ 𝐶 ∧ 𝑗 ∈ 𝐷)))
14	12, 13	anbi12d 644	. . . . . . . . 9 ⊢ (𝜑 → ((⟨𝑥, 𝑦⟩ = ⟨𝑗, 𝑘⟩ ∧ (𝑗 ∈ 𝐴 ∧ 𝑘 ∈ 𝐵)) ↔ (⟨𝑦, 𝑥⟩ = ⟨𝑘, 𝑗⟩ ∧ (𝑘 ∈ 𝐶 ∧ 𝑗 ∈ 𝐷))))
15	14	2exbidv 1957	. . . . . . . 8 ⊢ (𝜑 → (∃𝑗∃𝑘(⟨𝑥, 𝑦⟩ = ⟨𝑗, 𝑘⟩ ∧ (𝑗 ∈ 𝐴 ∧ 𝑘 ∈ 𝐵)) ↔ ∃𝑗∃𝑘(⟨𝑦, 𝑥⟩ = ⟨𝑘, 𝑗⟩ ∧ (𝑘 ∈ 𝐶 ∧ 𝑗 ∈ 𝐷))))
16		eliunxp 5814	. . . . . . . 8 ⊢ (⟨𝑥, 𝑦⟩ ∈ ∪ 𝑗 ∈ 𝐴 ({𝑗} × 𝐵) ↔ ∃𝑗∃𝑘(⟨𝑥, 𝑦⟩ = ⟨𝑗, 𝑘⟩ ∧ (𝑗 ∈ 𝐴 ∧ 𝑘 ∈ 𝐵)))
17	7, 8	opelcnv 5859	. . . . . . . . 9 ⊢ (⟨𝑥, 𝑦⟩ ∈ ◡∪ 𝑘 ∈ 𝐶 ({𝑘} × 𝐷) ↔ ⟨𝑦, 𝑥⟩ ∈ ∪ 𝑘 ∈ 𝐶 ({𝑘} × 𝐷))
18		eliunxp 5814	. . . . . . . . 9 ⊢ (⟨𝑦, 𝑥⟩ ∈ ∪ 𝑘 ∈ 𝐶 ({𝑘} × 𝐷) ↔ ∃𝑘∃𝑗(⟨𝑦, 𝑥⟩ = ⟨𝑘, 𝑗⟩ ∧ (𝑘 ∈ 𝐶 ∧ 𝑗 ∈ 𝐷)))
19		excom 2199	. . . . . . . . 9 ⊢ (∃𝑘∃𝑗(⟨𝑦, 𝑥⟩ = ⟨𝑘, 𝑗⟩ ∧ (𝑘 ∈ 𝐶 ∧ 𝑗 ∈ 𝐷)) ↔ ∃𝑗∃𝑘(⟨𝑦, 𝑥⟩ = ⟨𝑘, 𝑗⟩ ∧ (𝑘 ∈ 𝐶 ∧ 𝑗 ∈ 𝐷)))
20	17, 18, 19	3bitri 300	. . . . . . . 8 ⊢ (⟨𝑥, 𝑦⟩ ∈ ◡∪ 𝑘 ∈ 𝐶 ({𝑘} × 𝐷) ↔ ∃𝑗∃𝑘(⟨𝑦, 𝑥⟩ = ⟨𝑘, 𝑗⟩ ∧ (𝑘 ∈ 𝐶 ∧ 𝑗 ∈ 𝐷)))
21	15, 16, 20	3bitr4g 317	. . . . . . 7 ⊢ (𝜑 → (⟨𝑥, 𝑦⟩ ∈ ∪ 𝑗 ∈ 𝐴 ({𝑗} × 𝐵) ↔ ⟨𝑥, 𝑦⟩ ∈ ◡∪ 𝑘 ∈ 𝐶 ({𝑘} × 𝐷)))
22	4, 5, 21	eqrelrdv 5768	. . . . . 6 ⊢ (𝜑 → ∪ 𝑗 ∈ 𝐴 ({𝑗} × 𝐵) = ◡∪ 𝑘 ∈ 𝐶 ({𝑘} × 𝐷))
23		nfcv 2923	. . . . . . 7 ⊢ Ⅎ𝑚({𝑗} × 𝐵)
24		nfcv 2923	. . . . . . . 8 ⊢ Ⅎ𝑗{𝑚}
25		nfcsb1v 3871	. . . . . . . 8 ⊢ Ⅎ𝑗⦋𝑚 / 𝑗⦌𝐵
26	24, 25	nfxp 5684	. . . . . . 7 ⊢ Ⅎ𝑗({𝑚} × ⦋𝑚 / 𝑗⦌𝐵)
27		sneq 4594	. . . . . . . 8 ⊢ (𝑗 = 𝑚 → {𝑗} = {𝑚})
28		csbeq1a 3861	. . . . . . . 8 ⊢ (𝑗 = 𝑚 → 𝐵 = ⦋𝑚 / 𝑗⦌𝐵)
29	27, 28	xpeq12d 5682	. . . . . . 7 ⊢ (𝑗 = 𝑚 → ({𝑗} × 𝐵) = ({𝑚} × ⦋𝑚 / 𝑗⦌𝐵))
30	23, 26, 29	cbviun 4993	. . . . . 6 ⊢ ∪ 𝑗 ∈ 𝐴 ({𝑗} × 𝐵) = ∪ 𝑚 ∈ 𝐴 ({𝑚} × ⦋𝑚 / 𝑗⦌𝐵)
31		nfcv 2923	. . . . . . . 8 ⊢ Ⅎ𝑛({𝑘} × 𝐷)
32		nfcv 2923	. . . . . . . . 9 ⊢ Ⅎ𝑘{𝑛}
33		nfcsb1v 3871	. . . . . . . . 9 ⊢ Ⅎ𝑘⦋𝑛 / 𝑘⦌𝐷
34	32, 33	nfxp 5684	. . . . . . . 8 ⊢ Ⅎ𝑘({𝑛} × ⦋𝑛 / 𝑘⦌𝐷)
35		sneq 4594	. . . . . . . . 9 ⊢ (𝑘 = 𝑛 → {𝑘} = {𝑛})
36		csbeq1a 3861	. . . . . . . . 9 ⊢ (𝑘 = 𝑛 → 𝐷 = ⦋𝑛 / 𝑘⦌𝐷)
37	35, 36	xpeq12d 5682	. . . . . . . 8 ⊢ (𝑘 = 𝑛 → ({𝑘} × 𝐷) = ({𝑛} × ⦋𝑛 / 𝑘⦌𝐷))
38	31, 34, 37	cbviun 4993	. . . . . . 7 ⊢ ∪ 𝑘 ∈ 𝐶 ({𝑘} × 𝐷) = ∪ 𝑛 ∈ 𝐶 ({𝑛} × ⦋𝑛 / 𝑘⦌𝐷)
39	38	cnveqi 5852	. . . . . 6 ⊢ ◡∪ 𝑘 ∈ 𝐶 ({𝑘} × 𝐷) = ◡∪ 𝑛 ∈ 𝐶 ({𝑛} × ⦋𝑛 / 𝑘⦌𝐷)
40	22, 30, 39	3eqtr3g 2819	. . . . 5 ⊢ (𝜑 → ∪ 𝑚 ∈ 𝐴 ({𝑚} × ⦋𝑚 / 𝑗⦌𝐵) = ◡∪ 𝑛 ∈ 𝐶 ({𝑛} × ⦋𝑛 / 𝑘⦌𝐷))
41	40	sumeq1d 15847	. . . 4 ⊢ (𝜑 → Σ𝑧 ∈ ∪ 𝑚 ∈ 𝐴 ({𝑚} × ⦋𝑚 / 𝑗⦌𝐵)⦋(2nd ‘𝑧) / 𝑘⦌⦋(1st ‘𝑧) / 𝑗⦌𝐸 = Σ𝑧 ∈ ◡ ∪ 𝑛 ∈ 𝐶 ({𝑛} × ⦋𝑛 / 𝑘⦌𝐷)⦋(2nd ‘𝑧) / 𝑘⦌⦋(1st ‘𝑧) / 𝑗⦌𝐸)
42		vex 3455	. . . . . . . 8 ⊢ 𝑛 ∈ V
43		vex 3455	. . . . . . . 8 ⊢ 𝑚 ∈ V
44	42, 43	op1std 8000	. . . . . . 7 ⊢ (𝑤 = ⟨𝑛, 𝑚⟩ → (1st ‘𝑤) = 𝑛)
45	44	csbeq1d 3851	. . . . . 6 ⊢ (𝑤 = ⟨𝑛, 𝑚⟩ → ⦋(1st ‘𝑤) / 𝑘⦌⦋(2nd ‘𝑤) / 𝑗⦌𝐸 = ⦋𝑛 / 𝑘⦌⦋(2nd ‘𝑤) / 𝑗⦌𝐸)
46	42, 43	op2ndd 8001	. . . . . . . 8 ⊢ (𝑤 = ⟨𝑛, 𝑚⟩ → (2nd ‘𝑤) = 𝑚)
47	46	csbeq1d 3851	. . . . . . 7 ⊢ (𝑤 = ⟨𝑛, 𝑚⟩ → ⦋(2nd ‘𝑤) / 𝑗⦌𝐸 = ⦋𝑚 / 𝑗⦌𝐸)
48	47	csbeq2dv 3854	. . . . . 6 ⊢ (𝑤 = ⟨𝑛, 𝑚⟩ → ⦋𝑛 / 𝑘⦌⦋(2nd ‘𝑤) / 𝑗⦌𝐸 = ⦋𝑛 / 𝑘⦌⦋𝑚 / 𝑗⦌𝐸)
49	45, 48	eqtrd 2796	. . . . 5 ⊢ (𝑤 = ⟨𝑛, 𝑚⟩ → ⦋(1st ‘𝑤) / 𝑘⦌⦋(2nd ‘𝑤) / 𝑗⦌𝐸 = ⦋𝑛 / 𝑘⦌⦋𝑚 / 𝑗⦌𝐸)
50	43, 42	op2ndd 8001	. . . . . . 7 ⊢ (𝑧 = ⟨𝑚, 𝑛⟩ → (2nd ‘𝑧) = 𝑛)
51	50	csbeq1d 3851	. . . . . 6 ⊢ (𝑧 = ⟨𝑚, 𝑛⟩ → ⦋(2nd ‘𝑧) / 𝑘⦌⦋(1st ‘𝑧) / 𝑗⦌𝐸 = ⦋𝑛 / 𝑘⦌⦋(1st ‘𝑧) / 𝑗⦌𝐸)
52	43, 42	op1std 8000	. . . . . . . 8 ⊢ (𝑧 = ⟨𝑚, 𝑛⟩ → (1st ‘𝑧) = 𝑚)
53	52	csbeq1d 3851	. . . . . . 7 ⊢ (𝑧 = ⟨𝑚, 𝑛⟩ → ⦋(1st ‘𝑧) / 𝑗⦌𝐸 = ⦋𝑚 / 𝑗⦌𝐸)
54	53	csbeq2dv 3854	. . . . . 6 ⊢ (𝑧 = ⟨𝑚, 𝑛⟩ → ⦋𝑛 / 𝑘⦌⦋(1st ‘𝑧) / 𝑗⦌𝐸 = ⦋𝑛 / 𝑘⦌⦋𝑚 / 𝑗⦌𝐸)
55	51, 54	eqtrd 2796	. . . . 5 ⊢ (𝑧 = ⟨𝑚, 𝑛⟩ → ⦋(2nd ‘𝑧) / 𝑘⦌⦋(1st ‘𝑧) / 𝑗⦌𝐸 = ⦋𝑛 / 𝑘⦌⦋𝑚 / 𝑗⦌𝐸)
56		fsumcom2.2	. . . . . 6 ⊢ (𝜑 → 𝐶 ∈ Fin)
57		snfi 9055	. . . . . . . 8 ⊢ {𝑛} ∈ Fin
58		fsumcom2.1	. . . . . . . . . 10 ⊢ (𝜑 → 𝐴 ∈ Fin)
59	58	adantr 486	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑛 ∈ 𝐶) → 𝐴 ∈ Fin)
60	43, 42	opelcnv 5859	. . . . . . . . . . . . . . . 16 ⊢ (⟨𝑚, 𝑛⟩ ∈ ◡∪ 𝑘 ∈ 𝐶 ({𝑘} × 𝐷) ↔ ⟨𝑛, 𝑚⟩ ∈ ∪ 𝑘 ∈ 𝐶 ({𝑘} × 𝐷))
61	33, 36	opeliunxp2f 8211	. . . . . . . . . . . . . . . 16 ⊢ (⟨𝑛, 𝑚⟩ ∈ ∪ 𝑘 ∈ 𝐶 ({𝑘} × 𝐷) ↔ (𝑛 ∈ 𝐶 ∧ 𝑚 ∈ ⦋𝑛 / 𝑘⦌𝐷))
62	60, 61	sylbbr 239	. . . . . . . . . . . . . . 15 ⊢ ((𝑛 ∈ 𝐶 ∧ 𝑚 ∈ ⦋𝑛 / 𝑘⦌𝐷) → ⟨𝑚, 𝑛⟩ ∈ ◡∪ 𝑘 ∈ 𝐶 ({𝑘} × 𝐷))
63	62	adantl 487	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ (𝑛 ∈ 𝐶 ∧ 𝑚 ∈ ⦋𝑛 / 𝑘⦌𝐷)) → ⟨𝑚, 𝑛⟩ ∈ ◡∪ 𝑘 ∈ 𝐶 ({𝑘} × 𝐷))
64	22	adantr 486	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ (𝑛 ∈ 𝐶 ∧ 𝑚 ∈ ⦋𝑛 / 𝑘⦌𝐷)) → ∪ 𝑗 ∈ 𝐴 ({𝑗} × 𝐵) = ◡∪ 𝑘 ∈ 𝐶 ({𝑘} × 𝐷))
65	63, 64	eleqtrrd 2864	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ (𝑛 ∈ 𝐶 ∧ 𝑚 ∈ ⦋𝑛 / 𝑘⦌𝐷)) → ⟨𝑚, 𝑛⟩ ∈ ∪ 𝑗 ∈ 𝐴 ({𝑗} × 𝐵))
66		eliun 4955	. . . . . . . . . . . . 13 ⊢ (⟨𝑚, 𝑛⟩ ∈ ∪ 𝑗 ∈ 𝐴 ({𝑗} × 𝐵) ↔ ∃𝑗 ∈ 𝐴 ⟨𝑚, 𝑛⟩ ∈ ({𝑗} × 𝐵))
67	65, 66	sylib 221	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ (𝑛 ∈ 𝐶 ∧ 𝑚 ∈ ⦋𝑛 / 𝑘⦌𝐷)) → ∃𝑗 ∈ 𝐴 ⟨𝑚, 𝑛⟩ ∈ ({𝑗} × 𝐵))
68		opelxp 5687	. . . . . . . . . . . . . . . . 17 ⊢ (⟨𝑚, 𝑛⟩ ∈ ({𝑗} × 𝐵) ↔ (𝑚 ∈ {𝑗} ∧ 𝑛 ∈ 𝐵))
69	68	bilani 510	. . . . . . . . . . . . . . . 16 ⊢ ((𝑗 ∈ 𝐴 ∧ ⟨𝑚, 𝑛⟩ ∈ ({𝑗} × 𝐵)) → (𝑚 ∈ {𝑗} ∧ 𝑛 ∈ 𝐵))
70	69	simpld 500	. . . . . . . . . . . . . . 15 ⊢ ((𝑗 ∈ 𝐴 ∧ ⟨𝑚, 𝑛⟩ ∈ ({𝑗} × 𝐵)) → 𝑚 ∈ {𝑗})
71		elsni 4601	. . . . . . . . . . . . . . 15 ⊢ (𝑚 ∈ {𝑗} → 𝑚 = 𝑗)
72	70, 71	syl 18	. . . . . . . . . . . . . 14 ⊢ ((𝑗 ∈ 𝐴 ∧ ⟨𝑚, 𝑛⟩ ∈ ({𝑗} × 𝐵)) → 𝑚 = 𝑗)
73		simpl 488	. . . . . . . . . . . . . 14 ⊢ ((𝑗 ∈ 𝐴 ∧ ⟨𝑚, 𝑛⟩ ∈ ({𝑗} × 𝐵)) → 𝑗 ∈ 𝐴)
74	72, 73	eqeltrd 2861	. . . . . . . . . . . . 13 ⊢ ((𝑗 ∈ 𝐴 ∧ ⟨𝑚, 𝑛⟩ ∈ ({𝑗} × 𝐵)) → 𝑚 ∈ 𝐴)
75	74	rexlimiva 3156	. . . . . . . . . . . 12 ⊢ (∃𝑗 ∈ 𝐴 ⟨𝑚, 𝑛⟩ ∈ ({𝑗} × 𝐵) → 𝑚 ∈ 𝐴)
76	67, 75	syl 18	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ (𝑛 ∈ 𝐶 ∧ 𝑚 ∈ ⦋𝑛 / 𝑘⦌𝐷)) → 𝑚 ∈ 𝐴)
77	76	expr 462	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑛 ∈ 𝐶) → (𝑚 ∈ ⦋𝑛 / 𝑘⦌𝐷 → 𝑚 ∈ 𝐴))
78	77	ssrdv 3937	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑛 ∈ 𝐶) → ⦋𝑛 / 𝑘⦌𝐷 ⊆ 𝐴)
79	59, 78	ssfid 9244	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑛 ∈ 𝐶) → ⦋𝑛 / 𝑘⦌𝐷 ∈ Fin)
80		xpfi 9295	. . . . . . . 8 ⊢ (({𝑛} ∈ Fin ∧ ⦋𝑛 / 𝑘⦌𝐷 ∈ Fin) → ({𝑛} × ⦋𝑛 / 𝑘⦌𝐷) ∈ Fin)
81	57, 79, 80	sylancr 599	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑛 ∈ 𝐶) → ({𝑛} × ⦋𝑛 / 𝑘⦌𝐷) ∈ Fin)
82	81	ralrimiva 3155	. . . . . 6 ⊢ (𝜑 → ∀𝑛 ∈ 𝐶 ({𝑛} × ⦋𝑛 / 𝑘⦌𝐷) ∈ Fin)
83		iunfi 9316	. . . . . 6 ⊢ ((𝐶 ∈ Fin ∧ ∀𝑛 ∈ 𝐶 ({𝑛} × ⦋𝑛 / 𝑘⦌𝐷) ∈ Fin) → ∪ 𝑛 ∈ 𝐶 ({𝑛} × ⦋𝑛 / 𝑘⦌𝐷) ∈ Fin)
84	56, 82, 83	syl2anc 596	. . . . 5 ⊢ (𝜑 → ∪ 𝑛 ∈ 𝐶 ({𝑛} × ⦋𝑛 / 𝑘⦌𝐷) ∈ Fin)
85		reliun 5794	. . . . . . 7 ⊢ (Rel ∪ 𝑛 ∈ 𝐶 ({𝑛} × ⦋𝑛 / 𝑘⦌𝐷) ↔ ∀𝑛 ∈ 𝐶 Rel ({𝑛} × ⦋𝑛 / 𝑘⦌𝐷))
86		relxp 5669	. . . . . . . 8 ⊢ Rel ({𝑛} × ⦋𝑛 / 𝑘⦌𝐷)
87	86	a1i 11	. . . . . . 7 ⊢ (𝑛 ∈ 𝐶 → Rel ({𝑛} × ⦋𝑛 / 𝑘⦌𝐷))
88	85, 87	mprgbir 3084	. . . . . 6 ⊢ Rel ∪ 𝑛 ∈ 𝐶 ({𝑛} × ⦋𝑛 / 𝑘⦌𝐷)
89	88	a1i 11	. . . . 5 ⊢ (𝜑 → Rel ∪ 𝑛 ∈ 𝐶 ({𝑛} × ⦋𝑛 / 𝑘⦌𝐷))
90		csbeq1 3850	. . . . . . . 8 ⊢ (𝑚 = (2nd ‘𝑤) → ⦋𝑚 / 𝑗⦌𝐸 = ⦋(2nd ‘𝑤) / 𝑗⦌𝐸)
91	90	csbeq2dv 3854	. . . . . . 7 ⊢ (𝑚 = (2nd ‘𝑤) → ⦋(1st ‘𝑤) / 𝑘⦌⦋𝑚 / 𝑗⦌𝐸 = ⦋(1st ‘𝑤) / 𝑘⦌⦋(2nd ‘𝑤) / 𝑗⦌𝐸)
92	91	eleq1d 2846	. . . . . 6 ⊢ (𝑚 = (2nd ‘𝑤) → (⦋(1st ‘𝑤) / 𝑘⦌⦋𝑚 / 𝑗⦌𝐸 ∈ ℂ ↔ ⦋(1st ‘𝑤) / 𝑘⦌⦋(2nd ‘𝑤) / 𝑗⦌𝐸 ∈ ℂ))
93		csbeq1 3850	. . . . . . . 8 ⊢ (𝑛 = (1st ‘𝑤) → ⦋𝑛 / 𝑘⦌𝐷 = ⦋(1st ‘𝑤) / 𝑘⦌𝐷)
94		csbeq1 3850	. . . . . . . . 9 ⊢ (𝑛 = (1st ‘𝑤) → ⦋𝑛 / 𝑘⦌⦋𝑚 / 𝑗⦌𝐸 = ⦋(1st ‘𝑤) / 𝑘⦌⦋𝑚 / 𝑗⦌𝐸)
95	94	eleq1d 2846	. . . . . . . 8 ⊢ (𝑛 = (1st ‘𝑤) → (⦋𝑛 / 𝑘⦌⦋𝑚 / 𝑗⦌𝐸 ∈ ℂ ↔ ⦋(1st ‘𝑤) / 𝑘⦌⦋𝑚 / 𝑗⦌𝐸 ∈ ℂ))
96	93, 95	raleqbidv 3335	. . . . . . 7 ⊢ (𝑛 = (1st ‘𝑤) → (∀𝑚 ∈ ⦋ 𝑛 / 𝑘⦌𝐷⦋𝑛 / 𝑘⦌⦋𝑚 / 𝑗⦌𝐸 ∈ ℂ ↔ ∀𝑚 ∈ ⦋ (1st ‘𝑤) / 𝑘⦌𝐷⦋(1st ‘𝑤) / 𝑘⦌⦋𝑚 / 𝑗⦌𝐸 ∈ ℂ))
97		simpl 488	. . . . . . . . . 10 ⊢ ((𝜑 ∧ (𝑛 ∈ 𝐶 ∧ 𝑚 ∈ ⦋𝑛 / 𝑘⦌𝐷)) → 𝜑)
98	25	nfcri 2915	. . . . . . . . . . . 12 ⊢ Ⅎ𝑗 𝑛 ∈ ⦋𝑚 / 𝑗⦌𝐵
99	71	equcomd 2052	. . . . . . . . . . . . . . . . 17 ⊢ (𝑚 ∈ {𝑗} → 𝑗 = 𝑚)
100	99, 28	syl 18	. . . . . . . . . . . . . . . 16 ⊢ (𝑚 ∈ {𝑗} → 𝐵 = ⦋𝑚 / 𝑗⦌𝐵)
101	100	eleq2d 2847	. . . . . . . . . . . . . . 15 ⊢ (𝑚 ∈ {𝑗} → (𝑛 ∈ 𝐵 ↔ 𝑛 ∈ ⦋𝑚 / 𝑗⦌𝐵))
102	101	biimpa 482	. . . . . . . . . . . . . 14 ⊢ ((𝑚 ∈ {𝑗} ∧ 𝑛 ∈ 𝐵) → 𝑛 ∈ ⦋𝑚 / 𝑗⦌𝐵)
103	68, 102	sylbi 220	. . . . . . . . . . . . 13 ⊢ (⟨𝑚, 𝑛⟩ ∈ ({𝑗} × 𝐵) → 𝑛 ∈ ⦋𝑚 / 𝑗⦌𝐵)
104	103	a1i 11	. . . . . . . . . . . 12 ⊢ (𝑗 ∈ 𝐴 → (⟨𝑚, 𝑛⟩ ∈ ({𝑗} × 𝐵) → 𝑛 ∈ ⦋𝑚 / 𝑗⦌𝐵))
105	98, 104	rexlimi 3263	. . . . . . . . . . 11 ⊢ (∃𝑗 ∈ 𝐴 ⟨𝑚, 𝑛⟩ ∈ ({𝑗} × 𝐵) → 𝑛 ∈ ⦋𝑚 / 𝑗⦌𝐵)
106	67, 105	syl 18	. . . . . . . . . 10 ⊢ ((𝜑 ∧ (𝑛 ∈ 𝐶 ∧ 𝑚 ∈ ⦋𝑛 / 𝑘⦌𝐷)) → 𝑛 ∈ ⦋𝑚 / 𝑗⦌𝐵)
107		fsumcom2.5	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ (𝑗 ∈ 𝐴 ∧ 𝑘 ∈ 𝐵)) → 𝐸 ∈ ℂ)
108	107	ralrimivva 3206	. . . . . . . . . . . . 13 ⊢ (𝜑 → ∀𝑗 ∈ 𝐴 ∀𝑘 ∈ 𝐵 𝐸 ∈ ℂ)
109		nfcsb1v 3871	. . . . . . . . . . . . . . . 16 ⊢ Ⅎ𝑗⦋𝑚 / 𝑗⦌𝐸
110	109	nfel1 2939	. . . . . . . . . . . . . . 15 ⊢ Ⅎ𝑗⦋𝑚 / 𝑗⦌𝐸 ∈ ℂ
111	25, 110	nfralw 3310	. . . . . . . . . . . . . 14 ⊢ Ⅎ𝑗∀𝑘 ∈ ⦋ 𝑚 / 𝑗⦌𝐵⦋𝑚 / 𝑗⦌𝐸 ∈ ℂ
112		csbeq1a 3861	. . . . . . . . . . . . . . . 16 ⊢ (𝑗 = 𝑚 → 𝐸 = ⦋𝑚 / 𝑗⦌𝐸)
113	112	eleq1d 2846	. . . . . . . . . . . . . . 15 ⊢ (𝑗 = 𝑚 → (𝐸 ∈ ℂ ↔ ⦋𝑚 / 𝑗⦌𝐸 ∈ ℂ))
114	28, 113	raleqbidv 3335	. . . . . . . . . . . . . 14 ⊢ (𝑗 = 𝑚 → (∀𝑘 ∈ 𝐵 𝐸 ∈ ℂ ↔ ∀𝑘 ∈ ⦋ 𝑚 / 𝑗⦌𝐵⦋𝑚 / 𝑗⦌𝐸 ∈ ℂ))
115	111, 114	rspc 3565	. . . . . . . . . . . . 13 ⊢ (𝑚 ∈ 𝐴 → (∀𝑗 ∈ 𝐴 ∀𝑘 ∈ 𝐵 𝐸 ∈ ℂ → ∀𝑘 ∈ ⦋ 𝑚 / 𝑗⦌𝐵⦋𝑚 / 𝑗⦌𝐸 ∈ ℂ))
116	108, 115	mpan9 516	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑚 ∈ 𝐴) → ∀𝑘 ∈ ⦋ 𝑚 / 𝑗⦌𝐵⦋𝑚 / 𝑗⦌𝐸 ∈ ℂ)
117		nfcsb1v 3871	. . . . . . . . . . . . . 14 ⊢ Ⅎ𝑘⦋𝑛 / 𝑘⦌⦋𝑚 / 𝑗⦌𝐸
118	117	nfel1 2939	. . . . . . . . . . . . 13 ⊢ Ⅎ𝑘⦋𝑛 / 𝑘⦌⦋𝑚 / 𝑗⦌𝐸 ∈ ℂ
119		csbeq1a 3861	. . . . . . . . . . . . . 14 ⊢ (𝑘 = 𝑛 → ⦋𝑚 / 𝑗⦌𝐸 = ⦋𝑛 / 𝑘⦌⦋𝑚 / 𝑗⦌𝐸)
120	119	eleq1d 2846	. . . . . . . . . . . . 13 ⊢ (𝑘 = 𝑛 → (⦋𝑚 / 𝑗⦌𝐸 ∈ ℂ ↔ ⦋𝑛 / 𝑘⦌⦋𝑚 / 𝑗⦌𝐸 ∈ ℂ))
121	118, 120	rspc 3565	. . . . . . . . . . . 12 ⊢ (𝑛 ∈ ⦋𝑚 / 𝑗⦌𝐵 → (∀𝑘 ∈ ⦋ 𝑚 / 𝑗⦌𝐵⦋𝑚 / 𝑗⦌𝐸 ∈ ℂ → ⦋𝑛 / 𝑘⦌⦋𝑚 / 𝑗⦌𝐸 ∈ ℂ))
122	116, 121	syl5com 32	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑚 ∈ 𝐴) → (𝑛 ∈ ⦋𝑚 / 𝑗⦌𝐵 → ⦋𝑛 / 𝑘⦌⦋𝑚 / 𝑗⦌𝐸 ∈ ℂ))
123	122	impr 460	. . . . . . . . . 10 ⊢ ((𝜑 ∧ (𝑚 ∈ 𝐴 ∧ 𝑛 ∈ ⦋𝑚 / 𝑗⦌𝐵)) → ⦋𝑛 / 𝑘⦌⦋𝑚 / 𝑗⦌𝐸 ∈ ℂ)
124	97, 76, 106, 123	syl12anc 850	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑛 ∈ 𝐶 ∧ 𝑚 ∈ ⦋𝑛 / 𝑘⦌𝐷)) → ⦋𝑛 / 𝑘⦌⦋𝑚 / 𝑗⦌𝐸 ∈ ℂ)
125	124	ralrimivva 3206	. . . . . . . 8 ⊢ (𝜑 → ∀𝑛 ∈ 𝐶 ∀𝑚 ∈ ⦋ 𝑛 / 𝑘⦌𝐷⦋𝑛 / 𝑘⦌⦋𝑚 / 𝑗⦌𝐸 ∈ ℂ)
126	125	adantr 486	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑤 ∈ ∪ 𝑛 ∈ 𝐶 ({𝑛} × ⦋𝑛 / 𝑘⦌𝐷)) → ∀𝑛 ∈ 𝐶 ∀𝑚 ∈ ⦋ 𝑛 / 𝑘⦌𝐷⦋𝑛 / 𝑘⦌⦋𝑚 / 𝑗⦌𝐸 ∈ ℂ)
127		eliun 4955	. . . . . . . . 9 ⊢ (𝑤 ∈ ∪ 𝑛 ∈ 𝐶 ({𝑛} × ⦋𝑛 / 𝑘⦌𝐷) ↔ ∃𝑛 ∈ 𝐶 𝑤 ∈ ({𝑛} × ⦋𝑛 / 𝑘⦌𝐷))
128	127	bilani 510	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑤 ∈ ∪ 𝑛 ∈ 𝐶 ({𝑛} × ⦋𝑛 / 𝑘⦌𝐷)) → ∃𝑛 ∈ 𝐶 𝑤 ∈ ({𝑛} × ⦋𝑛 / 𝑘⦌𝐷))
129		xp1st 8022	. . . . . . . . . . . 12 ⊢ (𝑤 ∈ ({𝑛} × ⦋𝑛 / 𝑘⦌𝐷) → (1st ‘𝑤) ∈ {𝑛})
130	129	adantl 487	. . . . . . . . . . 11 ⊢ ((𝑛 ∈ 𝐶 ∧ 𝑤 ∈ ({𝑛} × ⦋𝑛 / 𝑘⦌𝐷)) → (1st ‘𝑤) ∈ {𝑛})
131		elsni 4601	. . . . . . . . . . 11 ⊢ ((1st ‘𝑤) ∈ {𝑛} → (1st ‘𝑤) = 𝑛)
132	130, 131	syl 18	. . . . . . . . . 10 ⊢ ((𝑛 ∈ 𝐶 ∧ 𝑤 ∈ ({𝑛} × ⦋𝑛 / 𝑘⦌𝐷)) → (1st ‘𝑤) = 𝑛)
133		simpl 488	. . . . . . . . . 10 ⊢ ((𝑛 ∈ 𝐶 ∧ 𝑤 ∈ ({𝑛} × ⦋𝑛 / 𝑘⦌𝐷)) → 𝑛 ∈ 𝐶)
134	132, 133	eqeltrd 2861	. . . . . . . . 9 ⊢ ((𝑛 ∈ 𝐶 ∧ 𝑤 ∈ ({𝑛} × ⦋𝑛 / 𝑘⦌𝐷)) → (1st ‘𝑤) ∈ 𝐶)
135	134	rexlimiva 3156	. . . . . . . 8 ⊢ (∃𝑛 ∈ 𝐶 𝑤 ∈ ({𝑛} × ⦋𝑛 / 𝑘⦌𝐷) → (1st ‘𝑤) ∈ 𝐶)
136	128, 135	syl 18	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑤 ∈ ∪ 𝑛 ∈ 𝐶 ({𝑛} × ⦋𝑛 / 𝑘⦌𝐷)) → (1st ‘𝑤) ∈ 𝐶)
137	96, 126, 136	rspcdva 3578	. . . . . 6 ⊢ ((𝜑 ∧ 𝑤 ∈ ∪ 𝑛 ∈ 𝐶 ({𝑛} × ⦋𝑛 / 𝑘⦌𝐷)) → ∀𝑚 ∈ ⦋ (1st ‘𝑤) / 𝑘⦌𝐷⦋(1st ‘𝑤) / 𝑘⦌⦋𝑚 / 𝑗⦌𝐸 ∈ ℂ)
138		xp2nd 8023	. . . . . . . . . 10 ⊢ (𝑤 ∈ ({𝑛} × ⦋𝑛 / 𝑘⦌𝐷) → (2nd ‘𝑤) ∈ ⦋𝑛 / 𝑘⦌𝐷)
139	138	adantl 487	. . . . . . . . 9 ⊢ ((𝑛 ∈ 𝐶 ∧ 𝑤 ∈ ({𝑛} × ⦋𝑛 / 𝑘⦌𝐷)) → (2nd ‘𝑤) ∈ ⦋𝑛 / 𝑘⦌𝐷)
140	132	csbeq1d 3851	. . . . . . . . 9 ⊢ ((𝑛 ∈ 𝐶 ∧ 𝑤 ∈ ({𝑛} × ⦋𝑛 / 𝑘⦌𝐷)) → ⦋(1st ‘𝑤) / 𝑘⦌𝐷 = ⦋𝑛 / 𝑘⦌𝐷)
141	139, 140	eleqtrrd 2864	. . . . . . . 8 ⊢ ((𝑛 ∈ 𝐶 ∧ 𝑤 ∈ ({𝑛} × ⦋𝑛 / 𝑘⦌𝐷)) → (2nd ‘𝑤) ∈ ⦋(1st ‘𝑤) / 𝑘⦌𝐷)
142	141	rexlimiva 3156	. . . . . . 7 ⊢ (∃𝑛 ∈ 𝐶 𝑤 ∈ ({𝑛} × ⦋𝑛 / 𝑘⦌𝐷) → (2nd ‘𝑤) ∈ ⦋(1st ‘𝑤) / 𝑘⦌𝐷)
143	128, 142	syl 18	. . . . . 6 ⊢ ((𝜑 ∧ 𝑤 ∈ ∪ 𝑛 ∈ 𝐶 ({𝑛} × ⦋𝑛 / 𝑘⦌𝐷)) → (2nd ‘𝑤) ∈ ⦋(1st ‘𝑤) / 𝑘⦌𝐷)
144	92, 137, 143	rspcdva 3578	. . . . 5 ⊢ ((𝜑 ∧ 𝑤 ∈ ∪ 𝑛 ∈ 𝐶 ({𝑛} × ⦋𝑛 / 𝑘⦌𝐷)) → ⦋(1st ‘𝑤) / 𝑘⦌⦋(2nd ‘𝑤) / 𝑗⦌𝐸 ∈ ℂ)
145	49, 55, 84, 89, 144	fsumcnv 15919	. . . 4 ⊢ (𝜑 → Σ𝑤 ∈ ∪ 𝑛 ∈ 𝐶 ({𝑛} × ⦋𝑛 / 𝑘⦌𝐷)⦋(1st ‘𝑤) / 𝑘⦌⦋(2nd ‘𝑤) / 𝑗⦌𝐸 = Σ𝑧 ∈ ◡ ∪ 𝑛 ∈ 𝐶 ({𝑛} × ⦋𝑛 / 𝑘⦌𝐷)⦋(2nd ‘𝑧) / 𝑘⦌⦋(1st ‘𝑧) / 𝑗⦌𝐸)
146	41, 145	eqtr4d 2799	. . 3 ⊢ (𝜑 → Σ𝑧 ∈ ∪ 𝑚 ∈ 𝐴 ({𝑚} × ⦋𝑚 / 𝑗⦌𝐵)⦋(2nd ‘𝑧) / 𝑘⦌⦋(1st ‘𝑧) / 𝑗⦌𝐸 = Σ𝑤 ∈ ∪ 𝑛 ∈ 𝐶 ({𝑛} × ⦋𝑛 / 𝑘⦌𝐷)⦋(1st ‘𝑤) / 𝑘⦌⦋(2nd ‘𝑤) / 𝑗⦌𝐸)
147		fsumcom2.3	. . . . . 6 ⊢ ((𝜑 ∧ 𝑗 ∈ 𝐴) → 𝐵 ∈ Fin)
148	147	ralrimiva 3155	. . . . 5 ⊢ (𝜑 → ∀𝑗 ∈ 𝐴 𝐵 ∈ Fin)
149	25	nfel1 2939	. . . . . 6 ⊢ Ⅎ𝑗⦋𝑚 / 𝑗⦌𝐵 ∈ Fin
150	28	eleq1d 2846	. . . . . 6 ⊢ (𝑗 = 𝑚 → (𝐵 ∈ Fin ↔ ⦋𝑚 / 𝑗⦌𝐵 ∈ Fin))
151	149, 150	rspc 3565	. . . . 5 ⊢ (𝑚 ∈ 𝐴 → (∀𝑗 ∈ 𝐴 𝐵 ∈ Fin → ⦋𝑚 / 𝑗⦌𝐵 ∈ Fin))
152	148, 151	mpan9 516	. . . 4 ⊢ ((𝜑 ∧ 𝑚 ∈ 𝐴) → ⦋𝑚 / 𝑗⦌𝐵 ∈ Fin)
153	55, 58, 152, 123	fsum2d 15917	. . 3 ⊢ (𝜑 → Σ𝑚 ∈ 𝐴 Σ𝑛 ∈ ⦋ 𝑚 / 𝑗⦌𝐵⦋𝑛 / 𝑘⦌⦋𝑚 / 𝑗⦌𝐸 = Σ𝑧 ∈ ∪ 𝑚 ∈ 𝐴 ({𝑚} × ⦋𝑚 / 𝑗⦌𝐵)⦋(2nd ‘𝑧) / 𝑘⦌⦋(1st ‘𝑧) / 𝑗⦌𝐸)
154	49, 56, 79, 124	fsum2d 15917	. . 3 ⊢ (𝜑 → Σ𝑛 ∈ 𝐶 Σ𝑚 ∈ ⦋ 𝑛 / 𝑘⦌𝐷⦋𝑛 / 𝑘⦌⦋𝑚 / 𝑗⦌𝐸 = Σ𝑤 ∈ ∪ 𝑛 ∈ 𝐶 ({𝑛} × ⦋𝑛 / 𝑘⦌𝐷)⦋(1st ‘𝑤) / 𝑘⦌⦋(2nd ‘𝑤) / 𝑗⦌𝐸)
155	146, 153, 154	3eqtr4d 2806	. 2 ⊢ (𝜑 → Σ𝑚 ∈ 𝐴 Σ𝑛 ∈ ⦋ 𝑚 / 𝑗⦌𝐵⦋𝑛 / 𝑘⦌⦋𝑚 / 𝑗⦌𝐸 = Σ𝑛 ∈ 𝐶 Σ𝑚 ∈ ⦋ 𝑛 / 𝑘⦌𝐷⦋𝑛 / 𝑘⦌⦋𝑚 / 𝑗⦌𝐸)
156		csbeq1a 3861	. . . . 5 ⊢ (𝑘 = 𝑛 → 𝐸 = ⦋𝑛 / 𝑘⦌𝐸)
157		nfcv 2923	. . . . 5 ⊢ Ⅎ𝑛𝐸
158		nfcsb1v 3871	. . . . 5 ⊢ Ⅎ𝑘⦋𝑛 / 𝑘⦌𝐸
159	156, 157, 158	cbvsum 15842	. . . 4 ⊢ Σ𝑘 ∈ 𝐵 𝐸 = Σ𝑛 ∈ 𝐵 ⦋𝑛 / 𝑘⦌𝐸
160	112	csbeq2dv 3854	. . . . . 6 ⊢ (𝑗 = 𝑚 → ⦋𝑛 / 𝑘⦌𝐸 = ⦋𝑛 / 𝑘⦌⦋𝑚 / 𝑗⦌𝐸)
161	160	adantr 486	. . . . 5 ⊢ ((𝑗 = 𝑚 ∧ 𝑛 ∈ 𝐵) → ⦋𝑛 / 𝑘⦌𝐸 = ⦋𝑛 / 𝑘⦌⦋𝑚 / 𝑗⦌𝐸)
162	28, 161	sumeq12dv 15852	. . . 4 ⊢ (𝑗 = 𝑚 → Σ𝑛 ∈ 𝐵 ⦋𝑛 / 𝑘⦌𝐸 = Σ𝑛 ∈ ⦋ 𝑚 / 𝑗⦌𝐵⦋𝑛 / 𝑘⦌⦋𝑚 / 𝑗⦌𝐸)
163	159, 162	eqtrid 2808	. . 3 ⊢ (𝑗 = 𝑚 → Σ𝑘 ∈ 𝐵 𝐸 = Σ𝑛 ∈ ⦋ 𝑚 / 𝑗⦌𝐵⦋𝑛 / 𝑘⦌⦋𝑚 / 𝑗⦌𝐸)
164		nfcv 2923	. . 3 ⊢ Ⅎ𝑚Σ𝑘 ∈ 𝐵 𝐸
165		nfcv 2923	. . . . 5 ⊢ Ⅎ𝑗𝑛
166	165, 109	nfcsbw 3873	. . . 4 ⊢ Ⅎ𝑗⦋𝑛 / 𝑘⦌⦋𝑚 / 𝑗⦌𝐸
167	25, 166	nfsum 15838	. . 3 ⊢ Ⅎ𝑗Σ𝑛 ∈ ⦋ 𝑚 / 𝑗⦌𝐵⦋𝑛 / 𝑘⦌⦋𝑚 / 𝑗⦌𝐸
168	163, 164, 167	cbvsum 15842	. 2 ⊢ Σ𝑗 ∈ 𝐴 Σ𝑘 ∈ 𝐵 𝐸 = Σ𝑚 ∈ 𝐴 Σ𝑛 ∈ ⦋ 𝑚 / 𝑗⦌𝐵⦋𝑛 / 𝑘⦌⦋𝑚 / 𝑗⦌𝐸
169		nfcv 2923	. . . . 5 ⊢ Ⅎ𝑚𝐸
170	112, 169, 109	cbvsum 15842	. . . 4 ⊢ Σ𝑗 ∈ 𝐷 𝐸 = Σ𝑚 ∈ 𝐷 ⦋𝑚 / 𝑗⦌𝐸
171	119	adantr 486	. . . . 5 ⊢ ((𝑘 = 𝑛 ∧ 𝑚 ∈ 𝐷) → ⦋𝑚 / 𝑗⦌𝐸 = ⦋𝑛 / 𝑘⦌⦋𝑚 / 𝑗⦌𝐸)
172	36, 171	sumeq12dv 15852	. . . 4 ⊢ (𝑘 = 𝑛 → Σ𝑚 ∈ 𝐷 ⦋𝑚 / 𝑗⦌𝐸 = Σ𝑚 ∈ ⦋ 𝑛 / 𝑘⦌𝐷⦋𝑛 / 𝑘⦌⦋𝑚 / 𝑗⦌𝐸)
173	170, 172	eqtrid 2808	. . 3 ⊢ (𝑘 = 𝑛 → Σ𝑗 ∈ 𝐷 𝐸 = Σ𝑚 ∈ ⦋ 𝑛 / 𝑘⦌𝐷⦋𝑛 / 𝑘⦌⦋𝑚 / 𝑗⦌𝐸)
174		nfcv 2923	. . 3 ⊢ Ⅎ𝑛Σ𝑗 ∈ 𝐷 𝐸
175	33, 117	nfsum 15838	. . 3 ⊢ Ⅎ𝑘Σ𝑚 ∈ ⦋ 𝑛 / 𝑘⦌𝐷⦋𝑛 / 𝑘⦌⦋𝑚 / 𝑗⦌𝐸
176	173, 174, 175	cbvsum 15842	. 2 ⊢ Σ𝑘 ∈ 𝐶 Σ𝑗 ∈ 𝐷 𝐸 = Σ𝑛 ∈ 𝐶 Σ𝑚 ∈ ⦋ 𝑛 / 𝑘⦌𝐷⦋𝑛 / 𝑘⦌⦋𝑚 / 𝑗⦌𝐸
177	155, 168, 176	3eqtr4g 2821	1 ⊢ (𝜑 → Σ𝑗 ∈ 𝐴 Σ𝑘 ∈ 𝐵 𝐸 = Σ𝑘 ∈ 𝐶 Σ𝑗 ∈ 𝐷 𝐸)

This proof depends on syntax axioms:   → wi 4   ↔ wb 209   ∧ wa 401   = wceq 1570  ∃wex 1812   ∈ wcel 2145  ∀wral 3077  ∃wrex 3087  ⦋csb 3847  {csn 4584  ⟨cop 4590  ∪ ciun 4951   × cxp 5649  ^◡ccnv 5650  Rel wrel 5656  ‘cfv 6531  1^st c1st 7988  2^nd c2nd 7989  Fincfn 8957  ℂcc 11179  Σcsu 15833

This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1828  ax-4 1842  ax-5 1943  ax-6 2000  ax-7 2041  ax-8 2147  ax-9 2155  ax-10 2178  ax-11 2194  ax-12 2213  ax-ext 2733  ax-rep 5232  ax-sep 5249  ax-nul 5260  ax-pow 5327  ax-pr 5391  ax-un 7740  ax-inf2 9626  ax-cnex 11237  ax-resscn 11238  ax-1cn 11239  ax-icn 11240  ax-addcl 11241  ax-addrcl 11242  ax-mulcl 11243  ax-mulrcl 11244  ax-mulcom 11245  ax-addass 11246  ax-mulass 11247  ax-distr 11248  ax-i2m1 11249  ax-1ne0 11250  ax-1rid 11251  ax-rnegex 11252  ax-rrecex 11253  ax-cnre 11254  ax-pre-lttri 11255  ax-pre-lttrn 11256  ax-pre-ltadd 11257  ax-pre-mulgt0 11258  ax-pre-sup 11259

This proof depends on definitions:  df-bi 210  df-an 402  df-or 862  df-3or 1104  df-3an 1105  df-tru 1573  df-fal 1583  df-ex 1813  df-nf 1817  df-sb 2100  df-mo 2565  df-eu 2595  df-clab 2740  df-cleq 2753  df-clel 2836  df-nfc 2910  df-ne 2957  df-nel 3063  df-ral 3078  df-rex 3088  df-rmo 3366  df-reu 3367  df-rab 3414  df-v 3453  df-sbc 3740  df-csb 3848  df-dif 3902  df-un 3904  df-in 3906  df-ss 3916  df-pss 3919  df-nul 4280  df-if 4483  df-pw 4559  df-sn 4585  df-pr 4587  df-op 4591  df-uni 4868  df-int 4908  df-iun 4953  df-br 5104  df-opab 5168  df-mpt 5187  df-tr 5213  df-id 5546  df-eprel 5551  df-po 5559  df-so 5560  df-fr 5604  df-se 5605  df-we 5606  df-xp 5657  df-rel 5658  df-cnv 5659  df-co 5660  df-dm 5661  df-rn 5662  df-res 5663  df-ima 5664  df-pred 6297  df-ord 6358  df-on 6359  df-lim 6360  df-suc 6361  df-iota 6487  df-fun 6533  df-fn 6534  df-f 6535  df-f1 6536  df-fo 6537  df-f1o 6538  df-fv 6539  df-isom 6540  df-riota 7369  df-ov 7415  df-oprab 7416  df-mpo 7417  df-om 7867  df-1st 7990  df-2nd 7991  df-frecs 8283  df-wrecs 8314  df-recs 8363  df-rdg 8402  df-1o 8460  df-er 8701  df-en 8958  df-dom 8959  df-sdom 8960  df-fin 8961  df-sup 9418  df-oi 9488  df-card 10001  df-pnf 11326  df-mnf 11327  df-xr 11328  df-ltxr 11329  df-le 11330  df-sub 11524  df-neg 11525  df-div 11955  df-nn 12317  df-2 12386  df-3 12387  df-n0 12588  df-z 12675  df-uz 12947  df-rp 13102  df-fz 13621  df-fzo 13769  df-seq 14125  df-exp 14185  df-hash 14455  df-cj 15246  df-re 15247  df-im 15248  df-sqrt 15382  df-abs 15383  df-clim 15635  df-sum 15834

This theorem is used by:  fsumcom  15921  fsum0diag  15923  fsumdvdsdiag  27493  dvdsflsumcom  27497  fsumfldivdiag  27499  logfac2  27526  chpchtsum  27528  logfaclbnd  27531  dchrisum0lem1  27825