Theorem gsumhashmul 32249

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 8164	. . . . . . . 8 ⊢ (𝐹 supp 0 ) ⊆ dom 𝐹
3	2, 1	fssdm 6737	. . . . . . 7 ⊢ (𝜑 → (𝐹 supp 0 ) ⊆ 𝐴)
4	1, 3	feqresmpt 6961	. . . . . 6 ⊢ (𝜑 → (𝐹 ↾ (𝐹 supp 0 )) = (𝑥 ∈ (𝐹 supp 0 ) ↦ (𝐹‘𝑥)))
5	4	oveq2d 7427	. . . . 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 9365	. . . . . . . . 9 ⊢ Rel finSupp
11	10	brrelex1i 5732	. . . . . . . 8 ⊢ (𝐹 finSupp 0 → 𝐹 ∈ V)
12	9, 11	syl 17	. . . . . . 7 ⊢ (𝜑 → 𝐹 ∈ V)
13	1	ffnd 6718	. . . . . . 7 ⊢ (𝜑 → 𝐹 Fn 𝐴)
14	12, 13	fndmexd 7899	. . . . . 6 ⊢ (𝜑 → 𝐴 ∈ V)
15		ssidd 4005	. . . . . 6 ⊢ (𝜑 → (𝐹 supp 0 ) ⊆ (𝐹 supp 0 ))
16	6, 7, 8, 14, 1, 15, 9	gsumres 19783	. . . . 5 ⊢ (𝜑 → (𝐺 Σg (𝐹 ↾ (𝐹 supp 0 ))) = (𝐺 Σg 𝐹))
17		nfcv 2903	. . . . . 6 ⊢ Ⅎ𝑥(𝐹‘(1st ‘𝑧))
18		fveq2 6891	. . . . . 6 ⊢ (𝑥 = (1st ‘𝑧) → (𝐹‘𝑥) = (𝐹‘(1st ‘𝑧)))
19	9	fsuppimpd 9371	. . . . . 6 ⊢ (𝜑 → (𝐹 supp 0 ) ∈ Fin)
20		ssidd 4005	. . . . . 6 ⊢ (𝜑 → 𝐵 ⊆ 𝐵)
21	1	adantr 481	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) → 𝐹:𝐴⟶𝐵)
22	3	sselda 3982	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) → 𝑥 ∈ 𝐴)
23	21, 22	ffvelcdmd 7087	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) → (𝐹‘𝑥) ∈ 𝐵)
24	1	ffund 6721	. . . . . . . . 9 ⊢ (𝜑 → Fun 𝐹)
25		funrel 6565	. . . . . . . . 9 ⊢ (Fun 𝐹 → Rel 𝐹)
26		reldif 5815	. . . . . . . . 9 ⊢ (Rel 𝐹 → Rel (𝐹 ∖ (V × { 0 })))
27	24, 25, 26	3syl 18	. . . . . . . 8 ⊢ (𝜑 → Rel (𝐹 ∖ (V × { 0 })))
28		1stdm 8028	. . . . . . . 8 ⊢ ((Rel (𝐹 ∖ (V × { 0 })) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) → (1st ‘𝑧) ∈ dom (𝐹 ∖ (V × { 0 })))
29	27, 28	sylan 580	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) → (1st ‘𝑧) ∈ dom (𝐹 ∖ (V × { 0 })))
30	7	fvexi 6905	. . . . . . . . . . . 12 ⊢ 0 ∈ V
31	30	a1i 11	. . . . . . . . . . 11 ⊢ (𝜑 → 0 ∈ V)
32		fressupp 31948	. . . . . . . . . . 11 ⊢ ((Fun 𝐹 ∧ 𝐹 ∈ V ∧ 0 ∈ V) → (𝐹 ↾ (𝐹 supp 0 )) = (𝐹 ∖ (V × { 0 })))
33	24, 12, 31, 32	syl3anc 1371	. . . . . . . . . 10 ⊢ (𝜑 → (𝐹 ↾ (𝐹 supp 0 )) = (𝐹 ∖ (V × { 0 })))
34	33	dmeqd 5905	. . . . . . . . 9 ⊢ (𝜑 → dom (𝐹 ↾ (𝐹 supp 0 )) = dom (𝐹 ∖ (V × { 0 })))
35	2	a1i 11	. . . . . . . . . 10 ⊢ (𝜑 → (𝐹 supp 0 ) ⊆ dom 𝐹)
36		ssdmres 6004	. . . . . . . . . 10 ⊢ ((𝐹 supp 0 ) ⊆ dom 𝐹 ↔ dom (𝐹 ↾ (𝐹 supp 0 )) = (𝐹 supp 0 ))
37	35, 36	sylib 217	. . . . . . . . 9 ⊢ (𝜑 → dom (𝐹 ↾ (𝐹 supp 0 )) = (𝐹 supp 0 ))
38	34, 37	eqtr3d 2774	. . . . . . . 8 ⊢ (𝜑 → dom (𝐹 ∖ (V × { 0 })) = (𝐹 supp 0 ))
39	38	adantr 481	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) → dom (𝐹 ∖ (V × { 0 })) = (𝐹 supp 0 ))
40	29, 39	eleqtrd 2835	. . . . . 6 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) → (1st ‘𝑧) ∈ (𝐹 supp 0 ))
41	24	funresd 6591	. . . . . . . . . . 11 ⊢ (𝜑 → Fun (𝐹 ↾ (𝐹 supp 0 )))
42	41	adantr 481	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) → Fun (𝐹 ↾ (𝐹 supp 0 )))
43	37	eleq2d 2819	. . . . . . . . . . 11 ⊢ (𝜑 → (𝑥 ∈ dom (𝐹 ↾ (𝐹 supp 0 )) ↔ 𝑥 ∈ (𝐹 supp 0 )))
44	43	biimpar 478	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) → 𝑥 ∈ dom (𝐹 ↾ (𝐹 supp 0 )))
45		simpr 485	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) → 𝑥 ∈ (𝐹 supp 0 ))
46	45	fvresd 6911	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) → ((𝐹 ↾ (𝐹 supp 0 ))‘𝑥) = (𝐹‘𝑥))
47		funopfvb 6947	. . . . . . . . . . 11 ⊢ ((Fun (𝐹 ↾ (𝐹 supp 0 )) ∧ 𝑥 ∈ dom (𝐹 ↾ (𝐹 supp 0 ))) → (((𝐹 ↾ (𝐹 supp 0 ))‘𝑥) = (𝐹‘𝑥) ↔ ⟨𝑥, (𝐹‘𝑥)⟩ ∈ (𝐹 ↾ (𝐹 supp 0 ))))
48	47	biimpa 477	. . . . . . . . . 10 ⊢ (((Fun (𝐹 ↾ (𝐹 supp 0 )) ∧ 𝑥 ∈ dom (𝐹 ↾ (𝐹 supp 0 ))) ∧ ((𝐹 ↾ (𝐹 supp 0 ))‘𝑥) = (𝐹‘𝑥)) → ⟨𝑥, (𝐹‘𝑥)⟩ ∈ (𝐹 ↾ (𝐹 supp 0 )))
49	42, 44, 46, 48	syl21anc 836	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) → ⟨𝑥, (𝐹‘𝑥)⟩ ∈ (𝐹 ↾ (𝐹 supp 0 )))
50	33	adantr 481	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) → (𝐹 ↾ (𝐹 supp 0 )) = (𝐹 ∖ (V × { 0 })))
51	49, 50	eleqtrd 2835	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) → ⟨𝑥, (𝐹‘𝑥)⟩ ∈ (𝐹 ∖ (V × { 0 })))
52		eqeq2 2744	. . . . . . . . . . 11 ⊢ (𝑣 = ⟨𝑥, (𝐹‘𝑥)⟩ → (𝑧 = 𝑣 ↔ 𝑧 = ⟨𝑥, (𝐹‘𝑥)⟩))
53	52	bibi2d 342	. . . . . . . . . 10 ⊢ (𝑣 = ⟨𝑥, (𝐹‘𝑥)⟩ → ((𝑥 = (1st ‘𝑧) ↔ 𝑧 = 𝑣) ↔ (𝑥 = (1st ‘𝑧) ↔ 𝑧 = ⟨𝑥, (𝐹‘𝑥)⟩)))
54	53	ralbidv 3177	. . . . . . . . 9 ⊢ (𝑣 = ⟨𝑥, (𝐹‘𝑥)⟩ → (∀𝑧 ∈ (𝐹 ∖ (V × { 0 }))(𝑥 = (1st ‘𝑧) ↔ 𝑧 = 𝑣) ↔ ∀𝑧 ∈ (𝐹 ∖ (V × { 0 }))(𝑥 = (1st ‘𝑧) ↔ 𝑧 = ⟨𝑥, (𝐹‘𝑥)⟩)))
55	54	adantl 482	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) ∧ 𝑣 = ⟨𝑥, (𝐹‘𝑥)⟩) → (∀𝑧 ∈ (𝐹 ∖ (V × { 0 }))(𝑥 = (1st ‘𝑧) ↔ 𝑧 = 𝑣) ↔ ∀𝑧 ∈ (𝐹 ∖ (V × { 0 }))(𝑥 = (1st ‘𝑧) ↔ 𝑧 = ⟨𝑥, (𝐹‘𝑥)⟩)))
56		fvexd 6906	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑥 = (1st ‘𝑧)) → (2nd ‘𝑧) ∈ V)
57	27	ad3antrrr 728	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑥 = (1st ‘𝑧)) → Rel (𝐹 ∖ (V × { 0 })))
58		simplr 767	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑥 = (1st ‘𝑧)) → 𝑧 ∈ (𝐹 ∖ (V × { 0 })))
59		1st2nd 8027	. . . . . . . . . . . . . . . . 17 ⊢ ((Rel (𝐹 ∖ (V × { 0 })) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) → 𝑧 = ⟨(1st ‘𝑧), (2nd ‘𝑧)⟩)
60	57, 58, 59	syl2anc 584	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑥 = (1st ‘𝑧)) → 𝑧 = ⟨(1st ‘𝑧), (2nd ‘𝑧)⟩)
61		opeq1 4873	. . . . . . . . . . . . . . . . 17 ⊢ (𝑥 = (1st ‘𝑧) → ⟨𝑥, (2nd ‘𝑧)⟩ = ⟨(1st ‘𝑧), (2nd ‘𝑧)⟩)
62	61	adantl 482	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑥 = (1st ‘𝑧)) → ⟨𝑥, (2nd ‘𝑧)⟩ = ⟨(1st ‘𝑧), (2nd ‘𝑧)⟩)
63	60, 62	eqtr4d 2775	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑥 = (1st ‘𝑧)) → 𝑧 = ⟨𝑥, (2nd ‘𝑧)⟩)
64		difssd 4132	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) → (𝐹 ∖ (V × { 0 })) ⊆ 𝐹)
65	64	sselda 3982	. . . . . . . . . . . . . . . . 17 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) → 𝑧 ∈ 𝐹)
66	65	adantr 481	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑥 = (1st ‘𝑧)) → 𝑧 ∈ 𝐹)
67	63, 66	eqeltrrd 2834	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑥 = (1st ‘𝑧)) → ⟨𝑥, (2nd ‘𝑧)⟩ ∈ 𝐹)
68	63, 67	jca 512	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑥 = (1st ‘𝑧)) → (𝑧 = ⟨𝑥, (2nd ‘𝑧)⟩ ∧ ⟨𝑥, (2nd ‘𝑧)⟩ ∈ 𝐹))
69		opeq2 4874	. . . . . . . . . . . . . . . 16 ⊢ (𝑦 = (2nd ‘𝑧) → ⟨𝑥, 𝑦⟩ = ⟨𝑥, (2nd ‘𝑧)⟩)
70	69	eqeq2d 2743	. . . . . . . . . . . . . . 15 ⊢ (𝑦 = (2nd ‘𝑧) → (𝑧 = ⟨𝑥, 𝑦⟩ ↔ 𝑧 = ⟨𝑥, (2nd ‘𝑧)⟩))
71	69	eleq1d 2818	. . . . . . . . . . . . . . 15 ⊢ (𝑦 = (2nd ‘𝑧) → (⟨𝑥, 𝑦⟩ ∈ 𝐹 ↔ ⟨𝑥, (2nd ‘𝑧)⟩ ∈ 𝐹))
72	70, 71	anbi12d 631	. . . . . . . . . . . . . 14 ⊢ (𝑦 = (2nd ‘𝑧) → ((𝑧 = ⟨𝑥, 𝑦⟩ ∧ ⟨𝑥, 𝑦⟩ ∈ 𝐹) ↔ (𝑧 = ⟨𝑥, (2nd ‘𝑧)⟩ ∧ ⟨𝑥, (2nd ‘𝑧)⟩ ∈ 𝐹)))
73	56, 68, 72	spcedv 3588	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑥 = (1st ‘𝑧)) → ∃𝑦(𝑧 = ⟨𝑥, 𝑦⟩ ∧ ⟨𝑥, 𝑦⟩ ∈ 𝐹))
74		vex 3478	. . . . . . . . . . . . . 14 ⊢ 𝑥 ∈ V
75	74	elsnres 6021	. . . . . . . . . . . . 13 ⊢ (𝑧 ∈ (𝐹 ↾ {𝑥}) ↔ ∃𝑦(𝑧 = ⟨𝑥, 𝑦⟩ ∧ ⟨𝑥, 𝑦⟩ ∈ 𝐹))
76	73, 75	sylibr 233	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑥 = (1st ‘𝑧)) → 𝑧 ∈ (𝐹 ↾ {𝑥}))
77	13	ad3antrrr 728	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑥 = (1st ‘𝑧)) → 𝐹 Fn 𝐴)
78	22	ad2antrr 724	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑥 = (1st ‘𝑧)) → 𝑥 ∈ 𝐴)
79		fnressn 7158	. . . . . . . . . . . . 13 ⊢ ((𝐹 Fn 𝐴 ∧ 𝑥 ∈ 𝐴) → (𝐹 ↾ {𝑥}) = {⟨𝑥, (𝐹‘𝑥)⟩})
80	77, 78, 79	syl2anc 584	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑥 = (1st ‘𝑧)) → (𝐹 ↾ {𝑥}) = {⟨𝑥, (𝐹‘𝑥)⟩})
81	76, 80	eleqtrd 2835	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑥 = (1st ‘𝑧)) → 𝑧 ∈ {⟨𝑥, (𝐹‘𝑥)⟩})
82		elsni 4645	. . . . . . . . . . 11 ⊢ (𝑧 ∈ {⟨𝑥, (𝐹‘𝑥)⟩} → 𝑧 = ⟨𝑥, (𝐹‘𝑥)⟩)
83	81, 82	syl 17	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑥 = (1st ‘𝑧)) → 𝑧 = ⟨𝑥, (𝐹‘𝑥)⟩)
84		simpr 485	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑧 = ⟨𝑥, (𝐹‘𝑥)⟩) → 𝑧 = ⟨𝑥, (𝐹‘𝑥)⟩)
85	84	fveq2d 6895	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑧 = ⟨𝑥, (𝐹‘𝑥)⟩) → (1st ‘𝑧) = (1st ‘⟨𝑥, (𝐹‘𝑥)⟩))
86		fvex 6904	. . . . . . . . . . . 12 ⊢ (𝐹‘𝑥) ∈ V
87	74, 86	op1st 7985	. . . . . . . . . . 11 ⊢ (1st ‘⟨𝑥, (𝐹‘𝑥)⟩) = 𝑥
88	85, 87	eqtr2di 2789	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑧 = ⟨𝑥, (𝐹‘𝑥)⟩) → 𝑥 = (1st ‘𝑧))
89	83, 88	impbida 799	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) → (𝑥 = (1st ‘𝑧) ↔ 𝑧 = ⟨𝑥, (𝐹‘𝑥)⟩))
90	89	ralrimiva 3146	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) → ∀𝑧 ∈ (𝐹 ∖ (V × { 0 }))(𝑥 = (1st ‘𝑧) ↔ 𝑧 = ⟨𝑥, (𝐹‘𝑥)⟩))
91	51, 55, 90	rspcedvd 3614	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) → ∃𝑣 ∈ (𝐹 ∖ (V × { 0 }))∀𝑧 ∈ (𝐹 ∖ (V × { 0 }))(𝑥 = (1st ‘𝑧) ↔ 𝑧 = 𝑣))
92		reu6 3722	. . . . . . 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 19833	. . . . 5 ⊢ (𝜑 → (𝐺 Σg (𝑥 ∈ (𝐹 supp 0 ) ↦ (𝐹‘𝑥))) = (𝐺 Σg (𝑧 ∈ (𝐹 ∖ (V × { 0 })) ↦ (𝐹‘(1st ‘𝑧)))))
95	5, 16, 94	3eqtr3d 2780	. . . 4 ⊢ (𝜑 → (𝐺 Σg 𝐹) = (𝐺 Σg (𝑧 ∈ (𝐹 ∖ (V × { 0 })) ↦ (𝐹‘(1st ‘𝑧)))))
96		simpr 485	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) → 𝑧 ∈ (𝐹 ∖ (V × { 0 })))
97	96	eldifad 3960	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) → 𝑧 ∈ 𝐹)
98		funfv1st2nd 8034	. . . . . . 7 ⊢ ((Fun 𝐹 ∧ 𝑧 ∈ 𝐹) → (𝐹‘(1st ‘𝑧)) = (2nd ‘𝑧))
99	24, 97, 98	syl2an2r 683	. . . . . 6 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) → (𝐹‘(1st ‘𝑧)) = (2nd ‘𝑧))
100	99	mpteq2dva 5248	. . . . 5 ⊢ (𝜑 → (𝑧 ∈ (𝐹 ∖ (V × { 0 })) ↦ (𝐹‘(1st ‘𝑧))) = (𝑧 ∈ (𝐹 ∖ (V × { 0 })) ↦ (2nd ‘𝑧)))
101	100	oveq2d 7427	. . . 4 ⊢ (𝜑 → (𝐺 Σg (𝑧 ∈ (𝐹 ∖ (V × { 0 })) ↦ (𝐹‘(1st ‘𝑧)))) = (𝐺 Σg (𝑧 ∈ (𝐹 ∖ (V × { 0 })) ↦ (2nd ‘𝑧))))
102	95, 101	eqtrd 2772	. . 3 ⊢ (𝜑 → (𝐺 Σg 𝐹) = (𝐺 Σg (𝑧 ∈ (𝐹 ∖ (V × { 0 })) ↦ (2nd ‘𝑧))))
103		nfcv 2903	. . . 4 ⊢ Ⅎ𝑧(1st ‘𝑡)
104		fvex 6904	. . . . 5 ⊢ (2nd ‘𝑡) ∈ V
105		fvex 6904	. . . . 5 ⊢ (1st ‘𝑡) ∈ V
106	104, 105	op2ndd 7988	. . . 4 ⊢ (𝑧 = ⟨(2nd ‘𝑡), (1st ‘𝑡)⟩ → (2nd ‘𝑧) = (1st ‘𝑡))
107		resfnfinfin 9334	. . . . . 6 ⊢ ((𝐹 Fn 𝐴 ∧ (𝐹 supp 0 ) ∈ Fin) → (𝐹 ↾ (𝐹 supp 0 )) ∈ Fin)
108	13, 19, 107	syl2anc 584	. . . . 5 ⊢ (𝜑 → (𝐹 ↾ (𝐹 supp 0 )) ∈ Fin)
109	33, 108	eqeltrrd 2834	. . . 4 ⊢ (𝜑 → (𝐹 ∖ (V × { 0 })) ∈ Fin)
110	33	rneqd 5937	. . . . 5 ⊢ (𝜑 → ran (𝐹 ↾ (𝐹 supp 0 )) = ran (𝐹 ∖ (V × { 0 })))
111		rnresss 6017	. . . . . 6 ⊢ ran (𝐹 ↾ (𝐹 supp 0 )) ⊆ ran 𝐹
112	1	frnd 6725	. . . . . 6 ⊢ (𝜑 → ran 𝐹 ⊆ 𝐵)
113	111, 112	sstrid 3993	. . . . 5 ⊢ (𝜑 → ran (𝐹 ↾ (𝐹 supp 0 )) ⊆ 𝐵)
114	110, 113	eqsstrrd 4021	. . . 4 ⊢ (𝜑 → ran (𝐹 ∖ (V × { 0 })) ⊆ 𝐵)
115		2ndrn 8029	. . . . 5 ⊢ ((Rel (𝐹 ∖ (V × { 0 })) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) → (2nd ‘𝑧) ∈ ran (𝐹 ∖ (V × { 0 })))
116	27, 115	sylan 580	. . . 4 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) → (2nd ‘𝑧) ∈ ran (𝐹 ∖ (V × { 0 })))
117		relcnv 6103	. . . . . . . 8 ⊢ Rel ◡𝐹
118		reldif 5815	. . . . . . . 8 ⊢ (Rel ◡𝐹 → Rel (◡𝐹 ∖ ({ 0 } × V)))
119	117, 118	mp1i 13	. . . . . . 7 ⊢ (𝜑 → Rel (◡𝐹 ∖ ({ 0 } × V)))
120		1st2nd 8027	. . . . . . 7 ⊢ ((Rel (◡𝐹 ∖ ({ 0 } × V)) ∧ 𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V))) → 𝑡 = ⟨(1st ‘𝑡), (2nd ‘𝑡)⟩)
121	119, 120	sylan 580	. . . . . 6 ⊢ ((𝜑 ∧ 𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V))) → 𝑡 = ⟨(1st ‘𝑡), (2nd ‘𝑡)⟩)
122		cnvdif 6143	. . . . . . . . . 10 ⊢ ◡(𝐹 ∖ (V × { 0 })) = (◡𝐹 ∖ ◡(V × { 0 }))
123		cnvxp 6156	. . . . . . . . . . 11 ⊢ ◡(V × { 0 }) = ({ 0 } × V)
124	123	difeq2i 4119	. . . . . . . . . 10 ⊢ (◡𝐹 ∖ ◡(V × { 0 })) = (◡𝐹 ∖ ({ 0 } × V))
125	122, 124	eqtri 2760	. . . . . . . . 9 ⊢ ◡(𝐹 ∖ (V × { 0 })) = (◡𝐹 ∖ ({ 0 } × V))
126	125	eqimss2i 4043	. . . . . . . 8 ⊢ (◡𝐹 ∖ ({ 0 } × V)) ⊆ ◡(𝐹 ∖ (V × { 0 }))
127	126	a1i 11	. . . . . . 7 ⊢ (𝜑 → (◡𝐹 ∖ ({ 0 } × V)) ⊆ ◡(𝐹 ∖ (V × { 0 })))
128	127	sselda 3982	. . . . . 6 ⊢ ((𝜑 ∧ 𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V))) → 𝑡 ∈ ◡(𝐹 ∖ (V × { 0 })))
129	121, 128	eqeltrrd 2834	. . . . 5 ⊢ ((𝜑 ∧ 𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V))) → ⟨(1st ‘𝑡), (2nd ‘𝑡)⟩ ∈ ◡(𝐹 ∖ (V × { 0 })))
130	105, 104	opelcnv 5881	. . . . 5 ⊢ (⟨(1st ‘𝑡), (2nd ‘𝑡)⟩ ∈ ◡(𝐹 ∖ (V × { 0 })) ↔ ⟨(2nd ‘𝑡), (1st ‘𝑡)⟩ ∈ (𝐹 ∖ (V × { 0 })))
131	129, 130	sylib 217	. . . 4 ⊢ ((𝜑 ∧ 𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V))) → ⟨(2nd ‘𝑡), (1st ‘𝑡)⟩ ∈ (𝐹 ∖ (V × { 0 })))
132	27	adantr 481	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) → Rel (𝐹 ∖ (V × { 0 })))
133		eqidd 2733	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) → ∪ ◡{𝑧} = ∪ ◡{𝑧})
134		cnvf1olem 8098	. . . . . . . . 9 ⊢ ((Rel (𝐹 ∖ (V × { 0 })) ∧ (𝑧 ∈ (𝐹 ∖ (V × { 0 })) ∧ ∪ ◡{𝑧} = ∪ ◡{𝑧})) → (∪ ◡{𝑧} ∈ ◡(𝐹 ∖ (V × { 0 })) ∧ 𝑧 = ∪ ◡{∪ ◡{𝑧}}))
135	134	simpld 495	. . . . . . . 8 ⊢ ((Rel (𝐹 ∖ (V × { 0 })) ∧ (𝑧 ∈ (𝐹 ∖ (V × { 0 })) ∧ ∪ ◡{𝑧} = ∪ ◡{𝑧})) → ∪ ◡{𝑧} ∈ ◡(𝐹 ∖ (V × { 0 })))
136	132, 96, 133, 135	syl12anc 835	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) → ∪ ◡{𝑧} ∈ ◡(𝐹 ∖ (V × { 0 })))
137	136, 125	eleqtrdi 2843	. . . . . 6 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) → ∪ ◡{𝑧} ∈ (◡𝐹 ∖ ({ 0 } × V)))
138		eqeq2 2744	. . . . . . . . 9 ⊢ (𝑢 = ∪ ◡{𝑧} → (𝑡 = 𝑢 ↔ 𝑡 = ∪ ◡{𝑧}))
139	138	bibi2d 342	. . . . . . . 8 ⊢ (𝑢 = ∪ ◡{𝑧} → ((𝑧 = ⟨(2nd ‘𝑡), (1st ‘𝑡)⟩ ↔ 𝑡 = 𝑢) ↔ (𝑧 = ⟨(2nd ‘𝑡), (1st ‘𝑡)⟩ ↔ 𝑡 = ∪ ◡{𝑧})))
140	139	ralbidv 3177	. . . . . . 7 ⊢ (𝑢 = ∪ ◡{𝑧} → (∀𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V))(𝑧 = ⟨(2nd ‘𝑡), (1st ‘𝑡)⟩ ↔ 𝑡 = 𝑢) ↔ ∀𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V))(𝑧 = ⟨(2nd ‘𝑡), (1st ‘𝑡)⟩ ↔ 𝑡 = ∪ ◡{𝑧})))
141	140	adantl 482	. . . . . 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 767	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V))) ∧ 𝑧 = ⟨(2nd ‘𝑡), (1st ‘𝑡)⟩) → 𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V)))
144		simpr 485	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V))) ∧ 𝑧 = ⟨(2nd ‘𝑡), (1st ‘𝑡)⟩) → 𝑧 = ⟨(2nd ‘𝑡), (1st ‘𝑡)⟩)
145		df-rel 5683	. . . . . . . . . . . . . 14 ⊢ (Rel (◡𝐹 ∖ ({ 0 } × V)) ↔ (◡𝐹 ∖ ({ 0 } × V)) ⊆ (V × V))
146	119, 145	sylib 217	. . . . . . . . . . . . 13 ⊢ (𝜑 → (◡𝐹 ∖ ({ 0 } × V)) ⊆ (V × V))
147	146	ad3antrrr 728	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V))) ∧ 𝑧 = ⟨(2nd ‘𝑡), (1st ‘𝑡)⟩) → (◡𝐹 ∖ ({ 0 } × V)) ⊆ (V × V))
148	147, 143	sseldd 3983	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V))) ∧ 𝑧 = ⟨(2nd ‘𝑡), (1st ‘𝑡)⟩) → 𝑡 ∈ (V × V))
149		2nd1st 8026	. . . . . . . . . . 11 ⊢ (𝑡 ∈ (V × V) → ∪ ◡{𝑡} = ⟨(2nd ‘𝑡), (1st ‘𝑡)⟩)
150	148, 149	syl 17	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V))) ∧ 𝑧 = ⟨(2nd ‘𝑡), (1st ‘𝑡)⟩) → ∪ ◡{𝑡} = ⟨(2nd ‘𝑡), (1st ‘𝑡)⟩)
151	144, 150	eqtr4d 2775	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V))) ∧ 𝑧 = ⟨(2nd ‘𝑡), (1st ‘𝑡)⟩) → 𝑧 = ∪ ◡{𝑡})
152		cnvf1olem 8098	. . . . . . . . . 10 ⊢ ((Rel (◡𝐹 ∖ ({ 0 } × V)) ∧ (𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V)) ∧ 𝑧 = ∪ ◡{𝑡})) → (𝑧 ∈ ◡(◡𝐹 ∖ ({ 0 } × V)) ∧ 𝑡 = ∪ ◡{𝑧}))
153	152	simprd 496	. . . . . . . . 9 ⊢ ((Rel (◡𝐹 ∖ ({ 0 } × V)) ∧ (𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V)) ∧ 𝑧 = ∪ ◡{𝑡})) → 𝑡 = ∪ ◡{𝑧})
154	142, 143, 151, 153	syl12anc 835	. . . . . . . 8 ⊢ ((((𝜑 ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V))) ∧ 𝑧 = ⟨(2nd ‘𝑡), (1st ‘𝑡)⟩) → 𝑡 = ∪ ◡{𝑧})
155	27	ad3antrrr 728	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V))) ∧ 𝑡 = ∪ ◡{𝑧}) → Rel (𝐹 ∖ (V × { 0 })))
156	96	ad2antrr 724	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V))) ∧ 𝑡 = ∪ ◡{𝑧}) → 𝑧 ∈ (𝐹 ∖ (V × { 0 })))
157		simpr 485	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V))) ∧ 𝑡 = ∪ ◡{𝑧}) → 𝑡 = ∪ ◡{𝑧})
158		cnvf1olem 8098	. . . . . . . . . . 11 ⊢ ((Rel (𝐹 ∖ (V × { 0 })) ∧ (𝑧 ∈ (𝐹 ∖ (V × { 0 })) ∧ 𝑡 = ∪ ◡{𝑧})) → (𝑡 ∈ ◡(𝐹 ∖ (V × { 0 })) ∧ 𝑧 = ∪ ◡{𝑡}))
159	158	simprd 496	. . . . . . . . . 10 ⊢ ((Rel (𝐹 ∖ (V × { 0 })) ∧ (𝑧 ∈ (𝐹 ∖ (V × { 0 })) ∧ 𝑡 = ∪ ◡{𝑧})) → 𝑧 = ∪ ◡{𝑡})
160	155, 156, 157, 159	syl12anc 835	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V))) ∧ 𝑡 = ∪ ◡{𝑧}) → 𝑧 = ∪ ◡{𝑡})
161	146	ad3antrrr 728	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V))) ∧ 𝑡 = ∪ ◡{𝑧}) → (◡𝐹 ∖ ({ 0 } × V)) ⊆ (V × V))
162		simplr 767	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V))) ∧ 𝑡 = ∪ ◡{𝑧}) → 𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V)))
163	161, 162	sseldd 3983	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V))) ∧ 𝑡 = ∪ ◡{𝑧}) → 𝑡 ∈ (V × V))
164	163, 149	syl 17	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V))) ∧ 𝑡 = ∪ ◡{𝑧}) → ∪ ◡{𝑡} = ⟨(2nd ‘𝑡), (1st ‘𝑡)⟩)
165	160, 164	eqtrd 2772	. . . . . . . 8 ⊢ ((((𝜑 ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V))) ∧ 𝑡 = ∪ ◡{𝑧}) → 𝑧 = ⟨(2nd ‘𝑡), (1st ‘𝑡)⟩)
166	154, 165	impbida 799	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V))) → (𝑧 = ⟨(2nd ‘𝑡), (1st ‘𝑡)⟩ ↔ 𝑡 = ∪ ◡{𝑧}))
167	166	ralrimiva 3146	. . . . . 6 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) → ∀𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V))(𝑧 = ⟨(2nd ‘𝑡), (1st ‘𝑡)⟩ ↔ 𝑡 = ∪ ◡{𝑧}))
168	137, 141, 167	rspcedvd 3614	. . . . 5 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) → ∃𝑢 ∈ (◡𝐹 ∖ ({ 0 } × V))∀𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V))(𝑧 = ⟨(2nd ‘𝑡), (1st ‘𝑡)⟩ ↔ 𝑡 = 𝑢))
169		reu6 3722	. . . . 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 19833	. . 3 ⊢ (𝜑 → (𝐺 Σg (𝑧 ∈ (𝐹 ∖ (V × { 0 })) ↦ (2nd ‘𝑧))) = (𝐺 Σg (𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V)) ↦ (1st ‘𝑡))))
172		fveq2 6891	. . . . . 6 ⊢ (𝑡 = 𝑧 → (1st ‘𝑡) = (1st ‘𝑧))
173	172	cbvmptv 5261	. . . . 5 ⊢ (𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V)) ↦ (1st ‘𝑡)) = (𝑧 ∈ (◡𝐹 ∖ ({ 0 } × V)) ↦ (1st ‘𝑧))
174	33	cnveqd 5875	. . . . . . 7 ⊢ (𝜑 → ◡(𝐹 ↾ (𝐹 supp 0 )) = ◡(𝐹 ∖ (V × { 0 })))
175	174, 125	eqtr2di 2789	. . . . . 6 ⊢ (𝜑 → (◡𝐹 ∖ ({ 0 } × V)) = ◡(𝐹 ↾ (𝐹 supp 0 )))
176	175	mpteq1d 5243	. . . . 5 ⊢ (𝜑 → (𝑧 ∈ (◡𝐹 ∖ ({ 0 } × V)) ↦ (1st ‘𝑧)) = (𝑧 ∈ ◡(𝐹 ↾ (𝐹 supp 0 )) ↦ (1st ‘𝑧)))
177	173, 176	eqtrid 2784	. . . 4 ⊢ (𝜑 → (𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V)) ↦ (1st ‘𝑡)) = (𝑧 ∈ ◡(𝐹 ↾ (𝐹 supp 0 )) ↦ (1st ‘𝑧)))
178	177	oveq2d 7427	. . 3 ⊢ (𝜑 → (𝐺 Σg (𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V)) ↦ (1st ‘𝑡))) = (𝐺 Σg (𝑧 ∈ ◡(𝐹 ↾ (𝐹 supp 0 )) ↦ (1st ‘𝑧))))
179	102, 171, 178	3eqtrd 2776	. 2 ⊢ (𝜑 → (𝐺 Σg 𝐹) = (𝐺 Σg (𝑧 ∈ ◡(𝐹 ↾ (𝐹 supp 0 )) ↦ (1st ‘𝑧))))
180		nfcv 2903	. . 3 ⊢ Ⅎ𝑦(1st ‘𝑧)
181		nfv 1917	. . 3 ⊢ Ⅎ𝑥𝜑
182		vex 3478	. . . 4 ⊢ 𝑦 ∈ V
183	74, 182	op1std 7987	. . 3 ⊢ (𝑧 = ⟨𝑥, 𝑦⟩ → (1st ‘𝑧) = 𝑥)
184		relcnv 6103	. . . 4 ⊢ Rel ◡(𝐹 ↾ (𝐹 supp 0 ))
185	184	a1i 11	. . 3 ⊢ (𝜑 → Rel ◡(𝐹 ↾ (𝐹 supp 0 )))
186		cnvfi 9182	. . . 4 ⊢ ((𝐹 ↾ (𝐹 supp 0 )) ∈ Fin → ◡(𝐹 ↾ (𝐹 supp 0 )) ∈ Fin)
187	108, 186	syl 17	. . 3 ⊢ (𝜑 → ◡(𝐹 ↾ (𝐹 supp 0 )) ∈ Fin)
188	112	adantr 481	. . . 4 ⊢ ((𝜑 ∧ 𝑧 ∈ ◡(𝐹 ↾ (𝐹 supp 0 ))) → ran 𝐹 ⊆ 𝐵)
189	184	a1i 11	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑧 ∈ ◡(𝐹 ↾ (𝐹 supp 0 ))) → Rel ◡(𝐹 ↾ (𝐹 supp 0 )))
190		simpr 485	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑧 ∈ ◡(𝐹 ↾ (𝐹 supp 0 ))) → 𝑧 ∈ ◡(𝐹 ↾ (𝐹 supp 0 )))
191		1stdm 8028	. . . . . . 7 ⊢ ((Rel ◡(𝐹 ↾ (𝐹 supp 0 )) ∧ 𝑧 ∈ ◡(𝐹 ↾ (𝐹 supp 0 ))) → (1st ‘𝑧) ∈ dom ◡(𝐹 ↾ (𝐹 supp 0 )))
192	189, 190, 191	syl2anc 584	. . . . . 6 ⊢ ((𝜑 ∧ 𝑧 ∈ ◡(𝐹 ↾ (𝐹 supp 0 ))) → (1st ‘𝑧) ∈ dom ◡(𝐹 ↾ (𝐹 supp 0 )))
193		df-rn 5687	. . . . . 6 ⊢ ran (𝐹 ↾ (𝐹 supp 0 )) = dom ◡(𝐹 ↾ (𝐹 supp 0 ))
194	192, 193	eleqtrrdi 2844	. . . . 5 ⊢ ((𝜑 ∧ 𝑧 ∈ ◡(𝐹 ↾ (𝐹 supp 0 ))) → (1st ‘𝑧) ∈ ran (𝐹 ↾ (𝐹 supp 0 )))
195	111, 194	sselid 3980	. . . 4 ⊢ ((𝜑 ∧ 𝑧 ∈ ◡(𝐹 ↾ (𝐹 supp 0 ))) → (1st ‘𝑧) ∈ ran 𝐹)
196	188, 195	sseldd 3983	. . 3 ⊢ ((𝜑 ∧ 𝑧 ∈ ◡(𝐹 ↾ (𝐹 supp 0 ))) → (1st ‘𝑧) ∈ 𝐵)
197	180, 181, 6, 183, 185, 187, 8, 196	gsummpt2d 32242	. 2 ⊢ (𝜑 → (𝐺 Σg (𝑧 ∈ ◡(𝐹 ↾ (𝐹 supp 0 )) ↦ (1st ‘𝑧))) = (𝐺 Σg (𝑥 ∈ dom ◡(𝐹 ↾ (𝐹 supp 0 )) ↦ (𝐺 Σg (𝑦 ∈ (◡(𝐹 ↾ (𝐹 supp 0 )) “ {𝑥}) ↦ 𝑥)))))
198		df-ima 5689	. . . . . . 7 ⊢ (𝐹 “ (𝐹 supp 0 )) = ran (𝐹 ↾ (𝐹 supp 0 ))
199		supppreima 31951	. . . . . . . . 9 ⊢ ((Fun 𝐹 ∧ 𝐹 ∈ V ∧ 0 ∈ V) → (𝐹 supp 0 ) = (◡𝐹 “ (ran 𝐹 ∖ { 0 })))
200	24, 12, 31, 199	syl3anc 1371	. . . . . . . 8 ⊢ (𝜑 → (𝐹 supp 0 ) = (◡𝐹 “ (ran 𝐹 ∖ { 0 })))
201	200	imaeq2d 6059	. . . . . . 7 ⊢ (𝜑 → (𝐹 “ (𝐹 supp 0 )) = (𝐹 “ (◡𝐹 “ (ran 𝐹 ∖ { 0 }))))
202	198, 201	eqtr3id 2786	. . . . . 6 ⊢ (𝜑 → ran (𝐹 ↾ (𝐹 supp 0 )) = (𝐹 “ (◡𝐹 “ (ran 𝐹 ∖ { 0 }))))
203		funimacnv 6629	. . . . . . 7 ⊢ (Fun 𝐹 → (𝐹 “ (◡𝐹 “ (ran 𝐹 ∖ { 0 }))) = ((ran 𝐹 ∖ { 0 }) ∩ ran 𝐹))
204	24, 203	syl 17	. . . . . 6 ⊢ (𝜑 → (𝐹 “ (◡𝐹 “ (ran 𝐹 ∖ { 0 }))) = ((ran 𝐹 ∖ { 0 }) ∩ ran 𝐹))
205		difssd 4132	. . . . . . 7 ⊢ (𝜑 → (ran 𝐹 ∖ { 0 }) ⊆ ran 𝐹)
206		df-ss 3965	. . . . . . 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 2776	. . . . 5 ⊢ (𝜑 → ran (𝐹 ↾ (𝐹 supp 0 )) = (ran 𝐹 ∖ { 0 }))
209	193, 208	eqtr3id 2786	. . . 4 ⊢ (𝜑 → dom ◡(𝐹 ↾ (𝐹 supp 0 )) = (ran 𝐹 ∖ { 0 }))
210	8	cmnmndd 19674	. . . . . . 7 ⊢ (𝜑 → 𝐺 ∈ Mnd)
211	210	adantr 481	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ dom ◡(𝐹 ↾ (𝐹 supp 0 ))) → 𝐺 ∈ Mnd)
212	108	adantr 481	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ dom ◡(𝐹 ↾ (𝐹 supp 0 ))) → (𝐹 ↾ (𝐹 supp 0 )) ∈ Fin)
213		imafi2 31974	. . . . . . 7 ⊢ (◡(𝐹 ↾ (𝐹 supp 0 )) ∈ Fin → (◡(𝐹 ↾ (𝐹 supp 0 )) “ {𝑥}) ∈ Fin)
214	212, 186, 213	3syl 18	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ dom ◡(𝐹 ↾ (𝐹 supp 0 ))) → (◡(𝐹 ↾ (𝐹 supp 0 )) “ {𝑥}) ∈ Fin)
215	193, 113	eqsstrrid 4031	. . . . . . 7 ⊢ (𝜑 → dom ◡(𝐹 ↾ (𝐹 supp 0 )) ⊆ 𝐵)
216	215	sselda 3982	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ dom ◡(𝐹 ↾ (𝐹 supp 0 ))) → 𝑥 ∈ 𝐵)
217		gsumhashmul.x	. . . . . . 7 ⊢ · = (.g‘𝐺)
218	6, 217	gsumconst 19804	. . . . . 6 ⊢ ((𝐺 ∈ Mnd ∧ (◡(𝐹 ↾ (𝐹 supp 0 )) “ {𝑥}) ∈ Fin ∧ 𝑥 ∈ 𝐵) → (𝐺 Σg (𝑦 ∈ (◡(𝐹 ↾ (𝐹 supp 0 )) “ {𝑥}) ↦ 𝑥)) = ((♯‘(◡(𝐹 ↾ (𝐹 supp 0 )) “ {𝑥})) · 𝑥))
219	211, 214, 216, 218	syl3anc 1371	. . . . 5 ⊢ ((𝜑 ∧ 𝑥 ∈ dom ◡(𝐹 ↾ (𝐹 supp 0 ))) → (𝐺 Σg (𝑦 ∈ (◡(𝐹 ↾ (𝐹 supp 0 )) “ {𝑥}) ↦ 𝑥)) = ((♯‘(◡(𝐹 ↾ (𝐹 supp 0 )) “ {𝑥})) · 𝑥))
220		cnvresima 6229	. . . . . . . 8 ⊢ (◡(𝐹 ↾ (𝐹 supp 0 )) “ {𝑥}) = ((◡𝐹 “ {𝑥}) ∩ (𝐹 supp 0 ))
221	209	eleq2d 2819	. . . . . . . . . . . . 13 ⊢ (𝜑 → (𝑥 ∈ dom ◡(𝐹 ↾ (𝐹 supp 0 )) ↔ 𝑥 ∈ (ran 𝐹 ∖ { 0 })))
222	221	biimpa 477	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑥 ∈ dom ◡(𝐹 ↾ (𝐹 supp 0 ))) → 𝑥 ∈ (ran 𝐹 ∖ { 0 }))
223	222	snssd 4812	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑥 ∈ dom ◡(𝐹 ↾ (𝐹 supp 0 ))) → {𝑥} ⊆ (ran 𝐹 ∖ { 0 }))
224		sspreima 7069	. . . . . . . . . . 11 ⊢ ((Fun 𝐹 ∧ {𝑥} ⊆ (ran 𝐹 ∖ { 0 })) → (◡𝐹 “ {𝑥}) ⊆ (◡𝐹 “ (ran 𝐹 ∖ { 0 })))
225	24, 223, 224	syl2an2r 683	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑥 ∈ dom ◡(𝐹 ↾ (𝐹 supp 0 ))) → (◡𝐹 “ {𝑥}) ⊆ (◡𝐹 “ (ran 𝐹 ∖ { 0 })))
226	200	adantr 481	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑥 ∈ dom ◡(𝐹 ↾ (𝐹 supp 0 ))) → (𝐹 supp 0 ) = (◡𝐹 “ (ran 𝐹 ∖ { 0 })))
227	225, 226	sseqtrrd 4023	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑥 ∈ dom ◡(𝐹 ↾ (𝐹 supp 0 ))) → (◡𝐹 “ {𝑥}) ⊆ (𝐹 supp 0 ))
228		df-ss 3965	. . . . . . . . 9 ⊢ ((◡𝐹 “ {𝑥}) ⊆ (𝐹 supp 0 ) ↔ ((◡𝐹 “ {𝑥}) ∩ (𝐹 supp 0 )) = (◡𝐹 “ {𝑥}))
229	227, 228	sylib 217	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ dom ◡(𝐹 ↾ (𝐹 supp 0 ))) → ((◡𝐹 “ {𝑥}) ∩ (𝐹 supp 0 )) = (◡𝐹 “ {𝑥}))
230	220, 229	eqtr2id 2785	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ dom ◡(𝐹 ↾ (𝐹 supp 0 ))) → (◡𝐹 “ {𝑥}) = (◡(𝐹 ↾ (𝐹 supp 0 )) “ {𝑥}))
231	230	fveq2d 6895	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ dom ◡(𝐹 ↾ (𝐹 supp 0 ))) → (♯‘(◡𝐹 “ {𝑥})) = (♯‘(◡(𝐹 ↾ (𝐹 supp 0 )) “ {𝑥})))
232	231	oveq1d 7426	. . . . 5 ⊢ ((𝜑 ∧ 𝑥 ∈ dom ◡(𝐹 ↾ (𝐹 supp 0 ))) → ((♯‘(◡𝐹 “ {𝑥})) · 𝑥) = ((♯‘(◡(𝐹 ↾ (𝐹 supp 0 )) “ {𝑥})) · 𝑥))
233	219, 232	eqtr4d 2775	. . . 4 ⊢ ((𝜑 ∧ 𝑥 ∈ dom ◡(𝐹 ↾ (𝐹 supp 0 ))) → (𝐺 Σg (𝑦 ∈ (◡(𝐹 ↾ (𝐹 supp 0 )) “ {𝑥}) ↦ 𝑥)) = ((♯‘(◡𝐹 “ {𝑥})) · 𝑥))
234	209, 233	mpteq12dva 5237	. . 3 ⊢ (𝜑 → (𝑥 ∈ dom ◡(𝐹 ↾ (𝐹 supp 0 )) ↦ (𝐺 Σg (𝑦 ∈ (◡(𝐹 ↾ (𝐹 supp 0 )) “ {𝑥}) ↦ 𝑥))) = (𝑥 ∈ (ran 𝐹 ∖ { 0 }) ↦ ((♯‘(◡𝐹 “ {𝑥})) · 𝑥)))
235	234	oveq2d 7427	. 2 ⊢ (𝜑 → (𝐺 Σg (𝑥 ∈ dom ◡(𝐹 ↾ (𝐹 supp 0 )) ↦ (𝐺 Σg (𝑦 ∈ (◡(𝐹 ↾ (𝐹 supp 0 )) “ {𝑥}) ↦ 𝑥)))) = (𝐺 Σg (𝑥 ∈ (ran 𝐹 ∖ { 0 }) ↦ ((♯‘(◡𝐹 “ {𝑥})) · 𝑥))))
236	179, 197, 235	3eqtrd 2776	1 ⊢ (𝜑 → (𝐺 Σg 𝐹) = (𝐺 Σg (𝑥 ∈ (ran 𝐹 ∖ { 0 }) ↦ ((♯‘(◡𝐹 “ {𝑥})) · 𝑥))))

