Theorem gsumhashmul 32208

Description: Express a group sum by grouping by nonzero values. (Contributed by Thierry Arnoux, 22-Jun-2024.)

Hypotheses

Ref	Expression
gsumhashmul.b	⊢ 𝐵 = (Base‘𝐺)
gsumhashmul.z	⊢ 0 = (0g‘𝐺)
gsumhashmul.x	⊢ · = (.g‘𝐺)
gsumhashmul.g	⊢ (𝜑 → 𝐺 ∈ CMnd)
gsumhashmul.f	⊢ (𝜑 → 𝐹:𝐴⟶𝐵)
gsumhashmul.1	⊢ (𝜑 → 𝐹 finSupp 0 )

Assertion

Ref	Expression
gsumhashmul	⊢ (𝜑 → (𝐺 Σg 𝐹) = (𝐺 Σg (𝑥 ∈ (ran 𝐹 ∖ { 0 }) ↦ ((♯‘(◡𝐹 “ {𝑥})) · 𝑥))))

Distinct variable groups:   𝑥, 0   𝑥,𝐴   𝑥,𝐵   𝑥,𝐹   𝑥,𝐺   𝜑,𝑥

Allowed substitution hint:   · (𝑥)

Proof of Theorem gsumhashmul

Dummy variables 𝑡 𝑢 𝑣 𝑦 𝑧 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		gsumhashmul.f	. . . . . . 7 ⊢ (𝜑 → 𝐹:𝐴⟶𝐵)
2		suppssdm 8162	. . . . . . . 8 ⊢ (𝐹 supp 0 ) ⊆ dom 𝐹
3	2, 1	fssdm 6738	. . . . . . 7 ⊢ (𝜑 → (𝐹 supp 0 ) ⊆ 𝐴)
4	1, 3	feqresmpt 6962	. . . . . 6 ⊢ (𝜑 → (𝐹 ↾ (𝐹 supp 0 )) = (𝑥 ∈ (𝐹 supp 0 ) ↦ (𝐹‘𝑥)))
5	4	oveq2d 7425	. . . . 5 ⊢ (𝜑 → (𝐺 Σg (𝐹 ↾ (𝐹 supp 0 ))) = (𝐺 Σg (𝑥 ∈ (𝐹 supp 0 ) ↦ (𝐹‘𝑥))))
6		gsumhashmul.b	. . . . . 6 ⊢ 𝐵 = (Base‘𝐺)
7		gsumhashmul.z	. . . . . 6 ⊢ 0 = (0g‘𝐺)
8		gsumhashmul.g	. . . . . 6 ⊢ (𝜑 → 𝐺 ∈ CMnd)
9		gsumhashmul.1	. . . . . . . 8 ⊢ (𝜑 → 𝐹 finSupp 0 )
10		relfsupp 9363	. . . . . . . . 9 ⊢ Rel finSupp
11	10	brrelex1i 5733	. . . . . . . 8 ⊢ (𝐹 finSupp 0 → 𝐹 ∈ V)
12	9, 11	syl 17	. . . . . . 7 ⊢ (𝜑 → 𝐹 ∈ V)
13	1	ffnd 6719	. . . . . . 7 ⊢ (𝜑 → 𝐹 Fn 𝐴)
14	12, 13	fndmexd 7897	. . . . . 6 ⊢ (𝜑 → 𝐴 ∈ V)
15		ssidd 4006	. . . . . 6 ⊢ (𝜑 → (𝐹 supp 0 ) ⊆ (𝐹 supp 0 ))
16	6, 7, 8, 14, 1, 15, 9	gsumres 19781	. . . . 5 ⊢ (𝜑 → (𝐺 Σg (𝐹 ↾ (𝐹 supp 0 ))) = (𝐺 Σg 𝐹))
17		nfcv 2904	. . . . . 6 ⊢ Ⅎ𝑥(𝐹‘(1st ‘𝑧))
18		fveq2 6892	. . . . . 6 ⊢ (𝑥 = (1st ‘𝑧) → (𝐹‘𝑥) = (𝐹‘(1st ‘𝑧)))
19	9	fsuppimpd 9369	. . . . . 6 ⊢ (𝜑 → (𝐹 supp 0 ) ∈ Fin)
20		ssidd 4006	. . . . . 6 ⊢ (𝜑 → 𝐵 ⊆ 𝐵)
21	1	adantr 482	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) → 𝐹:𝐴⟶𝐵)
22	3	sselda 3983	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) → 𝑥 ∈ 𝐴)
23	21, 22	ffvelcdmd 7088	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) → (𝐹‘𝑥) ∈ 𝐵)
24	1	ffund 6722	. . . . . . . . 9 ⊢ (𝜑 → Fun 𝐹)
25		funrel 6566	. . . . . . . . 9 ⊢ (Fun 𝐹 → Rel 𝐹)
26		reldif 5816	. . . . . . . . 9 ⊢ (Rel 𝐹 → Rel (𝐹 ∖ (V × { 0 })))
27	24, 25, 26	3syl 18	. . . . . . . 8 ⊢ (𝜑 → Rel (𝐹 ∖ (V × { 0 })))
28		1stdm 8026	. . . . . . . 8 ⊢ ((Rel (𝐹 ∖ (V × { 0 })) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) → (1st ‘𝑧) ∈ dom (𝐹 ∖ (V × { 0 })))
29	27, 28	sylan 581	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) → (1st ‘𝑧) ∈ dom (𝐹 ∖ (V × { 0 })))
30	7	fvexi 6906	. . . . . . . . . . . 12 ⊢ 0 ∈ V
31	30	a1i 11	. . . . . . . . . . 11 ⊢ (𝜑 → 0 ∈ V)
32		fressupp 31910	. . . . . . . . . . 11 ⊢ ((Fun 𝐹 ∧ 𝐹 ∈ V ∧ 0 ∈ V) → (𝐹 ↾ (𝐹 supp 0 )) = (𝐹 ∖ (V × { 0 })))
33	24, 12, 31, 32	syl3anc 1372	. . . . . . . . . 10 ⊢ (𝜑 → (𝐹 ↾ (𝐹 supp 0 )) = (𝐹 ∖ (V × { 0 })))
34	33	dmeqd 5906	. . . . . . . . 9 ⊢ (𝜑 → dom (𝐹 ↾ (𝐹 supp 0 )) = dom (𝐹 ∖ (V × { 0 })))
35	2	a1i 11	. . . . . . . . . 10 ⊢ (𝜑 → (𝐹 supp 0 ) ⊆ dom 𝐹)
36		ssdmres 6005	. . . . . . . . . 10 ⊢ ((𝐹 supp 0 ) ⊆ dom 𝐹 ↔ dom (𝐹 ↾ (𝐹 supp 0 )) = (𝐹 supp 0 ))
37	35, 36	sylib 217	. . . . . . . . 9 ⊢ (𝜑 → dom (𝐹 ↾ (𝐹 supp 0 )) = (𝐹 supp 0 ))
38	34, 37	eqtr3d 2775	. . . . . . . 8 ⊢ (𝜑 → dom (𝐹 ∖ (V × { 0 })) = (𝐹 supp 0 ))
39	38	adantr 482	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) → dom (𝐹 ∖ (V × { 0 })) = (𝐹 supp 0 ))
40	29, 39	eleqtrd 2836	. . . . . 6 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) → (1st ‘𝑧) ∈ (𝐹 supp 0 ))
41	24	funresd 6592	. . . . . . . . . . 11 ⊢ (𝜑 → Fun (𝐹 ↾ (𝐹 supp 0 )))
42	41	adantr 482	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) → Fun (𝐹 ↾ (𝐹 supp 0 )))
43	37	eleq2d 2820	. . . . . . . . . . 11 ⊢ (𝜑 → (𝑥 ∈ dom (𝐹 ↾ (𝐹 supp 0 )) ↔ 𝑥 ∈ (𝐹 supp 0 )))
44	43	biimpar 479	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) → 𝑥 ∈ dom (𝐹 ↾ (𝐹 supp 0 )))
45		simpr 486	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) → 𝑥 ∈ (𝐹 supp 0 ))
46	45	fvresd 6912	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) → ((𝐹 ↾ (𝐹 supp 0 ))‘𝑥) = (𝐹‘𝑥))
47		funopfvb 6948	. . . . . . . . . . 11 ⊢ ((Fun (𝐹 ↾ (𝐹 supp 0 )) ∧ 𝑥 ∈ dom (𝐹 ↾ (𝐹 supp 0 ))) → (((𝐹 ↾ (𝐹 supp 0 ))‘𝑥) = (𝐹‘𝑥) ↔ ⟨𝑥, (𝐹‘𝑥)⟩ ∈ (𝐹 ↾ (𝐹 supp 0 ))))
48	47	biimpa 478	. . . . . . . . . 10 ⊢ (((Fun (𝐹 ↾ (𝐹 supp 0 )) ∧ 𝑥 ∈ dom (𝐹 ↾ (𝐹 supp 0 ))) ∧ ((𝐹 ↾ (𝐹 supp 0 ))‘𝑥) = (𝐹‘𝑥)) → ⟨𝑥, (𝐹‘𝑥)⟩ ∈ (𝐹 ↾ (𝐹 supp 0 )))
49	42, 44, 46, 48	syl21anc 837	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) → ⟨𝑥, (𝐹‘𝑥)⟩ ∈ (𝐹 ↾ (𝐹 supp 0 )))
50	33	adantr 482	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) → (𝐹 ↾ (𝐹 supp 0 )) = (𝐹 ∖ (V × { 0 })))
51	49, 50	eleqtrd 2836	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) → ⟨𝑥, (𝐹‘𝑥)⟩ ∈ (𝐹 ∖ (V × { 0 })))
52		eqeq2 2745	. . . . . . . . . . 11 ⊢ (𝑣 = ⟨𝑥, (𝐹‘𝑥)⟩ → (𝑧 = 𝑣 ↔ 𝑧 = ⟨𝑥, (𝐹‘𝑥)⟩))
53	52	bibi2d 343	. . . . . . . . . 10 ⊢ (𝑣 = ⟨𝑥, (𝐹‘𝑥)⟩ → ((𝑥 = (1st ‘𝑧) ↔ 𝑧 = 𝑣) ↔ (𝑥 = (1st ‘𝑧) ↔ 𝑧 = ⟨𝑥, (𝐹‘𝑥)⟩)))
54	53	ralbidv 3178	. . . . . . . . 9 ⊢ (𝑣 = ⟨𝑥, (𝐹‘𝑥)⟩ → (∀𝑧 ∈ (𝐹 ∖ (V × { 0 }))(𝑥 = (1st ‘𝑧) ↔ 𝑧 = 𝑣) ↔ ∀𝑧 ∈ (𝐹 ∖ (V × { 0 }))(𝑥 = (1st ‘𝑧) ↔ 𝑧 = ⟨𝑥, (𝐹‘𝑥)⟩)))
55	54	adantl 483	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) ∧ 𝑣 = ⟨𝑥, (𝐹‘𝑥)⟩) → (∀𝑧 ∈ (𝐹 ∖ (V × { 0 }))(𝑥 = (1st ‘𝑧) ↔ 𝑧 = 𝑣) ↔ ∀𝑧 ∈ (𝐹 ∖ (V × { 0 }))(𝑥 = (1st ‘𝑧) ↔ 𝑧 = ⟨𝑥, (𝐹‘𝑥)⟩)))
56		fvexd 6907	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑥 = (1st ‘𝑧)) → (2nd ‘𝑧) ∈ V)
57	27	ad3antrrr 729	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑥 = (1st ‘𝑧)) → Rel (𝐹 ∖ (V × { 0 })))
58		simplr 768	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑥 = (1st ‘𝑧)) → 𝑧 ∈ (𝐹 ∖ (V × { 0 })))
59		1st2nd 8025	. . . . . . . . . . . . . . . . 17 ⊢ ((Rel (𝐹 ∖ (V × { 0 })) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) → 𝑧 = ⟨(1st ‘𝑧), (2nd ‘𝑧)⟩)
60	57, 58, 59	syl2anc 585	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑥 = (1st ‘𝑧)) → 𝑧 = ⟨(1st ‘𝑧), (2nd ‘𝑧)⟩)
61		opeq1 4874	. . . . . . . . . . . . . . . . 17 ⊢ (𝑥 = (1st ‘𝑧) → ⟨𝑥, (2nd ‘𝑧)⟩ = ⟨(1st ‘𝑧), (2nd ‘𝑧)⟩)
62	61	adantl 483	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑥 = (1st ‘𝑧)) → ⟨𝑥, (2nd ‘𝑧)⟩ = ⟨(1st ‘𝑧), (2nd ‘𝑧)⟩)
63	60, 62	eqtr4d 2776	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑥 = (1st ‘𝑧)) → 𝑧 = ⟨𝑥, (2nd ‘𝑧)⟩)
64		difssd 4133	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) → (𝐹 ∖ (V × { 0 })) ⊆ 𝐹)
65	64	sselda 3983	. . . . . . . . . . . . . . . . 17 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) → 𝑧 ∈ 𝐹)
66	65	adantr 482	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑥 = (1st ‘𝑧)) → 𝑧 ∈ 𝐹)
67	63, 66	eqeltrrd 2835	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑥 = (1st ‘𝑧)) → ⟨𝑥, (2nd ‘𝑧)⟩ ∈ 𝐹)
68	63, 67	jca 513	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑥 = (1st ‘𝑧)) → (𝑧 = ⟨𝑥, (2nd ‘𝑧)⟩ ∧ ⟨𝑥, (2nd ‘𝑧)⟩ ∈ 𝐹))
69		opeq2 4875	. . . . . . . . . . . . . . . 16 ⊢ (𝑦 = (2nd ‘𝑧) → ⟨𝑥, 𝑦⟩ = ⟨𝑥, (2nd ‘𝑧)⟩)
70	69	eqeq2d 2744	. . . . . . . . . . . . . . 15 ⊢ (𝑦 = (2nd ‘𝑧) → (𝑧 = ⟨𝑥, 𝑦⟩ ↔ 𝑧 = ⟨𝑥, (2nd ‘𝑧)⟩))
71	69	eleq1d 2819	. . . . . . . . . . . . . . 15 ⊢ (𝑦 = (2nd ‘𝑧) → (⟨𝑥, 𝑦⟩ ∈ 𝐹 ↔ ⟨𝑥, (2nd ‘𝑧)⟩ ∈ 𝐹))
72	70, 71	anbi12d 632	. . . . . . . . . . . . . 14 ⊢ (𝑦 = (2nd ‘𝑧) → ((𝑧 = ⟨𝑥, 𝑦⟩ ∧ ⟨𝑥, 𝑦⟩ ∈ 𝐹) ↔ (𝑧 = ⟨𝑥, (2nd ‘𝑧)⟩ ∧ ⟨𝑥, (2nd ‘𝑧)⟩ ∈ 𝐹)))
73	56, 68, 72	spcedv 3589	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑥 = (1st ‘𝑧)) → ∃𝑦(𝑧 = ⟨𝑥, 𝑦⟩ ∧ ⟨𝑥, 𝑦⟩ ∈ 𝐹))
74		vex 3479	. . . . . . . . . . . . . 14 ⊢ 𝑥 ∈ V
75	74	elsnres 6022	. . . . . . . . . . . . 13 ⊢ (𝑧 ∈ (𝐹 ↾ {𝑥}) ↔ ∃𝑦(𝑧 = ⟨𝑥, 𝑦⟩ ∧ ⟨𝑥, 𝑦⟩ ∈ 𝐹))
76	73, 75	sylibr 233	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑥 = (1st ‘𝑧)) → 𝑧 ∈ (𝐹 ↾ {𝑥}))
77	13	ad3antrrr 729	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑥 = (1st ‘𝑧)) → 𝐹 Fn 𝐴)
78	22	ad2antrr 725	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑥 = (1st ‘𝑧)) → 𝑥 ∈ 𝐴)
79		fnressn 7156	. . . . . . . . . . . . 13 ⊢ ((𝐹 Fn 𝐴 ∧ 𝑥 ∈ 𝐴) → (𝐹 ↾ {𝑥}) = {⟨𝑥, (𝐹‘𝑥)⟩})
80	77, 78, 79	syl2anc 585	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑥 = (1st ‘𝑧)) → (𝐹 ↾ {𝑥}) = {⟨𝑥, (𝐹‘𝑥)⟩})
81	76, 80	eleqtrd 2836	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑥 = (1st ‘𝑧)) → 𝑧 ∈ {⟨𝑥, (𝐹‘𝑥)⟩})
82		elsni 4646	. . . . . . . . . . 11 ⊢ (𝑧 ∈ {⟨𝑥, (𝐹‘𝑥)⟩} → 𝑧 = ⟨𝑥, (𝐹‘𝑥)⟩)
83	81, 82	syl 17	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑥 = (1st ‘𝑧)) → 𝑧 = ⟨𝑥, (𝐹‘𝑥)⟩)
84		simpr 486	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑧 = ⟨𝑥, (𝐹‘𝑥)⟩) → 𝑧 = ⟨𝑥, (𝐹‘𝑥)⟩)
85	84	fveq2d 6896	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑧 = ⟨𝑥, (𝐹‘𝑥)⟩) → (1st ‘𝑧) = (1st ‘⟨𝑥, (𝐹‘𝑥)⟩))
86		fvex 6905	. . . . . . . . . . . 12 ⊢ (𝐹‘𝑥) ∈ V
87	74, 86	op1st 7983	. . . . . . . . . . 11 ⊢ (1st ‘⟨𝑥, (𝐹‘𝑥)⟩) = 𝑥
88	85, 87	eqtr2di 2790	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑧 = ⟨𝑥, (𝐹‘𝑥)⟩) → 𝑥 = (1st ‘𝑧))
89	83, 88	impbida 800	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) → (𝑥 = (1st ‘𝑧) ↔ 𝑧 = ⟨𝑥, (𝐹‘𝑥)⟩))
90	89	ralrimiva 3147	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) → ∀𝑧 ∈ (𝐹 ∖ (V × { 0 }))(𝑥 = (1st ‘𝑧) ↔ 𝑧 = ⟨𝑥, (𝐹‘𝑥)⟩))
91	51, 55, 90	rspcedvd 3615	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) → ∃𝑣 ∈ (𝐹 ∖ (V × { 0 }))∀𝑧 ∈ (𝐹 ∖ (V × { 0 }))(𝑥 = (1st ‘𝑧) ↔ 𝑧 = 𝑣))
92		reu6 3723	. . . . . . 7 ⊢ (∃!𝑧 ∈ (𝐹 ∖ (V × { 0 }))𝑥 = (1st ‘𝑧) ↔ ∃𝑣 ∈ (𝐹 ∖ (V × { 0 }))∀𝑧 ∈ (𝐹 ∖ (V × { 0 }))(𝑥 = (1st ‘𝑧) ↔ 𝑧 = 𝑣))
93	91, 92	sylibr 233	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) → ∃!𝑧 ∈ (𝐹 ∖ (V × { 0 }))𝑥 = (1st ‘𝑧))
94	17, 6, 7, 18, 8, 19, 20, 23, 40, 93	gsummptf1o 19831	. . . . 5 ⊢ (𝜑 → (𝐺 Σg (𝑥 ∈ (𝐹 supp 0 ) ↦ (𝐹‘𝑥))) = (𝐺 Σg (𝑧 ∈ (𝐹 ∖ (V × { 0 })) ↦ (𝐹‘(1st ‘𝑧)))))
95	5, 16, 94	3eqtr3d 2781	. . . 4 ⊢ (𝜑 → (𝐺 Σg 𝐹) = (𝐺 Σg (𝑧 ∈ (𝐹 ∖ (V × { 0 })) ↦ (𝐹‘(1st ‘𝑧)))))
96		simpr 486	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) → 𝑧 ∈ (𝐹 ∖ (V × { 0 })))
97	96	eldifad 3961	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) → 𝑧 ∈ 𝐹)
98		funfv1st2nd 8032	. . . . . . 7 ⊢ ((Fun 𝐹 ∧ 𝑧 ∈ 𝐹) → (𝐹‘(1st ‘𝑧)) = (2nd ‘𝑧))
99	24, 97, 98	syl2an2r 684	. . . . . 6 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) → (𝐹‘(1st ‘𝑧)) = (2nd ‘𝑧))
100	99	mpteq2dva 5249	. . . . 5 ⊢ (𝜑 → (𝑧 ∈ (𝐹 ∖ (V × { 0 })) ↦ (𝐹‘(1st ‘𝑧))) = (𝑧 ∈ (𝐹 ∖ (V × { 0 })) ↦ (2nd ‘𝑧)))
101	100	oveq2d 7425	. . . 4 ⊢ (𝜑 → (𝐺 Σg (𝑧 ∈ (𝐹 ∖ (V × { 0 })) ↦ (𝐹‘(1st ‘𝑧)))) = (𝐺 Σg (𝑧 ∈ (𝐹 ∖ (V × { 0 })) ↦ (2nd ‘𝑧))))
102	95, 101	eqtrd 2773	. . 3 ⊢ (𝜑 → (𝐺 Σg 𝐹) = (𝐺 Σg (𝑧 ∈ (𝐹 ∖ (V × { 0 })) ↦ (2nd ‘𝑧))))
103		nfcv 2904	. . . 4 ⊢ Ⅎ𝑧(1st ‘𝑡)
104		fvex 6905	. . . . 5 ⊢ (2nd ‘𝑡) ∈ V
105		fvex 6905	. . . . 5 ⊢ (1st ‘𝑡) ∈ V
106	104, 105	op2ndd 7986	. . . 4 ⊢ (𝑧 = ⟨(2nd ‘𝑡), (1st ‘𝑡)⟩ → (2nd ‘𝑧) = (1st ‘𝑡))
107		resfnfinfin 9332	. . . . . 6 ⊢ ((𝐹 Fn 𝐴 ∧ (𝐹 supp 0 ) ∈ Fin) → (𝐹 ↾ (𝐹 supp 0 )) ∈ Fin)
108	13, 19, 107	syl2anc 585	. . . . 5 ⊢ (𝜑 → (𝐹 ↾ (𝐹 supp 0 )) ∈ Fin)
109	33, 108	eqeltrrd 2835	. . . 4 ⊢ (𝜑 → (𝐹 ∖ (V × { 0 })) ∈ Fin)
110	33	rneqd 5938	. . . . 5 ⊢ (𝜑 → ran (𝐹 ↾ (𝐹 supp 0 )) = ran (𝐹 ∖ (V × { 0 })))
111		rnresss 6018	. . . . . 6 ⊢ ran (𝐹 ↾ (𝐹 supp 0 )) ⊆ ran 𝐹
112	1	frnd 6726	. . . . . 6 ⊢ (𝜑 → ran 𝐹 ⊆ 𝐵)
113	111, 112	sstrid 3994	. . . . 5 ⊢ (𝜑 → ran (𝐹 ↾ (𝐹 supp 0 )) ⊆ 𝐵)
114	110, 113	eqsstrrd 4022	. . . 4 ⊢ (𝜑 → ran (𝐹 ∖ (V × { 0 })) ⊆ 𝐵)
115		2ndrn 8027	. . . . 5 ⊢ ((Rel (𝐹 ∖ (V × { 0 })) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) → (2nd ‘𝑧) ∈ ran (𝐹 ∖ (V × { 0 })))
116	27, 115	sylan 581	. . . 4 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) → (2nd ‘𝑧) ∈ ran (𝐹 ∖ (V × { 0 })))
117		relcnv 6104	. . . . . . . 8 ⊢ Rel ◡𝐹
118		reldif 5816	. . . . . . . 8 ⊢ (Rel ◡𝐹 → Rel (◡𝐹 ∖ ({ 0 } × V)))
119	117, 118	mp1i 13	. . . . . . 7 ⊢ (𝜑 → Rel (◡𝐹 ∖ ({ 0 } × V)))
120		1st2nd 8025	. . . . . . 7 ⊢ ((Rel (◡𝐹 ∖ ({ 0 } × V)) ∧ 𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V))) → 𝑡 = ⟨(1st ‘𝑡), (2nd ‘𝑡)⟩)
121	119, 120	sylan 581	. . . . . 6 ⊢ ((𝜑 ∧ 𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V))) → 𝑡 = ⟨(1st ‘𝑡), (2nd ‘𝑡)⟩)
122		cnvdif 6144	. . . . . . . . . 10 ⊢ ◡(𝐹 ∖ (V × { 0 })) = (◡𝐹 ∖ ◡(V × { 0 }))
123		cnvxp 6157	. . . . . . . . . . 11 ⊢ ◡(V × { 0 }) = ({ 0 } × V)
124	123	difeq2i 4120	. . . . . . . . . 10 ⊢ (◡𝐹 ∖ ◡(V × { 0 })) = (◡𝐹 ∖ ({ 0 } × V))
125	122, 124	eqtri 2761	. . . . . . . . 9 ⊢ ◡(𝐹 ∖ (V × { 0 })) = (◡𝐹 ∖ ({ 0 } × V))
126	125	eqimss2i 4044	. . . . . . . 8 ⊢ (◡𝐹 ∖ ({ 0 } × V)) ⊆ ◡(𝐹 ∖ (V × { 0 }))
127	126	a1i 11	. . . . . . 7 ⊢ (𝜑 → (◡𝐹 ∖ ({ 0 } × V)) ⊆ ◡(𝐹 ∖ (V × { 0 })))
128	127	sselda 3983	. . . . . 6 ⊢ ((𝜑 ∧ 𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V))) → 𝑡 ∈ ◡(𝐹 ∖ (V × { 0 })))
129	121, 128	eqeltrrd 2835	. . . . 5 ⊢ ((𝜑 ∧ 𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V))) → ⟨(1st ‘𝑡), (2nd ‘𝑡)⟩ ∈ ◡(𝐹 ∖ (V × { 0 })))
130	105, 104	opelcnv 5882	. . . . 5 ⊢ (⟨(1st ‘𝑡), (2nd ‘𝑡)⟩ ∈ ◡(𝐹 ∖ (V × { 0 })) ↔ ⟨(2nd ‘𝑡), (1st ‘𝑡)⟩ ∈ (𝐹 ∖ (V × { 0 })))
131	129, 130	sylib 217	. . . 4 ⊢ ((𝜑 ∧ 𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V))) → ⟨(2nd ‘𝑡), (1st ‘𝑡)⟩ ∈ (𝐹 ∖ (V × { 0 })))
132	27	adantr 482	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) → Rel (𝐹 ∖ (V × { 0 })))
133		eqidd 2734	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) → ∪ ◡{𝑧} = ∪ ◡{𝑧})
134		cnvf1olem 8096	. . . . . . . . 9 ⊢ ((Rel (𝐹 ∖ (V × { 0 })) ∧ (𝑧 ∈ (𝐹 ∖ (V × { 0 })) ∧ ∪ ◡{𝑧} = ∪ ◡{𝑧})) → (∪ ◡{𝑧} ∈ ◡(𝐹 ∖ (V × { 0 })) ∧ 𝑧 = ∪ ◡{∪ ◡{𝑧}}))
135	134	simpld 496	. . . . . . . 8 ⊢ ((Rel (𝐹 ∖ (V × { 0 })) ∧ (𝑧 ∈ (𝐹 ∖ (V × { 0 })) ∧ ∪ ◡{𝑧} = ∪ ◡{𝑧})) → ∪ ◡{𝑧} ∈ ◡(𝐹 ∖ (V × { 0 })))
136	132, 96, 133, 135	syl12anc 836	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) → ∪ ◡{𝑧} ∈ ◡(𝐹 ∖ (V × { 0 })))
137	136, 125	eleqtrdi 2844	. . . . . 6 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) → ∪ ◡{𝑧} ∈ (◡𝐹 ∖ ({ 0 } × V)))
138		eqeq2 2745	. . . . . . . . 9 ⊢ (𝑢 = ∪ ◡{𝑧} → (𝑡 = 𝑢 ↔ 𝑡 = ∪ ◡{𝑧}))
139	138	bibi2d 343	. . . . . . . 8 ⊢ (𝑢 = ∪ ◡{𝑧} → ((𝑧 = ⟨(2nd ‘𝑡), (1st ‘𝑡)⟩ ↔ 𝑡 = 𝑢) ↔ (𝑧 = ⟨(2nd ‘𝑡), (1st ‘𝑡)⟩ ↔ 𝑡 = ∪ ◡{𝑧})))
140	139	ralbidv 3178	. . . . . . 7 ⊢ (𝑢 = ∪ ◡{𝑧} → (∀𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V))(𝑧 = ⟨(2nd ‘𝑡), (1st ‘𝑡)⟩ ↔ 𝑡 = 𝑢) ↔ ∀𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V))(𝑧 = ⟨(2nd ‘𝑡), (1st ‘𝑡)⟩ ↔ 𝑡 = ∪ ◡{𝑧})))
141	140	adantl 483	. . . . . 6 ⊢ (((𝜑 ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑢 = ∪ ◡{𝑧}) → (∀𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V))(𝑧 = ⟨(2nd ‘𝑡), (1st ‘𝑡)⟩ ↔ 𝑡 = 𝑢) ↔ ∀𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V))(𝑧 = ⟨(2nd ‘𝑡), (1st ‘𝑡)⟩ ↔ 𝑡 = ∪ ◡{𝑧})))
142	117, 118	mp1i 13	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V))) ∧ 𝑧 = ⟨(2nd ‘𝑡), (1st ‘𝑡)⟩) → Rel (◡𝐹 ∖ ({ 0 } × V)))
143		simplr 768	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V))) ∧ 𝑧 = ⟨(2nd ‘𝑡), (1st ‘𝑡)⟩) → 𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V)))
144		simpr 486	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V))) ∧ 𝑧 = ⟨(2nd ‘𝑡), (1st ‘𝑡)⟩) → 𝑧 = ⟨(2nd ‘𝑡), (1st ‘𝑡)⟩)
145		df-rel 5684	. . . . . . . . . . . . . 14 ⊢ (Rel (◡𝐹 ∖ ({ 0 } × V)) ↔ (◡𝐹 ∖ ({ 0 } × V)) ⊆ (V × V))
146	119, 145	sylib 217	. . . . . . . . . . . . 13 ⊢ (𝜑 → (◡𝐹 ∖ ({ 0 } × V)) ⊆ (V × V))
147	146	ad3antrrr 729	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V))) ∧ 𝑧 = ⟨(2nd ‘𝑡), (1st ‘𝑡)⟩) → (◡𝐹 ∖ ({ 0 } × V)) ⊆ (V × V))
148	147, 143	sseldd 3984	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V))) ∧ 𝑧 = ⟨(2nd ‘𝑡), (1st ‘𝑡)⟩) → 𝑡 ∈ (V × V))
149		2nd1st 8024	. . . . . . . . . . 11 ⊢ (𝑡 ∈ (V × V) → ∪ ◡{𝑡} = ⟨(2nd ‘𝑡), (1st ‘𝑡)⟩)
150	148, 149	syl 17	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V))) ∧ 𝑧 = ⟨(2nd ‘𝑡), (1st ‘𝑡)⟩) → ∪ ◡{𝑡} = ⟨(2nd ‘𝑡), (1st ‘𝑡)⟩)
151	144, 150	eqtr4d 2776	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V))) ∧ 𝑧 = ⟨(2nd ‘𝑡), (1st ‘𝑡)⟩) → 𝑧 = ∪ ◡{𝑡})
152		cnvf1olem 8096	. . . . . . . . . 10 ⊢ ((Rel (◡𝐹 ∖ ({ 0 } × V)) ∧ (𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V)) ∧ 𝑧 = ∪ ◡{𝑡})) → (𝑧 ∈ ◡(◡𝐹 ∖ ({ 0 } × V)) ∧ 𝑡 = ∪ ◡{𝑧}))
153	152	simprd 497	. . . . . . . . 9 ⊢ ((Rel (◡𝐹 ∖ ({ 0 } × V)) ∧ (𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V)) ∧ 𝑧 = ∪ ◡{𝑡})) → 𝑡 = ∪ ◡{𝑧})
154	142, 143, 151, 153	syl12anc 836	. . . . . . . 8 ⊢ ((((𝜑 ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V))) ∧ 𝑧 = ⟨(2nd ‘𝑡), (1st ‘𝑡)⟩) → 𝑡 = ∪ ◡{𝑧})
155	27	ad3antrrr 729	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V))) ∧ 𝑡 = ∪ ◡{𝑧}) → Rel (𝐹 ∖ (V × { 0 })))
156	96	ad2antrr 725	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V))) ∧ 𝑡 = ∪ ◡{𝑧}) → 𝑧 ∈ (𝐹 ∖ (V × { 0 })))
157		simpr 486	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V))) ∧ 𝑡 = ∪ ◡{𝑧}) → 𝑡 = ∪ ◡{𝑧})
158		cnvf1olem 8096	. . . . . . . . . . 11 ⊢ ((Rel (𝐹 ∖ (V × { 0 })) ∧ (𝑧 ∈ (𝐹 ∖ (V × { 0 })) ∧ 𝑡 = ∪ ◡{𝑧})) → (𝑡 ∈ ◡(𝐹 ∖ (V × { 0 })) ∧ 𝑧 = ∪ ◡{𝑡}))
159	158	simprd 497	. . . . . . . . . 10 ⊢ ((Rel (𝐹 ∖ (V × { 0 })) ∧ (𝑧 ∈ (𝐹 ∖ (V × { 0 })) ∧ 𝑡 = ∪ ◡{𝑧})) → 𝑧 = ∪ ◡{𝑡})
160	155, 156, 157, 159	syl12anc 836	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V))) ∧ 𝑡 = ∪ ◡{𝑧}) → 𝑧 = ∪ ◡{𝑡})
161	146	ad3antrrr 729	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V))) ∧ 𝑡 = ∪ ◡{𝑧}) → (◡𝐹 ∖ ({ 0 } × V)) ⊆ (V × V))
162		simplr 768	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V))) ∧ 𝑡 = ∪ ◡{𝑧}) → 𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V)))
163	161, 162	sseldd 3984	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V))) ∧ 𝑡 = ∪ ◡{𝑧}) → 𝑡 ∈ (V × V))
164	163, 149	syl 17	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V))) ∧ 𝑡 = ∪ ◡{𝑧}) → ∪ ◡{𝑡} = ⟨(2nd ‘𝑡), (1st ‘𝑡)⟩)
165	160, 164	eqtrd 2773	. . . . . . . 8 ⊢ ((((𝜑 ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V))) ∧ 𝑡 = ∪ ◡{𝑧}) → 𝑧 = ⟨(2nd ‘𝑡), (1st ‘𝑡)⟩)
166	154, 165	impbida 800	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V))) → (𝑧 = ⟨(2nd ‘𝑡), (1st ‘𝑡)⟩ ↔ 𝑡 = ∪ ◡{𝑧}))
167	166	ralrimiva 3147	. . . . . 6 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) → ∀𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V))(𝑧 = ⟨(2nd ‘𝑡), (1st ‘𝑡)⟩ ↔ 𝑡 = ∪ ◡{𝑧}))
168	137, 141, 167	rspcedvd 3615	. . . . 5 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) → ∃𝑢 ∈ (◡𝐹 ∖ ({ 0 } × V))∀𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V))(𝑧 = ⟨(2nd ‘𝑡), (1st ‘𝑡)⟩ ↔ 𝑡 = 𝑢))
169		reu6 3723	. . . . 5 ⊢ (∃!𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V))𝑧 = ⟨(2nd ‘𝑡), (1st ‘𝑡)⟩ ↔ ∃𝑢 ∈ (◡𝐹 ∖ ({ 0 } × V))∀𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V))(𝑧 = ⟨(2nd ‘𝑡), (1st ‘𝑡)⟩ ↔ 𝑡 = 𝑢))
170	168, 169	sylibr 233	. . . 4 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) → ∃!𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V))𝑧 = ⟨(2nd ‘𝑡), (1st ‘𝑡)⟩)
171	103, 6, 7, 106, 8, 109, 114, 116, 131, 170	gsummptf1o 19831	. . 3 ⊢ (𝜑 → (𝐺 Σg (𝑧 ∈ (𝐹 ∖ (V × { 0 })) ↦ (2nd ‘𝑧))) = (𝐺 Σg (𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V)) ↦ (1st ‘𝑡))))
172		fveq2 6892	. . . . . 6 ⊢ (𝑡 = 𝑧 → (1st ‘𝑡) = (1st ‘𝑧))
173	172	cbvmptv 5262	. . . . 5 ⊢ (𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V)) ↦ (1st ‘𝑡)) = (𝑧 ∈ (◡𝐹 ∖ ({ 0 } × V)) ↦ (1st ‘𝑧))
174	33	cnveqd 5876	. . . . . . 7 ⊢ (𝜑 → ◡(𝐹 ↾ (𝐹 supp 0 )) = ◡(𝐹 ∖ (V × { 0 })))
175	174, 125	eqtr2di 2790	. . . . . 6 ⊢ (𝜑 → (◡𝐹 ∖ ({ 0 } × V)) = ◡(𝐹 ↾ (𝐹 supp 0 )))
176	175	mpteq1d 5244	. . . . 5 ⊢ (𝜑 → (𝑧 ∈ (◡𝐹 ∖ ({ 0 } × V)) ↦ (1st ‘𝑧)) = (𝑧 ∈ ◡(𝐹 ↾ (𝐹 supp 0 )) ↦ (1st ‘𝑧)))
177	173, 176	eqtrid 2785	. . . 4 ⊢ (𝜑 → (𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V)) ↦ (1st ‘𝑡)) = (𝑧 ∈ ◡(𝐹 ↾ (𝐹 supp 0 )) ↦ (1st ‘𝑧)))
178	177	oveq2d 7425	. . 3 ⊢ (𝜑 → (𝐺 Σg (𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V)) ↦ (1st ‘𝑡))) = (𝐺 Σg (𝑧 ∈ ◡(𝐹 ↾ (𝐹 supp 0 )) ↦ (1st ‘𝑧))))
179	102, 171, 178	3eqtrd 2777	. 2 ⊢ (𝜑 → (𝐺 Σg 𝐹) = (𝐺 Σg (𝑧 ∈ ◡(𝐹 ↾ (𝐹 supp 0 )) ↦ (1st ‘𝑧))))
180		nfcv 2904	. . 3 ⊢ Ⅎ𝑦(1st ‘𝑧)
181		nfv 1918	. . 3 ⊢ Ⅎ𝑥𝜑
182		vex 3479	. . . 4 ⊢ 𝑦 ∈ V
183	74, 182	op1std 7985	. . 3 ⊢ (𝑧 = ⟨𝑥, 𝑦⟩ → (1st ‘𝑧) = 𝑥)
184		relcnv 6104	. . . 4 ⊢ Rel ◡(𝐹 ↾ (𝐹 supp 0 ))
185	184	a1i 11	. . 3 ⊢ (𝜑 → Rel ◡(𝐹 ↾ (𝐹 supp 0 )))
186		cnvfi 9180	. . . 4 ⊢ ((𝐹 ↾ (𝐹 supp 0 )) ∈ Fin → ◡(𝐹 ↾ (𝐹 supp 0 )) ∈ Fin)
187	108, 186	syl 17	. . 3 ⊢ (𝜑 → ◡(𝐹 ↾ (𝐹 supp 0 )) ∈ Fin)
188	112	adantr 482	. . . 4 ⊢ ((𝜑 ∧ 𝑧 ∈ ◡(𝐹 ↾ (𝐹 supp 0 ))) → ran 𝐹 ⊆ 𝐵)
189	184	a1i 11	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑧 ∈ ◡(𝐹 ↾ (𝐹 supp 0 ))) → Rel ◡(𝐹 ↾ (𝐹 supp 0 )))
190		simpr 486	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑧 ∈ ◡(𝐹 ↾ (𝐹 supp 0 ))) → 𝑧 ∈ ◡(𝐹 ↾ (𝐹 supp 0 )))
191		1stdm 8026	. . . . . . 7 ⊢ ((Rel ◡(𝐹 ↾ (𝐹 supp 0 )) ∧ 𝑧 ∈ ◡(𝐹 ↾ (𝐹 supp 0 ))) → (1st ‘𝑧) ∈ dom ◡(𝐹 ↾ (𝐹 supp 0 )))
192	189, 190, 191	syl2anc 585	. . . . . 6 ⊢ ((𝜑 ∧ 𝑧 ∈ ◡(𝐹 ↾ (𝐹 supp 0 ))) → (1st ‘𝑧) ∈ dom ◡(𝐹 ↾ (𝐹 supp 0 )))
193		df-rn 5688	. . . . . 6 ⊢ ran (𝐹 ↾ (𝐹 supp 0 )) = dom ◡(𝐹 ↾ (𝐹 supp 0 ))
194	192, 193	eleqtrrdi 2845	. . . . 5 ⊢ ((𝜑 ∧ 𝑧 ∈ ◡(𝐹 ↾ (𝐹 supp 0 ))) → (1st ‘𝑧) ∈ ran (𝐹 ↾ (𝐹 supp 0 )))
195	111, 194	sselid 3981	. . . 4 ⊢ ((𝜑 ∧ 𝑧 ∈ ◡(𝐹 ↾ (𝐹 supp 0 ))) → (1st ‘𝑧) ∈ ran 𝐹)
196	188, 195	sseldd 3984	. . 3 ⊢ ((𝜑 ∧ 𝑧 ∈ ◡(𝐹 ↾ (𝐹 supp 0 ))) → (1st ‘𝑧) ∈ 𝐵)
197	180, 181, 6, 183, 185, 187, 8, 196	gsummpt2d 32201	. 2 ⊢ (𝜑 → (𝐺 Σg (𝑧 ∈ ◡(𝐹 ↾ (𝐹 supp 0 )) ↦ (1st ‘𝑧))) = (𝐺 Σg (𝑥 ∈ dom ◡(𝐹 ↾ (𝐹 supp 0 )) ↦ (𝐺 Σg (𝑦 ∈ (◡(𝐹 ↾ (𝐹 supp 0 )) “ {𝑥}) ↦ 𝑥)))))
198		df-ima 5690	. . . . . . 7 ⊢ (𝐹 “ (𝐹 supp 0 )) = ran (𝐹 ↾ (𝐹 supp 0 ))
199		supppreima 31913	. . . . . . . . 9 ⊢ ((Fun 𝐹 ∧ 𝐹 ∈ V ∧ 0 ∈ V) → (𝐹 supp 0 ) = (◡𝐹 “ (ran 𝐹 ∖ { 0 })))
200	24, 12, 31, 199	syl3anc 1372	. . . . . . . 8 ⊢ (𝜑 → (𝐹 supp 0 ) = (◡𝐹 “ (ran 𝐹 ∖ { 0 })))
201	200	imaeq2d 6060	. . . . . . 7 ⊢ (𝜑 → (𝐹 “ (𝐹 supp 0 )) = (𝐹 “ (◡𝐹 “ (ran 𝐹 ∖ { 0 }))))
202	198, 201	eqtr3id 2787	. . . . . 6 ⊢ (𝜑 → ran (𝐹 ↾ (𝐹 supp 0 )) = (𝐹 “ (◡𝐹 “ (ran 𝐹 ∖ { 0 }))))
203		funimacnv 6630	. . . . . . 7 ⊢ (Fun 𝐹 → (𝐹 “ (◡𝐹 “ (ran 𝐹 ∖ { 0 }))) = ((ran 𝐹 ∖ { 0 }) ∩ ran 𝐹))
204	24, 203	syl 17	. . . . . 6 ⊢ (𝜑 → (𝐹 “ (◡𝐹 “ (ran 𝐹 ∖ { 0 }))) = ((ran 𝐹 ∖ { 0 }) ∩ ran 𝐹))
205		difssd 4133	. . . . . . 7 ⊢ (𝜑 → (ran 𝐹 ∖ { 0 }) ⊆ ran 𝐹)
206		df-ss 3966	. . . . . . 7 ⊢ ((ran 𝐹 ∖ { 0 }) ⊆ ran 𝐹 ↔ ((ran 𝐹 ∖ { 0 }) ∩ ran 𝐹) = (ran 𝐹 ∖ { 0 }))
207	205, 206	sylib 217	. . . . . 6 ⊢ (𝜑 → ((ran 𝐹 ∖ { 0 }) ∩ ran 𝐹) = (ran 𝐹 ∖ { 0 }))
208	202, 204, 207	3eqtrd 2777	. . . . 5 ⊢ (𝜑 → ran (𝐹 ↾ (𝐹 supp 0 )) = (ran 𝐹 ∖ { 0 }))
209	193, 208	eqtr3id 2787	. . . 4 ⊢ (𝜑 → dom ◡(𝐹 ↾ (𝐹 supp 0 )) = (ran 𝐹 ∖ { 0 }))
210	8	cmnmndd 19672	. . . . . . 7 ⊢ (𝜑 → 𝐺 ∈ Mnd)
211	210	adantr 482	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ dom ◡(𝐹 ↾ (𝐹 supp 0 ))) → 𝐺 ∈ Mnd)
212	108	adantr 482	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ dom ◡(𝐹 ↾ (𝐹 supp 0 ))) → (𝐹 ↾ (𝐹 supp 0 )) ∈ Fin)
213		imafi2 31936	. . . . . . 7 ⊢ (◡(𝐹 ↾ (𝐹 supp 0 )) ∈ Fin → (◡(𝐹 ↾ (𝐹 supp 0 )) “ {𝑥}) ∈ Fin)
214	212, 186, 213	3syl 18	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ dom ◡(𝐹 ↾ (𝐹 supp 0 ))) → (◡(𝐹 ↾ (𝐹 supp 0 )) “ {𝑥}) ∈ Fin)
215	193, 113	eqsstrrid 4032	. . . . . . 7 ⊢ (𝜑 → dom ◡(𝐹 ↾ (𝐹 supp 0 )) ⊆ 𝐵)
216	215	sselda 3983	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ dom ◡(𝐹 ↾ (𝐹 supp 0 ))) → 𝑥 ∈ 𝐵)
217		gsumhashmul.x	. . . . . . 7 ⊢ · = (.g‘𝐺)
218	6, 217	gsumconst 19802	. . . . . 6 ⊢ ((𝐺 ∈ Mnd ∧ (◡(𝐹 ↾ (𝐹 supp 0 )) “ {𝑥}) ∈ Fin ∧ 𝑥 ∈ 𝐵) → (𝐺 Σg (𝑦 ∈ (◡(𝐹 ↾ (𝐹 supp 0 )) “ {𝑥}) ↦ 𝑥)) = ((♯‘(◡(𝐹 ↾ (𝐹 supp 0 )) “ {𝑥})) · 𝑥))
219	211, 214, 216, 218	syl3anc 1372	. . . . 5 ⊢ ((𝜑 ∧ 𝑥 ∈ dom ◡(𝐹 ↾ (𝐹 supp 0 ))) → (𝐺 Σg (𝑦 ∈ (◡(𝐹 ↾ (𝐹 supp 0 )) “ {𝑥}) ↦ 𝑥)) = ((♯‘(◡(𝐹 ↾ (𝐹 supp 0 )) “ {𝑥})) · 𝑥))
220		cnvresima 6230	. . . . . . . 8 ⊢ (◡(𝐹 ↾ (𝐹 supp 0 )) “ {𝑥}) = ((◡𝐹 “ {𝑥}) ∩ (𝐹 supp 0 ))
221	209	eleq2d 2820	. . . . . . . . . . . . 13 ⊢ (𝜑 → (𝑥 ∈ dom ◡(𝐹 ↾ (𝐹 supp 0 )) ↔ 𝑥 ∈ (ran 𝐹 ∖ { 0 })))
222	221	biimpa 478	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑥 ∈ dom ◡(𝐹 ↾ (𝐹 supp 0 ))) → 𝑥 ∈ (ran 𝐹 ∖ { 0 }))
223	222	snssd 4813	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑥 ∈ dom ◡(𝐹 ↾ (𝐹 supp 0 ))) → {𝑥} ⊆ (ran 𝐹 ∖ { 0 }))
224		sspreima 7070	. . . . . . . . . . 11 ⊢ ((Fun 𝐹 ∧ {𝑥} ⊆ (ran 𝐹 ∖ { 0 })) → (◡𝐹 “ {𝑥}) ⊆ (◡𝐹 “ (ran 𝐹 ∖ { 0 })))
225	24, 223, 224	syl2an2r 684	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑥 ∈ dom ◡(𝐹 ↾ (𝐹 supp 0 ))) → (◡𝐹 “ {𝑥}) ⊆ (◡𝐹 “ (ran 𝐹 ∖ { 0 })))
226	200	adantr 482	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑥 ∈ dom ◡(𝐹 ↾ (𝐹 supp 0 ))) → (𝐹 supp 0 ) = (◡𝐹 “ (ran 𝐹 ∖ { 0 })))
227	225, 226	sseqtrrd 4024	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑥 ∈ dom ◡(𝐹 ↾ (𝐹 supp 0 ))) → (◡𝐹 “ {𝑥}) ⊆ (𝐹 supp 0 ))
228		df-ss 3966	. . . . . . . . 9 ⊢ ((◡𝐹 “ {𝑥}) ⊆ (𝐹 supp 0 ) ↔ ((◡𝐹 “ {𝑥}) ∩ (𝐹 supp 0 )) = (◡𝐹 “ {𝑥}))
229	227, 228	sylib 217	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ dom ◡(𝐹 ↾ (𝐹 supp 0 ))) → ((◡𝐹 “ {𝑥}) ∩ (𝐹 supp 0 )) = (◡𝐹 “ {𝑥}))
230	220, 229	eqtr2id 2786	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ dom ◡(𝐹 ↾ (𝐹 supp 0 ))) → (◡𝐹 “ {𝑥}) = (◡(𝐹 ↾ (𝐹 supp 0 )) “ {𝑥}))
231	230	fveq2d 6896	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ dom ◡(𝐹 ↾ (𝐹 supp 0 ))) → (♯‘(◡𝐹 “ {𝑥})) = (♯‘(◡(𝐹 ↾ (𝐹 supp 0 )) “ {𝑥})))
232	231	oveq1d 7424	. . . . 5 ⊢ ((𝜑 ∧ 𝑥 ∈ dom ◡(𝐹 ↾ (𝐹 supp 0 ))) → ((♯‘(◡𝐹 “ {𝑥})) · 𝑥) = ((♯‘(◡(𝐹 ↾ (𝐹 supp 0 )) “ {𝑥})) · 𝑥))
233	219, 232	eqtr4d 2776	. . . 4 ⊢ ((𝜑 ∧ 𝑥 ∈ dom ◡(𝐹 ↾ (𝐹 supp 0 ))) → (𝐺 Σg (𝑦 ∈ (◡(𝐹 ↾ (𝐹 supp 0 )) “ {𝑥}) ↦ 𝑥)) = ((♯‘(◡𝐹 “ {𝑥})) · 𝑥))
234	209, 233	mpteq12dva 5238	. . 3 ⊢ (𝜑 → (𝑥 ∈ dom ◡(𝐹 ↾ (𝐹 supp 0 )) ↦ (𝐺 Σg (𝑦 ∈ (◡(𝐹 ↾ (𝐹 supp 0 )) “ {𝑥}) ↦ 𝑥))) = (𝑥 ∈ (ran 𝐹 ∖ { 0 }) ↦ ((♯‘(◡𝐹 “ {𝑥})) · 𝑥)))
235	234	oveq2d 7425	. 2 ⊢ (𝜑 → (𝐺 Σg (𝑥 ∈ dom ◡(𝐹 ↾ (𝐹 supp 0 )) ↦ (𝐺 Σg (𝑦 ∈ (◡(𝐹 ↾ (𝐹 supp 0 )) “ {𝑥}) ↦ 𝑥)))) = (𝐺 Σg (𝑥 ∈ (ran 𝐹 ∖ { 0 }) ↦ ((♯‘(◡𝐹 “ {𝑥})) · 𝑥))))
236	179, 197, 235	3eqtrd 2777	1 ⊢ (𝜑 → (𝐺 Σg 𝐹) = (𝐺 Σg (𝑥 ∈ (ran 𝐹 ∖ { 0 }) ↦ ((♯‘(◡𝐹 “ {𝑥})) · 𝑥))))

