Theorem gsumhashmul 33365

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 8174	. . . . . . . 8 ⊢ (𝐹 supp 0 ) ⊆ dom 𝐹
3	2, 1	fssdm 6727	. . . . . . 7 ⊢ (𝜑 → (𝐹 supp 0 ) ⊆ 𝐴)
4	1, 3	feqresmpt 6952	. . . . . 6 ⊢ (𝜑 → (𝐹 ↾ (𝐹 supp 0 )) = (𝑥 ∈ (𝐹 supp 0 ) ↦ (𝐹‘𝑥)))
5	4	oveq2d 7428	. . . . 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 9324	. . . . . . . . 9 ⊢ Rel finSupp
11	10	brrelex1i 5719	. . . . . . . 8 ⊢ (𝐹 finSupp 0 → 𝐹 ∈ V)
12	9, 11	syl 18	. . . . . . 7 ⊢ (𝜑 → 𝐹 ∈ V)
13	1	ffnd 6708	. . . . . . 7 ⊢ (𝜑 → 𝐹 Fn 𝐴)
14	12, 13	fndmexd 7902	. . . . . 6 ⊢ (𝜑 → 𝐴 ∈ V)
15		ssidd 3961	. . . . . 6 ⊢ (𝜑 → (𝐹 supp 0 ) ⊆ (𝐹 supp 0 ))
16	6, 7, 8, 14, 1, 15, 9	gsumres 19984	. . . . 5 ⊢ (𝜑 → (𝐺 Σg (𝐹 ↾ (𝐹 supp 0 ))) = (𝐺 Σg 𝐹))
17		nfcv 2925	. . . . . 6 ⊢ Ⅎ𝑥(𝐹‘(1st ‘𝑧))
18		fveq2 6883	. . . . . 6 ⊢ (𝑥 = (1st ‘𝑧) → (𝐹‘𝑥) = (𝐹‘(1st ‘𝑧)))
19	9	fsuppimpd 9330	. . . . . 6 ⊢ (𝜑 → (𝐹 supp 0 ) ∈ Fin)
20		ssidd 3961	. . . . . 6 ⊢ (𝜑 → 𝐵 ⊆ 𝐵)
21	1	adantr 485	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) → 𝐹:𝐴⟶𝐵)
22	3	sselda 3938	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) → 𝑥 ∈ 𝐴)
23	21, 22	ffvelcdmd 7082	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) → (𝐹‘𝑥) ∈ 𝐵)
24	1	ffund 6712	. . . . . . . . 9 ⊢ (𝜑 → Fun 𝐹)
25		funrel 6555	. . . . . . . . 9 ⊢ (Fun 𝐹 → Rel 𝐹)
26		reldif 5804	. . . . . . . . 9 ⊢ (Rel 𝐹 → Rel (𝐹 ∖ (V × { 0 })))
27	24, 25, 26	3syl 19	. . . . . . . 8 ⊢ (𝜑 → Rel (𝐹 ∖ (V × { 0 })))
28		1stdm 8038	. . . . . . . 8 ⊢ ((Rel (𝐹 ∖ (V × { 0 })) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) → (1st ‘𝑧) ∈ dom (𝐹 ∖ (V × { 0 })))
29	27, 28	sylan 591	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) → (1st ‘𝑧) ∈ dom (𝐹 ∖ (V × { 0 })))
30	7	fvexi 6897	. . . . . . . . . . . 12 ⊢ 0 ∈ V
31	30	a1i 11	. . . . . . . . . . 11 ⊢ (𝜑 → 0 ∈ V)
32		fressupp 33011	. . . . . . . . . . 11 ⊢ ((Fun 𝐹 ∧ 𝐹 ∈ V ∧ 0 ∈ V) → (𝐹 ↾ (𝐹 supp 0 )) = (𝐹 ∖ (V × { 0 })))
33	24, 12, 31, 32	syl3anc 1398	. . . . . . . . . 10 ⊢ (𝜑 → (𝐹 ↾ (𝐹 supp 0 )) = (𝐹 ∖ (V × { 0 })))
34	33	dmeqd 5897	. . . . . . . . 9 ⊢ (𝜑 → dom (𝐹 ↾ (𝐹 supp 0 )) = dom (𝐹 ∖ (V × { 0 })))
35	2	a1i 11	. . . . . . . . . 10 ⊢ (𝜑 → (𝐹 supp 0 ) ⊆ dom 𝐹)
36		ssdmres 6014	. . . . . . . . . 10 ⊢ ((𝐹 supp 0 ) ⊆ dom 𝐹 ↔ dom (𝐹 ↾ (𝐹 supp 0 )) = (𝐹 supp 0 ))
37	35, 36	sylib 221	. . . . . . . . 9 ⊢ (𝜑 → dom (𝐹 ↾ (𝐹 supp 0 )) = (𝐹 supp 0 ))
38	34, 37	eqtr3d 2800	. . . . . . . 8 ⊢ (𝜑 → dom (𝐹 ∖ (V × { 0 })) = (𝐹 supp 0 ))
39	38	adantr 485	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) → dom (𝐹 ∖ (V × { 0 })) = (𝐹 supp 0 ))
40	29, 39	eleqtrd 2865	. . . . . 6 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) → (1st ‘𝑧) ∈ (𝐹 supp 0 ))
41	24	funresd 6581	. . . . . . . . . . 11 ⊢ (𝜑 → Fun (𝐹 ↾ (𝐹 supp 0 )))
42	41	adantr 485	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) → Fun (𝐹 ↾ (𝐹 supp 0 )))
43	37	eleq2d 2849	. . . . . . . . . . 11 ⊢ (𝜑 → (𝑥 ∈ dom (𝐹 ↾ (𝐹 supp 0 )) ↔ 𝑥 ∈ (𝐹 supp 0 )))
44	43	biimpar 482	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) → 𝑥 ∈ dom (𝐹 ↾ (𝐹 supp 0 )))
45		simpr 489	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) → 𝑥 ∈ (𝐹 supp 0 ))
46	45	fvresd 6903	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) → ((𝐹 ↾ (𝐹 supp 0 ))‘𝑥) = (𝐹‘𝑥))
47		funopfvb 6937	. . . . . . . . . . 11 ⊢ ((Fun (𝐹 ↾ (𝐹 supp 0 )) ∧ 𝑥 ∈ dom (𝐹 ↾ (𝐹 supp 0 ))) → (((𝐹 ↾ (𝐹 supp 0 ))‘𝑥) = (𝐹‘𝑥) ↔ ⟨𝑥, (𝐹‘𝑥)⟩ ∈ (𝐹 ↾ (𝐹 supp 0 ))))
48	47	biimpa 481	. . . . . . . . . 10 ⊢ (((Fun (𝐹 ↾ (𝐹 supp 0 )) ∧ 𝑥 ∈ dom (𝐹 ↾ (𝐹 supp 0 ))) ∧ ((𝐹 ↾ (𝐹 supp 0 ))‘𝑥) = (𝐹‘𝑥)) → ⟨𝑥, (𝐹‘𝑥)⟩ ∈ (𝐹 ↾ (𝐹 supp 0 )))
49	42, 44, 46, 48	syl21anc 850	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) → ⟨𝑥, (𝐹‘𝑥)⟩ ∈ (𝐹 ↾ (𝐹 supp 0 )))
50	33	adantr 485	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) → (𝐹 ↾ (𝐹 supp 0 )) = (𝐹 ∖ (V × { 0 })))
51	49, 50	eleqtrd 2865	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) → ⟨𝑥, (𝐹‘𝑥)⟩ ∈ (𝐹 ∖ (V × { 0 })))
52		eqeq2 2775	. . . . . . . . . . 11 ⊢ (𝑣 = ⟨𝑥, (𝐹‘𝑥)⟩ → (𝑧 = 𝑣 ↔ 𝑧 = ⟨𝑥, (𝐹‘𝑥)⟩))
53	52	bibi2d 345	. . . . . . . . . 10 ⊢ (𝑣 = ⟨𝑥, (𝐹‘𝑥)⟩ → ((𝑥 = (1st ‘𝑧) ↔ 𝑧 = 𝑣) ↔ (𝑥 = (1st ‘𝑧) ↔ 𝑧 = ⟨𝑥, (𝐹‘𝑥)⟩)))
54	53	ralbidv 3188	. . . . . . . . 9 ⊢ (𝑣 = ⟨𝑥, (𝐹‘𝑥)⟩ → (∀𝑧 ∈ (𝐹 ∖ (V × { 0 }))(𝑥 = (1st ‘𝑧) ↔ 𝑧 = 𝑣) ↔ ∀𝑧 ∈ (𝐹 ∖ (V × { 0 }))(𝑥 = (1st ‘𝑧) ↔ 𝑧 = ⟨𝑥, (𝐹‘𝑥)⟩)))
55	54	adantl 486	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) ∧ 𝑣 = ⟨𝑥, (𝐹‘𝑥)⟩) → (∀𝑧 ∈ (𝐹 ∖ (V × { 0 }))(𝑥 = (1st ‘𝑧) ↔ 𝑧 = 𝑣) ↔ ∀𝑧 ∈ (𝐹 ∖ (V × { 0 }))(𝑥 = (1st ‘𝑧) ↔ 𝑧 = ⟨𝑥, (𝐹‘𝑥)⟩)))
56		fvexd 6898	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑥 = (1st ‘𝑧)) → (2nd ‘𝑧) ∈ V)
57	27	ad3antrrr 742	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑥 = (1st ‘𝑧)) → Rel (𝐹 ∖ (V × { 0 })))
58		simplr 780	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑥 = (1st ‘𝑧)) → 𝑧 ∈ (𝐹 ∖ (V × { 0 })))
59		1st2nd 8037	. . . . . . . . . . . . . . . . 17 ⊢ ((Rel (𝐹 ∖ (V × { 0 })) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) → 𝑧 = ⟨(1st ‘𝑧), (2nd ‘𝑧)⟩)
60	57, 58, 59	syl2anc 595	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑥 = (1st ‘𝑧)) → 𝑧 = ⟨(1st ‘𝑧), (2nd ‘𝑧)⟩)
61		opeq1 4839	. . . . . . . . . . . . . . . . 17 ⊢ (𝑥 = (1st ‘𝑧) → ⟨𝑥, (2nd ‘𝑧)⟩ = ⟨(1st ‘𝑧), (2nd ‘𝑧)⟩)
62	61	adantl 486	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑥 = (1st ‘𝑧)) → ⟨𝑥, (2nd ‘𝑧)⟩ = ⟨(1st ‘𝑧), (2nd ‘𝑧)⟩)
63	60, 62	eqtr4d 2801	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑥 = (1st ‘𝑧)) → 𝑧 = ⟨𝑥, (2nd ‘𝑧)⟩)
64		difssd 4092	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) → (𝐹 ∖ (V × { 0 })) ⊆ 𝐹)
65	64	sselda 3938	. . . . . . . . . . . . . . . . 17 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) → 𝑧 ∈ 𝐹)
66	65	adantr 485	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑥 = (1st ‘𝑧)) → 𝑧 ∈ 𝐹)
67	63, 66	eqeltrrd 2864	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑥 = (1st ‘𝑧)) → ⟨𝑥, (2nd ‘𝑧)⟩ ∈ 𝐹)
68	63, 67	jca 520	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑥 = (1st ‘𝑧)) → (𝑧 = ⟨𝑥, (2nd ‘𝑧)⟩ ∧ ⟨𝑥, (2nd ‘𝑧)⟩ ∈ 𝐹))
69		opeq2 4840	. . . . . . . . . . . . . . . 16 ⊢ (𝑦 = (2nd ‘𝑧) → ⟨𝑥, 𝑦⟩ = ⟨𝑥, (2nd ‘𝑧)⟩)
70	69	eqeq2d 2774	. . . . . . . . . . . . . . 15 ⊢ (𝑦 = (2nd ‘𝑧) → (𝑧 = ⟨𝑥, 𝑦⟩ ↔ 𝑧 = ⟨𝑥, (2nd ‘𝑧)⟩))
71	69	eleq1d 2848	. . . . . . . . . . . . . . 15 ⊢ (𝑦 = (2nd ‘𝑧) → (⟨𝑥, 𝑦⟩ ∈ 𝐹 ↔ ⟨𝑥, (2nd ‘𝑧)⟩ ∈ 𝐹))
72	70, 71	anbi12d 643	. . . . . . . . . . . . . 14 ⊢ (𝑦 = (2nd ‘𝑧) → ((𝑧 = ⟨𝑥, 𝑦⟩ ∧ ⟨𝑥, 𝑦⟩ ∈ 𝐹) ↔ (𝑧 = ⟨𝑥, (2nd ‘𝑧)⟩ ∧ ⟨𝑥, (2nd ‘𝑧)⟩ ∈ 𝐹)))
73	56, 68, 72	spcedv 3558	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑥 = (1st ‘𝑧)) → ∃𝑦(𝑧 = ⟨𝑥, 𝑦⟩ ∧ ⟨𝑥, 𝑦⟩ ∈ 𝐹))
74		vex 3459	. . . . . . . . . . . . . 14 ⊢ 𝑥 ∈ V
75	74	elsnres 6022	. . . . . . . . . . . . 13 ⊢ (𝑧 ∈ (𝐹 ↾ {𝑥}) ↔ ∃𝑦(𝑧 = ⟨𝑥, 𝑦⟩ ∧ ⟨𝑥, 𝑦⟩ ∈ 𝐹))
76	73, 75	sylibr 237	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑥 = (1st ‘𝑧)) → 𝑧 ∈ (𝐹 ↾ {𝑥}))
77	13	ad3antrrr 742	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑥 = (1st ‘𝑧)) → 𝐹 Fn 𝐴)
78	22	ad2antrr 738	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑥 = (1st ‘𝑧)) → 𝑥 ∈ 𝐴)
79		fnressn 7157	. . . . . . . . . . . . 13 ⊢ ((𝐹 Fn 𝐴 ∧ 𝑥 ∈ 𝐴) → (𝐹 ↾ {𝑥}) = {⟨𝑥, (𝐹‘𝑥)⟩})
80	77, 78, 79	syl2anc 595	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑥 = (1st ‘𝑧)) → (𝐹 ↾ {𝑥}) = {⟨𝑥, (𝐹‘𝑥)⟩})
81	76, 80	eleqtrd 2865	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑥 = (1st ‘𝑧)) → 𝑧 ∈ {⟨𝑥, (𝐹‘𝑥)⟩})
82		elsni 4607	. . . . . . . . . . 11 ⊢ (𝑧 ∈ {⟨𝑥, (𝐹‘𝑥)⟩} → 𝑧 = ⟨𝑥, (𝐹‘𝑥)⟩)
83	81, 82	syl 18	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑥 = (1st ‘𝑧)) → 𝑧 = ⟨𝑥, (𝐹‘𝑥)⟩)
84		simpr 489	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑧 = ⟨𝑥, (𝐹‘𝑥)⟩) → 𝑧 = ⟨𝑥, (𝐹‘𝑥)⟩)
85	84	fveq2d 6887	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑧 = ⟨𝑥, (𝐹‘𝑥)⟩) → (1st ‘𝑧) = (1st ‘⟨𝑥, (𝐹‘𝑥)⟩))
86		fvex 6896	. . . . . . . . . . . 12 ⊢ (𝐹‘𝑥) ∈ V
87	74, 86	op1st 7995	. . . . . . . . . . 11 ⊢ (1st ‘⟨𝑥, (𝐹‘𝑥)⟩) = 𝑥
88	85, 87	eqtr2di 2815	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑧 = ⟨𝑥, (𝐹‘𝑥)⟩) → 𝑥 = (1st ‘𝑧))
89	83, 88	impbida 812	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) → (𝑥 = (1st ‘𝑧) ↔ 𝑧 = ⟨𝑥, (𝐹‘𝑥)⟩))
90	89	ralrimiva 3157	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) → ∀𝑧 ∈ (𝐹 ∖ (V × { 0 }))(𝑥 = (1st ‘𝑧) ↔ 𝑧 = ⟨𝑥, (𝐹‘𝑥)⟩))
91	51, 55, 90	rspcedvd 3584	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) → ∃𝑣 ∈ (𝐹 ∖ (V × { 0 }))∀𝑧 ∈ (𝐹 ∖ (V × { 0 }))(𝑥 = (1st ‘𝑧) ↔ 𝑧 = 𝑣))
92		reu6 3690	. . . . . . 7 ⊢ (∃!𝑧 ∈ (𝐹 ∖ (V × { 0 }))𝑥 = (1st ‘𝑧) ↔ ∃𝑣 ∈ (𝐹 ∖ (V × { 0 }))∀𝑧 ∈ (𝐹 ∖ (V × { 0 }))(𝑥 = (1st ‘𝑧) ↔ 𝑧 = 𝑣))
93	91, 92	sylibr 237	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) → ∃!𝑧 ∈ (𝐹 ∖ (V × { 0 }))𝑥 = (1st ‘𝑧))
94	17, 6, 7, 18, 8, 19, 20, 23, 40, 93	gsummptf1o 20034	. . . . 5 ⊢ (𝜑 → (𝐺 Σg (𝑥 ∈ (𝐹 supp 0 ) ↦ (𝐹‘𝑥))) = (𝐺 Σg (𝑧 ∈ (𝐹 ∖ (V × { 0 })) ↦ (𝐹‘(1st ‘𝑧)))))
95	5, 16, 94	3eqtr3d 2806	. . . 4 ⊢ (𝜑 → (𝐺 Σg 𝐹) = (𝐺 Σg (𝑧 ∈ (𝐹 ∖ (V × { 0 })) ↦ (𝐹‘(1st ‘𝑧)))))
96		simpr 489	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) → 𝑧 ∈ (𝐹 ∖ (V × { 0 })))
97	96	eldifad 3918	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) → 𝑧 ∈ 𝐹)
98		funfv1st2nd 8044	. . . . . . 7 ⊢ ((Fun 𝐹 ∧ 𝑧 ∈ 𝐹) → (𝐹‘(1st ‘𝑧)) = (2nd ‘𝑧))
99	24, 97, 98	syl2an2r 697	. . . . . 6 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) → (𝐹‘(1st ‘𝑧)) = (2nd ‘𝑧))
100	99	mpteq2dva 5205	. . . . 5 ⊢ (𝜑 → (𝑧 ∈ (𝐹 ∖ (V × { 0 })) ↦ (𝐹‘(1st ‘𝑧))) = (𝑧 ∈ (𝐹 ∖ (V × { 0 })) ↦ (2nd ‘𝑧)))
101	100	oveq2d 7428	. . . 4 ⊢ (𝜑 → (𝐺 Σg (𝑧 ∈ (𝐹 ∖ (V × { 0 })) ↦ (𝐹‘(1st ‘𝑧)))) = (𝐺 Σg (𝑧 ∈ (𝐹 ∖ (V × { 0 })) ↦ (2nd ‘𝑧))))
102	95, 101	eqtrd 2798	. . 3 ⊢ (𝜑 → (𝐺 Σg 𝐹) = (𝐺 Σg (𝑧 ∈ (𝐹 ∖ (V × { 0 })) ↦ (2nd ‘𝑧))))
103		nfcv 2925	. . . 4 ⊢ Ⅎ𝑧(1st ‘𝑡)
104		fvex 6896	. . . . 5 ⊢ (2nd ‘𝑡) ∈ V
105		fvex 6896	. . . . 5 ⊢ (1st ‘𝑡) ∈ V
106	104, 105	op2ndd 7998	. . . 4 ⊢ (𝑧 = ⟨(2nd ‘𝑡), (1st ‘𝑡)⟩ → (2nd ‘𝑧) = (1st ‘𝑡))
107		resfnfinfin 9295	. . . . . 6 ⊢ ((𝐹 Fn 𝐴 ∧ (𝐹 supp 0 ) ∈ Fin) → (𝐹 ↾ (𝐹 supp 0 )) ∈ Fin)
108	13, 19, 107	syl2anc 595	. . . . 5 ⊢ (𝜑 → (𝐹 ↾ (𝐹 supp 0 )) ∈ Fin)
109	33, 108	eqeltrrd 2864	. . . 4 ⊢ (𝜑 → (𝐹 ∖ (V × { 0 })) ∈ Fin)
110	33	rneqd 5930	. . . . 5 ⊢ (𝜑 → ran (𝐹 ↾ (𝐹 supp 0 )) = ran (𝐹 ∖ (V × { 0 })))
111		rnresss 6018	. . . . . 6 ⊢ ran (𝐹 ↾ (𝐹 supp 0 )) ⊆ ran 𝐹
112	1	frnd 6716	. . . . . 6 ⊢ (𝜑 → ran 𝐹 ⊆ 𝐵)
113	111, 112	sstrid 3949	. . . . 5 ⊢ (𝜑 → ran (𝐹 ↾ (𝐹 supp 0 )) ⊆ 𝐵)
114	110, 113	eqsstrrd 3973	. . . 4 ⊢ (𝜑 → ran (𝐹 ∖ (V × { 0 })) ⊆ 𝐵)
115		2ndrn 8039	. . . . 5 ⊢ ((Rel (𝐹 ∖ (V × { 0 })) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) → (2nd ‘𝑧) ∈ ran (𝐹 ∖ (V × { 0 })))
116	27, 115	sylan 591	. . . 4 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) → (2nd ‘𝑧) ∈ ran (𝐹 ∖ (V × { 0 })))
117		relcnv 6108	. . . . . . . 8 ⊢ Rel ◡𝐹
118		reldif 5804	. . . . . . . 8 ⊢ (Rel ◡𝐹 → Rel (◡𝐹 ∖ ({ 0 } × V)))
119	117, 118	mp1i 14	. . . . . . 7 ⊢ (𝜑 → Rel (◡𝐹 ∖ ({ 0 } × V)))
120		1st2nd 8037	. . . . . . 7 ⊢ ((Rel (◡𝐹 ∖ ({ 0 } × V)) ∧ 𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V))) → 𝑡 = ⟨(1st ‘𝑡), (2nd ‘𝑡)⟩)
121	119, 120	sylan 591	. . . . . 6 ⊢ ((𝜑 ∧ 𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V))) → 𝑡 = ⟨(1st ‘𝑡), (2nd ‘𝑡)⟩)
122		cnvdif 6142	. . . . . . . . . 10 ⊢ ◡(𝐹 ∖ (V × { 0 })) = (◡𝐹 ∖ ◡(V × { 0 }))
123		cnvxp 6156	. . . . . . . . . . 11 ⊢ ◡(V × { 0 }) = ({ 0 } × V)
124	123	difeq2i 4079	. . . . . . . . . 10 ⊢ (◡𝐹 ∖ ◡(V × { 0 })) = (◡𝐹 ∖ ({ 0 } × V))
125	122, 124	eqtri 2786	. . . . . . . . 9 ⊢ ◡(𝐹 ∖ (V × { 0 })) = (◡𝐹 ∖ ({ 0 } × V))
126	125	eqimss2i 3999	. . . . . . . 8 ⊢ (◡𝐹 ∖ ({ 0 } × V)) ⊆ ◡(𝐹 ∖ (V × { 0 }))
127	126	a1i 11	. . . . . . 7 ⊢ (𝜑 → (◡𝐹 ∖ ({ 0 } × V)) ⊆ ◡(𝐹 ∖ (V × { 0 })))
128	127	sselda 3938	. . . . . 6 ⊢ ((𝜑 ∧ 𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V))) → 𝑡 ∈ ◡(𝐹 ∖ (V × { 0 })))
129	121, 128	eqeltrrd 2864	. . . . 5 ⊢ ((𝜑 ∧ 𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V))) → ⟨(1st ‘𝑡), (2nd ‘𝑡)⟩ ∈ ◡(𝐹 ∖ (V × { 0 })))
130	105, 104	opelcnv 5869	. . . . 5 ⊢ (⟨(1st ‘𝑡), (2nd ‘𝑡)⟩ ∈ ◡(𝐹 ∖ (V × { 0 })) ↔ ⟨(2nd ‘𝑡), (1st ‘𝑡)⟩ ∈ (𝐹 ∖ (V × { 0 })))
131	129, 130	sylib 221	. . . 4 ⊢ ((𝜑 ∧ 𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V))) → ⟨(2nd ‘𝑡), (1st ‘𝑡)⟩ ∈ (𝐹 ∖ (V × { 0 })))
132	27	adantr 485	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) → Rel (𝐹 ∖ (V × { 0 })))
133		eqidd 2764	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) → ∪ ◡{𝑧} = ∪ ◡{𝑧})
134		cnvf1olem 8106	. . . . . . . . 9 ⊢ ((Rel (𝐹 ∖ (V × { 0 })) ∧ (𝑧 ∈ (𝐹 ∖ (V × { 0 })) ∧ ∪ ◡{𝑧} = ∪ ◡{𝑧})) → (∪ ◡{𝑧} ∈ ◡(𝐹 ∖ (V × { 0 })) ∧ 𝑧 = ∪ ◡{∪ ◡{𝑧}}))
135	134	simpld 499	. . . . . . . 8 ⊢ ((Rel (𝐹 ∖ (V × { 0 })) ∧ (𝑧 ∈ (𝐹 ∖ (V × { 0 })) ∧ ∪ ◡{𝑧} = ∪ ◡{𝑧})) → ∪ ◡{𝑧} ∈ ◡(𝐹 ∖ (V × { 0 })))
136	132, 96, 133, 135	syl12anc 849	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) → ∪ ◡{𝑧} ∈ ◡(𝐹 ∖ (V × { 0 })))
137	136, 125	eleqtrdi 2873	. . . . . 6 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) → ∪ ◡{𝑧} ∈ (◡𝐹 ∖ ({ 0 } × V)))
138		eqeq2 2775	. . . . . . . . 9 ⊢ (𝑢 = ∪ ◡{𝑧} → (𝑡 = 𝑢 ↔ 𝑡 = ∪ ◡{𝑧}))
139	138	bibi2d 345	. . . . . . . 8 ⊢ (𝑢 = ∪ ◡{𝑧} → ((𝑧 = ⟨(2nd ‘𝑡), (1st ‘𝑡)⟩ ↔ 𝑡 = 𝑢) ↔ (𝑧 = ⟨(2nd ‘𝑡), (1st ‘𝑡)⟩ ↔ 𝑡 = ∪ ◡{𝑧})))
140	139	ralbidv 3188	. . . . . . 7 ⊢ (𝑢 = ∪ ◡{𝑧} → (∀𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V))(𝑧 = ⟨(2nd ‘𝑡), (1st ‘𝑡)⟩ ↔ 𝑡 = 𝑢) ↔ ∀𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V))(𝑧 = ⟨(2nd ‘𝑡), (1st ‘𝑡)⟩ ↔ 𝑡 = ∪ ◡{𝑧})))
141	140	adantl 486	. . . . . 6 ⊢ (((𝜑 ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑢 = ∪ ◡{𝑧}) → (∀𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V))(𝑧 = ⟨(2nd ‘𝑡), (1st ‘𝑡)⟩ ↔ 𝑡 = 𝑢) ↔ ∀𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V))(𝑧 = ⟨(2nd ‘𝑡), (1st ‘𝑡)⟩ ↔ 𝑡 = ∪ ◡{𝑧})))
142	117, 118	mp1i 14	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V))) ∧ 𝑧 = ⟨(2nd ‘𝑡), (1st ‘𝑡)⟩) → Rel (◡𝐹 ∖ ({ 0 } × V)))
143		simplr 780	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V))) ∧ 𝑧 = ⟨(2nd ‘𝑡), (1st ‘𝑡)⟩) → 𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V)))
144		simpr 489	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V))) ∧ 𝑧 = ⟨(2nd ‘𝑡), (1st ‘𝑡)⟩) → 𝑧 = ⟨(2nd ‘𝑡), (1st ‘𝑡)⟩)
145		df-rel 5670	. . . . . . . . . . . . . 14 ⊢ (Rel (◡𝐹 ∖ ({ 0 } × V)) ↔ (◡𝐹 ∖ ({ 0 } × V)) ⊆ (V × V))
146	119, 145	sylib 221	. . . . . . . . . . . . 13 ⊢ (𝜑 → (◡𝐹 ∖ ({ 0 } × V)) ⊆ (V × V))
147	146	ad3antrrr 742	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V))) ∧ 𝑧 = ⟨(2nd ‘𝑡), (1st ‘𝑡)⟩) → (◡𝐹 ∖ ({ 0 } × V)) ⊆ (V × V))
148	147, 143	sseldd 3939	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V))) ∧ 𝑧 = ⟨(2nd ‘𝑡), (1st ‘𝑡)⟩) → 𝑡 ∈ (V × V))
149		2nd1st 8036	. . . . . . . . . . 11 ⊢ (𝑡 ∈ (V × V) → ∪ ◡{𝑡} = ⟨(2nd ‘𝑡), (1st ‘𝑡)⟩)
150	148, 149	syl 18	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V))) ∧ 𝑧 = ⟨(2nd ‘𝑡), (1st ‘𝑡)⟩) → ∪ ◡{𝑡} = ⟨(2nd ‘𝑡), (1st ‘𝑡)⟩)
151	144, 150	eqtr4d 2801	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V))) ∧ 𝑧 = ⟨(2nd ‘𝑡), (1st ‘𝑡)⟩) → 𝑧 = ∪ ◡{𝑡})
152		cnvf1olem 8106	. . . . . . . . . 10 ⊢ ((Rel (◡𝐹 ∖ ({ 0 } × V)) ∧ (𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V)) ∧ 𝑧 = ∪ ◡{𝑡})) → (𝑧 ∈ ◡(◡𝐹 ∖ ({ 0 } × V)) ∧ 𝑡 = ∪ ◡{𝑧}))
153	152	simprd 500	. . . . . . . . 9 ⊢ ((Rel (◡𝐹 ∖ ({ 0 } × V)) ∧ (𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V)) ∧ 𝑧 = ∪ ◡{𝑡})) → 𝑡 = ∪ ◡{𝑧})
154	142, 143, 151, 153	syl12anc 849	. . . . . . . 8 ⊢ ((((𝜑 ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V))) ∧ 𝑧 = ⟨(2nd ‘𝑡), (1st ‘𝑡)⟩) → 𝑡 = ∪ ◡{𝑧})
155	27	ad3antrrr 742	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V))) ∧ 𝑡 = ∪ ◡{𝑧}) → Rel (𝐹 ∖ (V × { 0 })))
156	96	ad2antrr 738	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V))) ∧ 𝑡 = ∪ ◡{𝑧}) → 𝑧 ∈ (𝐹 ∖ (V × { 0 })))
157		simpr 489	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V))) ∧ 𝑡 = ∪ ◡{𝑧}) → 𝑡 = ∪ ◡{𝑧})
158		cnvf1olem 8106	. . . . . . . . . . 11 ⊢ ((Rel (𝐹 ∖ (V × { 0 })) ∧ (𝑧 ∈ (𝐹 ∖ (V × { 0 })) ∧ 𝑡 = ∪ ◡{𝑧})) → (𝑡 ∈ ◡(𝐹 ∖ (V × { 0 })) ∧ 𝑧 = ∪ ◡{𝑡}))
159	158	simprd 500	. . . . . . . . . 10 ⊢ ((Rel (𝐹 ∖ (V × { 0 })) ∧ (𝑧 ∈ (𝐹 ∖ (V × { 0 })) ∧ 𝑡 = ∪ ◡{𝑧})) → 𝑧 = ∪ ◡{𝑡})
160	155, 156, 157, 159	syl12anc 849	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V))) ∧ 𝑡 = ∪ ◡{𝑧}) → 𝑧 = ∪ ◡{𝑡})
161	146	ad3antrrr 742	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V))) ∧ 𝑡 = ∪ ◡{𝑧}) → (◡𝐹 ∖ ({ 0 } × V)) ⊆ (V × V))
162		simplr 780	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V))) ∧ 𝑡 = ∪ ◡{𝑧}) → 𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V)))
163	161, 162	sseldd 3939	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V))) ∧ 𝑡 = ∪ ◡{𝑧}) → 𝑡 ∈ (V × V))
164	163, 149	syl 18	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V))) ∧ 𝑡 = ∪ ◡{𝑧}) → ∪ ◡{𝑡} = ⟨(2nd ‘𝑡), (1st ‘𝑡)⟩)
165	160, 164	eqtrd 2798	. . . . . . . 8 ⊢ ((((𝜑 ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V))) ∧ 𝑡 = ∪ ◡{𝑧}) → 𝑧 = ⟨(2nd ‘𝑡), (1st ‘𝑡)⟩)
166	154, 165	impbida 812	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V))) → (𝑧 = ⟨(2nd ‘𝑡), (1st ‘𝑡)⟩ ↔ 𝑡 = ∪ ◡{𝑧}))
167	166	ralrimiva 3157	. . . . . 6 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) → ∀𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V))(𝑧 = ⟨(2nd ‘𝑡), (1st ‘𝑡)⟩ ↔ 𝑡 = ∪ ◡{𝑧}))
168	137, 141, 167	rspcedvd 3584	. . . . 5 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) → ∃𝑢 ∈ (◡𝐹 ∖ ({ 0 } × V))∀𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V))(𝑧 = ⟨(2nd ‘𝑡), (1st ‘𝑡)⟩ ↔ 𝑡 = 𝑢))
169		reu6 3690	. . . . 5 ⊢ (∃!𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V))𝑧 = ⟨(2nd ‘𝑡), (1st ‘𝑡)⟩ ↔ ∃𝑢 ∈ (◡𝐹 ∖ ({ 0 } × V))∀𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V))(𝑧 = ⟨(2nd ‘𝑡), (1st ‘𝑡)⟩ ↔ 𝑡 = 𝑢))
170	168, 169	sylibr 237	. . . 4 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) → ∃!𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V))𝑧 = ⟨(2nd ‘𝑡), (1st ‘𝑡)⟩)
171	103, 6, 7, 106, 8, 109, 114, 116, 131, 170	gsummptf1o 20034	. . 3 ⊢ (𝜑 → (𝐺 Σg (𝑧 ∈ (𝐹 ∖ (V × { 0 })) ↦ (2nd ‘𝑧))) = (𝐺 Σg (𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V)) ↦ (1st ‘𝑡))))
172		fveq2 6883	. . . . . 6 ⊢ (𝑡 = 𝑧 → (1st ‘𝑡) = (1st ‘𝑧))
173	172	cbvmptv 5216	. . . . 5 ⊢ (𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V)) ↦ (1st ‘𝑡)) = (𝑧 ∈ (◡𝐹 ∖ ({ 0 } × V)) ↦ (1st ‘𝑧))
174	33	cnveqd 5863	. . . . . . 7 ⊢ (𝜑 → ◡(𝐹 ↾ (𝐹 supp 0 )) = ◡(𝐹 ∖ (V × { 0 })))
175	174, 125	eqtr2di 2815	. . . . . 6 ⊢ (𝜑 → (◡𝐹 ∖ ({ 0 } × V)) = ◡(𝐹 ↾ (𝐹 supp 0 )))
176	175	mpteq1d 5202	. . . . 5 ⊢ (𝜑 → (𝑧 ∈ (◡𝐹 ∖ ({ 0 } × V)) ↦ (1st ‘𝑧)) = (𝑧 ∈ ◡(𝐹 ↾ (𝐹 supp 0 )) ↦ (1st ‘𝑧)))
177	173, 176	eqtrid 2810	. . . 4 ⊢ (𝜑 → (𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V)) ↦ (1st ‘𝑡)) = (𝑧 ∈ ◡(𝐹 ↾ (𝐹 supp 0 )) ↦ (1st ‘𝑧)))
178	177	oveq2d 7428	. . 3 ⊢ (𝜑 → (𝐺 Σg (𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V)) ↦ (1st ‘𝑡))) = (𝐺 Σg (𝑧 ∈ ◡(𝐹 ↾ (𝐹 supp 0 )) ↦ (1st ‘𝑧))))
179	102, 171, 178	3eqtrd 2802	. 2 ⊢ (𝜑 → (𝐺 Σg 𝐹) = (𝐺 Σg (𝑧 ∈ ◡(𝐹 ↾ (𝐹 supp 0 )) ↦ (1st ‘𝑧))))
180		nfcv 2925	. . 3 ⊢ Ⅎ𝑦(1st ‘𝑧)
181		nfv 1944	. . 3 ⊢ Ⅎ𝑥𝜑
182		vex 3459	. . . 4 ⊢ 𝑦 ∈ V
183	74, 182	op1std 7997	. . 3 ⊢ (𝑧 = ⟨𝑥, 𝑦⟩ → (1st ‘𝑧) = 𝑥)
184		relcnv 6108	. . . 4 ⊢ Rel ◡(𝐹 ↾ (𝐹 supp 0 ))
185	184	a1i 11	. . 3 ⊢ (𝜑 → Rel ◡(𝐹 ↾ (𝐹 supp 0 )))
186		cnvfi 9161	. . . 4 ⊢ ((𝐹 ↾ (𝐹 supp 0 )) ∈ Fin → ◡(𝐹 ↾ (𝐹 supp 0 )) ∈ Fin)
187	108, 186	syl 18	. . 3 ⊢ (𝜑 → ◡(𝐹 ↾ (𝐹 supp 0 )) ∈ Fin)
188	112	adantr 485	. . . 4 ⊢ ((𝜑 ∧ 𝑧 ∈ ◡(𝐹 ↾ (𝐹 supp 0 ))) → ran 𝐹 ⊆ 𝐵)
189	184	a1i 11	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑧 ∈ ◡(𝐹 ↾ (𝐹 supp 0 ))) → Rel ◡(𝐹 ↾ (𝐹 supp 0 )))
190		simpr 489	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑧 ∈ ◡(𝐹 ↾ (𝐹 supp 0 ))) → 𝑧 ∈ ◡(𝐹 ↾ (𝐹 supp 0 )))
191		1stdm 8038	. . . . . . 7 ⊢ ((Rel ◡(𝐹 ↾ (𝐹 supp 0 )) ∧ 𝑧 ∈ ◡(𝐹 ↾ (𝐹 supp 0 ))) → (1st ‘𝑧) ∈ dom ◡(𝐹 ↾ (𝐹 supp 0 )))
192	189, 190, 191	syl2anc 595	. . . . . 6 ⊢ ((𝜑 ∧ 𝑧 ∈ ◡(𝐹 ↾ (𝐹 supp 0 ))) → (1st ‘𝑧) ∈ dom ◡(𝐹 ↾ (𝐹 supp 0 )))
193		df-rn 5674	. . . . . 6 ⊢ ran (𝐹 ↾ (𝐹 supp 0 )) = dom ◡(𝐹 ↾ (𝐹 supp 0 ))
194	192, 193	eleqtrrdi 2874	. . . . 5 ⊢ ((𝜑 ∧ 𝑧 ∈ ◡(𝐹 ↾ (𝐹 supp 0 ))) → (1st ‘𝑧) ∈ ran (𝐹 ↾ (𝐹 supp 0 )))
195	111, 194	sselid 3936	. . . 4 ⊢ ((𝜑 ∧ 𝑧 ∈ ◡(𝐹 ↾ (𝐹 supp 0 ))) → (1st ‘𝑧) ∈ ran 𝐹)
196	188, 195	sseldd 3939	. . 3 ⊢ ((𝜑 ∧ 𝑧 ∈ ◡(𝐹 ↾ (𝐹 supp 0 ))) → (1st ‘𝑧) ∈ 𝐵)
197	180, 181, 6, 183, 185, 187, 8, 196	gsummpt2d 33347	. 2 ⊢ (𝜑 → (𝐺 Σg (𝑧 ∈ ◡(𝐹 ↾ (𝐹 supp 0 )) ↦ (1st ‘𝑧))) = (𝐺 Σg (𝑥 ∈ dom ◡(𝐹 ↾ (𝐹 supp 0 )) ↦ (𝐺 Σg (𝑦 ∈ (◡(𝐹 ↾ (𝐹 supp 0 )) “ {𝑥}) ↦ 𝑥)))))
198		df-ima 5676	. . . . . . 7 ⊢ (𝐹 “ (𝐹 supp 0 )) = ran (𝐹 ↾ (𝐹 supp 0 ))
199		supppreima 33014	. . . . . . . . 9 ⊢ ((Fun 𝐹 ∧ 𝐹 ∈ V ∧ 0 ∈ V) → (𝐹 supp 0 ) = (◡𝐹 “ (ran 𝐹 ∖ { 0 })))
200	24, 12, 31, 199	syl3anc 1398	. . . . . . . 8 ⊢ (𝜑 → (𝐹 supp 0 ) = (◡𝐹 “ (ran 𝐹 ∖ { 0 })))
201	200	imaeq2d 6064	. . . . . . 7 ⊢ (𝜑 → (𝐹 “ (𝐹 supp 0 )) = (𝐹 “ (◡𝐹 “ (ran 𝐹 ∖ { 0 }))))
202	198, 201	eqtr3id 2812	. . . . . 6 ⊢ (𝜑 → ran (𝐹 ↾ (𝐹 supp 0 )) = (𝐹 “ (◡𝐹 “ (ran 𝐹 ∖ { 0 }))))
203		funimacnv 6619	. . . . . . 7 ⊢ (Fun 𝐹 → (𝐹 “ (◡𝐹 “ (ran 𝐹 ∖ { 0 }))) = ((ran 𝐹 ∖ { 0 }) ∩ ran 𝐹))
204	24, 203	syl 18	. . . . . 6 ⊢ (𝜑 → (𝐹 “ (◡𝐹 “ (ran 𝐹 ∖ { 0 }))) = ((ran 𝐹 ∖ { 0 }) ∩ ran 𝐹))
205		difssd 4092	. . . . . . 7 ⊢ (𝜑 → (ran 𝐹 ∖ { 0 }) ⊆ ran 𝐹)
206		dfss2 3924	. . . . . . 7 ⊢ ((ran 𝐹 ∖ { 0 }) ⊆ ran 𝐹 ↔ ((ran 𝐹 ∖ { 0 }) ∩ ran 𝐹) = (ran 𝐹 ∖ { 0 }))
207	205, 206	sylib 221	. . . . . 6 ⊢ (𝜑 → ((ran 𝐹 ∖ { 0 }) ∩ ran 𝐹) = (ran 𝐹 ∖ { 0 }))
208	202, 204, 207	3eqtrd 2802	. . . . 5 ⊢ (𝜑 → ran (𝐹 ↾ (𝐹 supp 0 )) = (ran 𝐹 ∖ { 0 }))
209	193, 208	eqtr3id 2812	. . . 4 ⊢ (𝜑 → dom ◡(𝐹 ↾ (𝐹 supp 0 )) = (ran 𝐹 ∖ { 0 }))
210	8	cmnmndd 19875	. . . . . . 7 ⊢ (𝜑 → 𝐺 ∈ Mnd)
211	210	adantr 485	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ dom ◡(𝐹 ↾ (𝐹 supp 0 ))) → 𝐺 ∈ Mnd)
212	108	adantr 485	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ dom ◡(𝐹 ↾ (𝐹 supp 0 ))) → (𝐹 ↾ (𝐹 supp 0 )) ∈ Fin)
213		imafi2 9319	. . . . . . 7 ⊢ (◡(𝐹 ↾ (𝐹 supp 0 )) ∈ Fin → (◡(𝐹 ↾ (𝐹 supp 0 )) “ {𝑥}) ∈ Fin)
214	212, 186, 213	3syl 19	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ dom ◡(𝐹 ↾ (𝐹 supp 0 ))) → (◡(𝐹 ↾ (𝐹 supp 0 )) “ {𝑥}) ∈ Fin)
215	193, 113	eqsstrrid 3977	. . . . . . 7 ⊢ (𝜑 → dom ◡(𝐹 ↾ (𝐹 supp 0 )) ⊆ 𝐵)
216	215	sselda 3938	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ dom ◡(𝐹 ↾ (𝐹 supp 0 ))) → 𝑥 ∈ 𝐵)
217		gsumhashmul.x	. . . . . . 7 ⊢ · = (.g‘𝐺)
218	6, 217	gsumconst 20005	. . . . . 6 ⊢ ((𝐺 ∈ Mnd ∧ (◡(𝐹 ↾ (𝐹 supp 0 )) “ {𝑥}) ∈ Fin ∧ 𝑥 ∈ 𝐵) → (𝐺 Σg (𝑦 ∈ (◡(𝐹 ↾ (𝐹 supp 0 )) “ {𝑥}) ↦ 𝑥)) = ((♯‘(◡(𝐹 ↾ (𝐹 supp 0 )) “ {𝑥})) · 𝑥))
219	211, 214, 216, 218	syl3anc 1398	. . . . 5 ⊢ ((𝜑 ∧ 𝑥 ∈ dom ◡(𝐹 ↾ (𝐹 supp 0 ))) → (𝐺 Σg (𝑦 ∈ (◡(𝐹 ↾ (𝐹 supp 0 )) “ {𝑥}) ↦ 𝑥)) = ((♯‘(◡(𝐹 ↾ (𝐹 supp 0 )) “ {𝑥})) · 𝑥))
220		cnvresima 6233	. . . . . . . 8 ⊢ (◡(𝐹 ↾ (𝐹 supp 0 )) “ {𝑥}) = ((◡𝐹 “ {𝑥}) ∩ (𝐹 supp 0 ))
221	209	eleq2d 2849	. . . . . . . . . . . . 13 ⊢ (𝜑 → (𝑥 ∈ dom ◡(𝐹 ↾ (𝐹 supp 0 )) ↔ 𝑥 ∈ (ran 𝐹 ∖ { 0 })))
222	221	biimpa 481	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑥 ∈ dom ◡(𝐹 ↾ (𝐹 supp 0 ))) → 𝑥 ∈ (ran 𝐹 ∖ { 0 }))
223	222	snssd 4753	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑥 ∈ dom ◡(𝐹 ↾ (𝐹 supp 0 ))) → {𝑥} ⊆ (ran 𝐹 ∖ { 0 }))
224		sspreima 7065	. . . . . . . . . . 11 ⊢ ((Fun 𝐹 ∧ {𝑥} ⊆ (ran 𝐹 ∖ { 0 })) → (◡𝐹 “ {𝑥}) ⊆ (◡𝐹 “ (ran 𝐹 ∖ { 0 })))
225	24, 223, 224	syl2an2r 697	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑥 ∈ dom ◡(𝐹 ↾ (𝐹 supp 0 ))) → (◡𝐹 “ {𝑥}) ⊆ (◡𝐹 “ (ran 𝐹 ∖ { 0 })))
226	200	adantr 485	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑥 ∈ dom ◡(𝐹 ↾ (𝐹 supp 0 ))) → (𝐹 supp 0 ) = (◡𝐹 “ (ran 𝐹 ∖ { 0 })))
227	225, 226	sseqtrrd 3975	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑥 ∈ dom ◡(𝐹 ↾ (𝐹 supp 0 ))) → (◡𝐹 “ {𝑥}) ⊆ (𝐹 supp 0 ))
228		dfss2 3924	. . . . . . . . 9 ⊢ ((◡𝐹 “ {𝑥}) ⊆ (𝐹 supp 0 ) ↔ ((◡𝐹 “ {𝑥}) ∩ (𝐹 supp 0 )) = (◡𝐹 “ {𝑥}))
229	227, 228	sylib 221	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ dom ◡(𝐹 ↾ (𝐹 supp 0 ))) → ((◡𝐹 “ {𝑥}) ∩ (𝐹 supp 0 )) = (◡𝐹 “ {𝑥}))
230	220, 229	eqtr2id 2811	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ dom ◡(𝐹 ↾ (𝐹 supp 0 ))) → (◡𝐹 “ {𝑥}) = (◡(𝐹 ↾ (𝐹 supp 0 )) “ {𝑥}))
231	230	fveq2d 6887	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ dom ◡(𝐹 ↾ (𝐹 supp 0 ))) → (♯‘(◡𝐹 “ {𝑥})) = (♯‘(◡(𝐹 ↾ (𝐹 supp 0 )) “ {𝑥})))
232	231	oveq1d 7427	. . . . 5 ⊢ ((𝜑 ∧ 𝑥 ∈ dom ◡(𝐹 ↾ (𝐹 supp 0 ))) → ((♯‘(◡𝐹 “ {𝑥})) · 𝑥) = ((♯‘(◡(𝐹 ↾ (𝐹 supp 0 )) “ {𝑥})) · 𝑥))
233	219, 232	eqtr4d 2801	. . . 4 ⊢ ((𝜑 ∧ 𝑥 ∈ dom ◡(𝐹 ↾ (𝐹 supp 0 ))) → (𝐺 Σg (𝑦 ∈ (◡(𝐹 ↾ (𝐹 supp 0 )) “ {𝑥}) ↦ 𝑥)) = ((♯‘(◡𝐹 “ {𝑥})) · 𝑥))
234	209, 233	mpteq12dva 5198	. . 3 ⊢ (𝜑 → (𝑥 ∈ dom ◡(𝐹 ↾ (𝐹 supp 0 )) ↦ (𝐺 Σg (𝑦 ∈ (◡(𝐹 ↾ (𝐹 supp 0 )) “ {𝑥}) ↦ 𝑥))) = (𝑥 ∈ (ran 𝐹 ∖ { 0 }) ↦ ((♯‘(◡𝐹 “ {𝑥})) · 𝑥)))
235	234	oveq2d 7428	. 2 ⊢ (𝜑 → (𝐺 Σg (𝑥 ∈ dom ◡(𝐹 ↾ (𝐹 supp 0 )) ↦ (𝐺 Σg (𝑦 ∈ (◡(𝐹 ↾ (𝐹 supp 0 )) “ {𝑥}) ↦ 𝑥)))) = (𝐺 Σg (𝑥 ∈ (ran 𝐹 ∖ { 0 }) ↦ ((♯‘(◡𝐹 “ {𝑥})) · 𝑥))))
236	179, 197, 235	3eqtrd 2802	1 ⊢ (𝜑 → (𝐺 Σg 𝐹) = (𝐺 Σg (𝑥 ∈ (ran 𝐹 ∖ { 0 }) ↦ ((♯‘(◡𝐹 “ {𝑥})) · 𝑥))))

