Theorem gsumhashmul 33027

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 8117	. . . . . . . 8 ⊢ (𝐹 supp 0 ) ⊆ dom 𝐹
3	2, 1	fssdm 6675	. . . . . . 7 ⊢ (𝜑 → (𝐹 supp 0 ) ⊆ 𝐴)
4	1, 3	feqresmpt 6896	. . . . . 6 ⊢ (𝜑 → (𝐹 ↾ (𝐹 supp 0 )) = (𝑥 ∈ (𝐹 supp 0 ) ↦ (𝐹‘𝑥)))
5	4	oveq2d 7369	. . . . 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 9272	. . . . . . . . 9 ⊢ Rel finSupp
11	10	brrelex1i 5679	. . . . . . . 8 ⊢ (𝐹 finSupp 0 → 𝐹 ∈ V)
12	9, 11	syl 17	. . . . . . 7 ⊢ (𝜑 → 𝐹 ∈ V)
13	1	ffnd 6657	. . . . . . 7 ⊢ (𝜑 → 𝐹 Fn 𝐴)
14	12, 13	fndmexd 7844	. . . . . 6 ⊢ (𝜑 → 𝐴 ∈ V)
15		ssidd 3961	. . . . . 6 ⊢ (𝜑 → (𝐹 supp 0 ) ⊆ (𝐹 supp 0 ))
16	6, 7, 8, 14, 1, 15, 9	gsumres 19810	. . . . 5 ⊢ (𝜑 → (𝐺 Σg (𝐹 ↾ (𝐹 supp 0 ))) = (𝐺 Σg 𝐹))
17		nfcv 2891	. . . . . 6 ⊢ Ⅎ𝑥(𝐹‘(1st ‘𝑧))
18		fveq2 6826	. . . . . 6 ⊢ (𝑥 = (1st ‘𝑧) → (𝐹‘𝑥) = (𝐹‘(1st ‘𝑧)))
19	9	fsuppimpd 9278	. . . . . 6 ⊢ (𝜑 → (𝐹 supp 0 ) ∈ Fin)
20		ssidd 3961	. . . . . 6 ⊢ (𝜑 → 𝐵 ⊆ 𝐵)
21	1	adantr 480	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) → 𝐹:𝐴⟶𝐵)
22	3	sselda 3937	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) → 𝑥 ∈ 𝐴)
23	21, 22	ffvelcdmd 7023	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) → (𝐹‘𝑥) ∈ 𝐵)
24	1	ffund 6660	. . . . . . . . 9 ⊢ (𝜑 → Fun 𝐹)
25		funrel 6503	. . . . . . . . 9 ⊢ (Fun 𝐹 → Rel 𝐹)
26		reldif 5762	. . . . . . . . 9 ⊢ (Rel 𝐹 → Rel (𝐹 ∖ (V × { 0 })))
27	24, 25, 26	3syl 18	. . . . . . . 8 ⊢ (𝜑 → Rel (𝐹 ∖ (V × { 0 })))
28		1stdm 7982	. . . . . . . 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 6840	. . . . . . . . . . . 12 ⊢ 0 ∈ V
31	30	a1i 11	. . . . . . . . . . 11 ⊢ (𝜑 → 0 ∈ V)
32		fressupp 32644	. . . . . . . . . . 11 ⊢ ((Fun 𝐹 ∧ 𝐹 ∈ V ∧ 0 ∈ V) → (𝐹 ↾ (𝐹 supp 0 )) = (𝐹 ∖ (V × { 0 })))
33	24, 12, 31, 32	syl3anc 1373	. . . . . . . . . 10 ⊢ (𝜑 → (𝐹 ↾ (𝐹 supp 0 )) = (𝐹 ∖ (V × { 0 })))
34	33	dmeqd 5852	. . . . . . . . 9 ⊢ (𝜑 → dom (𝐹 ↾ (𝐹 supp 0 )) = dom (𝐹 ∖ (V × { 0 })))
35	2	a1i 11	. . . . . . . . . 10 ⊢ (𝜑 → (𝐹 supp 0 ) ⊆ dom 𝐹)
36		ssdmres 5968	. . . . . . . . . 10 ⊢ ((𝐹 supp 0 ) ⊆ dom 𝐹 ↔ dom (𝐹 ↾ (𝐹 supp 0 )) = (𝐹 supp 0 ))
37	35, 36	sylib 218	. . . . . . . . 9 ⊢ (𝜑 → dom (𝐹 ↾ (𝐹 supp 0 )) = (𝐹 supp 0 ))
38	34, 37	eqtr3d 2766	. . . . . . . 8 ⊢ (𝜑 → dom (𝐹 ∖ (V × { 0 })) = (𝐹 supp 0 ))
39	38	adantr 480	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) → dom (𝐹 ∖ (V × { 0 })) = (𝐹 supp 0 ))
40	29, 39	eleqtrd 2830	. . . . . 6 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) → (1st ‘𝑧) ∈ (𝐹 supp 0 ))
41	24	funresd 6529	. . . . . . . . . . 11 ⊢ (𝜑 → Fun (𝐹 ↾ (𝐹 supp 0 )))
42	41	adantr 480	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) → Fun (𝐹 ↾ (𝐹 supp 0 )))
43	37	eleq2d 2814	. . . . . . . . . . 11 ⊢ (𝜑 → (𝑥 ∈ dom (𝐹 ↾ (𝐹 supp 0 )) ↔ 𝑥 ∈ (𝐹 supp 0 )))
44	43	biimpar 477	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) → 𝑥 ∈ dom (𝐹 ↾ (𝐹 supp 0 )))
45		simpr 484	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) → 𝑥 ∈ (𝐹 supp 0 ))
46	45	fvresd 6846	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) → ((𝐹 ↾ (𝐹 supp 0 ))‘𝑥) = (𝐹‘𝑥))
47		funopfvb 6881	. . . . . . . . . . 11 ⊢ ((Fun (𝐹 ↾ (𝐹 supp 0 )) ∧ 𝑥 ∈ dom (𝐹 ↾ (𝐹 supp 0 ))) → (((𝐹 ↾ (𝐹 supp 0 ))‘𝑥) = (𝐹‘𝑥) ↔ ⟨𝑥, (𝐹‘𝑥)⟩ ∈ (𝐹 ↾ (𝐹 supp 0 ))))
48	47	biimpa 476	. . . . . . . . . 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 480	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) → (𝐹 ↾ (𝐹 supp 0 )) = (𝐹 ∖ (V × { 0 })))
51	49, 50	eleqtrd 2830	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) → ⟨𝑥, (𝐹‘𝑥)⟩ ∈ (𝐹 ∖ (V × { 0 })))
52		eqeq2 2741	. . . . . . . . . . 11 ⊢ (𝑣 = ⟨𝑥, (𝐹‘𝑥)⟩ → (𝑧 = 𝑣 ↔ 𝑧 = ⟨𝑥, (𝐹‘𝑥)⟩))
53	52	bibi2d 342	. . . . . . . . . 10 ⊢ (𝑣 = ⟨𝑥, (𝐹‘𝑥)⟩ → ((𝑥 = (1st ‘𝑧) ↔ 𝑧 = 𝑣) ↔ (𝑥 = (1st ‘𝑧) ↔ 𝑧 = ⟨𝑥, (𝐹‘𝑥)⟩)))
54	53	ralbidv 3152	. . . . . . . . 9 ⊢ (𝑣 = ⟨𝑥, (𝐹‘𝑥)⟩ → (∀𝑧 ∈ (𝐹 ∖ (V × { 0 }))(𝑥 = (1st ‘𝑧) ↔ 𝑧 = 𝑣) ↔ ∀𝑧 ∈ (𝐹 ∖ (V × { 0 }))(𝑥 = (1st ‘𝑧) ↔ 𝑧 = ⟨𝑥, (𝐹‘𝑥)⟩)))
55	54	adantl 481	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) ∧ 𝑣 = ⟨𝑥, (𝐹‘𝑥)⟩) → (∀𝑧 ∈ (𝐹 ∖ (V × { 0 }))(𝑥 = (1st ‘𝑧) ↔ 𝑧 = 𝑣) ↔ ∀𝑧 ∈ (𝐹 ∖ (V × { 0 }))(𝑥 = (1st ‘𝑧) ↔ 𝑧 = ⟨𝑥, (𝐹‘𝑥)⟩)))
56		fvexd 6841	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑥 = (1st ‘𝑧)) → (2nd ‘𝑧) ∈ V)
57	27	ad3antrrr 730	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑥 = (1st ‘𝑧)) → Rel (𝐹 ∖ (V × { 0 })))
58		simplr 768	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑥 = (1st ‘𝑧)) → 𝑧 ∈ (𝐹 ∖ (V × { 0 })))
59		1st2nd 7981	. . . . . . . . . . . . . . . . 17 ⊢ ((Rel (𝐹 ∖ (V × { 0 })) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) → 𝑧 = ⟨(1st ‘𝑧), (2nd ‘𝑧)⟩)
60	57, 58, 59	syl2anc 584	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑥 = (1st ‘𝑧)) → 𝑧 = ⟨(1st ‘𝑧), (2nd ‘𝑧)⟩)
61		opeq1 4827	. . . . . . . . . . . . . . . . 17 ⊢ (𝑥 = (1st ‘𝑧) → ⟨𝑥, (2nd ‘𝑧)⟩ = ⟨(1st ‘𝑧), (2nd ‘𝑧)⟩)
62	61	adantl 481	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑥 = (1st ‘𝑧)) → ⟨𝑥, (2nd ‘𝑧)⟩ = ⟨(1st ‘𝑧), (2nd ‘𝑧)⟩)
63	60, 62	eqtr4d 2767	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑥 = (1st ‘𝑧)) → 𝑧 = ⟨𝑥, (2nd ‘𝑧)⟩)
64		difssd 4090	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) → (𝐹 ∖ (V × { 0 })) ⊆ 𝐹)
65	64	sselda 3937	. . . . . . . . . . . . . . . . 17 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) → 𝑧 ∈ 𝐹)
66	65	adantr 480	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑥 = (1st ‘𝑧)) → 𝑧 ∈ 𝐹)
67	63, 66	eqeltrrd 2829	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑥 = (1st ‘𝑧)) → ⟨𝑥, (2nd ‘𝑧)⟩ ∈ 𝐹)
68	63, 67	jca 511	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑥 = (1st ‘𝑧)) → (𝑧 = ⟨𝑥, (2nd ‘𝑧)⟩ ∧ ⟨𝑥, (2nd ‘𝑧)⟩ ∈ 𝐹))
69		opeq2 4828	. . . . . . . . . . . . . . . 16 ⊢ (𝑦 = (2nd ‘𝑧) → ⟨𝑥, 𝑦⟩ = ⟨𝑥, (2nd ‘𝑧)⟩)
70	69	eqeq2d 2740	. . . . . . . . . . . . . . 15 ⊢ (𝑦 = (2nd ‘𝑧) → (𝑧 = ⟨𝑥, 𝑦⟩ ↔ 𝑧 = ⟨𝑥, (2nd ‘𝑧)⟩))
71	69	eleq1d 2813	. . . . . . . . . . . . . . 15 ⊢ (𝑦 = (2nd ‘𝑧) → (⟨𝑥, 𝑦⟩ ∈ 𝐹 ↔ ⟨𝑥, (2nd ‘𝑧)⟩ ∈ 𝐹))
72	70, 71	anbi12d 632	. . . . . . . . . . . . . 14 ⊢ (𝑦 = (2nd ‘𝑧) → ((𝑧 = ⟨𝑥, 𝑦⟩ ∧ ⟨𝑥, 𝑦⟩ ∈ 𝐹) ↔ (𝑧 = ⟨𝑥, (2nd ‘𝑧)⟩ ∧ ⟨𝑥, (2nd ‘𝑧)⟩ ∈ 𝐹)))
73	56, 68, 72	spcedv 3555	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑥 = (1st ‘𝑧)) → ∃𝑦(𝑧 = ⟨𝑥, 𝑦⟩ ∧ ⟨𝑥, 𝑦⟩ ∈ 𝐹))
74		vex 3442	. . . . . . . . . . . . . 14 ⊢ 𝑥 ∈ V
75	74	elsnres 5976	. . . . . . . . . . . . 13 ⊢ (𝑧 ∈ (𝐹 ↾ {𝑥}) ↔ ∃𝑦(𝑧 = ⟨𝑥, 𝑦⟩ ∧ ⟨𝑥, 𝑦⟩ ∈ 𝐹))
76	73, 75	sylibr 234	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑥 = (1st ‘𝑧)) → 𝑧 ∈ (𝐹 ↾ {𝑥}))
77	13	ad3antrrr 730	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑥 = (1st ‘𝑧)) → 𝐹 Fn 𝐴)
78	22	ad2antrr 726	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑥 = (1st ‘𝑧)) → 𝑥 ∈ 𝐴)
79		fnressn 7096	. . . . . . . . . . . . 13 ⊢ ((𝐹 Fn 𝐴 ∧ 𝑥 ∈ 𝐴) → (𝐹 ↾ {𝑥}) = {⟨𝑥, (𝐹‘𝑥)⟩})
80	77, 78, 79	syl2anc 584	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑥 = (1st ‘𝑧)) → (𝐹 ↾ {𝑥}) = {⟨𝑥, (𝐹‘𝑥)⟩})
81	76, 80	eleqtrd 2830	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑥 = (1st ‘𝑧)) → 𝑧 ∈ {⟨𝑥, (𝐹‘𝑥)⟩})
82		elsni 4596	. . . . . . . . . . 11 ⊢ (𝑧 ∈ {⟨𝑥, (𝐹‘𝑥)⟩} → 𝑧 = ⟨𝑥, (𝐹‘𝑥)⟩)
83	81, 82	syl 17	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑥 = (1st ‘𝑧)) → 𝑧 = ⟨𝑥, (𝐹‘𝑥)⟩)
84		simpr 484	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑧 = ⟨𝑥, (𝐹‘𝑥)⟩) → 𝑧 = ⟨𝑥, (𝐹‘𝑥)⟩)
85	84	fveq2d 6830	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑧 = ⟨𝑥, (𝐹‘𝑥)⟩) → (1st ‘𝑧) = (1st ‘⟨𝑥, (𝐹‘𝑥)⟩))
86		fvex 6839	. . . . . . . . . . . 12 ⊢ (𝐹‘𝑥) ∈ V
87	74, 86	op1st 7939	. . . . . . . . . . 11 ⊢ (1st ‘⟨𝑥, (𝐹‘𝑥)⟩) = 𝑥
88	85, 87	eqtr2di 2781	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑧 = ⟨𝑥, (𝐹‘𝑥)⟩) → 𝑥 = (1st ‘𝑧))
89	83, 88	impbida 800	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) → (𝑥 = (1st ‘𝑧) ↔ 𝑧 = ⟨𝑥, (𝐹‘𝑥)⟩))
90	89	ralrimiva 3121	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) → ∀𝑧 ∈ (𝐹 ∖ (V × { 0 }))(𝑥 = (1st ‘𝑧) ↔ 𝑧 = ⟨𝑥, (𝐹‘𝑥)⟩))
91	51, 55, 90	rspcedvd 3581	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) → ∃𝑣 ∈ (𝐹 ∖ (V × { 0 }))∀𝑧 ∈ (𝐹 ∖ (V × { 0 }))(𝑥 = (1st ‘𝑧) ↔ 𝑧 = 𝑣))
92		reu6 3688	. . . . . . 7 ⊢ (∃!𝑧 ∈ (𝐹 ∖ (V × { 0 }))𝑥 = (1st ‘𝑧) ↔ ∃𝑣 ∈ (𝐹 ∖ (V × { 0 }))∀𝑧 ∈ (𝐹 ∖ (V × { 0 }))(𝑥 = (1st ‘𝑧) ↔ 𝑧 = 𝑣))
93	91, 92	sylibr 234	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐹 supp 0 )) → ∃!𝑧 ∈ (𝐹 ∖ (V × { 0 }))𝑥 = (1st ‘𝑧))
94	17, 6, 7, 18, 8, 19, 20, 23, 40, 93	gsummptf1o 19860	. . . . 5 ⊢ (𝜑 → (𝐺 Σg (𝑥 ∈ (𝐹 supp 0 ) ↦ (𝐹‘𝑥))) = (𝐺 Σg (𝑧 ∈ (𝐹 ∖ (V × { 0 })) ↦ (𝐹‘(1st ‘𝑧)))))
95	5, 16, 94	3eqtr3d 2772	. . . 4 ⊢ (𝜑 → (𝐺 Σg 𝐹) = (𝐺 Σg (𝑧 ∈ (𝐹 ∖ (V × { 0 })) ↦ (𝐹‘(1st ‘𝑧)))))
96		simpr 484	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) → 𝑧 ∈ (𝐹 ∖ (V × { 0 })))
97	96	eldifad 3917	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) → 𝑧 ∈ 𝐹)
98		funfv1st2nd 7988	. . . . . . 7 ⊢ ((Fun 𝐹 ∧ 𝑧 ∈ 𝐹) → (𝐹‘(1st ‘𝑧)) = (2nd ‘𝑧))
99	24, 97, 98	syl2an2r 685	. . . . . 6 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) → (𝐹‘(1st ‘𝑧)) = (2nd ‘𝑧))
100	99	mpteq2dva 5188	. . . . 5 ⊢ (𝜑 → (𝑧 ∈ (𝐹 ∖ (V × { 0 })) ↦ (𝐹‘(1st ‘𝑧))) = (𝑧 ∈ (𝐹 ∖ (V × { 0 })) ↦ (2nd ‘𝑧)))
101	100	oveq2d 7369	. . . 4 ⊢ (𝜑 → (𝐺 Σg (𝑧 ∈ (𝐹 ∖ (V × { 0 })) ↦ (𝐹‘(1st ‘𝑧)))) = (𝐺 Σg (𝑧 ∈ (𝐹 ∖ (V × { 0 })) ↦ (2nd ‘𝑧))))
102	95, 101	eqtrd 2764	. . 3 ⊢ (𝜑 → (𝐺 Σg 𝐹) = (𝐺 Σg (𝑧 ∈ (𝐹 ∖ (V × { 0 })) ↦ (2nd ‘𝑧))))
103		nfcv 2891	. . . 4 ⊢ Ⅎ𝑧(1st ‘𝑡)
104		fvex 6839	. . . . 5 ⊢ (2nd ‘𝑡) ∈ V
105		fvex 6839	. . . . 5 ⊢ (1st ‘𝑡) ∈ V
106	104, 105	op2ndd 7942	. . . 4 ⊢ (𝑧 = ⟨(2nd ‘𝑡), (1st ‘𝑡)⟩ → (2nd ‘𝑧) = (1st ‘𝑡))
107		resfnfinfin 9246	. . . . . 6 ⊢ ((𝐹 Fn 𝐴 ∧ (𝐹 supp 0 ) ∈ Fin) → (𝐹 ↾ (𝐹 supp 0 )) ∈ Fin)
108	13, 19, 107	syl2anc 584	. . . . 5 ⊢ (𝜑 → (𝐹 ↾ (𝐹 supp 0 )) ∈ Fin)
109	33, 108	eqeltrrd 2829	. . . 4 ⊢ (𝜑 → (𝐹 ∖ (V × { 0 })) ∈ Fin)
110	33	rneqd 5884	. . . . 5 ⊢ (𝜑 → ran (𝐹 ↾ (𝐹 supp 0 )) = ran (𝐹 ∖ (V × { 0 })))
111		rnresss 5972	. . . . . 6 ⊢ ran (𝐹 ↾ (𝐹 supp 0 )) ⊆ ran 𝐹
112	1	frnd 6664	. . . . . 6 ⊢ (𝜑 → ran 𝐹 ⊆ 𝐵)
113	111, 112	sstrid 3949	. . . . 5 ⊢ (𝜑 → ran (𝐹 ↾ (𝐹 supp 0 )) ⊆ 𝐵)
114	110, 113	eqsstrrd 3973	. . . 4 ⊢ (𝜑 → ran (𝐹 ∖ (V × { 0 })) ⊆ 𝐵)
115		2ndrn 7983	. . . . 5 ⊢ ((Rel (𝐹 ∖ (V × { 0 })) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) → (2nd ‘𝑧) ∈ ran (𝐹 ∖ (V × { 0 })))
116	27, 115	sylan 580	. . . 4 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) → (2nd ‘𝑧) ∈ ran (𝐹 ∖ (V × { 0 })))
117		relcnv 6059	. . . . . . . 8 ⊢ Rel ◡𝐹
118		reldif 5762	. . . . . . . 8 ⊢ (Rel ◡𝐹 → Rel (◡𝐹 ∖ ({ 0 } × V)))
119	117, 118	mp1i 13	. . . . . . 7 ⊢ (𝜑 → Rel (◡𝐹 ∖ ({ 0 } × V)))
120		1st2nd 7981	. . . . . . 7 ⊢ ((Rel (◡𝐹 ∖ ({ 0 } × V)) ∧ 𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V))) → 𝑡 = ⟨(1st ‘𝑡), (2nd ‘𝑡)⟩)
121	119, 120	sylan 580	. . . . . 6 ⊢ ((𝜑 ∧ 𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V))) → 𝑡 = ⟨(1st ‘𝑡), (2nd ‘𝑡)⟩)
122		cnvdif 6096	. . . . . . . . . 10 ⊢ ◡(𝐹 ∖ (V × { 0 })) = (◡𝐹 ∖ ◡(V × { 0 }))
123		cnvxp 6110	. . . . . . . . . . 11 ⊢ ◡(V × { 0 }) = ({ 0 } × V)
124	123	difeq2i 4076	. . . . . . . . . 10 ⊢ (◡𝐹 ∖ ◡(V × { 0 })) = (◡𝐹 ∖ ({ 0 } × V))
125	122, 124	eqtri 2752	. . . . . . . . 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 3937	. . . . . 6 ⊢ ((𝜑 ∧ 𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V))) → 𝑡 ∈ ◡(𝐹 ∖ (V × { 0 })))
129	121, 128	eqeltrrd 2829	. . . . 5 ⊢ ((𝜑 ∧ 𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V))) → ⟨(1st ‘𝑡), (2nd ‘𝑡)⟩ ∈ ◡(𝐹 ∖ (V × { 0 })))
130	105, 104	opelcnv 5828	. . . . 5 ⊢ (⟨(1st ‘𝑡), (2nd ‘𝑡)⟩ ∈ ◡(𝐹 ∖ (V × { 0 })) ↔ ⟨(2nd ‘𝑡), (1st ‘𝑡)⟩ ∈ (𝐹 ∖ (V × { 0 })))
131	129, 130	sylib 218	. . . 4 ⊢ ((𝜑 ∧ 𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V))) → ⟨(2nd ‘𝑡), (1st ‘𝑡)⟩ ∈ (𝐹 ∖ (V × { 0 })))
132	27	adantr 480	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) → Rel (𝐹 ∖ (V × { 0 })))
133		eqidd 2730	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) → ∪ ◡{𝑧} = ∪ ◡{𝑧})
134		cnvf1olem 8050	. . . . . . . . 9 ⊢ ((Rel (𝐹 ∖ (V × { 0 })) ∧ (𝑧 ∈ (𝐹 ∖ (V × { 0 })) ∧ ∪ ◡{𝑧} = ∪ ◡{𝑧})) → (∪ ◡{𝑧} ∈ ◡(𝐹 ∖ (V × { 0 })) ∧ 𝑧 = ∪ ◡{∪ ◡{𝑧}}))
135	134	simpld 494	. . . . . . . 8 ⊢ ((Rel (𝐹 ∖ (V × { 0 })) ∧ (𝑧 ∈ (𝐹 ∖ (V × { 0 })) ∧ ∪ ◡{𝑧} = ∪ ◡{𝑧})) → ∪ ◡{𝑧} ∈ ◡(𝐹 ∖ (V × { 0 })))
136	132, 96, 133, 135	syl12anc 836	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) → ∪ ◡{𝑧} ∈ ◡(𝐹 ∖ (V × { 0 })))
137	136, 125	eleqtrdi 2838	. . . . . 6 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) → ∪ ◡{𝑧} ∈ (◡𝐹 ∖ ({ 0 } × V)))
138		eqeq2 2741	. . . . . . . . 9 ⊢ (𝑢 = ∪ ◡{𝑧} → (𝑡 = 𝑢 ↔ 𝑡 = ∪ ◡{𝑧}))
139	138	bibi2d 342	. . . . . . . 8 ⊢ (𝑢 = ∪ ◡{𝑧} → ((𝑧 = ⟨(2nd ‘𝑡), (1st ‘𝑡)⟩ ↔ 𝑡 = 𝑢) ↔ (𝑧 = ⟨(2nd ‘𝑡), (1st ‘𝑡)⟩ ↔ 𝑡 = ∪ ◡{𝑧})))
140	139	ralbidv 3152	. . . . . . 7 ⊢ (𝑢 = ∪ ◡{𝑧} → (∀𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V))(𝑧 = ⟨(2nd ‘𝑡), (1st ‘𝑡)⟩ ↔ 𝑡 = 𝑢) ↔ ∀𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V))(𝑧 = ⟨(2nd ‘𝑡), (1st ‘𝑡)⟩ ↔ 𝑡 = ∪ ◡{𝑧})))
141	140	adantl 481	. . . . . 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 484	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V))) ∧ 𝑧 = ⟨(2nd ‘𝑡), (1st ‘𝑡)⟩) → 𝑧 = ⟨(2nd ‘𝑡), (1st ‘𝑡)⟩)
145		df-rel 5630	. . . . . . . . . . . . . 14 ⊢ (Rel (◡𝐹 ∖ ({ 0 } × V)) ↔ (◡𝐹 ∖ ({ 0 } × V)) ⊆ (V × V))
146	119, 145	sylib 218	. . . . . . . . . . . . 13 ⊢ (𝜑 → (◡𝐹 ∖ ({ 0 } × V)) ⊆ (V × V))
147	146	ad3antrrr 730	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V))) ∧ 𝑧 = ⟨(2nd ‘𝑡), (1st ‘𝑡)⟩) → (◡𝐹 ∖ ({ 0 } × V)) ⊆ (V × V))
148	147, 143	sseldd 3938	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V))) ∧ 𝑧 = ⟨(2nd ‘𝑡), (1st ‘𝑡)⟩) → 𝑡 ∈ (V × V))
149		2nd1st 7980	. . . . . . . . . . 11 ⊢ (𝑡 ∈ (V × V) → ∪ ◡{𝑡} = ⟨(2nd ‘𝑡), (1st ‘𝑡)⟩)
150	148, 149	syl 17	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V))) ∧ 𝑧 = ⟨(2nd ‘𝑡), (1st ‘𝑡)⟩) → ∪ ◡{𝑡} = ⟨(2nd ‘𝑡), (1st ‘𝑡)⟩)
151	144, 150	eqtr4d 2767	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V))) ∧ 𝑧 = ⟨(2nd ‘𝑡), (1st ‘𝑡)⟩) → 𝑧 = ∪ ◡{𝑡})
152		cnvf1olem 8050	. . . . . . . . . 10 ⊢ ((Rel (◡𝐹 ∖ ({ 0 } × V)) ∧ (𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V)) ∧ 𝑧 = ∪ ◡{𝑡})) → (𝑧 ∈ ◡(◡𝐹 ∖ ({ 0 } × V)) ∧ 𝑡 = ∪ ◡{𝑧}))
153	152	simprd 495	. . . . . . . . 9 ⊢ ((Rel (◡𝐹 ∖ ({ 0 } × V)) ∧ (𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V)) ∧ 𝑧 = ∪ ◡{𝑡})) → 𝑡 = ∪ ◡{𝑧})
154	142, 143, 151, 153	syl12anc 836	. . . . . . . 8 ⊢ ((((𝜑 ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V))) ∧ 𝑧 = ⟨(2nd ‘𝑡), (1st ‘𝑡)⟩) → 𝑡 = ∪ ◡{𝑧})
155	27	ad3antrrr 730	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V))) ∧ 𝑡 = ∪ ◡{𝑧}) → Rel (𝐹 ∖ (V × { 0 })))
156	96	ad2antrr 726	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V))) ∧ 𝑡 = ∪ ◡{𝑧}) → 𝑧 ∈ (𝐹 ∖ (V × { 0 })))
157		simpr 484	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V))) ∧ 𝑡 = ∪ ◡{𝑧}) → 𝑡 = ∪ ◡{𝑧})
158		cnvf1olem 8050	. . . . . . . . . . 11 ⊢ ((Rel (𝐹 ∖ (V × { 0 })) ∧ (𝑧 ∈ (𝐹 ∖ (V × { 0 })) ∧ 𝑡 = ∪ ◡{𝑧})) → (𝑡 ∈ ◡(𝐹 ∖ (V × { 0 })) ∧ 𝑧 = ∪ ◡{𝑡}))
159	158	simprd 495	. . . . . . . . . 10 ⊢ ((Rel (𝐹 ∖ (V × { 0 })) ∧ (𝑧 ∈ (𝐹 ∖ (V × { 0 })) ∧ 𝑡 = ∪ ◡{𝑧})) → 𝑧 = ∪ ◡{𝑡})
160	155, 156, 157, 159	syl12anc 836	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V))) ∧ 𝑡 = ∪ ◡{𝑧}) → 𝑧 = ∪ ◡{𝑡})
161	146	ad3antrrr 730	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V))) ∧ 𝑡 = ∪ ◡{𝑧}) → (◡𝐹 ∖ ({ 0 } × V)) ⊆ (V × V))
162		simplr 768	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V))) ∧ 𝑡 = ∪ ◡{𝑧}) → 𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V)))
163	161, 162	sseldd 3938	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V))) ∧ 𝑡 = ∪ ◡{𝑧}) → 𝑡 ∈ (V × V))
164	163, 149	syl 17	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V))) ∧ 𝑡 = ∪ ◡{𝑧}) → ∪ ◡{𝑡} = ⟨(2nd ‘𝑡), (1st ‘𝑡)⟩)
165	160, 164	eqtrd 2764	. . . . . . . 8 ⊢ ((((𝜑 ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V))) ∧ 𝑡 = ∪ ◡{𝑧}) → 𝑧 = ⟨(2nd ‘𝑡), (1st ‘𝑡)⟩)
166	154, 165	impbida 800	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V))) → (𝑧 = ⟨(2nd ‘𝑡), (1st ‘𝑡)⟩ ↔ 𝑡 = ∪ ◡{𝑧}))
167	166	ralrimiva 3121	. . . . . 6 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) → ∀𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V))(𝑧 = ⟨(2nd ‘𝑡), (1st ‘𝑡)⟩ ↔ 𝑡 = ∪ ◡{𝑧}))
168	137, 141, 167	rspcedvd 3581	. . . . 5 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) → ∃𝑢 ∈ (◡𝐹 ∖ ({ 0 } × V))∀𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V))(𝑧 = ⟨(2nd ‘𝑡), (1st ‘𝑡)⟩ ↔ 𝑡 = 𝑢))
169		reu6 3688	. . . . 5 ⊢ (∃!𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V))𝑧 = ⟨(2nd ‘𝑡), (1st ‘𝑡)⟩ ↔ ∃𝑢 ∈ (◡𝐹 ∖ ({ 0 } × V))∀𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V))(𝑧 = ⟨(2nd ‘𝑡), (1st ‘𝑡)⟩ ↔ 𝑡 = 𝑢))
170	168, 169	sylibr 234	. . . 4 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) → ∃!𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V))𝑧 = ⟨(2nd ‘𝑡), (1st ‘𝑡)⟩)
171	103, 6, 7, 106, 8, 109, 114, 116, 131, 170	gsummptf1o 19860	. . 3 ⊢ (𝜑 → (𝐺 Σg (𝑧 ∈ (𝐹 ∖ (V × { 0 })) ↦ (2nd ‘𝑧))) = (𝐺 Σg (𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V)) ↦ (1st ‘𝑡))))
172		fveq2 6826	. . . . . 6 ⊢ (𝑡 = 𝑧 → (1st ‘𝑡) = (1st ‘𝑧))
173	172	cbvmptv 5199	. . . . 5 ⊢ (𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V)) ↦ (1st ‘𝑡)) = (𝑧 ∈ (◡𝐹 ∖ ({ 0 } × V)) ↦ (1st ‘𝑧))
174	33	cnveqd 5822	. . . . . . 7 ⊢ (𝜑 → ◡(𝐹 ↾ (𝐹 supp 0 )) = ◡(𝐹 ∖ (V × { 0 })))
175	174, 125	eqtr2di 2781	. . . . . 6 ⊢ (𝜑 → (◡𝐹 ∖ ({ 0 } × V)) = ◡(𝐹 ↾ (𝐹 supp 0 )))
176	175	mpteq1d 5185	. . . . 5 ⊢ (𝜑 → (𝑧 ∈ (◡𝐹 ∖ ({ 0 } × V)) ↦ (1st ‘𝑧)) = (𝑧 ∈ ◡(𝐹 ↾ (𝐹 supp 0 )) ↦ (1st ‘𝑧)))
177	173, 176	eqtrid 2776	. . . 4 ⊢ (𝜑 → (𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V)) ↦ (1st ‘𝑡)) = (𝑧 ∈ ◡(𝐹 ↾ (𝐹 supp 0 )) ↦ (1st ‘𝑧)))
178	177	oveq2d 7369	. . 3 ⊢ (𝜑 → (𝐺 Σg (𝑡 ∈ (◡𝐹 ∖ ({ 0 } × V)) ↦ (1st ‘𝑡))) = (𝐺 Σg (𝑧 ∈ ◡(𝐹 ↾ (𝐹 supp 0 )) ↦ (1st ‘𝑧))))
179	102, 171, 178	3eqtrd 2768	. 2 ⊢ (𝜑 → (𝐺 Σg 𝐹) = (𝐺 Σg (𝑧 ∈ ◡(𝐹 ↾ (𝐹 supp 0 )) ↦ (1st ‘𝑧))))
180		nfcv 2891	. . 3 ⊢ Ⅎ𝑦(1st ‘𝑧)
181		nfv 1914	. . 3 ⊢ Ⅎ𝑥𝜑
182		vex 3442	. . . 4 ⊢ 𝑦 ∈ V
183	74, 182	op1std 7941	. . 3 ⊢ (𝑧 = ⟨𝑥, 𝑦⟩ → (1st ‘𝑧) = 𝑥)
184		relcnv 6059	. . . 4 ⊢ Rel ◡(𝐹 ↾ (𝐹 supp 0 ))
185	184	a1i 11	. . 3 ⊢ (𝜑 → Rel ◡(𝐹 ↾ (𝐹 supp 0 )))
186		cnvfi 9100	. . . 4 ⊢ ((𝐹 ↾ (𝐹 supp 0 )) ∈ Fin → ◡(𝐹 ↾ (𝐹 supp 0 )) ∈ Fin)
187	108, 186	syl 17	. . 3 ⊢ (𝜑 → ◡(𝐹 ↾ (𝐹 supp 0 )) ∈ Fin)
188	112	adantr 480	. . . 4 ⊢ ((𝜑 ∧ 𝑧 ∈ ◡(𝐹 ↾ (𝐹 supp 0 ))) → ran 𝐹 ⊆ 𝐵)
189	184	a1i 11	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑧 ∈ ◡(𝐹 ↾ (𝐹 supp 0 ))) → Rel ◡(𝐹 ↾ (𝐹 supp 0 )))
190		simpr 484	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑧 ∈ ◡(𝐹 ↾ (𝐹 supp 0 ))) → 𝑧 ∈ ◡(𝐹 ↾ (𝐹 supp 0 )))
191		1stdm 7982	. . . . . . 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 5634	. . . . . 6 ⊢ ran (𝐹 ↾ (𝐹 supp 0 )) = dom ◡(𝐹 ↾ (𝐹 supp 0 ))
194	192, 193	eleqtrrdi 2839	. . . . 5 ⊢ ((𝜑 ∧ 𝑧 ∈ ◡(𝐹 ↾ (𝐹 supp 0 ))) → (1st ‘𝑧) ∈ ran (𝐹 ↾ (𝐹 supp 0 )))
195	111, 194	sselid 3935	. . . 4 ⊢ ((𝜑 ∧ 𝑧 ∈ ◡(𝐹 ↾ (𝐹 supp 0 ))) → (1st ‘𝑧) ∈ ran 𝐹)
196	188, 195	sseldd 3938	. . 3 ⊢ ((𝜑 ∧ 𝑧 ∈ ◡(𝐹 ↾ (𝐹 supp 0 ))) → (1st ‘𝑧) ∈ 𝐵)
197	180, 181, 6, 183, 185, 187, 8, 196	gsummpt2d 33015	. 2 ⊢ (𝜑 → (𝐺 Σg (𝑧 ∈ ◡(𝐹 ↾ (𝐹 supp 0 )) ↦ (1st ‘𝑧))) = (𝐺 Σg (𝑥 ∈ dom ◡(𝐹 ↾ (𝐹 supp 0 )) ↦ (𝐺 Σg (𝑦 ∈ (◡(𝐹 ↾ (𝐹 supp 0 )) “ {𝑥}) ↦ 𝑥)))))
198		df-ima 5636	. . . . . . 7 ⊢ (𝐹 “ (𝐹 supp 0 )) = ran (𝐹 ↾ (𝐹 supp 0 ))
199		supppreima 32647	. . . . . . . . 9 ⊢ ((Fun 𝐹 ∧ 𝐹 ∈ V ∧ 0 ∈ V) → (𝐹 supp 0 ) = (◡𝐹 “ (ran 𝐹 ∖ { 0 })))
200	24, 12, 31, 199	syl3anc 1373	. . . . . . . 8 ⊢ (𝜑 → (𝐹 supp 0 ) = (◡𝐹 “ (ran 𝐹 ∖ { 0 })))
201	200	imaeq2d 6015	. . . . . . 7 ⊢ (𝜑 → (𝐹 “ (𝐹 supp 0 )) = (𝐹 “ (◡𝐹 “ (ran 𝐹 ∖ { 0 }))))
202	198, 201	eqtr3id 2778	. . . . . 6 ⊢ (𝜑 → ran (𝐹 ↾ (𝐹 supp 0 )) = (𝐹 “ (◡𝐹 “ (ran 𝐹 ∖ { 0 }))))
203		funimacnv 6567	. . . . . . 7 ⊢ (Fun 𝐹 → (𝐹 “ (◡𝐹 “ (ran 𝐹 ∖ { 0 }))) = ((ran 𝐹 ∖ { 0 }) ∩ ran 𝐹))
204	24, 203	syl 17	. . . . . 6 ⊢ (𝜑 → (𝐹 “ (◡𝐹 “ (ran 𝐹 ∖ { 0 }))) = ((ran 𝐹 ∖ { 0 }) ∩ ran 𝐹))
205		difssd 4090	. . . . . . 7 ⊢ (𝜑 → (ran 𝐹 ∖ { 0 }) ⊆ ran 𝐹)
206		dfss2 3923	. . . . . . 7 ⊢ ((ran 𝐹 ∖ { 0 }) ⊆ ran 𝐹 ↔ ((ran 𝐹 ∖ { 0 }) ∩ ran 𝐹) = (ran 𝐹 ∖ { 0 }))
207	205, 206	sylib 218	. . . . . 6 ⊢ (𝜑 → ((ran 𝐹 ∖ { 0 }) ∩ ran 𝐹) = (ran 𝐹 ∖ { 0 }))
208	202, 204, 207	3eqtrd 2768	. . . . 5 ⊢ (𝜑 → ran (𝐹 ↾ (𝐹 supp 0 )) = (ran 𝐹 ∖ { 0 }))
209	193, 208	eqtr3id 2778	. . . 4 ⊢ (𝜑 → dom ◡(𝐹 ↾ (𝐹 supp 0 )) = (ran 𝐹 ∖ { 0 }))
210	8	cmnmndd 19701	. . . . . . 7 ⊢ (𝜑 → 𝐺 ∈ Mnd)
211	210	adantr 480	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ dom ◡(𝐹 ↾ (𝐹 supp 0 ))) → 𝐺 ∈ Mnd)
212	108	adantr 480	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ dom ◡(𝐹 ↾ (𝐹 supp 0 ))) → (𝐹 ↾ (𝐹 supp 0 )) ∈ Fin)
213		imafi2 32668	. . . . . . 7 ⊢ (◡(𝐹 ↾ (𝐹 supp 0 )) ∈ Fin → (◡(𝐹 ↾ (𝐹 supp 0 )) “ {𝑥}) ∈ Fin)
214	212, 186, 213	3syl 18	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ dom ◡(𝐹 ↾ (𝐹 supp 0 ))) → (◡(𝐹 ↾ (𝐹 supp 0 )) “ {𝑥}) ∈ Fin)
215	193, 113	eqsstrrid 3977	. . . . . . 7 ⊢ (𝜑 → dom ◡(𝐹 ↾ (𝐹 supp 0 )) ⊆ 𝐵)
216	215	sselda 3937	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ dom ◡(𝐹 ↾ (𝐹 supp 0 ))) → 𝑥 ∈ 𝐵)
217		gsumhashmul.x	. . . . . . 7 ⊢ · = (.g‘𝐺)
218	6, 217	gsumconst 19831	. . . . . 6 ⊢ ((𝐺 ∈ Mnd ∧ (◡(𝐹 ↾ (𝐹 supp 0 )) “ {𝑥}) ∈ Fin ∧ 𝑥 ∈ 𝐵) → (𝐺 Σg (𝑦 ∈ (◡(𝐹 ↾ (𝐹 supp 0 )) “ {𝑥}) ↦ 𝑥)) = ((♯‘(◡(𝐹 ↾ (𝐹 supp 0 )) “ {𝑥})) · 𝑥))
219	211, 214, 216, 218	syl3anc 1373	. . . . 5 ⊢ ((𝜑 ∧ 𝑥 ∈ dom ◡(𝐹 ↾ (𝐹 supp 0 ))) → (𝐺 Σg (𝑦 ∈ (◡(𝐹 ↾ (𝐹 supp 0 )) “ {𝑥}) ↦ 𝑥)) = ((♯‘(◡(𝐹 ↾ (𝐹 supp 0 )) “ {𝑥})) · 𝑥))
220		cnvresima 6183	. . . . . . . 8 ⊢ (◡(𝐹 ↾ (𝐹 supp 0 )) “ {𝑥}) = ((◡𝐹 “ {𝑥}) ∩ (𝐹 supp 0 ))
221	209	eleq2d 2814	. . . . . . . . . . . . 13 ⊢ (𝜑 → (𝑥 ∈ dom ◡(𝐹 ↾ (𝐹 supp 0 )) ↔ 𝑥 ∈ (ran 𝐹 ∖ { 0 })))
222	221	biimpa 476	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑥 ∈ dom ◡(𝐹 ↾ (𝐹 supp 0 ))) → 𝑥 ∈ (ran 𝐹 ∖ { 0 }))
223	222	snssd 4763	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑥 ∈ dom ◡(𝐹 ↾ (𝐹 supp 0 ))) → {𝑥} ⊆ (ran 𝐹 ∖ { 0 }))
224		sspreima 7006	. . . . . . . . . . 11 ⊢ ((Fun 𝐹 ∧ {𝑥} ⊆ (ran 𝐹 ∖ { 0 })) → (◡𝐹 “ {𝑥}) ⊆ (◡𝐹 “ (ran 𝐹 ∖ { 0 })))
225	24, 223, 224	syl2an2r 685	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑥 ∈ dom ◡(𝐹 ↾ (𝐹 supp 0 ))) → (◡𝐹 “ {𝑥}) ⊆ (◡𝐹 “ (ran 𝐹 ∖ { 0 })))
226	200	adantr 480	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑥 ∈ dom ◡(𝐹 ↾ (𝐹 supp 0 ))) → (𝐹 supp 0 ) = (◡𝐹 “ (ran 𝐹 ∖ { 0 })))
227	225, 226	sseqtrrd 3975	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑥 ∈ dom ◡(𝐹 ↾ (𝐹 supp 0 ))) → (◡𝐹 “ {𝑥}) ⊆ (𝐹 supp 0 ))
228		dfss2 3923	. . . . . . . . 9 ⊢ ((◡𝐹 “ {𝑥}) ⊆ (𝐹 supp 0 ) ↔ ((◡𝐹 “ {𝑥}) ∩ (𝐹 supp 0 )) = (◡𝐹 “ {𝑥}))
229	227, 228	sylib 218	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ dom ◡(𝐹 ↾ (𝐹 supp 0 ))) → ((◡𝐹 “ {𝑥}) ∩ (𝐹 supp 0 )) = (◡𝐹 “ {𝑥}))
230	220, 229	eqtr2id 2777	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ dom ◡(𝐹 ↾ (𝐹 supp 0 ))) → (◡𝐹 “ {𝑥}) = (◡(𝐹 ↾ (𝐹 supp 0 )) “ {𝑥}))
231	230	fveq2d 6830	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ dom ◡(𝐹 ↾ (𝐹 supp 0 ))) → (♯‘(◡𝐹 “ {𝑥})) = (♯‘(◡(𝐹 ↾ (𝐹 supp 0 )) “ {𝑥})))
232	231	oveq1d 7368	. . . . 5 ⊢ ((𝜑 ∧ 𝑥 ∈ dom ◡(𝐹 ↾ (𝐹 supp 0 ))) → ((♯‘(◡𝐹 “ {𝑥})) · 𝑥) = ((♯‘(◡(𝐹 ↾ (𝐹 supp 0 )) “ {𝑥})) · 𝑥))
233	219, 232	eqtr4d 2767	. . . 4 ⊢ ((𝜑 ∧ 𝑥 ∈ dom ◡(𝐹 ↾ (𝐹 supp 0 ))) → (𝐺 Σg (𝑦 ∈ (◡(𝐹 ↾ (𝐹 supp 0 )) “ {𝑥}) ↦ 𝑥)) = ((♯‘(◡𝐹 “ {𝑥})) · 𝑥))
234	209, 233	mpteq12dva 5181	. . 3 ⊢ (𝜑 → (𝑥 ∈ dom ◡(𝐹 ↾ (𝐹 supp 0 )) ↦ (𝐺 Σg (𝑦 ∈ (◡(𝐹 ↾ (𝐹 supp 0 )) “ {𝑥}) ↦ 𝑥))) = (𝑥 ∈ (ran 𝐹 ∖ { 0 }) ↦ ((♯‘(◡𝐹 “ {𝑥})) · 𝑥)))
235	234	oveq2d 7369	. 2 ⊢ (𝜑 → (𝐺 Σg (𝑥 ∈ dom ◡(𝐹 ↾ (𝐹 supp 0 )) ↦ (𝐺 Σg (𝑦 ∈ (◡(𝐹 ↾ (𝐹 supp 0 )) “ {𝑥}) ↦ 𝑥)))) = (𝐺 Σg (𝑥 ∈ (ran 𝐹 ∖ { 0 }) ↦ ((♯‘(◡𝐹 “ {𝑥})) · 𝑥))))
236	179, 197, 235	3eqtrd 2768	1 ⊢ (𝜑 → (𝐺 Σg 𝐹) = (𝐺 Σg (𝑥 ∈ (ran 𝐹 ∖ { 0 }) ↦ ((♯‘(◡𝐹 “ {𝑥})) · 𝑥))))