Syntax hints:   → wi 4   ↔ wb 205   ∧ wa 397   = wceq 1542  ∃wex 1782   ∈ wcel 2107  ∀wral 3062  ∃wrex 3071  ∃!wreu 3375  Vcvv 3475   ∖ cdif 3946   ∩ cin 3948   ⊆ wss 3949  {csn 4629  ⟨cop 4635  ∪ cuni 4909   class class class wbr 5149   ↦ cmpt 5232   × cxp 5675  ^◡ccnv 5676  dom cdm 5677  ran crn 5678   ↾ cres 5679   “ cima 5680  Rel wrel 5682  Fun wfun 6538   Fn wfn 6539  ⟶wf 6540  ‘cfv 6544  (class class class)co 7409  1^st c1st 7973  2^nd c2nd 7974   supp csupp 8146  Fincfn 8939   finSupp cfsupp 9361  ♯chash 14290  Basecbs 17144  0_gc0g 17385   Σ_g cgsu 17386  Mndcmnd 18625  ._gcmg 18950  CMndccmn 19648

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1798  ax-4 1812  ax-5 1914  ax-6 1972  ax-7 2012  ax-8 2109  ax-9 2117  ax-10 2138  ax-11 2155  ax-12 2172  ax-ext 2704  ax-rep 5286  ax-sep 5300  ax-nul 5307  ax-pow 5364  ax-pr 5428  ax-un 7725  ax-cnex 11166  ax-resscn 11167  ax-1cn 11168  ax-icn 11169  ax-addcl 11170  ax-addrcl 11171  ax-mulcl 11172  ax-mulrcl 11173  ax-mulcom 11174  ax-addass 11175  ax-mulass 11176  ax-distr 11177  ax-i2m1 11178  ax-1ne0 11179  ax-1rid 11180  ax-rnegex 11181  ax-rrecex 11182  ax-cnre 11183  ax-pre-lttri 11184  ax-pre-lttrn 11185  ax-pre-ltadd 11186  ax-pre-mulgt0 11187

This theorem depends on definitions:  df-bi 206  df-an 398  df-or 847  df-3or 1089  df-3an 1090  df-tru 1545  df-fal 1555  df-ex 1783  df-nf 1787  df-sb 2069  df-mo 2535  df-eu 2564  df-clab 2711  df-cleq 2725  df-clel 2811  df-nfc 2886  df-ne 2942  df-nel 3048  df-ral 3063  df-rex 3072  df-rmo 3377  df-reu 3378  df-rab 3434  df-v 3477  df-sbc 3779  df-csb 3895  df-dif 3952  df-un 3954  df-in 3956  df-ss 3966  df-pss 3968  df-nul 4324  df-if 4530  df-pw 4605  df-sn 4630  df-pr 4632  df-op 4636  df-uni 4910  df-int 4952  df-iun 5000  df-iin 5001  df-br 5150  df-opab 5212  df-mpt 5233  df-tr 5267  df-id 5575  df-eprel 5581  df-po 5589  df-so 5590  df-fr 5632  df-se 5633  df-we 5634  df-xp 5683  df-rel 5684  df-cnv 5685  df-co 5686  df-dm 5687  df-rn 5688  df-res 5689  df-ima 5690  df-pred 6301  df-ord 6368  df-on 6369  df-lim 6370  df-suc 6371  df-iota 6496  df-fun 6546  df-fn 6547  df-f 6548  df-f1 6549  df-fo 6550  df-f1o 6551  df-fv 6552  df-isom 6553  df-riota 7365  df-ov 7412  df-oprab 7413  df-mpo 7414  df-of 7670  df-om 7856  df-1st 7975  df-2nd 7976  df-supp 8147  df-frecs 8266  df-wrecs 8297  df-recs 8371  df-rdg 8410  df-1o 8466  df-er 8703  df-en 8940  df-dom 8941  df-sdom 8942  df-fin 8943  df-fsupp 9362  df-oi 9505  df-card 9934  df-pnf 11250  df-mnf 11251  df-xr 11252  df-ltxr 11253  df-le 11254  df-sub 11446  df-neg 11447  df-nn 12213  df-2 12275  df-n0 12473  df-z 12559  df-uz 12823  df-fz 13485  df-fzo 13628  df-seq 13967  df-hash 14291  df-sets 17097  df-slot 17115  df-ndx 17127  df-base 17145  df-ress 17174  df-plusg 17210  df-0g 17387  df-gsum 17388  df-mre 17530  df-mrc 17531  df-acs 17533  df-mgm 18561  df-sgrp 18610  df-mnd 18626  df-submnd 18672  df-mulg 18951  df-cntz 19181  df-cmn 19650

This theorem is referenced by:  elrspunidl  32546