Users' Mathboxes Mathbox for Thierry Arnoux < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >   Mathboxes  >  gsumhashmul Structured version   Visualization version   GIF version

Theorem gsumhashmul 33150
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.
StepHypRef Expression
1 gsumhashmul.f . . . . . . 7 (𝜑𝐹:𝐴𝐵)
2 suppssdm 8119 . . . . . . . 8 (𝐹 supp 0 ) ⊆ dom 𝐹
32, 1fssdm 6681 . . . . . . 7 (𝜑 → (𝐹 supp 0 ) ⊆ 𝐴)
41, 3feqresmpt 6903 . . . . . 6 (𝜑 → (𝐹 ↾ (𝐹 supp 0 )) = (𝑥 ∈ (𝐹 supp 0 ) ↦ (𝐹𝑥)))
54oveq2d 7374 . . . . 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 9266 . . . . . . . . 9 Rel finSupp
1110brrelex1i 5680 . . . . . . . 8 (𝐹 finSupp 0𝐹 ∈ V)
129, 11syl 17 . . . . . . 7 (𝜑𝐹 ∈ V)
131ffnd 6663 . . . . . . 7 (𝜑𝐹 Fn 𝐴)
1412, 13fndmexd 7846 . . . . . 6 (𝜑𝐴 ∈ V)
15 ssidd 3957 . . . . . 6 (𝜑 → (𝐹 supp 0 ) ⊆ (𝐹 supp 0 ))
166, 7, 8, 14, 1, 15, 9gsumres 19842 . . . . 5 (𝜑 → (𝐺 Σg (𝐹 ↾ (𝐹 supp 0 ))) = (𝐺 Σg 𝐹))
17 nfcv 2898 . . . . . 6 𝑥(𝐹‘(1st𝑧))
18 fveq2 6834 . . . . . 6 (𝑥 = (1st𝑧) → (𝐹𝑥) = (𝐹‘(1st𝑧)))
199fsuppimpd 9272 . . . . . 6 (𝜑 → (𝐹 supp 0 ) ∈ Fin)
20 ssidd 3957 . . . . . 6 (𝜑𝐵𝐵)
211adantr 480 . . . . . . 7 ((𝜑𝑥 ∈ (𝐹 supp 0 )) → 𝐹:𝐴𝐵)
223sselda 3933 . . . . . . 7 ((𝜑𝑥 ∈ (𝐹 supp 0 )) → 𝑥𝐴)
2321, 22ffvelcdmd 7030 . . . . . 6 ((𝜑𝑥 ∈ (𝐹 supp 0 )) → (𝐹𝑥) ∈ 𝐵)
241ffund 6666 . . . . . . . . 9 (𝜑 → Fun 𝐹)
25 funrel 6509 . . . . . . . . 9 (Fun 𝐹 → Rel 𝐹)
26 reldif 5764 . . . . . . . . 9 (Rel 𝐹 → Rel (𝐹 ∖ (V × { 0 })))
2724, 25, 263syl 18 . . . . . . . 8 (𝜑 → Rel (𝐹 ∖ (V × { 0 })))
28 1stdm 7984 . . . . . . . 8 ((Rel (𝐹 ∖ (V × { 0 })) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) → (1st𝑧) ∈ dom (𝐹 ∖ (V × { 0 })))
2927, 28sylan 580 . . . . . . 7 ((𝜑𝑧 ∈ (𝐹 ∖ (V × { 0 }))) → (1st𝑧) ∈ dom (𝐹 ∖ (V × { 0 })))
307fvexi 6848 . . . . . . . . . . . 12 0 ∈ V
3130a1i 11 . . . . . . . . . . 11 (𝜑0 ∈ V)
32 fressupp 32767 . . . . . . . . . . 11 ((Fun 𝐹𝐹 ∈ V ∧ 0 ∈ V) → (𝐹 ↾ (𝐹 supp 0 )) = (𝐹 ∖ (V × { 0 })))
3324, 12, 31, 32syl3anc 1373 . . . . . . . . . 10 (𝜑 → (𝐹 ↾ (𝐹 supp 0 )) = (𝐹 ∖ (V × { 0 })))
3433dmeqd 5854 . . . . . . . . 9 (𝜑 → dom (𝐹 ↾ (𝐹 supp 0 )) = dom (𝐹 ∖ (V × { 0 })))
352a1i 11 . . . . . . . . . 10 (𝜑 → (𝐹 supp 0 ) ⊆ dom 𝐹)
36 ssdmres 5972 . . . . . . . . . 10 ((𝐹 supp 0 ) ⊆ dom 𝐹 ↔ dom (𝐹 ↾ (𝐹 supp 0 )) = (𝐹 supp 0 ))
3735, 36sylib 218 . . . . . . . . 9 (𝜑 → dom (𝐹 ↾ (𝐹 supp 0 )) = (𝐹 supp 0 ))
3834, 37eqtr3d 2773 . . . . . . . 8 (𝜑 → dom (𝐹 ∖ (V × { 0 })) = (𝐹 supp 0 ))
3938adantr 480 . . . . . . 7 ((𝜑𝑧 ∈ (𝐹 ∖ (V × { 0 }))) → dom (𝐹 ∖ (V × { 0 })) = (𝐹 supp 0 ))
4029, 39eleqtrd 2838 . . . . . 6 ((𝜑𝑧 ∈ (𝐹 ∖ (V × { 0 }))) → (1st𝑧) ∈ (𝐹 supp 0 ))
4124funresd 6535 . . . . . . . . . . 11 (𝜑 → Fun (𝐹 ↾ (𝐹 supp 0 )))
4241adantr 480 . . . . . . . . . 10 ((𝜑𝑥 ∈ (𝐹 supp 0 )) → Fun (𝐹 ↾ (𝐹 supp 0 )))
4337eleq2d 2822 . . . . . . . . . . 11 (𝜑 → (𝑥 ∈ dom (𝐹 ↾ (𝐹 supp 0 )) ↔ 𝑥 ∈ (𝐹 supp 0 )))
4443biimpar 477 . . . . . . . . . 10 ((𝜑𝑥 ∈ (𝐹 supp 0 )) → 𝑥 ∈ dom (𝐹 ↾ (𝐹 supp 0 )))
45 simpr 484 . . . . . . . . . . 11 ((𝜑𝑥 ∈ (𝐹 supp 0 )) → 𝑥 ∈ (𝐹 supp 0 ))
4645fvresd 6854 . . . . . . . . . 10 ((𝜑𝑥 ∈ (𝐹 supp 0 )) → ((𝐹 ↾ (𝐹 supp 0 ))‘𝑥) = (𝐹𝑥))
47 funopfvb 6888 . . . . . . . . . . 11 ((Fun (𝐹 ↾ (𝐹 supp 0 )) ∧ 𝑥 ∈ dom (𝐹 ↾ (𝐹 supp 0 ))) → (((𝐹 ↾ (𝐹 supp 0 ))‘𝑥) = (𝐹𝑥) ↔ ⟨𝑥, (𝐹𝑥)⟩ ∈ (𝐹 ↾ (𝐹 supp 0 ))))
4847biimpa 476 . . . . . . . . . 10 (((Fun (𝐹 ↾ (𝐹 supp 0 )) ∧ 𝑥 ∈ dom (𝐹 ↾ (𝐹 supp 0 ))) ∧ ((𝐹 ↾ (𝐹 supp 0 ))‘𝑥) = (𝐹𝑥)) → ⟨𝑥, (𝐹𝑥)⟩ ∈ (𝐹 ↾ (𝐹 supp 0 )))
4942, 44, 46, 48syl21anc 837 . . . . . . . . 9 ((𝜑𝑥 ∈ (𝐹 supp 0 )) → ⟨𝑥, (𝐹𝑥)⟩ ∈ (𝐹 ↾ (𝐹 supp 0 )))
5033adantr 480 . . . . . . . . 9 ((𝜑𝑥 ∈ (𝐹 supp 0 )) → (𝐹 ↾ (𝐹 supp 0 )) = (𝐹 ∖ (V × { 0 })))
5149, 50eleqtrd 2838 . . . . . . . 8 ((𝜑𝑥 ∈ (𝐹 supp 0 )) → ⟨𝑥, (𝐹𝑥)⟩ ∈ (𝐹 ∖ (V × { 0 })))
52 eqeq2 2748 . . . . . . . . . . 11 (𝑣 = ⟨𝑥, (𝐹𝑥)⟩ → (𝑧 = 𝑣𝑧 = ⟨𝑥, (𝐹𝑥)⟩))
5352bibi2d 342 . . . . . . . . . 10 (𝑣 = ⟨𝑥, (𝐹𝑥)⟩ → ((𝑥 = (1st𝑧) ↔ 𝑧 = 𝑣) ↔ (𝑥 = (1st𝑧) ↔ 𝑧 = ⟨𝑥, (𝐹𝑥)⟩)))
5453ralbidv 3159 . . . . . . . . 9 (𝑣 = ⟨𝑥, (𝐹𝑥)⟩ → (∀𝑧 ∈ (𝐹 ∖ (V × { 0 }))(𝑥 = (1st𝑧) ↔ 𝑧 = 𝑣) ↔ ∀𝑧 ∈ (𝐹 ∖ (V × { 0 }))(𝑥 = (1st𝑧) ↔ 𝑧 = ⟨𝑥, (𝐹𝑥)⟩)))
5554adantl 481 . . . . . . . 8 (((𝜑𝑥 ∈ (𝐹 supp 0 )) ∧ 𝑣 = ⟨𝑥, (𝐹𝑥)⟩) → (∀𝑧 ∈ (𝐹 ∖ (V × { 0 }))(𝑥 = (1st𝑧) ↔ 𝑧 = 𝑣) ↔ ∀𝑧 ∈ (𝐹 ∖ (V × { 0 }))(𝑥 = (1st𝑧) ↔ 𝑧 = ⟨𝑥, (𝐹𝑥)⟩)))
56 fvexd 6849 . . . . . . . . . . . . . 14 ((((𝜑𝑥 ∈ (𝐹 supp 0 )) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑥 = (1st𝑧)) → (2nd𝑧) ∈ V)
5727ad3antrrr 730 . . . . . . . . . . . . . . . . 17 ((((𝜑𝑥 ∈ (𝐹 supp 0 )) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑥 = (1st𝑧)) → Rel (𝐹 ∖ (V × { 0 })))
58 simplr 768 . . . . . . . . . . . . . . . . 17 ((((𝜑𝑥 ∈ (𝐹 supp 0 )) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑥 = (1st𝑧)) → 𝑧 ∈ (𝐹 ∖ (V × { 0 })))
59 1st2nd 7983 . . . . . . . . . . . . . . . . 17 ((Rel (𝐹 ∖ (V × { 0 })) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) → 𝑧 = ⟨(1st𝑧), (2nd𝑧)⟩)
6057, 58, 59syl2anc 584 . . . . . . . . . . . . . . . 16 ((((𝜑𝑥 ∈ (𝐹 supp 0 )) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑥 = (1st𝑧)) → 𝑧 = ⟨(1st𝑧), (2nd𝑧)⟩)
61 opeq1 4829 . . . . . . . . . . . . . . . . 17 (𝑥 = (1st𝑧) → ⟨𝑥, (2nd𝑧)⟩ = ⟨(1st𝑧), (2nd𝑧)⟩)
6261adantl 481 . . . . . . . . . . . . . . . 16 ((((𝜑𝑥 ∈ (𝐹 supp 0 )) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑥 = (1st𝑧)) → ⟨𝑥, (2nd𝑧)⟩ = ⟨(1st𝑧), (2nd𝑧)⟩)
6360, 62eqtr4d 2774 . . . . . . . . . . . . . . 15 ((((𝜑𝑥 ∈ (𝐹 supp 0 )) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑥 = (1st𝑧)) → 𝑧 = ⟨𝑥, (2nd𝑧)⟩)
64 difssd 4089 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑥 ∈ (𝐹 supp 0 )) → (𝐹 ∖ (V × { 0 })) ⊆ 𝐹)
6564sselda 3933 . . . . . . . . . . . . . . . . 17 (((𝜑𝑥 ∈ (𝐹 supp 0 )) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) → 𝑧𝐹)
6665adantr 480 . . . . . . . . . . . . . . . 16 ((((𝜑𝑥 ∈ (𝐹 supp 0 )) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑥 = (1st𝑧)) → 𝑧𝐹)
6763, 66eqeltrrd 2837 . . . . . . . . . . . . . . 15 ((((𝜑𝑥 ∈ (𝐹 supp 0 )) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑥 = (1st𝑧)) → ⟨𝑥, (2nd𝑧)⟩ ∈ 𝐹)
6863, 67jca 511 . . . . . . . . . . . . . 14 ((((𝜑𝑥 ∈ (𝐹 supp 0 )) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑥 = (1st𝑧)) → (𝑧 = ⟨𝑥, (2nd𝑧)⟩ ∧ ⟨𝑥, (2nd𝑧)⟩ ∈ 𝐹))
69 opeq2 4830 . . . . . . . . . . . . . . . 16 (𝑦 = (2nd𝑧) → ⟨𝑥, 𝑦⟩ = ⟨𝑥, (2nd𝑧)⟩)
7069eqeq2d 2747 . . . . . . . . . . . . . . 15 (𝑦 = (2nd𝑧) → (𝑧 = ⟨𝑥, 𝑦⟩ ↔ 𝑧 = ⟨𝑥, (2nd𝑧)⟩))
7169eleq1d 2821 . . . . . . . . . . . . . . 15 (𝑦 = (2nd𝑧) → (⟨𝑥, 𝑦⟩ ∈ 𝐹 ↔ ⟨𝑥, (2nd𝑧)⟩ ∈ 𝐹))
7270, 71anbi12d 632 . . . . . . . . . . . . . 14 (𝑦 = (2nd𝑧) → ((𝑧 = ⟨𝑥, 𝑦⟩ ∧ ⟨𝑥, 𝑦⟩ ∈ 𝐹) ↔ (𝑧 = ⟨𝑥, (2nd𝑧)⟩ ∧ ⟨𝑥, (2nd𝑧)⟩ ∈ 𝐹)))
7356, 68, 72spcedv 3552 . . . . . . . . . . . . 13 ((((𝜑𝑥 ∈ (𝐹 supp 0 )) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑥 = (1st𝑧)) → ∃𝑦(𝑧 = ⟨𝑥, 𝑦⟩ ∧ ⟨𝑥, 𝑦⟩ ∈ 𝐹))
74 vex 3444 . . . . . . . . . . . . . 14 𝑥 ∈ V
7574elsnres 5980 . . . . . . . . . . . . 13 (𝑧 ∈ (𝐹 ↾ {𝑥}) ↔ ∃𝑦(𝑧 = ⟨𝑥, 𝑦⟩ ∧ ⟨𝑥, 𝑦⟩ ∈ 𝐹))
7673, 75sylibr 234 . . . . . . . . . . . 12 ((((𝜑𝑥 ∈ (𝐹 supp 0 )) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑥 = (1st𝑧)) → 𝑧 ∈ (𝐹 ↾ {𝑥}))
7713ad3antrrr 730 . . . . . . . . . . . . 13 ((((𝜑𝑥 ∈ (𝐹 supp 0 )) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑥 = (1st𝑧)) → 𝐹 Fn 𝐴)
7822ad2antrr 726 . . . . . . . . . . . . 13 ((((𝜑𝑥 ∈ (𝐹 supp 0 )) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑥 = (1st𝑧)) → 𝑥𝐴)
79 fnressn 7103 . . . . . . . . . . . . 13 ((𝐹 Fn 𝐴𝑥𝐴) → (𝐹 ↾ {𝑥}) = {⟨𝑥, (𝐹𝑥)⟩})
8077, 78, 79syl2anc 584 . . . . . . . . . . . 12 ((((𝜑𝑥 ∈ (𝐹 supp 0 )) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑥 = (1st𝑧)) → (𝐹 ↾ {𝑥}) = {⟨𝑥, (𝐹𝑥)⟩})
8176, 80eleqtrd 2838 . . . . . . . . . . 11 ((((𝜑𝑥 ∈ (𝐹 supp 0 )) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑥 = (1st𝑧)) → 𝑧 ∈ {⟨𝑥, (𝐹𝑥)⟩})
82 elsni 4597 . . . . . . . . . . 11 (𝑧 ∈ {⟨𝑥, (𝐹𝑥)⟩} → 𝑧 = ⟨𝑥, (𝐹𝑥)⟩)
8381, 82syl 17 . . . . . . . . . 10 ((((𝜑𝑥 ∈ (𝐹 supp 0 )) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑥 = (1st𝑧)) → 𝑧 = ⟨𝑥, (𝐹𝑥)⟩)
84 simpr 484 . . . . . . . . . . . 12 ((((𝜑𝑥 ∈ (𝐹 supp 0 )) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑧 = ⟨𝑥, (𝐹𝑥)⟩) → 𝑧 = ⟨𝑥, (𝐹𝑥)⟩)
8584fveq2d 6838 . . . . . . . . . . 11 ((((𝜑𝑥 ∈ (𝐹 supp 0 )) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑧 = ⟨𝑥, (𝐹𝑥)⟩) → (1st𝑧) = (1st ‘⟨𝑥, (𝐹𝑥)⟩))
86 fvex 6847 . . . . . . . . . . . 12 (𝐹𝑥) ∈ V
8774, 86op1st 7941 . . . . . . . . . . 11 (1st ‘⟨𝑥, (𝐹𝑥)⟩) = 𝑥
8885, 87eqtr2di 2788 . . . . . . . . . 10 ((((𝜑𝑥 ∈ (𝐹 supp 0 )) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑧 = ⟨𝑥, (𝐹𝑥)⟩) → 𝑥 = (1st𝑧))
8983, 88impbida 800 . . . . . . . . 9 (((𝜑𝑥 ∈ (𝐹 supp 0 )) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) → (𝑥 = (1st𝑧) ↔ 𝑧 = ⟨𝑥, (𝐹𝑥)⟩))
9089ralrimiva 3128 . . . . . . . 8 ((𝜑𝑥 ∈ (𝐹 supp 0 )) → ∀𝑧 ∈ (𝐹 ∖ (V × { 0 }))(𝑥 = (1st𝑧) ↔ 𝑧 = ⟨𝑥, (𝐹𝑥)⟩))
9151, 55, 90rspcedvd 3578 . . . . . . 7 ((𝜑𝑥 ∈ (𝐹 supp 0 )) → ∃𝑣 ∈ (𝐹 ∖ (V × { 0 }))∀𝑧 ∈ (𝐹 ∖ (V × { 0 }))(𝑥 = (1st𝑧) ↔ 𝑧 = 𝑣))
92 reu6 3684 . . . . . . 7 (∃!𝑧 ∈ (𝐹 ∖ (V × { 0 }))𝑥 = (1st𝑧) ↔ ∃𝑣 ∈ (𝐹 ∖ (V × { 0 }))∀𝑧 ∈ (𝐹 ∖ (V × { 0 }))(𝑥 = (1st𝑧) ↔ 𝑧 = 𝑣))
9391, 92sylibr 234 . . . . . 6 ((𝜑𝑥 ∈ (𝐹 supp 0 )) → ∃!𝑧 ∈ (𝐹 ∖ (V × { 0 }))𝑥 = (1st𝑧))
9417, 6, 7, 18, 8, 19, 20, 23, 40, 93gsummptf1o 19892 . . . . 5 (𝜑 → (𝐺 Σg (𝑥 ∈ (𝐹 supp 0 ) ↦ (𝐹𝑥))) = (𝐺 Σg (𝑧 ∈ (𝐹 ∖ (V × { 0 })) ↦ (𝐹‘(1st𝑧)))))
955, 16, 943eqtr3d 2779 . . . 4 (𝜑 → (𝐺 Σg 𝐹) = (𝐺 Σg (𝑧 ∈ (𝐹 ∖ (V × { 0 })) ↦ (𝐹‘(1st𝑧)))))
96 simpr 484 . . . . . . . 8 ((𝜑𝑧 ∈ (𝐹 ∖ (V × { 0 }))) → 𝑧 ∈ (𝐹 ∖ (V × { 0 })))
9796eldifad 3913 . . . . . . 7 ((𝜑𝑧 ∈ (𝐹 ∖ (V × { 0 }))) → 𝑧𝐹)
98 funfv1st2nd 7990 . . . . . . 7 ((Fun 𝐹𝑧𝐹) → (𝐹‘(1st𝑧)) = (2nd𝑧))
9924, 97, 98syl2an2r 685 . . . . . 6 ((𝜑𝑧 ∈ (𝐹 ∖ (V × { 0 }))) → (𝐹‘(1st𝑧)) = (2nd𝑧))
10099mpteq2dva 5191 . . . . 5 (𝜑 → (𝑧 ∈ (𝐹 ∖ (V × { 0 })) ↦ (𝐹‘(1st𝑧))) = (𝑧 ∈ (𝐹 ∖ (V × { 0 })) ↦ (2nd𝑧)))
101100oveq2d 7374 . . . 4 (𝜑 → (𝐺 Σg (𝑧 ∈ (𝐹 ∖ (V × { 0 })) ↦ (𝐹‘(1st𝑧)))) = (𝐺 Σg (𝑧 ∈ (𝐹 ∖ (V × { 0 })) ↦ (2nd𝑧))))
10295, 101eqtrd 2771 . . 3 (𝜑 → (𝐺 Σg 𝐹) = (𝐺 Σg (𝑧 ∈ (𝐹 ∖ (V × { 0 })) ↦ (2nd𝑧))))
103 nfcv 2898 . . . 4 𝑧(1st𝑡)
104 fvex 6847 . . . . 5 (2nd𝑡) ∈ V
105 fvex 6847 . . . . 5 (1st𝑡) ∈ V
106104, 105op2ndd 7944 . . . 4 (𝑧 = ⟨(2nd𝑡), (1st𝑡)⟩ → (2nd𝑧) = (1st𝑡))
107 resfnfinfin 9237 . . . . . 6 ((𝐹 Fn 𝐴 ∧ (𝐹 supp 0 ) ∈ Fin) → (𝐹 ↾ (𝐹 supp 0 )) ∈ Fin)
10813, 19, 107syl2anc 584 . . . . 5 (𝜑 → (𝐹 ↾ (𝐹 supp 0 )) ∈ Fin)
10933, 108eqeltrrd 2837 . . . 4 (𝜑 → (𝐹 ∖ (V × { 0 })) ∈ Fin)
11033rneqd 5887 . . . . 5 (𝜑 → ran (𝐹 ↾ (𝐹 supp 0 )) = ran (𝐹 ∖ (V × { 0 })))
111 rnresss 5976 . . . . . 6 ran (𝐹 ↾ (𝐹 supp 0 )) ⊆ ran 𝐹
1121frnd 6670 . . . . . 6 (𝜑 → ran 𝐹𝐵)
113111, 112sstrid 3945 . . . . 5 (𝜑 → ran (𝐹 ↾ (𝐹 supp 0 )) ⊆ 𝐵)
114110, 113eqsstrrd 3969 . . . 4 (𝜑 → ran (𝐹 ∖ (V × { 0 })) ⊆ 𝐵)
115 2ndrn 7985 . . . . 5 ((Rel (𝐹 ∖ (V × { 0 })) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) → (2nd𝑧) ∈ ran (𝐹 ∖ (V × { 0 })))
11627, 115sylan 580 . . . 4 ((𝜑𝑧 ∈ (𝐹 ∖ (V × { 0 }))) → (2nd𝑧) ∈ ran (𝐹 ∖ (V × { 0 })))
117 relcnv 6063 . . . . . . . 8 Rel 𝐹
118 reldif 5764 . . . . . . . 8 (Rel 𝐹 → Rel (𝐹 ∖ ({ 0 } × V)))
119117, 118mp1i 13 . . . . . . 7 (𝜑 → Rel (𝐹 ∖ ({ 0 } × V)))
120 1st2nd 7983 . . . . . . 7 ((Rel (𝐹 ∖ ({ 0 } × V)) ∧ 𝑡 ∈ (𝐹 ∖ ({ 0 } × V))) → 𝑡 = ⟨(1st𝑡), (2nd𝑡)⟩)
121119, 120sylan 580 . . . . . 6 ((𝜑𝑡 ∈ (𝐹 ∖ ({ 0 } × V))) → 𝑡 = ⟨(1st𝑡), (2nd𝑡)⟩)
122 cnvdif 6101 . . . . . . . . . 10 (𝐹 ∖ (V × { 0 })) = (𝐹(V × { 0 }))
123 cnvxp 6115 . . . . . . . . . . 11 (V × { 0 }) = ({ 0 } × V)
124123difeq2i 4075 . . . . . . . . . 10 (𝐹(V × { 0 })) = (𝐹 ∖ ({ 0 } × V))
125122, 124eqtri 2759 . . . . . . . . 9 (𝐹 ∖ (V × { 0 })) = (𝐹 ∖ ({ 0 } × V))
126125eqimss2i 3995 . . . . . . . 8 (𝐹 ∖ ({ 0 } × V)) ⊆ (𝐹 ∖ (V × { 0 }))
127126a1i 11 . . . . . . 7 (𝜑 → (𝐹 ∖ ({ 0 } × V)) ⊆ (𝐹 ∖ (V × { 0 })))
128127sselda 3933 . . . . . 6 ((𝜑𝑡 ∈ (𝐹 ∖ ({ 0 } × V))) → 𝑡(𝐹 ∖ (V × { 0 })))
129121, 128eqeltrrd 2837 . . . . 5 ((𝜑𝑡 ∈ (𝐹 ∖ ({ 0 } × V))) → ⟨(1st𝑡), (2nd𝑡)⟩ ∈ (𝐹 ∖ (V × { 0 })))
130105, 104opelcnv 5830 . . . . 5 (⟨(1st𝑡), (2nd𝑡)⟩ ∈ (𝐹 ∖ (V × { 0 })) ↔ ⟨(2nd𝑡), (1st𝑡)⟩ ∈ (𝐹 ∖ (V × { 0 })))
131129, 130sylib 218 . . . 4 ((𝜑𝑡 ∈ (𝐹 ∖ ({ 0 } × V))) → ⟨(2nd𝑡), (1st𝑡)⟩ ∈ (𝐹 ∖ (V × { 0 })))
13227adantr 480 . . . . . . . 8 ((𝜑𝑧 ∈ (𝐹 ∖ (V × { 0 }))) → Rel (𝐹 ∖ (V × { 0 })))
133 eqidd 2737 . . . . . . . 8 ((𝜑𝑧 ∈ (𝐹 ∖ (V × { 0 }))) → {𝑧} = {𝑧})
134 cnvf1olem 8052 . . . . . . . . 9 ((Rel (𝐹 ∖ (V × { 0 })) ∧ (𝑧 ∈ (𝐹 ∖ (V × { 0 })) ∧ {𝑧} = {𝑧})) → ( {𝑧} ∈ (𝐹 ∖ (V × { 0 })) ∧ 𝑧 = { {𝑧}}))
135134simpld 494 . . . . . . . 8 ((Rel (𝐹 ∖ (V × { 0 })) ∧ (𝑧 ∈ (𝐹 ∖ (V × { 0 })) ∧ {𝑧} = {𝑧})) → {𝑧} ∈ (𝐹 ∖ (V × { 0 })))
136132, 96, 133, 135syl12anc 836 . . . . . . 7 ((𝜑𝑧 ∈ (𝐹 ∖ (V × { 0 }))) → {𝑧} ∈ (𝐹 ∖ (V × { 0 })))
137136, 125eleqtrdi 2846 . . . . . 6 ((𝜑𝑧 ∈ (𝐹 ∖ (V × { 0 }))) → {𝑧} ∈ (𝐹 ∖ ({ 0 } × V)))
138 eqeq2 2748 . . . . . . . . 9 (𝑢 = {𝑧} → (𝑡 = 𝑢𝑡 = {𝑧}))
139138bibi2d 342 . . . . . . . 8 (𝑢 = {𝑧} → ((𝑧 = ⟨(2nd𝑡), (1st𝑡)⟩ ↔ 𝑡 = 𝑢) ↔ (𝑧 = ⟨(2nd𝑡), (1st𝑡)⟩ ↔ 𝑡 = {𝑧})))
140139ralbidv 3159 . . . . . . 7 (𝑢 = {𝑧} → (∀𝑡 ∈ (𝐹 ∖ ({ 0 } × V))(𝑧 = ⟨(2nd𝑡), (1st𝑡)⟩ ↔ 𝑡 = 𝑢) ↔ ∀𝑡 ∈ (𝐹 ∖ ({ 0 } × V))(𝑧 = ⟨(2nd𝑡), (1st𝑡)⟩ ↔ 𝑡 = {𝑧})))
141140adantl 481 . . . . . 6 (((𝜑𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑢 = {𝑧}) → (∀𝑡 ∈ (𝐹 ∖ ({ 0 } × V))(𝑧 = ⟨(2nd𝑡), (1st𝑡)⟩ ↔ 𝑡 = 𝑢) ↔ ∀𝑡 ∈ (𝐹 ∖ ({ 0 } × V))(𝑧 = ⟨(2nd𝑡), (1st𝑡)⟩ ↔ 𝑡 = {𝑧})))
142117, 118mp1i 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 5631 . . . . . . . . . . . . . 14 (Rel (𝐹 ∖ ({ 0 } × V)) ↔ (𝐹 ∖ ({ 0 } × V)) ⊆ (V × V))
146119, 145sylib 218 . . . . . . . . . . . . 13 (𝜑 → (𝐹 ∖ ({ 0 } × V)) ⊆ (V × V))
147146ad3antrrr 730 . . . . . . . . . . . 12 ((((𝜑𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑡 ∈ (𝐹 ∖ ({ 0 } × V))) ∧ 𝑧 = ⟨(2nd𝑡), (1st𝑡)⟩) → (𝐹 ∖ ({ 0 } × V)) ⊆ (V × V))
148147, 143sseldd 3934 . . . . . . . . . . 11 ((((𝜑𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑡 ∈ (𝐹 ∖ ({ 0 } × V))) ∧ 𝑧 = ⟨(2nd𝑡), (1st𝑡)⟩) → 𝑡 ∈ (V × V))
149 2nd1st 7982 . . . . . . . . . . 11 (𝑡 ∈ (V × V) → {𝑡} = ⟨(2nd𝑡), (1st𝑡)⟩)
150148, 149syl 17 . . . . . . . . . 10 ((((𝜑𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑡 ∈ (𝐹 ∖ ({ 0 } × V))) ∧ 𝑧 = ⟨(2nd𝑡), (1st𝑡)⟩) → {𝑡} = ⟨(2nd𝑡), (1st𝑡)⟩)
151144, 150eqtr4d 2774 . . . . . . . . 9 ((((𝜑𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑡 ∈ (𝐹 ∖ ({ 0 } × V))) ∧ 𝑧 = ⟨(2nd𝑡), (1st𝑡)⟩) → 𝑧 = {𝑡})
152 cnvf1olem 8052 . . . . . . . . . 10 ((Rel (𝐹 ∖ ({ 0 } × V)) ∧ (𝑡 ∈ (𝐹 ∖ ({ 0 } × V)) ∧ 𝑧 = {𝑡})) → (𝑧(𝐹 ∖ ({ 0 } × V)) ∧ 𝑡 = {𝑧}))
153152simprd 495 . . . . . . . . 9 ((Rel (𝐹 ∖ ({ 0 } × V)) ∧ (𝑡 ∈ (𝐹 ∖ ({ 0 } × V)) ∧ 𝑧 = {𝑡})) → 𝑡 = {𝑧})
154142, 143, 151, 153syl12anc 836 . . . . . . . 8 ((((𝜑𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑡 ∈ (𝐹 ∖ ({ 0 } × V))) ∧ 𝑧 = ⟨(2nd𝑡), (1st𝑡)⟩) → 𝑡 = {𝑧})
15527ad3antrrr 730 . . . . . . . . . 10 ((((𝜑𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑡 ∈ (𝐹 ∖ ({ 0 } × V))) ∧ 𝑡 = {𝑧}) → Rel (𝐹 ∖ (V × { 0 })))
15696ad2antrr 726 . . . . . . . . . 10 ((((𝜑𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑡 ∈ (𝐹 ∖ ({ 0 } × V))) ∧ 𝑡 = {𝑧}) → 𝑧 ∈ (𝐹 ∖ (V × { 0 })))
157 simpr 484 . . . . . . . . . 10 ((((𝜑𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑡 ∈ (𝐹 ∖ ({ 0 } × V))) ∧ 𝑡 = {𝑧}) → 𝑡 = {𝑧})
158 cnvf1olem 8052 . . . . . . . . . . 11 ((Rel (𝐹 ∖ (V × { 0 })) ∧ (𝑧 ∈ (𝐹 ∖ (V × { 0 })) ∧ 𝑡 = {𝑧})) → (𝑡(𝐹 ∖ (V × { 0 })) ∧ 𝑧 = {𝑡}))
159158simprd 495 . . . . . . . . . 10 ((Rel (𝐹 ∖ (V × { 0 })) ∧ (𝑧 ∈ (𝐹 ∖ (V × { 0 })) ∧ 𝑡 = {𝑧})) → 𝑧 = {𝑡})
160155, 156, 157, 159syl12anc 836 . . . . . . . . 9 ((((𝜑𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑡 ∈ (𝐹 ∖ ({ 0 } × V))) ∧ 𝑡 = {𝑧}) → 𝑧 = {𝑡})
161146ad3antrrr 730 . . . . . . . . . . 11 ((((𝜑𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑡 ∈ (𝐹 ∖ ({ 0 } × V))) ∧ 𝑡 = {𝑧}) → (𝐹 ∖ ({ 0 } × V)) ⊆ (V × V))
162 simplr 768 . . . . . . . . . . 11 ((((𝜑𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑡 ∈ (𝐹 ∖ ({ 0 } × V))) ∧ 𝑡 = {𝑧}) → 𝑡 ∈ (𝐹 ∖ ({ 0 } × V)))
163161, 162sseldd 3934 . . . . . . . . . 10 ((((𝜑𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑡 ∈ (𝐹 ∖ ({ 0 } × V))) ∧ 𝑡 = {𝑧}) → 𝑡 ∈ (V × V))
164163, 149syl 17 . . . . . . . . 9 ((((𝜑𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑡 ∈ (𝐹 ∖ ({ 0 } × V))) ∧ 𝑡 = {𝑧}) → {𝑡} = ⟨(2nd𝑡), (1st𝑡)⟩)
165160, 164eqtrd 2771 . . . . . . . 8 ((((𝜑𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑡 ∈ (𝐹 ∖ ({ 0 } × V))) ∧ 𝑡 = {𝑧}) → 𝑧 = ⟨(2nd𝑡), (1st𝑡)⟩)
166154, 165impbida 800 . . . . . . 7 (((𝜑𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑡 ∈ (𝐹 ∖ ({ 0 } × V))) → (𝑧 = ⟨(2nd𝑡), (1st𝑡)⟩ ↔ 𝑡 = {𝑧}))
167166ralrimiva 3128 . . . . . 6 ((𝜑𝑧 ∈ (𝐹 ∖ (V × { 0 }))) → ∀𝑡 ∈ (𝐹 ∖ ({ 0 } × V))(𝑧 = ⟨(2nd𝑡), (1st𝑡)⟩ ↔ 𝑡 = {𝑧}))
168137, 141, 167rspcedvd 3578 . . . . 5 ((𝜑𝑧 ∈ (𝐹 ∖ (V × { 0 }))) → ∃𝑢 ∈ (𝐹 ∖ ({ 0 } × V))∀𝑡 ∈ (𝐹 ∖ ({ 0 } × V))(𝑧 = ⟨(2nd𝑡), (1st𝑡)⟩ ↔ 𝑡 = 𝑢))
169 reu6 3684 . . . . 5 (∃!𝑡 ∈ (𝐹 ∖ ({ 0 } × V))𝑧 = ⟨(2nd𝑡), (1st𝑡)⟩ ↔ ∃𝑢 ∈ (𝐹 ∖ ({ 0 } × V))∀𝑡 ∈ (𝐹 ∖ ({ 0 } × V))(𝑧 = ⟨(2nd𝑡), (1st𝑡)⟩ ↔ 𝑡 = 𝑢))
170168, 169sylibr 234 . . . 4 ((𝜑𝑧 ∈ (𝐹 ∖ (V × { 0 }))) → ∃!𝑡 ∈ (𝐹 ∖ ({ 0 } × V))𝑧 = ⟨(2nd𝑡), (1st𝑡)⟩)
171103, 6, 7, 106, 8, 109, 114, 116, 131, 170gsummptf1o 19892 . . 3 (𝜑 → (𝐺 Σg (𝑧 ∈ (𝐹 ∖ (V × { 0 })) ↦ (2nd𝑧))) = (𝐺 Σg (𝑡 ∈ (𝐹 ∖ ({ 0 } × V)) ↦ (1st𝑡))))
172 fveq2 6834 . . . . . 6 (𝑡 = 𝑧 → (1st𝑡) = (1st𝑧))
173172cbvmptv 5202 . . . . 5 (𝑡 ∈ (𝐹 ∖ ({ 0 } × V)) ↦ (1st𝑡)) = (𝑧 ∈ (𝐹 ∖ ({ 0 } × V)) ↦ (1st𝑧))
17433cnveqd 5824 . . . . . . 7 (𝜑(𝐹 ↾ (𝐹 supp 0 )) = (𝐹 ∖ (V × { 0 })))
175174, 125eqtr2di 2788 . . . . . 6 (𝜑 → (𝐹 ∖ ({ 0 } × V)) = (𝐹 ↾ (𝐹 supp 0 )))
176175mpteq1d 5188 . . . . 5 (𝜑 → (𝑧 ∈ (𝐹 ∖ ({ 0 } × V)) ↦ (1st𝑧)) = (𝑧(𝐹 ↾ (𝐹 supp 0 )) ↦ (1st𝑧)))
177173, 176eqtrid 2783 . . . 4 (𝜑 → (𝑡 ∈ (𝐹 ∖ ({ 0 } × V)) ↦ (1st𝑡)) = (𝑧(𝐹 ↾ (𝐹 supp 0 )) ↦ (1st𝑧)))
178177oveq2d 7374 . . 3 (𝜑 → (𝐺 Σg (𝑡 ∈ (𝐹 ∖ ({ 0 } × V)) ↦ (1st𝑡))) = (𝐺 Σg (𝑧(𝐹 ↾ (𝐹 supp 0 )) ↦ (1st𝑧))))
179102, 171, 1783eqtrd 2775 . 2 (𝜑 → (𝐺 Σg 𝐹) = (𝐺 Σg (𝑧(𝐹 ↾ (𝐹 supp 0 )) ↦ (1st𝑧))))
180 nfcv 2898 . . 3 𝑦(1st𝑧)
181 nfv 1915 . . 3 𝑥𝜑
182 vex 3444 . . . 4 𝑦 ∈ V
18374, 182op1std 7943 . . 3 (𝑧 = ⟨𝑥, 𝑦⟩ → (1st𝑧) = 𝑥)
184 relcnv 6063 . . . 4 Rel (𝐹 ↾ (𝐹 supp 0 ))
185184a1i 11 . . 3 (𝜑 → Rel (𝐹 ↾ (𝐹 supp 0 )))
186 cnvfi 9100 . . . 4 ((𝐹 ↾ (𝐹 supp 0 )) ∈ Fin → (𝐹 ↾ (𝐹 supp 0 )) ∈ Fin)
187108, 186syl 17 . . 3 (𝜑(𝐹 ↾ (𝐹 supp 0 )) ∈ Fin)
188112adantr 480 . . . 4 ((𝜑𝑧(𝐹 ↾ (𝐹 supp 0 ))) → ran 𝐹𝐵)
189184a1i 11 . . . . . . 7 ((𝜑𝑧(𝐹 ↾ (𝐹 supp 0 ))) → Rel (𝐹 ↾ (𝐹 supp 0 )))
190 simpr 484 . . . . . . 7 ((𝜑𝑧(𝐹 ↾ (𝐹 supp 0 ))) → 𝑧(𝐹 ↾ (𝐹 supp 0 )))
191 1stdm 7984 . . . . . . 7 ((Rel (𝐹 ↾ (𝐹 supp 0 )) ∧ 𝑧(𝐹 ↾ (𝐹 supp 0 ))) → (1st𝑧) ∈ dom (𝐹 ↾ (𝐹 supp 0 )))
192189, 190, 191syl2anc 584 . . . . . 6 ((𝜑𝑧(𝐹 ↾ (𝐹 supp 0 ))) → (1st𝑧) ∈ dom (𝐹 ↾ (𝐹 supp 0 )))
193 df-rn 5635 . . . . . 6 ran (𝐹 ↾ (𝐹 supp 0 )) = dom (𝐹 ↾ (𝐹 supp 0 ))
194192, 193eleqtrrdi 2847 . . . . 5 ((𝜑𝑧(𝐹 ↾ (𝐹 supp 0 ))) → (1st𝑧) ∈ ran (𝐹 ↾ (𝐹 supp 0 )))
195111, 194sselid 3931 . . . 4 ((𝜑𝑧(𝐹 ↾ (𝐹 supp 0 ))) → (1st𝑧) ∈ ran 𝐹)
196188, 195sseldd 3934 . . 3 ((𝜑𝑧(𝐹 ↾ (𝐹 supp 0 ))) → (1st𝑧) ∈ 𝐵)
197180, 181, 6, 183, 185, 187, 8, 196gsummpt2d 33132 . 2 (𝜑 → (𝐺 Σg (𝑧(𝐹 ↾ (𝐹 supp 0 )) ↦ (1st𝑧))) = (𝐺 Σg (𝑥 ∈ dom (𝐹 ↾ (𝐹 supp 0 )) ↦ (𝐺 Σg (𝑦 ∈ ((𝐹 ↾ (𝐹 supp 0 )) “ {𝑥}) ↦ 𝑥)))))
198 df-ima 5637 . . . . . . 7 (𝐹 “ (𝐹 supp 0 )) = ran (𝐹 ↾ (𝐹 supp 0 ))
199 supppreima 32770 . . . . . . . . 9 ((Fun 𝐹𝐹 ∈ V ∧ 0 ∈ V) → (𝐹 supp 0 ) = (𝐹 “ (ran 𝐹 ∖ { 0 })))
20024, 12, 31, 199syl3anc 1373 . . . . . . . 8 (𝜑 → (𝐹 supp 0 ) = (𝐹 “ (ran 𝐹 ∖ { 0 })))
201200imaeq2d 6019 . . . . . . 7 (𝜑 → (𝐹 “ (𝐹 supp 0 )) = (𝐹 “ (𝐹 “ (ran 𝐹 ∖ { 0 }))))
202198, 201eqtr3id 2785 . . . . . 6 (𝜑 → ran (𝐹 ↾ (𝐹 supp 0 )) = (𝐹 “ (𝐹 “ (ran 𝐹 ∖ { 0 }))))
203 funimacnv 6573 . . . . . . 7 (Fun 𝐹 → (𝐹 “ (𝐹 “ (ran 𝐹 ∖ { 0 }))) = ((ran 𝐹 ∖ { 0 }) ∩ ran 𝐹))
20424, 203syl 17 . . . . . 6 (𝜑 → (𝐹 “ (𝐹 “ (ran 𝐹 ∖ { 0 }))) = ((ran 𝐹 ∖ { 0 }) ∩ ran 𝐹))
205 difssd 4089 . . . . . . 7 (𝜑 → (ran 𝐹 ∖ { 0 }) ⊆ ran 𝐹)
206 dfss2 3919 . . . . . . 7 ((ran 𝐹 ∖ { 0 }) ⊆ ran 𝐹 ↔ ((ran 𝐹 ∖ { 0 }) ∩ ran 𝐹) = (ran 𝐹 ∖ { 0 }))
207205, 206sylib 218 . . . . . 6 (𝜑 → ((ran 𝐹 ∖ { 0 }) ∩ ran 𝐹) = (ran 𝐹 ∖ { 0 }))
208202, 204, 2073eqtrd 2775 . . . . 5 (𝜑 → ran (𝐹 ↾ (𝐹 supp 0 )) = (ran 𝐹 ∖ { 0 }))
209193, 208eqtr3id 2785 . . . 4 (𝜑 → dom (𝐹 ↾ (𝐹 supp 0 )) = (ran 𝐹 ∖ { 0 }))
2108cmnmndd 19733 . . . . . . 7 (𝜑𝐺 ∈ Mnd)
211210adantr 480 . . . . . 6 ((𝜑𝑥 ∈ dom (𝐹 ↾ (𝐹 supp 0 ))) → 𝐺 ∈ Mnd)
212108adantr 480 . . . . . . 7 ((𝜑𝑥 ∈ dom (𝐹 ↾ (𝐹 supp 0 ))) → (𝐹 ↾ (𝐹 supp 0 )) ∈ Fin)
213 imafi2 9261 . . . . . . 7 ((𝐹 ↾ (𝐹 supp 0 )) ∈ Fin → ((𝐹 ↾ (𝐹 supp 0 )) “ {𝑥}) ∈ Fin)
214212, 186, 2133syl 18 . . . . . 6 ((𝜑𝑥 ∈ dom (𝐹 ↾ (𝐹 supp 0 ))) → ((𝐹 ↾ (𝐹 supp 0 )) “ {𝑥}) ∈ Fin)
215193, 113eqsstrrid 3973 . . . . . . 7 (𝜑 → dom (𝐹 ↾ (𝐹 supp 0 )) ⊆ 𝐵)
216215sselda 3933 . . . . . 6 ((𝜑𝑥 ∈ dom (𝐹 ↾ (𝐹 supp 0 ))) → 𝑥𝐵)
217 gsumhashmul.x . . . . . . 7 · = (.g𝐺)
2186, 217gsumconst 19863 . . . . . 6 ((𝐺 ∈ Mnd ∧ ((𝐹 ↾ (𝐹 supp 0 )) “ {𝑥}) ∈ Fin ∧ 𝑥𝐵) → (𝐺 Σg (𝑦 ∈ ((𝐹 ↾ (𝐹 supp 0 )) “ {𝑥}) ↦ 𝑥)) = ((♯‘((𝐹 ↾ (𝐹 supp 0 )) “ {𝑥})) · 𝑥))
219211, 214, 216, 218syl3anc 1373 . . . . 5 ((𝜑𝑥 ∈ dom (𝐹 ↾ (𝐹 supp 0 ))) → (𝐺 Σg (𝑦 ∈ ((𝐹 ↾ (𝐹 supp 0 )) “ {𝑥}) ↦ 𝑥)) = ((♯‘((𝐹 ↾ (𝐹 supp 0 )) “ {𝑥})) · 𝑥))
220 cnvresima 6188 . . . . . . . 8 ((𝐹 ↾ (𝐹 supp 0 )) “ {𝑥}) = ((𝐹 “ {𝑥}) ∩ (𝐹 supp 0 ))
221209eleq2d 2822 . . . . . . . . . . . . 13 (𝜑 → (𝑥 ∈ dom (𝐹 ↾ (𝐹 supp 0 )) ↔ 𝑥 ∈ (ran 𝐹 ∖ { 0 })))
222221biimpa 476 . . . . . . . . . . . 12 ((𝜑𝑥 ∈ dom (𝐹 ↾ (𝐹 supp 0 ))) → 𝑥 ∈ (ran 𝐹 ∖ { 0 }))
223222snssd 4765 . . . . . . . . . . 11 ((𝜑𝑥 ∈ dom (𝐹 ↾ (𝐹 supp 0 ))) → {𝑥} ⊆ (ran 𝐹 ∖ { 0 }))
224 sspreima 7013 . . . . . . . . . . 11 ((Fun 𝐹 ∧ {𝑥} ⊆ (ran 𝐹 ∖ { 0 })) → (𝐹 “ {𝑥}) ⊆ (𝐹 “ (ran 𝐹 ∖ { 0 })))
22524, 223, 224syl2an2r 685 . . . . . . . . . 10 ((𝜑𝑥 ∈ dom (𝐹 ↾ (𝐹 supp 0 ))) → (𝐹 “ {𝑥}) ⊆ (𝐹 “ (ran 𝐹 ∖ { 0 })))
226200adantr 480 . . . . . . . . . 10 ((𝜑𝑥 ∈ dom (𝐹 ↾ (𝐹 supp 0 ))) → (𝐹 supp 0 ) = (𝐹 “ (ran 𝐹 ∖ { 0 })))
227225, 226sseqtrrd 3971 . . . . . . . . 9 ((𝜑𝑥 ∈ dom (𝐹 ↾ (𝐹 supp 0 ))) → (𝐹 “ {𝑥}) ⊆ (𝐹 supp 0 ))
228 dfss2 3919 . . . . . . . . 9 ((𝐹 “ {𝑥}) ⊆ (𝐹 supp 0 ) ↔ ((𝐹 “ {𝑥}) ∩ (𝐹 supp 0 )) = (𝐹 “ {𝑥}))
229227, 228sylib 218 . . . . . . . 8 ((𝜑𝑥 ∈ dom (𝐹 ↾ (𝐹 supp 0 ))) → ((𝐹 “ {𝑥}) ∩ (𝐹 supp 0 )) = (𝐹 “ {𝑥}))
230220, 229eqtr2id 2784 . . . . . . 7 ((𝜑𝑥 ∈ dom (𝐹 ↾ (𝐹 supp 0 ))) → (𝐹 “ {𝑥}) = ((𝐹 ↾ (𝐹 supp 0 )) “ {𝑥}))
231230fveq2d 6838 . . . . . 6 ((𝜑𝑥 ∈ dom (𝐹 ↾ (𝐹 supp 0 ))) → (♯‘(𝐹 “ {𝑥})) = (♯‘((𝐹 ↾ (𝐹 supp 0 )) “ {𝑥})))
232231oveq1d 7373 . . . . 5 ((𝜑𝑥 ∈ dom (𝐹 ↾ (𝐹 supp 0 ))) → ((♯‘(𝐹 “ {𝑥})) · 𝑥) = ((♯‘((𝐹 ↾ (𝐹 supp 0 )) “ {𝑥})) · 𝑥))
233219, 232eqtr4d 2774 . . . 4 ((𝜑𝑥 ∈ dom (𝐹 ↾ (𝐹 supp 0 ))) → (𝐺 Σg (𝑦 ∈ ((𝐹 ↾ (𝐹 supp 0 )) “ {𝑥}) ↦ 𝑥)) = ((♯‘(𝐹 “ {𝑥})) · 𝑥))
234209, 233mpteq12dva 5184 . . 3 (𝜑 → (𝑥 ∈ dom (𝐹 ↾ (𝐹 supp 0 )) ↦ (𝐺 Σg (𝑦 ∈ ((𝐹 ↾ (𝐹 supp 0 )) “ {𝑥}) ↦ 𝑥))) = (𝑥 ∈ (ran 𝐹 ∖ { 0 }) ↦ ((♯‘(𝐹 “ {𝑥})) · 𝑥)))
235234oveq2d 7374 . 2 (𝜑 → (𝐺 Σg (𝑥 ∈ dom (𝐹 ↾ (𝐹 supp 0 )) ↦ (𝐺 Σg (𝑦 ∈ ((𝐹 ↾ (𝐹 supp 0 )) “ {𝑥}) ↦ 𝑥)))) = (𝐺 Σg (𝑥 ∈ (ran 𝐹 ∖ { 0 }) ↦ ((♯‘(𝐹 “ {𝑥})) · 𝑥))))
236179, 197, 2353eqtrd 2775 1 (𝜑 → (𝐺 Σg 𝐹) = (𝐺 Σg (𝑥 ∈ (ran 𝐹 ∖ { 0 }) ↦ ((♯‘(𝐹 “ {𝑥})) · 𝑥))))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 206  wa 395   = wceq 1541  wex 1780  wcel 2113  wral 3051  wrex 3060  ∃!wreu 3348  Vcvv 3440  cdif 3898  cin 3900  wss 3901  {csn 4580  cop 4586   cuni 4863   class class class wbr 5098  cmpt 5179   × cxp 5622  ccnv 5623  dom cdm 5624  ran crn 5625  cres 5626  cima 5627  Rel wrel 5629  Fun wfun 6486   Fn wfn 6487  wf 6488  cfv 6492  (class class class)co 7358  1st c1st 7931  2nd c2nd 7932   supp csupp 8102  Fincfn 8883   finSupp cfsupp 9264  chash 14253  Basecbs 17136  0gc0g 17359   Σg cgsu 17360  Mndcmnd 18659  .gcmg 18997  CMndccmn 19709
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1796  ax-4 1810  ax-5 1911  ax-6 1968  ax-7 2009  ax-8 2115  ax-9 2123  ax-10 2146  ax-11 2162  ax-12 2184  ax-ext 2708  ax-rep 5224  ax-sep 5241  ax-nul 5251  ax-pow 5310  ax-pr 5377  ax-un 7680  ax-cnex 11082  ax-resscn 11083  ax-1cn 11084  ax-icn 11085  ax-addcl 11086  ax-addrcl 11087  ax-mulcl 11088  ax-mulrcl 11089  ax-mulcom 11090  ax-addass 11091  ax-mulass 11092  ax-distr 11093  ax-i2m1 11094  ax-1ne0 11095  ax-1rid 11096  ax-rnegex 11097  ax-rrecex 11098  ax-cnre 11099  ax-pre-lttri 11100  ax-pre-lttrn 11101  ax-pre-ltadd 11102  ax-pre-mulgt0 11103
This theorem depends on definitions:  df-bi 207  df-an 396  df-or 848  df-3or 1087  df-3an 1088  df-tru 1544  df-fal 1554  df-ex 1781  df-nf 1785  df-sb 2068  df-mo 2539  df-eu 2569  df-clab 2715  df-cleq 2728  df-clel 2811  df-nfc 2885  df-ne 2933  df-nel 3037  df-ral 3052  df-rex 3061  df-rmo 3350  df-reu 3351  df-rab 3400  df-v 3442  df-sbc 3741  df-csb 3850  df-dif 3904  df-un 3906  df-in 3908  df-ss 3918  df-pss 3921  df-nul 4286  df-if 4480  df-pw 4556  df-sn 4581  df-pr 4583  df-op 4587  df-uni 4864  df-int 4903  df-iun 4948  df-iin 4949  df-br 5099  df-opab 5161  df-mpt 5180  df-tr 5206  df-id 5519  df-eprel 5524  df-po 5532  df-so 5533  df-fr 5577  df-se 5578  df-we 5579  df-xp 5630  df-rel 5631  df-cnv 5632  df-co 5633  df-dm 5634  df-rn 5635  df-res 5636  df-ima 5637  df-pred 6259  df-ord 6320  df-on 6321  df-lim 6322  df-suc 6323  df-iota 6448  df-fun 6494  df-fn 6495  df-f 6496  df-f1 6497  df-fo 6498  df-f1o 6499  df-fv 6500  df-isom 6501  df-riota 7315  df-ov 7361  df-oprab 7362  df-mpo 7363  df-of 7622  df-om 7809  df-1st 7933  df-2nd 7934  df-supp 8103  df-frecs 8223  df-wrecs 8254  df-recs 8303  df-rdg 8341  df-1o 8397  df-2o 8398  df-er 8635  df-en 8884  df-dom 8885  df-sdom 8886  df-fin 8887  df-fsupp 9265  df-oi 9415  df-card 9851  df-pnf 11168  df-mnf 11169  df-xr 11170  df-ltxr 11171  df-le 11172  df-sub 11366  df-neg 11367  df-nn 12146  df-2 12208  df-n0 12402  df-z 12489  df-uz 12752  df-fz 13424  df-fzo 13571  df-seq 13925  df-hash 14254  df-sets 17091  df-slot 17109  df-ndx 17121  df-base 17137  df-ress 17158  df-plusg 17190  df-0g 17361  df-gsum 17362  df-mre 17505  df-mrc 17506  df-acs 17508  df-mgm 18565  df-sgrp 18644  df-mnd 18660  df-submnd 18709  df-mulg 18998  df-cntz 19246  df-cmn 19711
This theorem is referenced by:  elrspunidl  33509
  Copyright terms: Public domain W3C validator