Syntax hints:   → wi 4   ↔ wb 209   ∧ wa 400   = wceq 1570  ∃wex 1809   ∈ wcel 2143  ∀wral 3079  ∃wrex 3089  ∃!wreu 3367  Vcvv 3455   ∖ cdif 3903   ∩ cin 3905   ⊆ wss 3906  {csn 4590  ⟨cop 4596  ∪ cuni 4873   class class class wbr 5110   ↦ cmpt 5193   × cxp 5661  ^◡ccnv 5662  dom cdm 5663  ran crn 5664   ↾ cres 5665   “ cima 5666  Rel wrel 5668  Fun wfun 6532   Fn wfn 6533  ⟶wf 6534  ‘cfv 6538  (class class class)co 7412  1^st c1st 7985  2^nd c2nd 7986   supp csupp 8157  Fincfn 8944   finSupp cfsupp 9322  ♯chash 14368  Basecbs 17270  0_gc0g 17493   Σ_g cgsu 17494  Mndcmnd 18793  ._gcmg 19134  CMndccmn 19851

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1825  ax-4 1839  ax-5 1940  ax-6 1997  ax-7 2038  ax-8 2145  ax-9 2153  ax-10 2176  ax-11 2192  ax-12 2213  ax-ext 2735  ax-rep 5239  ax-sep 5258  ax-nul 5270  ax-pow 5338  ax-pr 5406  ax-un 7734  ax-cnex 11157  ax-resscn 11158  ax-1cn 11159  ax-icn 11160  ax-addcl 11161  ax-addrcl 11162  ax-mulcl 11163  ax-mulrcl 11164  ax-mulcom 11165  ax-addass 11166  ax-mulass 11167  ax-distr 11168  ax-i2m1 11169  ax-1ne0 11170  ax-1rid 11171  ax-rnegex 11172  ax-rrecex 11173  ax-cnre 11174  ax-pre-lttri 11175  ax-pre-lttrn 11176  ax-pre-ltadd 11177  ax-pre-mulgt0 11178

This theorem depends on definitions:  df-bi 210  df-an 401  df-or 861  df-3or 1104  df-3an 1105  df-tru 1573  df-fal 1583  df-ex 1810  df-nf 1814  df-sb 2097  df-mo 2567  df-eu 2597  df-clab 2742  df-cleq 2755  df-clel 2838  df-nfc 2912  df-ne 2959  df-nel 3065  df-ral 3080  df-rex 3090  df-rmo 3369  df-reu 3370  df-rab 3417  df-v 3457  df-sbc 3746  df-csb 3855  df-dif 3909  df-un 3911  df-in 3913  df-ss 3923  df-pss 3926  df-nul 4288  df-if 4489  df-pw 4565  df-sn 4591  df-pr 4593  df-op 4597  df-uni 4874  df-int 4914  df-iun 4959  df-iin 4960  df-br 5111  df-opab 5175  df-mpt 5194  df-tr 5220  df-id 5558  df-eprel 5563  df-po 5571  df-so 5572  df-fr 5616  df-se 5617  df-we 5618  df-xp 5669  df-rel 5670  df-cnv 5671  df-co 5672  df-dm 5673  df-rn 5674  df-res 5675  df-ima 5676  df-pred 6304  df-ord 6365  df-on 6366  df-lim 6367  df-suc 6368  df-iota 6494  df-fun 6540  df-fn 6541  df-f 6542  df-f1 6543  df-fo 6544  df-f1o 6545  df-fv 6546  df-isom 6547  df-riota 7369  df-ov 7415  df-oprab 7416  df-mpo 7417  df-of 7676  df-om 7864  df-1st 7987  df-2nd 7988  df-supp 8158  df-frecs 8279  df-wrecs 8310  df-recs 8359  df-rdg 8398  df-1o 8454  df-2o 8455  df-er 8695  df-en 8945  df-dom 8946  df-sdom 8947  df-fin 8948  df-fsupp 9323  df-oi 9473  df-card 9926  df-pnf 11246  df-mnf 11247  df-xr 11248  df-ltxr 11249  df-le 11250  df-sub 11444  df-neg 11445  df-nn 12235  df-2 12304  df-n0 12506  df-z 12593  df-uz 12864  df-fz 13537  df-fzo 13685  df-seq 14040  df-hash 14369  df-sets 17225  df-slot 17243  df-ndx 17255  df-base 17271  df-ress 17292  df-plusg 17324  df-0g 17495  df-gsum 17496  df-mre 17639  df-mrc 17640  df-acs 17642  df-mgm 18699  df-sgrp 18778  df-mnd 18794  df-submnd 18843  df-mulg 19135  df-cntz 19388  df-cmn 19853

This theorem is referenced by:  elrspunidl  33714