Syntax hints:   → wi 4   ↔ wb 205   ∧ wa 396   = wceq 1541  ∃wex 1781   ∈ wcel 2106  ∀wral 3061  ∃wrex 3070  ∃!wreu 3374  Vcvv 3474   ∖ cdif 3945   ∩ cin 3947   ⊆ wss 3948  {csn 4628  ⟨cop 4634  ∪ cuni 4908   class class class wbr 5148   ↦ cmpt 5231   × cxp 5674  ^◡ccnv 5675  dom cdm 5676  ran crn 5677   ↾ cres 5678   “ cima 5679  Rel wrel 5681  Fun wfun 6537   Fn wfn 6538  ⟶wf 6539  ‘cfv 6543  (class class class)co 7411  1^st c1st 7975  2^nd c2nd 7976   supp csupp 8148  Fincfn 8941   finSupp cfsupp 9363  ♯chash 14292  Basecbs 17146  0_gc0g 17387   Σ_g cgsu 17388  Mndcmnd 18627  ._gcmg 18952  CMndccmn 19650

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1797  ax-4 1811  ax-5 1913  ax-6 1971  ax-7 2011  ax-8 2108  ax-9 2116  ax-10 2137  ax-11 2154  ax-12 2171  ax-ext 2703  ax-rep 5285  ax-sep 5299  ax-nul 5306  ax-pow 5363  ax-pr 5427  ax-un 7727  ax-cnex 11168  ax-resscn 11169  ax-1cn 11170  ax-icn 11171  ax-addcl 11172  ax-addrcl 11173  ax-mulcl 11174  ax-mulrcl 11175  ax-mulcom 11176  ax-addass 11177  ax-mulass 11178  ax-distr 11179  ax-i2m1 11180  ax-1ne0 11181  ax-1rid 11182  ax-rnegex 11183  ax-rrecex 11184  ax-cnre 11185  ax-pre-lttri 11186  ax-pre-lttrn 11187  ax-pre-ltadd 11188  ax-pre-mulgt0 11189

This theorem depends on definitions:  df-bi 206  df-an 397  df-or 846  df-3or 1088  df-3an 1089  df-tru 1544  df-fal 1554  df-ex 1782  df-nf 1786  df-sb 2068  df-mo 2534  df-eu 2563  df-clab 2710  df-cleq 2724  df-clel 2810  df-nfc 2885  df-ne 2941  df-nel 3047  df-ral 3062  df-rex 3071  df-rmo 3376  df-reu 3377  df-rab 3433  df-v 3476  df-sbc 3778  df-csb 3894  df-dif 3951  df-un 3953  df-in 3955  df-ss 3965  df-pss 3967  df-nul 4323  df-if 4529  df-pw 4604  df-sn 4629  df-pr 4631  df-op 4635  df-uni 4909  df-int 4951  df-iun 4999  df-iin 5000  df-br 5149  df-opab 5211  df-mpt 5232  df-tr 5266  df-id 5574  df-eprel 5580  df-po 5588  df-so 5589  df-fr 5631  df-se 5632  df-we 5633  df-xp 5682  df-rel 5683  df-cnv 5684  df-co 5685  df-dm 5686  df-rn 5687  df-res 5688  df-ima 5689  df-pred 6300  df-ord 6367  df-on 6368  df-lim 6369  df-suc 6370  df-iota 6495  df-fun 6545  df-fn 6546  df-f 6547  df-f1 6548  df-fo 6549  df-f1o 6550  df-fv 6551  df-isom 6552  df-riota 7367  df-ov 7414  df-oprab 7415  df-mpo 7416  df-of 7672  df-om 7858  df-1st 7977  df-2nd 7978  df-supp 8149  df-frecs 8268  df-wrecs 8299  df-recs 8373  df-rdg 8412  df-1o 8468  df-er 8705  df-en 8942  df-dom 8943  df-sdom 8944  df-fin 8945  df-fsupp 9364  df-oi 9507  df-card 9936  df-pnf 11252  df-mnf 11253  df-xr 11254  df-ltxr 11255  df-le 11256  df-sub 11448  df-neg 11449  df-nn 12215  df-2 12277  df-n0 12475  df-z 12561  df-uz 12825  df-fz 13487  df-fzo 13630  df-seq 13969  df-hash 14293  df-sets 17099  df-slot 17117  df-ndx 17129  df-base 17147  df-ress 17176  df-plusg 17212  df-0g 17389  df-gsum 17390  df-mre 17532  df-mrc 17533  df-acs 17535  df-mgm 18563  df-sgrp 18612  df-mnd 18628  df-submnd 18674  df-mulg 18953  df-cntz 19183  df-cmn 19652

This theorem is referenced by:  elrspunidl  32591