Syntax hints:   → wi 4   ↔ wb 206   ∧ wa 395   = wceq 1540  ∃wex 1779   ∈ wcel 2109  ∀wral 3044  ∃wrex 3053  ∃!wreu 3343  Vcvv 3438   ∖ cdif 3902   ∩ cin 3904   ⊆ wss 3905  {csn 4579  ⟨cop 4585  ∪ cuni 4861   class class class wbr 5095   ↦ cmpt 5176   × cxp 5621  ^◡ccnv 5622  dom cdm 5623  ran crn 5624   ↾ cres 5625   “ cima 5626  Rel wrel 5628  Fun wfun 6480   Fn wfn 6481  ⟶wf 6482  ‘cfv 6486  (class class class)co 7353  1^st c1st 7929  2^nd c2nd 7930   supp csupp 8100  Fincfn 8879   finSupp cfsupp 9270  ♯chash 14255  Basecbs 17138  0_gc0g 17361   Σ_g cgsu 17362  Mndcmnd 18626  ._gcmg 18964  CMndccmn 19677

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1795  ax-4 1809  ax-5 1910  ax-6 1967  ax-7 2008  ax-8 2111  ax-9 2119  ax-10 2142  ax-11 2158  ax-12 2178  ax-ext 2701  ax-rep 5221  ax-sep 5238  ax-nul 5248  ax-pow 5307  ax-pr 5374  ax-un 7675  ax-cnex 11084  ax-resscn 11085  ax-1cn 11086  ax-icn 11087  ax-addcl 11088  ax-addrcl 11089  ax-mulcl 11090  ax-mulrcl 11091  ax-mulcom 11092  ax-addass 11093  ax-mulass 11094  ax-distr 11095  ax-i2m1 11096  ax-1ne0 11097  ax-1rid 11098  ax-rnegex 11099  ax-rrecex 11100  ax-cnre 11101  ax-pre-lttri 11102  ax-pre-lttrn 11103  ax-pre-ltadd 11104  ax-pre-mulgt0 11105

This theorem depends on definitions:  df-bi 207  df-an 396  df-or 848  df-3or 1087  df-3an 1088  df-tru 1543  df-fal 1553  df-ex 1780  df-nf 1784  df-sb 2066  df-mo 2533  df-eu 2562  df-clab 2708  df-cleq 2721  df-clel 2803  df-nfc 2878  df-ne 2926  df-nel 3030  df-ral 3045  df-rex 3054  df-rmo 3345  df-reu 3346  df-rab 3397  df-v 3440  df-sbc 3745  df-csb 3854  df-dif 3908  df-un 3910  df-in 3912  df-ss 3922  df-pss 3925  df-nul 4287  df-if 4479  df-pw 4555  df-sn 4580  df-pr 4582  df-op 4586  df-uni 4862  df-int 4900  df-iun 4946  df-iin 4947  df-br 5096  df-opab 5158  df-mpt 5177  df-tr 5203  df-id 5518  df-eprel 5523  df-po 5531  df-so 5532  df-fr 5576  df-se 5577  df-we 5578  df-xp 5629  df-rel 5630  df-cnv 5631  df-co 5632  df-dm 5633  df-rn 5634  df-res 5635  df-ima 5636  df-pred 6253  df-ord 6314  df-on 6315  df-lim 6316  df-suc 6317  df-iota 6442  df-fun 6488  df-fn 6489  df-f 6490  df-f1 6491  df-fo 6492  df-f1o 6493  df-fv 6494  df-isom 6495  df-riota 7310  df-ov 7356  df-oprab 7357  df-mpo 7358  df-of 7617  df-om 7807  df-1st 7931  df-2nd 7932  df-supp 8101  df-frecs 8221  df-wrecs 8252  df-recs 8301  df-rdg 8339  df-1o 8395  df-2o 8396  df-er 8632  df-en 8880  df-dom 8881  df-sdom 8882  df-fin 8883  df-fsupp 9271  df-oi 9421  df-card 9854  df-pnf 11170  df-mnf 11171  df-xr 11172  df-ltxr 11173  df-le 11174  df-sub 11367  df-neg 11368  df-nn 12147  df-2 12209  df-n0 12403  df-z 12490  df-uz 12754  df-fz 13429  df-fzo 13576  df-seq 13927  df-hash 14256  df-sets 17093  df-slot 17111  df-ndx 17123  df-base 17139  df-ress 17160  df-plusg 17192  df-0g 17363  df-gsum 17364  df-mre 17506  df-mrc 17507  df-acs 17509  df-mgm 18532  df-sgrp 18611  df-mnd 18627  df-submnd 18676  df-mulg 18965  df-cntz 19214  df-cmn 19679

This theorem is referenced by:  elrspunidl  33375