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 33040
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 8218 . . . . . . . 8 (𝐹 supp 0 ) ⊆ dom 𝐹
32, 1fssdm 6766 . . . . . . 7 (𝜑 → (𝐹 supp 0 ) ⊆ 𝐴)
41, 3feqresmpt 6991 . . . . . 6 (𝜑 → (𝐹 ↾ (𝐹 supp 0 )) = (𝑥 ∈ (𝐹 supp 0 ) ↦ (𝐹𝑥)))
54oveq2d 7464 . . . . 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 9433 . . . . . . . . 9 Rel finSupp
1110brrelex1i 5756 . . . . . . . 8 (𝐹 finSupp 0𝐹 ∈ V)
129, 11syl 17 . . . . . . 7 (𝜑𝐹 ∈ V)
131ffnd 6748 . . . . . . 7 (𝜑𝐹 Fn 𝐴)
1412, 13fndmexd 7944 . . . . . 6 (𝜑𝐴 ∈ V)
15 ssidd 4032 . . . . . 6 (𝜑 → (𝐹 supp 0 ) ⊆ (𝐹 supp 0 ))
166, 7, 8, 14, 1, 15, 9gsumres 19955 . . . . 5 (𝜑 → (𝐺 Σg (𝐹 ↾ (𝐹 supp 0 ))) = (𝐺 Σg 𝐹))
17 nfcv 2908 . . . . . 6 𝑥(𝐹‘(1st𝑧))
18 fveq2 6920 . . . . . 6 (𝑥 = (1st𝑧) → (𝐹𝑥) = (𝐹‘(1st𝑧)))
199fsuppimpd 9439 . . . . . 6 (𝜑 → (𝐹 supp 0 ) ∈ Fin)
20 ssidd 4032 . . . . . 6 (𝜑𝐵𝐵)
211adantr 480 . . . . . . 7 ((𝜑𝑥 ∈ (𝐹 supp 0 )) → 𝐹:𝐴𝐵)
223sselda 4008 . . . . . . 7 ((𝜑𝑥 ∈ (𝐹 supp 0 )) → 𝑥𝐴)
2321, 22ffvelcdmd 7119 . . . . . 6 ((𝜑𝑥 ∈ (𝐹 supp 0 )) → (𝐹𝑥) ∈ 𝐵)
241ffund 6751 . . . . . . . . 9 (𝜑 → Fun 𝐹)
25 funrel 6595 . . . . . . . . 9 (Fun 𝐹 → Rel 𝐹)
26 reldif 5839 . . . . . . . . 9 (Rel 𝐹 → Rel (𝐹 ∖ (V × { 0 })))
2724, 25, 263syl 18 . . . . . . . 8 (𝜑 → Rel (𝐹 ∖ (V × { 0 })))
28 1stdm 8081 . . . . . . . 8 ((Rel (𝐹 ∖ (V × { 0 })) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) → (1st𝑧) ∈ dom (𝐹 ∖ (V × { 0 })))
2927, 28sylan 579 . . . . . . 7 ((𝜑𝑧 ∈ (𝐹 ∖ (V × { 0 }))) → (1st𝑧) ∈ dom (𝐹 ∖ (V × { 0 })))
307fvexi 6934 . . . . . . . . . . . 12 0 ∈ V
3130a1i 11 . . . . . . . . . . 11 (𝜑0 ∈ V)
32 fressupp 32700 . . . . . . . . . . 11 ((Fun 𝐹𝐹 ∈ V ∧ 0 ∈ V) → (𝐹 ↾ (𝐹 supp 0 )) = (𝐹 ∖ (V × { 0 })))
3324, 12, 31, 32syl3anc 1371 . . . . . . . . . 10 (𝜑 → (𝐹 ↾ (𝐹 supp 0 )) = (𝐹 ∖ (V × { 0 })))
3433dmeqd 5930 . . . . . . . . 9 (𝜑 → dom (𝐹 ↾ (𝐹 supp 0 )) = dom (𝐹 ∖ (V × { 0 })))
352a1i 11 . . . . . . . . . 10 (𝜑 → (𝐹 supp 0 ) ⊆ dom 𝐹)
36 ssdmres 6042 . . . . . . . . . 10 ((𝐹 supp 0 ) ⊆ dom 𝐹 ↔ dom (𝐹 ↾ (𝐹 supp 0 )) = (𝐹 supp 0 ))
3735, 36sylib 218 . . . . . . . . 9 (𝜑 → dom (𝐹 ↾ (𝐹 supp 0 )) = (𝐹 supp 0 ))
3834, 37eqtr3d 2782 . . . . . . . 8 (𝜑 → dom (𝐹 ∖ (V × { 0 })) = (𝐹 supp 0 ))
3938adantr 480 . . . . . . 7 ((𝜑𝑧 ∈ (𝐹 ∖ (V × { 0 }))) → dom (𝐹 ∖ (V × { 0 })) = (𝐹 supp 0 ))
4029, 39eleqtrd 2846 . . . . . 6 ((𝜑𝑧 ∈ (𝐹 ∖ (V × { 0 }))) → (1st𝑧) ∈ (𝐹 supp 0 ))
4124funresd 6621 . . . . . . . . . . 11 (𝜑 → Fun (𝐹 ↾ (𝐹 supp 0 )))
4241adantr 480 . . . . . . . . . 10 ((𝜑𝑥 ∈ (𝐹 supp 0 )) → Fun (𝐹 ↾ (𝐹 supp 0 )))
4337eleq2d 2830 . . . . . . . . . . 11 (𝜑 → (𝑥 ∈ dom (𝐹 ↾ (𝐹 supp 0 )) ↔ 𝑥 ∈ (𝐹 supp 0 )))
4443biimpar 477 . . . . . . . . . 10 ((𝜑𝑥 ∈ (𝐹 supp 0 )) → 𝑥 ∈ dom (𝐹 ↾ (𝐹 supp 0 )))
45 simpr 484 . . . . . . . . . . 11 ((𝜑𝑥 ∈ (𝐹 supp 0 )) → 𝑥 ∈ (𝐹 supp 0 ))
4645fvresd 6940 . . . . . . . . . 10 ((𝜑𝑥 ∈ (𝐹 supp 0 )) → ((𝐹 ↾ (𝐹 supp 0 ))‘𝑥) = (𝐹𝑥))
47 funopfvb 6976 . . . . . . . . . . 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 2846 . . . . . . . 8 ((𝜑𝑥 ∈ (𝐹 supp 0 )) → ⟨𝑥, (𝐹𝑥)⟩ ∈ (𝐹 ∖ (V × { 0 })))
52 eqeq2 2752 . . . . . . . . . . 11 (𝑣 = ⟨𝑥, (𝐹𝑥)⟩ → (𝑧 = 𝑣𝑧 = ⟨𝑥, (𝐹𝑥)⟩))
5352bibi2d 342 . . . . . . . . . 10 (𝑣 = ⟨𝑥, (𝐹𝑥)⟩ → ((𝑥 = (1st𝑧) ↔ 𝑧 = 𝑣) ↔ (𝑥 = (1st𝑧) ↔ 𝑧 = ⟨𝑥, (𝐹𝑥)⟩)))
5453ralbidv 3184 . . . . . . . . 9 (𝑣 = ⟨𝑥, (𝐹𝑥)⟩ → (∀𝑧 ∈ (𝐹 ∖ (V × { 0 }))(𝑥 = (1st𝑧) ↔ 𝑧 = 𝑣) ↔ ∀𝑧 ∈ (𝐹 ∖ (V × { 0 }))(𝑥 = (1st𝑧) ↔ 𝑧 = ⟨𝑥, (𝐹𝑥)⟩)))
5554adantl 481 . . . . . . . 8 (((𝜑𝑥 ∈ (𝐹 supp 0 )) ∧ 𝑣 = ⟨𝑥, (𝐹𝑥)⟩) → (∀𝑧 ∈ (𝐹 ∖ (V × { 0 }))(𝑥 = (1st𝑧) ↔ 𝑧 = 𝑣) ↔ ∀𝑧 ∈ (𝐹 ∖ (V × { 0 }))(𝑥 = (1st𝑧) ↔ 𝑧 = ⟨𝑥, (𝐹𝑥)⟩)))
56 fvexd 6935 . . . . . . . . . . . . . 14 ((((𝜑𝑥 ∈ (𝐹 supp 0 )) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑥 = (1st𝑧)) → (2nd𝑧) ∈ V)
5727ad3antrrr 729 . . . . . . . . . . . . . . . . 17 ((((𝜑𝑥 ∈ (𝐹 supp 0 )) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑥 = (1st𝑧)) → Rel (𝐹 ∖ (V × { 0 })))
58 simplr 768 . . . . . . . . . . . . . . . . 17 ((((𝜑𝑥 ∈ (𝐹 supp 0 )) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑥 = (1st𝑧)) → 𝑧 ∈ (𝐹 ∖ (V × { 0 })))
59 1st2nd 8080 . . . . . . . . . . . . . . . . 17 ((Rel (𝐹 ∖ (V × { 0 })) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) → 𝑧 = ⟨(1st𝑧), (2nd𝑧)⟩)
6057, 58, 59syl2anc 583 . . . . . . . . . . . . . . . 16 ((((𝜑𝑥 ∈ (𝐹 supp 0 )) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑥 = (1st𝑧)) → 𝑧 = ⟨(1st𝑧), (2nd𝑧)⟩)
61 opeq1 4897 . . . . . . . . . . . . . . . . 17 (𝑥 = (1st𝑧) → ⟨𝑥, (2nd𝑧)⟩ = ⟨(1st𝑧), (2nd𝑧)⟩)
6261adantl 481 . . . . . . . . . . . . . . . 16 ((((𝜑𝑥 ∈ (𝐹 supp 0 )) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑥 = (1st𝑧)) → ⟨𝑥, (2nd𝑧)⟩ = ⟨(1st𝑧), (2nd𝑧)⟩)
6360, 62eqtr4d 2783 . . . . . . . . . . . . . . 15 ((((𝜑𝑥 ∈ (𝐹 supp 0 )) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑥 = (1st𝑧)) → 𝑧 = ⟨𝑥, (2nd𝑧)⟩)
64 difssd 4160 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑥 ∈ (𝐹 supp 0 )) → (𝐹 ∖ (V × { 0 })) ⊆ 𝐹)
6564sselda 4008 . . . . . . . . . . . . . . . . 17 (((𝜑𝑥 ∈ (𝐹 supp 0 )) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) → 𝑧𝐹)
6665adantr 480 . . . . . . . . . . . . . . . 16 ((((𝜑𝑥 ∈ (𝐹 supp 0 )) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑥 = (1st𝑧)) → 𝑧𝐹)
6763, 66eqeltrrd 2845 . . . . . . . . . . . . . . 15 ((((𝜑𝑥 ∈ (𝐹 supp 0 )) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑥 = (1st𝑧)) → ⟨𝑥, (2nd𝑧)⟩ ∈ 𝐹)
6863, 67jca 511 . . . . . . . . . . . . . 14 ((((𝜑𝑥 ∈ (𝐹 supp 0 )) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑥 = (1st𝑧)) → (𝑧 = ⟨𝑥, (2nd𝑧)⟩ ∧ ⟨𝑥, (2nd𝑧)⟩ ∈ 𝐹))
69 opeq2 4898 . . . . . . . . . . . . . . . 16 (𝑦 = (2nd𝑧) → ⟨𝑥, 𝑦⟩ = ⟨𝑥, (2nd𝑧)⟩)
7069eqeq2d 2751 . . . . . . . . . . . . . . 15 (𝑦 = (2nd𝑧) → (𝑧 = ⟨𝑥, 𝑦⟩ ↔ 𝑧 = ⟨𝑥, (2nd𝑧)⟩))
7169eleq1d 2829 . . . . . . . . . . . . . . 15 (𝑦 = (2nd𝑧) → (⟨𝑥, 𝑦⟩ ∈ 𝐹 ↔ ⟨𝑥, (2nd𝑧)⟩ ∈ 𝐹))
7270, 71anbi12d 631 . . . . . . . . . . . . . 14 (𝑦 = (2nd𝑧) → ((𝑧 = ⟨𝑥, 𝑦⟩ ∧ ⟨𝑥, 𝑦⟩ ∈ 𝐹) ↔ (𝑧 = ⟨𝑥, (2nd𝑧)⟩ ∧ ⟨𝑥, (2nd𝑧)⟩ ∈ 𝐹)))
7356, 68, 72spcedv 3611 . . . . . . . . . . . . 13 ((((𝜑𝑥 ∈ (𝐹 supp 0 )) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑥 = (1st𝑧)) → ∃𝑦(𝑧 = ⟨𝑥, 𝑦⟩ ∧ ⟨𝑥, 𝑦⟩ ∈ 𝐹))
74 vex 3492 . . . . . . . . . . . . . 14 𝑥 ∈ V
7574elsnres 6050 . . . . . . . . . . . . 13 (𝑧 ∈ (𝐹 ↾ {𝑥}) ↔ ∃𝑦(𝑧 = ⟨𝑥, 𝑦⟩ ∧ ⟨𝑥, 𝑦⟩ ∈ 𝐹))
7673, 75sylibr 234 . . . . . . . . . . . 12 ((((𝜑𝑥 ∈ (𝐹 supp 0 )) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑥 = (1st𝑧)) → 𝑧 ∈ (𝐹 ↾ {𝑥}))
7713ad3antrrr 729 . . . . . . . . . . . . 13 ((((𝜑𝑥 ∈ (𝐹 supp 0 )) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑥 = (1st𝑧)) → 𝐹 Fn 𝐴)
7822ad2antrr 725 . . . . . . . . . . . . 13 ((((𝜑𝑥 ∈ (𝐹 supp 0 )) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑥 = (1st𝑧)) → 𝑥𝐴)
79 fnressn 7192 . . . . . . . . . . . . 13 ((𝐹 Fn 𝐴𝑥𝐴) → (𝐹 ↾ {𝑥}) = {⟨𝑥, (𝐹𝑥)⟩})
8077, 78, 79syl2anc 583 . . . . . . . . . . . 12 ((((𝜑𝑥 ∈ (𝐹 supp 0 )) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑥 = (1st𝑧)) → (𝐹 ↾ {𝑥}) = {⟨𝑥, (𝐹𝑥)⟩})
8176, 80eleqtrd 2846 . . . . . . . . . . 11 ((((𝜑𝑥 ∈ (𝐹 supp 0 )) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑥 = (1st𝑧)) → 𝑧 ∈ {⟨𝑥, (𝐹𝑥)⟩})
82 elsni 4665 . . . . . . . . . . 11 (𝑧 ∈ {⟨𝑥, (𝐹𝑥)⟩} → 𝑧 = ⟨𝑥, (𝐹𝑥)⟩)
8381, 82syl 17 . . . . . . . . . 10 ((((𝜑𝑥 ∈ (𝐹 supp 0 )) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑥 = (1st𝑧)) → 𝑧 = ⟨𝑥, (𝐹𝑥)⟩)
84 simpr 484 . . . . . . . . . . . 12 ((((𝜑𝑥 ∈ (𝐹 supp 0 )) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑧 = ⟨𝑥, (𝐹𝑥)⟩) → 𝑧 = ⟨𝑥, (𝐹𝑥)⟩)
8584fveq2d 6924 . . . . . . . . . . 11 ((((𝜑𝑥 ∈ (𝐹 supp 0 )) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑧 = ⟨𝑥, (𝐹𝑥)⟩) → (1st𝑧) = (1st ‘⟨𝑥, (𝐹𝑥)⟩))
86 fvex 6933 . . . . . . . . . . . 12 (𝐹𝑥) ∈ V
8774, 86op1st 8038 . . . . . . . . . . 11 (1st ‘⟨𝑥, (𝐹𝑥)⟩) = 𝑥
8885, 87eqtr2di 2797 . . . . . . . . . 10 ((((𝜑𝑥 ∈ (𝐹 supp 0 )) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑧 = ⟨𝑥, (𝐹𝑥)⟩) → 𝑥 = (1st𝑧))
8983, 88impbida 800 . . . . . . . . 9 (((𝜑𝑥 ∈ (𝐹 supp 0 )) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) → (𝑥 = (1st𝑧) ↔ 𝑧 = ⟨𝑥, (𝐹𝑥)⟩))
9089ralrimiva 3152 . . . . . . . 8 ((𝜑𝑥 ∈ (𝐹 supp 0 )) → ∀𝑧 ∈ (𝐹 ∖ (V × { 0 }))(𝑥 = (1st𝑧) ↔ 𝑧 = ⟨𝑥, (𝐹𝑥)⟩))
9151, 55, 90rspcedvd 3637 . . . . . . 7 ((𝜑𝑥 ∈ (𝐹 supp 0 )) → ∃𝑣 ∈ (𝐹 ∖ (V × { 0 }))∀𝑧 ∈ (𝐹 ∖ (V × { 0 }))(𝑥 = (1st𝑧) ↔ 𝑧 = 𝑣))
92 reu6 3748 . . . . . . 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 20005 . . . . 5 (𝜑 → (𝐺 Σg (𝑥 ∈ (𝐹 supp 0 ) ↦ (𝐹𝑥))) = (𝐺 Σg (𝑧 ∈ (𝐹 ∖ (V × { 0 })) ↦ (𝐹‘(1st𝑧)))))
955, 16, 943eqtr3d 2788 . . . 4 (𝜑 → (𝐺 Σg 𝐹) = (𝐺 Σg (𝑧 ∈ (𝐹 ∖ (V × { 0 })) ↦ (𝐹‘(1st𝑧)))))
96 simpr 484 . . . . . . . 8 ((𝜑𝑧 ∈ (𝐹 ∖ (V × { 0 }))) → 𝑧 ∈ (𝐹 ∖ (V × { 0 })))
9796eldifad 3988 . . . . . . 7 ((𝜑𝑧 ∈ (𝐹 ∖ (V × { 0 }))) → 𝑧𝐹)
98 funfv1st2nd 8087 . . . . . . 7 ((Fun 𝐹𝑧𝐹) → (𝐹‘(1st𝑧)) = (2nd𝑧))
9924, 97, 98syl2an2r 684 . . . . . 6 ((𝜑𝑧 ∈ (𝐹 ∖ (V × { 0 }))) → (𝐹‘(1st𝑧)) = (2nd𝑧))
10099mpteq2dva 5266 . . . . 5 (𝜑 → (𝑧 ∈ (𝐹 ∖ (V × { 0 })) ↦ (𝐹‘(1st𝑧))) = (𝑧 ∈ (𝐹 ∖ (V × { 0 })) ↦ (2nd𝑧)))
101100oveq2d 7464 . . . 4 (𝜑 → (𝐺 Σg (𝑧 ∈ (𝐹 ∖ (V × { 0 })) ↦ (𝐹‘(1st𝑧)))) = (𝐺 Σg (𝑧 ∈ (𝐹 ∖ (V × { 0 })) ↦ (2nd𝑧))))
10295, 101eqtrd 2780 . . 3 (𝜑 → (𝐺 Σg 𝐹) = (𝐺 Σg (𝑧 ∈ (𝐹 ∖ (V × { 0 })) ↦ (2nd𝑧))))
103 nfcv 2908 . . . 4 𝑧(1st𝑡)
104 fvex 6933 . . . . 5 (2nd𝑡) ∈ V
105 fvex 6933 . . . . 5 (1st𝑡) ∈ V
106104, 105op2ndd 8041 . . . 4 (𝑧 = ⟨(2nd𝑡), (1st𝑡)⟩ → (2nd𝑧) = (1st𝑡))
107 resfnfinfin 9405 . . . . . 6 ((𝐹 Fn 𝐴 ∧ (𝐹 supp 0 ) ∈ Fin) → (𝐹 ↾ (𝐹 supp 0 )) ∈ Fin)
10813, 19, 107syl2anc 583 . . . . 5 (𝜑 → (𝐹 ↾ (𝐹 supp 0 )) ∈ Fin)
10933, 108eqeltrrd 2845 . . . 4 (𝜑 → (𝐹 ∖ (V × { 0 })) ∈ Fin)
11033rneqd 5963 . . . . 5 (𝜑 → ran (𝐹 ↾ (𝐹 supp 0 )) = ran (𝐹 ∖ (V × { 0 })))
111 rnresss 6046 . . . . . 6 ran (𝐹 ↾ (𝐹 supp 0 )) ⊆ ran 𝐹
1121frnd 6755 . . . . . 6 (𝜑 → ran 𝐹𝐵)
113111, 112sstrid 4020 . . . . 5 (𝜑 → ran (𝐹 ↾ (𝐹 supp 0 )) ⊆ 𝐵)
114110, 113eqsstrrd 4048 . . . 4 (𝜑 → ran (𝐹 ∖ (V × { 0 })) ⊆ 𝐵)
115 2ndrn 8082 . . . . 5 ((Rel (𝐹 ∖ (V × { 0 })) ∧ 𝑧 ∈ (𝐹 ∖ (V × { 0 }))) → (2nd𝑧) ∈ ran (𝐹 ∖ (V × { 0 })))
11627, 115sylan 579 . . . 4 ((𝜑𝑧 ∈ (𝐹 ∖ (V × { 0 }))) → (2nd𝑧) ∈ ran (𝐹 ∖ (V × { 0 })))
117 relcnv 6134 . . . . . . . 8 Rel 𝐹
118 reldif 5839 . . . . . . . 8 (Rel 𝐹 → Rel (𝐹 ∖ ({ 0 } × V)))
119117, 118mp1i 13 . . . . . . 7 (𝜑 → Rel (𝐹 ∖ ({ 0 } × V)))
120 1st2nd 8080 . . . . . . 7 ((Rel (𝐹 ∖ ({ 0 } × V)) ∧ 𝑡 ∈ (𝐹 ∖ ({ 0 } × V))) → 𝑡 = ⟨(1st𝑡), (2nd𝑡)⟩)
121119, 120sylan 579 . . . . . 6 ((𝜑𝑡 ∈ (𝐹 ∖ ({ 0 } × V))) → 𝑡 = ⟨(1st𝑡), (2nd𝑡)⟩)
122 cnvdif 6175 . . . . . . . . . 10 (𝐹 ∖ (V × { 0 })) = (𝐹(V × { 0 }))
123 cnvxp 6188 . . . . . . . . . . 11 (V × { 0 }) = ({ 0 } × V)
124123difeq2i 4146 . . . . . . . . . 10 (𝐹(V × { 0 })) = (𝐹 ∖ ({ 0 } × V))
125122, 124eqtri 2768 . . . . . . . . 9 (𝐹 ∖ (V × { 0 })) = (𝐹 ∖ ({ 0 } × V))
126125eqimss2i 4070 . . . . . . . 8 (𝐹 ∖ ({ 0 } × V)) ⊆ (𝐹 ∖ (V × { 0 }))
127126a1i 11 . . . . . . 7 (𝜑 → (𝐹 ∖ ({ 0 } × V)) ⊆ (𝐹 ∖ (V × { 0 })))
128127sselda 4008 . . . . . 6 ((𝜑𝑡 ∈ (𝐹 ∖ ({ 0 } × V))) → 𝑡(𝐹 ∖ (V × { 0 })))
129121, 128eqeltrrd 2845 . . . . 5 ((𝜑𝑡 ∈ (𝐹 ∖ ({ 0 } × V))) → ⟨(1st𝑡), (2nd𝑡)⟩ ∈ (𝐹 ∖ (V × { 0 })))
130105, 104opelcnv 5906 . . . . 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 2741 . . . . . . . 8 ((𝜑𝑧 ∈ (𝐹 ∖ (V × { 0 }))) → {𝑧} = {𝑧})
134 cnvf1olem 8151 . . . . . . . . 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 2854 . . . . . 6 ((𝜑𝑧 ∈ (𝐹 ∖ (V × { 0 }))) → {𝑧} ∈ (𝐹 ∖ ({ 0 } × V)))
138 eqeq2 2752 . . . . . . . . 9 (𝑢 = {𝑧} → (𝑡 = 𝑢𝑡 = {𝑧}))
139138bibi2d 342 . . . . . . . 8 (𝑢 = {𝑧} → ((𝑧 = ⟨(2nd𝑡), (1st𝑡)⟩ ↔ 𝑡 = 𝑢) ↔ (𝑧 = ⟨(2nd𝑡), (1st𝑡)⟩ ↔ 𝑡 = {𝑧})))
140139ralbidv 3184 . . . . . . 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 5707 . . . . . . . . . . . . . 14 (Rel (𝐹 ∖ ({ 0 } × V)) ↔ (𝐹 ∖ ({ 0 } × V)) ⊆ (V × V))
146119, 145sylib 218 . . . . . . . . . . . . 13 (𝜑 → (𝐹 ∖ ({ 0 } × V)) ⊆ (V × V))
147146ad3antrrr 729 . . . . . . . . . . . 12 ((((𝜑𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑡 ∈ (𝐹 ∖ ({ 0 } × V))) ∧ 𝑧 = ⟨(2nd𝑡), (1st𝑡)⟩) → (𝐹 ∖ ({ 0 } × V)) ⊆ (V × V))
148147, 143sseldd 4009 . . . . . . . . . . 11 ((((𝜑𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑡 ∈ (𝐹 ∖ ({ 0 } × V))) ∧ 𝑧 = ⟨(2nd𝑡), (1st𝑡)⟩) → 𝑡 ∈ (V × V))
149 2nd1st 8079 . . . . . . . . . . 11 (𝑡 ∈ (V × V) → {𝑡} = ⟨(2nd𝑡), (1st𝑡)⟩)
150148, 149syl 17 . . . . . . . . . 10 ((((𝜑𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑡 ∈ (𝐹 ∖ ({ 0 } × V))) ∧ 𝑧 = ⟨(2nd𝑡), (1st𝑡)⟩) → {𝑡} = ⟨(2nd𝑡), (1st𝑡)⟩)
151144, 150eqtr4d 2783 . . . . . . . . 9 ((((𝜑𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑡 ∈ (𝐹 ∖ ({ 0 } × V))) ∧ 𝑧 = ⟨(2nd𝑡), (1st𝑡)⟩) → 𝑧 = {𝑡})
152 cnvf1olem 8151 . . . . . . . . . 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 729 . . . . . . . . . 10 ((((𝜑𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑡 ∈ (𝐹 ∖ ({ 0 } × V))) ∧ 𝑡 = {𝑧}) → Rel (𝐹 ∖ (V × { 0 })))
15696ad2antrr 725 . . . . . . . . . 10 ((((𝜑𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑡 ∈ (𝐹 ∖ ({ 0 } × V))) ∧ 𝑡 = {𝑧}) → 𝑧 ∈ (𝐹 ∖ (V × { 0 })))
157 simpr 484 . . . . . . . . . 10 ((((𝜑𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑡 ∈ (𝐹 ∖ ({ 0 } × V))) ∧ 𝑡 = {𝑧}) → 𝑡 = {𝑧})
158 cnvf1olem 8151 . . . . . . . . . . 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 729 . . . . . . . . . . 11 ((((𝜑𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑡 ∈ (𝐹 ∖ ({ 0 } × V))) ∧ 𝑡 = {𝑧}) → (𝐹 ∖ ({ 0 } × V)) ⊆ (V × V))
162 simplr 768 . . . . . . . . . . 11 ((((𝜑𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑡 ∈ (𝐹 ∖ ({ 0 } × V))) ∧ 𝑡 = {𝑧}) → 𝑡 ∈ (𝐹 ∖ ({ 0 } × V)))
163161, 162sseldd 4009 . . . . . . . . . 10 ((((𝜑𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑡 ∈ (𝐹 ∖ ({ 0 } × V))) ∧ 𝑡 = {𝑧}) → 𝑡 ∈ (V × V))
164163, 149syl 17 . . . . . . . . 9 ((((𝜑𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑡 ∈ (𝐹 ∖ ({ 0 } × V))) ∧ 𝑡 = {𝑧}) → {𝑡} = ⟨(2nd𝑡), (1st𝑡)⟩)
165160, 164eqtrd 2780 . . . . . . . 8 ((((𝜑𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑡 ∈ (𝐹 ∖ ({ 0 } × V))) ∧ 𝑡 = {𝑧}) → 𝑧 = ⟨(2nd𝑡), (1st𝑡)⟩)
166154, 165impbida 800 . . . . . . 7 (((𝜑𝑧 ∈ (𝐹 ∖ (V × { 0 }))) ∧ 𝑡 ∈ (𝐹 ∖ ({ 0 } × V))) → (𝑧 = ⟨(2nd𝑡), (1st𝑡)⟩ ↔ 𝑡 = {𝑧}))
167166ralrimiva 3152 . . . . . 6 ((𝜑𝑧 ∈ (𝐹 ∖ (V × { 0 }))) → ∀𝑡 ∈ (𝐹 ∖ ({ 0 } × V))(𝑧 = ⟨(2nd𝑡), (1st𝑡)⟩ ↔ 𝑡 = {𝑧}))
168137, 141, 167rspcedvd 3637 . . . . 5 ((𝜑𝑧 ∈ (𝐹 ∖ (V × { 0 }))) → ∃𝑢 ∈ (𝐹 ∖ ({ 0 } × V))∀𝑡 ∈ (𝐹 ∖ ({ 0 } × V))(𝑧 = ⟨(2nd𝑡), (1st𝑡)⟩ ↔ 𝑡 = 𝑢))
169 reu6 3748 . . . . 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 20005 . . 3 (𝜑 → (𝐺 Σg (𝑧 ∈ (𝐹 ∖ (V × { 0 })) ↦ (2nd𝑧))) = (𝐺 Σg (𝑡 ∈ (𝐹 ∖ ({ 0 } × V)) ↦ (1st𝑡))))
172 fveq2 6920 . . . . . 6 (𝑡 = 𝑧 → (1st𝑡) = (1st𝑧))
173172cbvmptv 5279 . . . . 5 (𝑡 ∈ (𝐹 ∖ ({ 0 } × V)) ↦ (1st𝑡)) = (𝑧 ∈ (𝐹 ∖ ({ 0 } × V)) ↦ (1st𝑧))
17433cnveqd 5900 . . . . . . 7 (𝜑(𝐹 ↾ (𝐹 supp 0 )) = (𝐹 ∖ (V × { 0 })))
175174, 125eqtr2di 2797 . . . . . 6 (𝜑 → (𝐹 ∖ ({ 0 } × V)) = (𝐹 ↾ (𝐹 supp 0 )))
176175mpteq1d 5261 . . . . 5 (𝜑 → (𝑧 ∈ (𝐹 ∖ ({ 0 } × V)) ↦ (1st𝑧)) = (𝑧(𝐹 ↾ (𝐹 supp 0 )) ↦ (1st𝑧)))
177173, 176eqtrid 2792 . . . 4 (𝜑 → (𝑡 ∈ (𝐹 ∖ ({ 0 } × V)) ↦ (1st𝑡)) = (𝑧(𝐹 ↾ (𝐹 supp 0 )) ↦ (1st𝑧)))
178177oveq2d 7464 . . 3 (𝜑 → (𝐺 Σg (𝑡 ∈ (𝐹 ∖ ({ 0 } × V)) ↦ (1st𝑡))) = (𝐺 Σg (𝑧(𝐹 ↾ (𝐹 supp 0 )) ↦ (1st𝑧))))
179102, 171, 1783eqtrd 2784 . 2 (𝜑 → (𝐺 Σg 𝐹) = (𝐺 Σg (𝑧(𝐹 ↾ (𝐹 supp 0 )) ↦ (1st𝑧))))
180 nfcv 2908 . . 3 𝑦(1st𝑧)
181 nfv 1913 . . 3 𝑥𝜑
182 vex 3492 . . . 4 𝑦 ∈ V
18374, 182op1std 8040 . . 3 (𝑧 = ⟨𝑥, 𝑦⟩ → (1st𝑧) = 𝑥)
184 relcnv 6134 . . . 4 Rel (𝐹 ↾ (𝐹 supp 0 ))
185184a1i 11 . . 3 (𝜑 → Rel (𝐹 ↾ (𝐹 supp 0 )))
186 cnvfi 9243 . . . 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 8081 . . . . . . 7 ((Rel (𝐹 ↾ (𝐹 supp 0 )) ∧ 𝑧(𝐹 ↾ (𝐹 supp 0 ))) → (1st𝑧) ∈ dom (𝐹 ↾ (𝐹 supp 0 )))
192189, 190, 191syl2anc 583 . . . . . 6 ((𝜑𝑧(𝐹 ↾ (𝐹 supp 0 ))) → (1st𝑧) ∈ dom (𝐹 ↾ (𝐹 supp 0 )))
193 df-rn 5711 . . . . . 6 ran (𝐹 ↾ (𝐹 supp 0 )) = dom (𝐹 ↾ (𝐹 supp 0 ))
194192, 193eleqtrrdi 2855 . . . . 5 ((𝜑𝑧(𝐹 ↾ (𝐹 supp 0 ))) → (1st𝑧) ∈ ran (𝐹 ↾ (𝐹 supp 0 )))
195111, 194sselid 4006 . . . 4 ((𝜑𝑧(𝐹 ↾ (𝐹 supp 0 ))) → (1st𝑧) ∈ ran 𝐹)
196188, 195sseldd 4009 . . 3 ((𝜑𝑧(𝐹 ↾ (𝐹 supp 0 ))) → (1st𝑧) ∈ 𝐵)
197180, 181, 6, 183, 185, 187, 8, 196gsummpt2d 33032 . 2 (𝜑 → (𝐺 Σg (𝑧(𝐹 ↾ (𝐹 supp 0 )) ↦ (1st𝑧))) = (𝐺 Σg (𝑥 ∈ dom (𝐹 ↾ (𝐹 supp 0 )) ↦ (𝐺 Σg (𝑦 ∈ ((𝐹 ↾ (𝐹 supp 0 )) “ {𝑥}) ↦ 𝑥)))))
198 df-ima 5713 . . . . . . 7 (𝐹 “ (𝐹 supp 0 )) = ran (𝐹 ↾ (𝐹 supp 0 ))
199 supppreima 32703 . . . . . . . . 9 ((Fun 𝐹𝐹 ∈ V ∧ 0 ∈ V) → (𝐹 supp 0 ) = (𝐹 “ (ran 𝐹 ∖ { 0 })))
20024, 12, 31, 199syl3anc 1371 . . . . . . . 8 (𝜑 → (𝐹 supp 0 ) = (𝐹 “ (ran 𝐹 ∖ { 0 })))
201200imaeq2d 6089 . . . . . . 7 (𝜑 → (𝐹 “ (𝐹 supp 0 )) = (𝐹 “ (𝐹 “ (ran 𝐹 ∖ { 0 }))))
202198, 201eqtr3id 2794 . . . . . 6 (𝜑 → ran (𝐹 ↾ (𝐹 supp 0 )) = (𝐹 “ (𝐹 “ (ran 𝐹 ∖ { 0 }))))
203 funimacnv 6659 . . . . . . 7 (Fun 𝐹 → (𝐹 “ (𝐹 “ (ran 𝐹 ∖ { 0 }))) = ((ran 𝐹 ∖ { 0 }) ∩ ran 𝐹))
20424, 203syl 17 . . . . . 6 (𝜑 → (𝐹 “ (𝐹 “ (ran 𝐹 ∖ { 0 }))) = ((ran 𝐹 ∖ { 0 }) ∩ ran 𝐹))
205 difssd 4160 . . . . . . 7 (𝜑 → (ran 𝐹 ∖ { 0 }) ⊆ ran 𝐹)
206 dfss2 3994 . . . . . . 7 ((ran 𝐹 ∖ { 0 }) ⊆ ran 𝐹 ↔ ((ran 𝐹 ∖ { 0 }) ∩ ran 𝐹) = (ran 𝐹 ∖ { 0 }))
207205, 206sylib 218 . . . . . 6 (𝜑 → ((ran 𝐹 ∖ { 0 }) ∩ ran 𝐹) = (ran 𝐹 ∖ { 0 }))
208202, 204, 2073eqtrd 2784 . . . . 5 (𝜑 → ran (𝐹 ↾ (𝐹 supp 0 )) = (ran 𝐹 ∖ { 0 }))
209193, 208eqtr3id 2794 . . . 4 (𝜑 → dom (𝐹 ↾ (𝐹 supp 0 )) = (ran 𝐹 ∖ { 0 }))
2108cmnmndd 19846 . . . . . . 7 (𝜑𝐺 ∈ Mnd)
211210adantr 480 . . . . . 6 ((𝜑𝑥 ∈ dom (𝐹 ↾ (𝐹 supp 0 ))) → 𝐺 ∈ Mnd)
212108adantr 480 . . . . . . 7 ((𝜑𝑥 ∈ dom (𝐹 ↾ (𝐹 supp 0 ))) → (𝐹 ↾ (𝐹 supp 0 )) ∈ Fin)
213 imafi2 32725 . . . . . . 7 ((𝐹 ↾ (𝐹 supp 0 )) ∈ Fin → ((𝐹 ↾ (𝐹 supp 0 )) “ {𝑥}) ∈ Fin)
214212, 186, 2133syl 18 . . . . . 6 ((𝜑𝑥 ∈ dom (𝐹 ↾ (𝐹 supp 0 ))) → ((𝐹 ↾ (𝐹 supp 0 )) “ {𝑥}) ∈ Fin)
215193, 113eqsstrrid 4058 . . . . . . 7 (𝜑 → dom (𝐹 ↾ (𝐹 supp 0 )) ⊆ 𝐵)
216215sselda 4008 . . . . . 6 ((𝜑𝑥 ∈ dom (𝐹 ↾ (𝐹 supp 0 ))) → 𝑥𝐵)
217 gsumhashmul.x . . . . . . 7 · = (.g𝐺)
2186, 217gsumconst 19976 . . . . . 6 ((𝐺 ∈ Mnd ∧ ((𝐹 ↾ (𝐹 supp 0 )) “ {𝑥}) ∈ Fin ∧ 𝑥𝐵) → (𝐺 Σg (𝑦 ∈ ((𝐹 ↾ (𝐹 supp 0 )) “ {𝑥}) ↦ 𝑥)) = ((♯‘((𝐹 ↾ (𝐹 supp 0 )) “ {𝑥})) · 𝑥))
219211, 214, 216, 218syl3anc 1371 . . . . 5 ((𝜑𝑥 ∈ dom (𝐹 ↾ (𝐹 supp 0 ))) → (𝐺 Σg (𝑦 ∈ ((𝐹 ↾ (𝐹 supp 0 )) “ {𝑥}) ↦ 𝑥)) = ((♯‘((𝐹 ↾ (𝐹 supp 0 )) “ {𝑥})) · 𝑥))
220 cnvresima 6261 . . . . . . . 8 ((𝐹 ↾ (𝐹 supp 0 )) “ {𝑥}) = ((𝐹 “ {𝑥}) ∩ (𝐹 supp 0 ))
221209eleq2d 2830 . . . . . . . . . . . . 13 (𝜑 → (𝑥 ∈ dom (𝐹 ↾ (𝐹 supp 0 )) ↔ 𝑥 ∈ (ran 𝐹 ∖ { 0 })))
222221biimpa 476 . . . . . . . . . . . 12 ((𝜑𝑥 ∈ dom (𝐹 ↾ (𝐹 supp 0 ))) → 𝑥 ∈ (ran 𝐹 ∖ { 0 }))
223222snssd 4834 . . . . . . . . . . 11 ((𝜑𝑥 ∈ dom (𝐹 ↾ (𝐹 supp 0 ))) → {𝑥} ⊆ (ran 𝐹 ∖ { 0 }))
224 sspreima 7101 . . . . . . . . . . 11 ((Fun 𝐹 ∧ {𝑥} ⊆ (ran 𝐹 ∖ { 0 })) → (𝐹 “ {𝑥}) ⊆ (𝐹 “ (ran 𝐹 ∖ { 0 })))
22524, 223, 224syl2an2r 684 . . . . . . . . . 10 ((𝜑𝑥 ∈ dom (𝐹 ↾ (𝐹 supp 0 ))) → (𝐹 “ {𝑥}) ⊆ (𝐹 “ (ran 𝐹 ∖ { 0 })))
226200adantr 480 . . . . . . . . . 10 ((𝜑𝑥 ∈ dom (𝐹 ↾ (𝐹 supp 0 ))) → (𝐹 supp 0 ) = (𝐹 “ (ran 𝐹 ∖ { 0 })))
227225, 226sseqtrrd 4050 . . . . . . . . 9 ((𝜑𝑥 ∈ dom (𝐹 ↾ (𝐹 supp 0 ))) → (𝐹 “ {𝑥}) ⊆ (𝐹 supp 0 ))
228 dfss2 3994 . . . . . . . . 9 ((𝐹 “ {𝑥}) ⊆ (𝐹 supp 0 ) ↔ ((𝐹 “ {𝑥}) ∩ (𝐹 supp 0 )) = (𝐹 “ {𝑥}))
229227, 228sylib 218 . . . . . . . 8 ((𝜑𝑥 ∈ dom (𝐹 ↾ (𝐹 supp 0 ))) → ((𝐹 “ {𝑥}) ∩ (𝐹 supp 0 )) = (𝐹 “ {𝑥}))
230220, 229eqtr2id 2793 . . . . . . 7 ((𝜑𝑥 ∈ dom (𝐹 ↾ (𝐹 supp 0 ))) → (𝐹 “ {𝑥}) = ((𝐹 ↾ (𝐹 supp 0 )) “ {𝑥}))
231230fveq2d 6924 . . . . . 6 ((𝜑𝑥 ∈ dom (𝐹 ↾ (𝐹 supp 0 ))) → (♯‘(𝐹 “ {𝑥})) = (♯‘((𝐹 ↾ (𝐹 supp 0 )) “ {𝑥})))
232231oveq1d 7463 . . . . 5 ((𝜑𝑥 ∈ dom (𝐹 ↾ (𝐹 supp 0 ))) → ((♯‘(𝐹 “ {𝑥})) · 𝑥) = ((♯‘((𝐹 ↾ (𝐹 supp 0 )) “ {𝑥})) · 𝑥))
233219, 232eqtr4d 2783 . . . 4 ((𝜑𝑥 ∈ dom (𝐹 ↾ (𝐹 supp 0 ))) → (𝐺 Σg (𝑦 ∈ ((𝐹 ↾ (𝐹 supp 0 )) “ {𝑥}) ↦ 𝑥)) = ((♯‘(𝐹 “ {𝑥})) · 𝑥))
234209, 233mpteq12dva 5255 . . 3 (𝜑 → (𝑥 ∈ dom (𝐹 ↾ (𝐹 supp 0 )) ↦ (𝐺 Σg (𝑦 ∈ ((𝐹 ↾ (𝐹 supp 0 )) “ {𝑥}) ↦ 𝑥))) = (𝑥 ∈ (ran 𝐹 ∖ { 0 }) ↦ ((♯‘(𝐹 “ {𝑥})) · 𝑥)))
235234oveq2d 7464 . 2 (𝜑 → (𝐺 Σg (𝑥 ∈ dom (𝐹 ↾ (𝐹 supp 0 )) ↦ (𝐺 Σg (𝑦 ∈ ((𝐹 ↾ (𝐹 supp 0 )) “ {𝑥}) ↦ 𝑥)))) = (𝐺 Σg (𝑥 ∈ (ran 𝐹 ∖ { 0 }) ↦ ((♯‘(𝐹 “ {𝑥})) · 𝑥))))
236179, 197, 2353eqtrd 2784 1 (𝜑 → (𝐺 Σg 𝐹) = (𝐺 Σg (𝑥 ∈ (ran 𝐹 ∖ { 0 }) ↦ ((♯‘(𝐹 “ {𝑥})) · 𝑥))))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 206  wa 395   = wceq 1537  wex 1777  wcel 2108  wral 3067  wrex 3076  ∃!wreu 3386  Vcvv 3488  cdif 3973  cin 3975  wss 3976  {csn 4648  cop 4654   cuni 4931   class class class wbr 5166  cmpt 5249   × cxp 5698  ccnv 5699  dom cdm 5700  ran crn 5701  cres 5702  cima 5703  Rel wrel 5705  Fun wfun 6567   Fn wfn 6568  wf 6569  cfv 6573  (class class class)co 7448  1st c1st 8028  2nd c2nd 8029   supp csupp 8201  Fincfn 9003   finSupp cfsupp 9431  chash 14379  Basecbs 17258  0gc0g 17499   Σg cgsu 17500  Mndcmnd 18772  .gcmg 19107  CMndccmn 19822
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1793  ax-4 1807  ax-5 1909  ax-6 1967  ax-7 2007  ax-8 2110  ax-9 2118  ax-10 2141  ax-11 2158  ax-12 2178  ax-ext 2711  ax-rep 5303  ax-sep 5317  ax-nul 5324  ax-pow 5383  ax-pr 5447  ax-un 7770  ax-cnex 11240  ax-resscn 11241  ax-1cn 11242  ax-icn 11243  ax-addcl 11244  ax-addrcl 11245  ax-mulcl 11246  ax-mulrcl 11247  ax-mulcom 11248  ax-addass 11249  ax-mulass 11250  ax-distr 11251  ax-i2m1 11252  ax-1ne0 11253  ax-1rid 11254  ax-rnegex 11255  ax-rrecex 11256  ax-cnre 11257  ax-pre-lttri 11258  ax-pre-lttrn 11259  ax-pre-ltadd 11260  ax-pre-mulgt0 11261
This theorem depends on definitions:  df-bi 207  df-an 396  df-or 847  df-3or 1088  df-3an 1089  df-tru 1540  df-fal 1550  df-ex 1778  df-nf 1782  df-sb 2065  df-mo 2543  df-eu 2572  df-clab 2718  df-cleq 2732  df-clel 2819  df-nfc 2895  df-ne 2947  df-nel 3053  df-ral 3068  df-rex 3077  df-rmo 3388  df-reu 3389  df-rab 3444  df-v 3490  df-sbc 3805  df-csb 3922  df-dif 3979  df-un 3981  df-in 3983  df-ss 3993  df-pss 3996  df-nul 4353  df-if 4549  df-pw 4624  df-sn 4649  df-pr 4651  df-op 4655  df-uni 4932  df-int 4971  df-iun 5017  df-iin 5018  df-br 5167  df-opab 5229  df-mpt 5250  df-tr 5284  df-id 5593  df-eprel 5599  df-po 5607  df-so 5608  df-fr 5652  df-se 5653  df-we 5654  df-xp 5706  df-rel 5707  df-cnv 5708  df-co 5709  df-dm 5710  df-rn 5711  df-res 5712  df-ima 5713  df-pred 6332  df-ord 6398  df-on 6399  df-lim 6400  df-suc 6401  df-iota 6525  df-fun 6575  df-fn 6576  df-f 6577  df-f1 6578  df-fo 6579  df-f1o 6580  df-fv 6581  df-isom 6582  df-riota 7404  df-ov 7451  df-oprab 7452  df-mpo 7453  df-of 7714  df-om 7904  df-1st 8030  df-2nd 8031  df-supp 8202  df-frecs 8322  df-wrecs 8353  df-recs 8427  df-rdg 8466  df-1o 8522  df-2o 8523  df-er 8763  df-en 9004  df-dom 9005  df-sdom 9006  df-fin 9007  df-fsupp 9432  df-oi 9579  df-card 10008  df-pnf 11326  df-mnf 11327  df-xr 11328  df-ltxr 11329  df-le 11330  df-sub 11522  df-neg 11523  df-nn 12294  df-2 12356  df-n0 12554  df-z 12640  df-uz 12904  df-fz 13568  df-fzo 13712  df-seq 14053  df-hash 14380  df-sets 17211  df-slot 17229  df-ndx 17241  df-base 17259  df-ress 17288  df-plusg 17324  df-0g 17501  df-gsum 17502  df-mre 17644  df-mrc 17645  df-acs 17647  df-mgm 18678  df-sgrp 18757  df-mnd 18773  df-submnd 18819  df-mulg 19108  df-cntz 19357  df-cmn 19824
This theorem is referenced by:  elrspunidl  33421
  Copyright terms: Public domain W3C validator