MPE Home Metamath Proof Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >  gsumval3lem2 Structured version   Visualization version   GIF version

Theorem gsumval3lem2 19847
Description: Lemma 2 for gsumval3 19848. (Contributed by AV, 31-May-2019.)
Hypotheses
Ref Expression
gsumval3.b 𝐵 = (Base‘𝐺)
gsumval3.0 0 = (0g𝐺)
gsumval3.p + = (+g𝐺)
gsumval3.z 𝑍 = (Cntz‘𝐺)
gsumval3.g (𝜑𝐺 ∈ Mnd)
gsumval3.a (𝜑𝐴𝑉)
gsumval3.f (𝜑𝐹:𝐴𝐵)
gsumval3.c (𝜑 → ran 𝐹 ⊆ (𝑍‘ran 𝐹))
gsumval3.m (𝜑𝑀 ∈ ℕ)
gsumval3.h (𝜑𝐻:(1...𝑀)–1-1𝐴)
gsumval3.n (𝜑 → (𝐹 supp 0 ) ⊆ ran 𝐻)
gsumval3.w 𝑊 = ((𝐹𝐻) supp 0 )
Assertion
Ref Expression
gsumval3lem2 (((𝜑𝑊 ≠ ∅) ∧ (¬ 𝐴 ∈ ran ... ∧ 𝑓 Isom < , < ((1...(♯‘𝑊)), 𝑊))) → (𝐺 Σg 𝐹) = (seq1( + , (𝐹 ∘ (𝐻𝑓)))‘(♯‘𝑊)))
Distinct variable groups:   + ,𝑓   𝐴,𝑓   𝜑,𝑓   𝑓,𝐺   𝑓,𝑀   𝐵,𝑓   𝑓,𝐹   𝑓,𝐻   𝑓,𝑊
Allowed substitution hints:   𝑉(𝑓)   0 (𝑓)   𝑍(𝑓)

Proof of Theorem gsumval3lem2
Dummy variables 𝑔 𝑥 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 gsumval3.h . . . . . . 7 (𝜑𝐻:(1...𝑀)–1-1𝐴)
2 f1f 6738 . . . . . . 7 (𝐻:(1...𝑀)–1-1𝐴𝐻:(1...𝑀)⟶𝐴)
31, 2syl 17 . . . . . 6 (𝜑𝐻:(1...𝑀)⟶𝐴)
4 fzfid 13908 . . . . . 6 (𝜑 → (1...𝑀) ∈ Fin)
53, 4fexd 7183 . . . . 5 (𝜑𝐻 ∈ V)
6 vex 3446 . . . . 5 𝑓 ∈ V
7 coexg 7881 . . . . 5 ((𝐻 ∈ V ∧ 𝑓 ∈ V) → (𝐻𝑓) ∈ V)
85, 6, 7sylancl 587 . . . 4 (𝜑 → (𝐻𝑓) ∈ V)
98ad2antrr 727 . . 3 (((𝜑𝑊 ≠ ∅) ∧ (¬ 𝐴 ∈ ran ... ∧ 𝑓 Isom < , < ((1...(♯‘𝑊)), 𝑊))) → (𝐻𝑓) ∈ V)
10 gsumval3.b . . . . 5 𝐵 = (Base‘𝐺)
11 gsumval3.0 . . . . 5 0 = (0g𝐺)
12 gsumval3.p . . . . 5 + = (+g𝐺)
13 gsumval3.z . . . . 5 𝑍 = (Cntz‘𝐺)
14 gsumval3.g . . . . 5 (𝜑𝐺 ∈ Mnd)
15 gsumval3.a . . . . 5 (𝜑𝐴𝑉)
16 gsumval3.f . . . . 5 (𝜑𝐹:𝐴𝐵)
17 gsumval3.c . . . . 5 (𝜑 → ran 𝐹 ⊆ (𝑍‘ran 𝐹))
18 gsumval3.m . . . . 5 (𝜑𝑀 ∈ ℕ)
19 gsumval3.n . . . . 5 (𝜑 → (𝐹 supp 0 ) ⊆ ran 𝐻)
20 gsumval3.w . . . . 5 𝑊 = ((𝐹𝐻) supp 0 )
2110, 11, 12, 13, 14, 15, 16, 17, 18, 1, 19, 20gsumval3lem1 19846 . . . 4 (((𝜑𝑊 ≠ ∅) ∧ (¬ 𝐴 ∈ ran ... ∧ 𝑓 Isom < , < ((1...(♯‘𝑊)), 𝑊))) → (𝐻𝑓):(1...(♯‘(𝐹 supp 0 )))–1-1-onto→(𝐹 supp 0 ))
22 fzfi 13907 . . . . . . . 8 (1...𝑀) ∈ Fin
23 suppssdm 8129 . . . . . . . . . 10 ((𝐹𝐻) supp 0 ) ⊆ dom (𝐹𝐻)
2420, 23eqsstri 3982 . . . . . . . . 9 𝑊 ⊆ dom (𝐹𝐻)
2516, 3fcod 6695 . . . . . . . . 9 (𝜑 → (𝐹𝐻):(1...𝑀)⟶𝐵)
2624, 25fssdm 6689 . . . . . . . 8 (𝜑𝑊 ⊆ (1...𝑀))
27 ssfi 9109 . . . . . . . 8 (((1...𝑀) ∈ Fin ∧ 𝑊 ⊆ (1...𝑀)) → 𝑊 ∈ Fin)
2822, 26, 27sylancr 588 . . . . . . 7 (𝜑𝑊 ∈ Fin)
2928ad2antrr 727 . . . . . 6 (((𝜑𝑊 ≠ ∅) ∧ (¬ 𝐴 ∈ ran ... ∧ 𝑓 Isom < , < ((1...(♯‘𝑊)), 𝑊))) → 𝑊 ∈ Fin)
301ad2antrr 727 . . . . . . . 8 (((𝜑𝑊 ≠ ∅) ∧ (¬ 𝐴 ∈ ran ... ∧ 𝑓 Isom < , < ((1...(♯‘𝑊)), 𝑊))) → 𝐻:(1...𝑀)–1-1𝐴)
3126ad2antrr 727 . . . . . . . 8 (((𝜑𝑊 ≠ ∅) ∧ (¬ 𝐴 ∈ ran ... ∧ 𝑓 Isom < , < ((1...(♯‘𝑊)), 𝑊))) → 𝑊 ⊆ (1...𝑀))
32 f1ores 6796 . . . . . . . 8 ((𝐻:(1...𝑀)–1-1𝐴𝑊 ⊆ (1...𝑀)) → (𝐻𝑊):𝑊1-1-onto→(𝐻𝑊))
3330, 31, 32syl2anc 585 . . . . . . 7 (((𝜑𝑊 ≠ ∅) ∧ (¬ 𝐴 ∈ ran ... ∧ 𝑓 Isom < , < ((1...(♯‘𝑊)), 𝑊))) → (𝐻𝑊):𝑊1-1-onto→(𝐻𝑊))
3420imaeq2i 6025 . . . . . . . . . 10 (𝐻𝑊) = (𝐻 “ ((𝐹𝐻) supp 0 ))
3516, 15fexd 7183 . . . . . . . . . . . . 13 (𝜑𝐹 ∈ V)
36 ovex 7401 . . . . . . . . . . . . . 14 (1...𝑀) ∈ V
37 fex 7182 . . . . . . . . . . . . . 14 ((𝐻:(1...𝑀)⟶𝐴 ∧ (1...𝑀) ∈ V) → 𝐻 ∈ V)
383, 36, 37sylancl 587 . . . . . . . . . . . . 13 (𝜑𝐻 ∈ V)
3935, 38jca 511 . . . . . . . . . . . 12 (𝜑 → (𝐹 ∈ V ∧ 𝐻 ∈ V))
40 f1fun 6740 . . . . . . . . . . . . . 14 (𝐻:(1...𝑀)–1-1𝐴 → Fun 𝐻)
411, 40syl 17 . . . . . . . . . . . . 13 (𝜑 → Fun 𝐻)
4241, 19jca 511 . . . . . . . . . . . 12 (𝜑 → (Fun 𝐻 ∧ (𝐹 supp 0 ) ⊆ ran 𝐻))
43 imacosupp 8161 . . . . . . . . . . . 12 ((𝐹 ∈ V ∧ 𝐻 ∈ V) → ((Fun 𝐻 ∧ (𝐹 supp 0 ) ⊆ ran 𝐻) → (𝐻 “ ((𝐹𝐻) supp 0 )) = (𝐹 supp 0 )))
4439, 42, 43sylc 65 . . . . . . . . . . 11 (𝜑 → (𝐻 “ ((𝐹𝐻) supp 0 )) = (𝐹 supp 0 ))
4544adantr 480 . . . . . . . . . 10 ((𝜑𝑊 ≠ ∅) → (𝐻 “ ((𝐹𝐻) supp 0 )) = (𝐹 supp 0 ))
4634, 45eqtrid 2784 . . . . . . . . 9 ((𝜑𝑊 ≠ ∅) → (𝐻𝑊) = (𝐹 supp 0 ))
4746adantr 480 . . . . . . . 8 (((𝜑𝑊 ≠ ∅) ∧ (¬ 𝐴 ∈ ran ... ∧ 𝑓 Isom < , < ((1...(♯‘𝑊)), 𝑊))) → (𝐻𝑊) = (𝐹 supp 0 ))
4847f1oeq3d 6779 . . . . . . 7 (((𝜑𝑊 ≠ ∅) ∧ (¬ 𝐴 ∈ ran ... ∧ 𝑓 Isom < , < ((1...(♯‘𝑊)), 𝑊))) → ((𝐻𝑊):𝑊1-1-onto→(𝐻𝑊) ↔ (𝐻𝑊):𝑊1-1-onto→(𝐹 supp 0 )))
4933, 48mpbid 232 . . . . . 6 (((𝜑𝑊 ≠ ∅) ∧ (¬ 𝐴 ∈ ran ... ∧ 𝑓 Isom < , < ((1...(♯‘𝑊)), 𝑊))) → (𝐻𝑊):𝑊1-1-onto→(𝐹 supp 0 ))
5029, 49hasheqf1od 14288 . . . . 5 (((𝜑𝑊 ≠ ∅) ∧ (¬ 𝐴 ∈ ran ... ∧ 𝑓 Isom < , < ((1...(♯‘𝑊)), 𝑊))) → (♯‘𝑊) = (♯‘(𝐹 supp 0 )))
5150fveq2d 6846 . . . 4 (((𝜑𝑊 ≠ ∅) ∧ (¬ 𝐴 ∈ ran ... ∧ 𝑓 Isom < , < ((1...(♯‘𝑊)), 𝑊))) → (seq1( + , (𝐹 ∘ (𝐻𝑓)))‘(♯‘𝑊)) = (seq1( + , (𝐹 ∘ (𝐻𝑓)))‘(♯‘(𝐹 supp 0 ))))
5221, 51jca 511 . . 3 (((𝜑𝑊 ≠ ∅) ∧ (¬ 𝐴 ∈ ran ... ∧ 𝑓 Isom < , < ((1...(♯‘𝑊)), 𝑊))) → ((𝐻𝑓):(1...(♯‘(𝐹 supp 0 )))–1-1-onto→(𝐹 supp 0 ) ∧ (seq1( + , (𝐹 ∘ (𝐻𝑓)))‘(♯‘𝑊)) = (seq1( + , (𝐹 ∘ (𝐻𝑓)))‘(♯‘(𝐹 supp 0 )))))
53 f1oeq1 6770 . . . 4 (𝑔 = (𝐻𝑓) → (𝑔:(1...(♯‘(𝐹 supp 0 )))–1-1-onto→(𝐹 supp 0 ) ↔ (𝐻𝑓):(1...(♯‘(𝐹 supp 0 )))–1-1-onto→(𝐹 supp 0 )))
54 coeq2 5815 . . . . . . 7 (𝑔 = (𝐻𝑓) → (𝐹𝑔) = (𝐹 ∘ (𝐻𝑓)))
5554seqeq3d 13944 . . . . . 6 (𝑔 = (𝐻𝑓) → seq1( + , (𝐹𝑔)) = seq1( + , (𝐹 ∘ (𝐻𝑓))))
5655fveq1d 6844 . . . . 5 (𝑔 = (𝐻𝑓) → (seq1( + , (𝐹𝑔))‘(♯‘(𝐹 supp 0 ))) = (seq1( + , (𝐹 ∘ (𝐻𝑓)))‘(♯‘(𝐹 supp 0 ))))
5756eqeq2d 2748 . . . 4 (𝑔 = (𝐻𝑓) → ((seq1( + , (𝐹 ∘ (𝐻𝑓)))‘(♯‘𝑊)) = (seq1( + , (𝐹𝑔))‘(♯‘(𝐹 supp 0 ))) ↔ (seq1( + , (𝐹 ∘ (𝐻𝑓)))‘(♯‘𝑊)) = (seq1( + , (𝐹 ∘ (𝐻𝑓)))‘(♯‘(𝐹 supp 0 )))))
5853, 57anbi12d 633 . . 3 (𝑔 = (𝐻𝑓) → ((𝑔:(1...(♯‘(𝐹 supp 0 )))–1-1-onto→(𝐹 supp 0 ) ∧ (seq1( + , (𝐹 ∘ (𝐻𝑓)))‘(♯‘𝑊)) = (seq1( + , (𝐹𝑔))‘(♯‘(𝐹 supp 0 )))) ↔ ((𝐻𝑓):(1...(♯‘(𝐹 supp 0 )))–1-1-onto→(𝐹 supp 0 ) ∧ (seq1( + , (𝐹 ∘ (𝐻𝑓)))‘(♯‘𝑊)) = (seq1( + , (𝐹 ∘ (𝐻𝑓)))‘(♯‘(𝐹 supp 0 ))))))
599, 52, 58spcedv 3554 . 2 (((𝜑𝑊 ≠ ∅) ∧ (¬ 𝐴 ∈ ran ... ∧ 𝑓 Isom < , < ((1...(♯‘𝑊)), 𝑊))) → ∃𝑔(𝑔:(1...(♯‘(𝐹 supp 0 )))–1-1-onto→(𝐹 supp 0 ) ∧ (seq1( + , (𝐹 ∘ (𝐻𝑓)))‘(♯‘𝑊)) = (seq1( + , (𝐹𝑔))‘(♯‘(𝐹 supp 0 )))))
6014ad2antrr 727 . . . . . . 7 (((𝜑𝑊 ≠ ∅) ∧ (¬ 𝐴 ∈ ran ... ∧ 𝑓 Isom < , < ((1...(♯‘𝑊)), 𝑊))) → 𝐺 ∈ Mnd)
6115ad2antrr 727 . . . . . . 7 (((𝜑𝑊 ≠ ∅) ∧ (¬ 𝐴 ∈ ran ... ∧ 𝑓 Isom < , < ((1...(♯‘𝑊)), 𝑊))) → 𝐴𝑉)
6216ad2antrr 727 . . . . . . 7 (((𝜑𝑊 ≠ ∅) ∧ (¬ 𝐴 ∈ ran ... ∧ 𝑓 Isom < , < ((1...(♯‘𝑊)), 𝑊))) → 𝐹:𝐴𝐵)
6317ad2antrr 727 . . . . . . 7 (((𝜑𝑊 ≠ ∅) ∧ (¬ 𝐴 ∈ ran ... ∧ 𝑓 Isom < , < ((1...(♯‘𝑊)), 𝑊))) → ran 𝐹 ⊆ (𝑍‘ran 𝐹))
64 f1f1orn 6793 . . . . . . . . . . . . 13 (𝐻:(1...𝑀)–1-1𝐴𝐻:(1...𝑀)–1-1-onto→ran 𝐻)
651, 64syl 17 . . . . . . . . . . . 12 (𝜑𝐻:(1...𝑀)–1-1-onto→ran 𝐻)
66 f1oen3g 8915 . . . . . . . . . . . 12 ((𝐻 ∈ V ∧ 𝐻:(1...𝑀)–1-1-onto→ran 𝐻) → (1...𝑀) ≈ ran 𝐻)
675, 65, 66syl2anc 585 . . . . . . . . . . 11 (𝜑 → (1...𝑀) ≈ ran 𝐻)
68 enfi 9123 . . . . . . . . . . 11 ((1...𝑀) ≈ ran 𝐻 → ((1...𝑀) ∈ Fin ↔ ran 𝐻 ∈ Fin))
6967, 68syl 17 . . . . . . . . . 10 (𝜑 → ((1...𝑀) ∈ Fin ↔ ran 𝐻 ∈ Fin))
7022, 69mpbii 233 . . . . . . . . 9 (𝜑 → ran 𝐻 ∈ Fin)
7170, 19ssfid 9181 . . . . . . . 8 (𝜑 → (𝐹 supp 0 ) ∈ Fin)
7271ad2antrr 727 . . . . . . 7 (((𝜑𝑊 ≠ ∅) ∧ (¬ 𝐴 ∈ ran ... ∧ 𝑓 Isom < , < ((1...(♯‘𝑊)), 𝑊))) → (𝐹 supp 0 ) ∈ Fin)
7320neeq1i 2997 . . . . . . . . . 10 (𝑊 ≠ ∅ ↔ ((𝐹𝐻) supp 0 ) ≠ ∅)
74 supp0cosupp0 8160 . . . . . . . . . . . 12 ((𝐹 ∈ V ∧ 𝐻 ∈ V) → ((𝐹 supp 0 ) = ∅ → ((𝐹𝐻) supp 0 ) = ∅))
7574necon3d 2954 . . . . . . . . . . 11 ((𝐹 ∈ V ∧ 𝐻 ∈ V) → (((𝐹𝐻) supp 0 ) ≠ ∅ → (𝐹 supp 0 ) ≠ ∅))
7635, 38, 75syl2anc 585 . . . . . . . . . 10 (𝜑 → (((𝐹𝐻) supp 0 ) ≠ ∅ → (𝐹 supp 0 ) ≠ ∅))
7773, 76biimtrid 242 . . . . . . . . 9 (𝜑 → (𝑊 ≠ ∅ → (𝐹 supp 0 ) ≠ ∅))
7877imp 406 . . . . . . . 8 ((𝜑𝑊 ≠ ∅) → (𝐹 supp 0 ) ≠ ∅)
7978adantr 480 . . . . . . 7 (((𝜑𝑊 ≠ ∅) ∧ (¬ 𝐴 ∈ ran ... ∧ 𝑓 Isom < , < ((1...(♯‘𝑊)), 𝑊))) → (𝐹 supp 0 ) ≠ ∅)
8019ad2antrr 727 . . . . . . . 8 (((𝜑𝑊 ≠ ∅) ∧ (¬ 𝐴 ∈ ran ... ∧ 𝑓 Isom < , < ((1...(♯‘𝑊)), 𝑊))) → (𝐹 supp 0 ) ⊆ ran 𝐻)
813frnd 6678 . . . . . . . . 9 (𝜑 → ran 𝐻𝐴)
8281ad2antrr 727 . . . . . . . 8 (((𝜑𝑊 ≠ ∅) ∧ (¬ 𝐴 ∈ ran ... ∧ 𝑓 Isom < , < ((1...(♯‘𝑊)), 𝑊))) → ran 𝐻𝐴)
8380, 82sstrd 3946 . . . . . . 7 (((𝜑𝑊 ≠ ∅) ∧ (¬ 𝐴 ∈ ran ... ∧ 𝑓 Isom < , < ((1...(♯‘𝑊)), 𝑊))) → (𝐹 supp 0 ) ⊆ 𝐴)
8410, 11, 12, 13, 60, 61, 62, 63, 72, 79, 83gsumval3eu 19845 . . . . . 6 (((𝜑𝑊 ≠ ∅) ∧ (¬ 𝐴 ∈ ran ... ∧ 𝑓 Isom < , < ((1...(♯‘𝑊)), 𝑊))) → ∃!𝑥𝑔(𝑔:(1...(♯‘(𝐹 supp 0 )))–1-1-onto→(𝐹 supp 0 ) ∧ 𝑥 = (seq1( + , (𝐹𝑔))‘(♯‘(𝐹 supp 0 )))))
85 iota1 6479 . . . . . 6 (∃!𝑥𝑔(𝑔:(1...(♯‘(𝐹 supp 0 )))–1-1-onto→(𝐹 supp 0 ) ∧ 𝑥 = (seq1( + , (𝐹𝑔))‘(♯‘(𝐹 supp 0 )))) → (∃𝑔(𝑔:(1...(♯‘(𝐹 supp 0 )))–1-1-onto→(𝐹 supp 0 ) ∧ 𝑥 = (seq1( + , (𝐹𝑔))‘(♯‘(𝐹 supp 0 )))) ↔ (℩𝑥𝑔(𝑔:(1...(♯‘(𝐹 supp 0 )))–1-1-onto→(𝐹 supp 0 ) ∧ 𝑥 = (seq1( + , (𝐹𝑔))‘(♯‘(𝐹 supp 0 ))))) = 𝑥))
8684, 85syl 17 . . . . 5 (((𝜑𝑊 ≠ ∅) ∧ (¬ 𝐴 ∈ ran ... ∧ 𝑓 Isom < , < ((1...(♯‘𝑊)), 𝑊))) → (∃𝑔(𝑔:(1...(♯‘(𝐹 supp 0 )))–1-1-onto→(𝐹 supp 0 ) ∧ 𝑥 = (seq1( + , (𝐹𝑔))‘(♯‘(𝐹 supp 0 )))) ↔ (℩𝑥𝑔(𝑔:(1...(♯‘(𝐹 supp 0 )))–1-1-onto→(𝐹 supp 0 ) ∧ 𝑥 = (seq1( + , (𝐹𝑔))‘(♯‘(𝐹 supp 0 ))))) = 𝑥))
87 eqid 2737 . . . . . . 7 (𝐹 supp 0 ) = (𝐹 supp 0 )
88 simprl 771 . . . . . . 7 (((𝜑𝑊 ≠ ∅) ∧ (¬ 𝐴 ∈ ran ... ∧ 𝑓 Isom < , < ((1...(♯‘𝑊)), 𝑊))) → ¬ 𝐴 ∈ ran ...)
8910, 11, 12, 13, 60, 61, 62, 63, 72, 79, 87, 88gsumval3a 19844 . . . . . 6 (((𝜑𝑊 ≠ ∅) ∧ (¬ 𝐴 ∈ ran ... ∧ 𝑓 Isom < , < ((1...(♯‘𝑊)), 𝑊))) → (𝐺 Σg 𝐹) = (℩𝑥𝑔(𝑔:(1...(♯‘(𝐹 supp 0 )))–1-1-onto→(𝐹 supp 0 ) ∧ 𝑥 = (seq1( + , (𝐹𝑔))‘(♯‘(𝐹 supp 0 ))))))
9089eqeq1d 2739 . . . . 5 (((𝜑𝑊 ≠ ∅) ∧ (¬ 𝐴 ∈ ran ... ∧ 𝑓 Isom < , < ((1...(♯‘𝑊)), 𝑊))) → ((𝐺 Σg 𝐹) = 𝑥 ↔ (℩𝑥𝑔(𝑔:(1...(♯‘(𝐹 supp 0 )))–1-1-onto→(𝐹 supp 0 ) ∧ 𝑥 = (seq1( + , (𝐹𝑔))‘(♯‘(𝐹 supp 0 ))))) = 𝑥))
9186, 90bitr4d 282 . . . 4 (((𝜑𝑊 ≠ ∅) ∧ (¬ 𝐴 ∈ ran ... ∧ 𝑓 Isom < , < ((1...(♯‘𝑊)), 𝑊))) → (∃𝑔(𝑔:(1...(♯‘(𝐹 supp 0 )))–1-1-onto→(𝐹 supp 0 ) ∧ 𝑥 = (seq1( + , (𝐹𝑔))‘(♯‘(𝐹 supp 0 )))) ↔ (𝐺 Σg 𝐹) = 𝑥))
9291alrimiv 1929 . . 3 (((𝜑𝑊 ≠ ∅) ∧ (¬ 𝐴 ∈ ran ... ∧ 𝑓 Isom < , < ((1...(♯‘𝑊)), 𝑊))) → ∀𝑥(∃𝑔(𝑔:(1...(♯‘(𝐹 supp 0 )))–1-1-onto→(𝐹 supp 0 ) ∧ 𝑥 = (seq1( + , (𝐹𝑔))‘(♯‘(𝐹 supp 0 )))) ↔ (𝐺 Σg 𝐹) = 𝑥))
93 fvex 6855 . . . 4 (seq1( + , (𝐹 ∘ (𝐻𝑓)))‘(♯‘𝑊)) ∈ V
94 eqeq1 2741 . . . . . . 7 (𝑥 = (seq1( + , (𝐹 ∘ (𝐻𝑓)))‘(♯‘𝑊)) → (𝑥 = (seq1( + , (𝐹𝑔))‘(♯‘(𝐹 supp 0 ))) ↔ (seq1( + , (𝐹 ∘ (𝐻𝑓)))‘(♯‘𝑊)) = (seq1( + , (𝐹𝑔))‘(♯‘(𝐹 supp 0 )))))
9594anbi2d 631 . . . . . 6 (𝑥 = (seq1( + , (𝐹 ∘ (𝐻𝑓)))‘(♯‘𝑊)) → ((𝑔:(1...(♯‘(𝐹 supp 0 )))–1-1-onto→(𝐹 supp 0 ) ∧ 𝑥 = (seq1( + , (𝐹𝑔))‘(♯‘(𝐹 supp 0 )))) ↔ (𝑔:(1...(♯‘(𝐹 supp 0 )))–1-1-onto→(𝐹 supp 0 ) ∧ (seq1( + , (𝐹 ∘ (𝐻𝑓)))‘(♯‘𝑊)) = (seq1( + , (𝐹𝑔))‘(♯‘(𝐹 supp 0 ))))))
9695exbidv 1923 . . . . 5 (𝑥 = (seq1( + , (𝐹 ∘ (𝐻𝑓)))‘(♯‘𝑊)) → (∃𝑔(𝑔:(1...(♯‘(𝐹 supp 0 )))–1-1-onto→(𝐹 supp 0 ) ∧ 𝑥 = (seq1( + , (𝐹𝑔))‘(♯‘(𝐹 supp 0 )))) ↔ ∃𝑔(𝑔:(1...(♯‘(𝐹 supp 0 )))–1-1-onto→(𝐹 supp 0 ) ∧ (seq1( + , (𝐹 ∘ (𝐻𝑓)))‘(♯‘𝑊)) = (seq1( + , (𝐹𝑔))‘(♯‘(𝐹 supp 0 ))))))
97 eqeq2 2749 . . . . 5 (𝑥 = (seq1( + , (𝐹 ∘ (𝐻𝑓)))‘(♯‘𝑊)) → ((𝐺 Σg 𝐹) = 𝑥 ↔ (𝐺 Σg 𝐹) = (seq1( + , (𝐹 ∘ (𝐻𝑓)))‘(♯‘𝑊))))
9896, 97bibi12d 345 . . . 4 (𝑥 = (seq1( + , (𝐹 ∘ (𝐻𝑓)))‘(♯‘𝑊)) → ((∃𝑔(𝑔:(1...(♯‘(𝐹 supp 0 )))–1-1-onto→(𝐹 supp 0 ) ∧ 𝑥 = (seq1( + , (𝐹𝑔))‘(♯‘(𝐹 supp 0 )))) ↔ (𝐺 Σg 𝐹) = 𝑥) ↔ (∃𝑔(𝑔:(1...(♯‘(𝐹 supp 0 )))–1-1-onto→(𝐹 supp 0 ) ∧ (seq1( + , (𝐹 ∘ (𝐻𝑓)))‘(♯‘𝑊)) = (seq1( + , (𝐹𝑔))‘(♯‘(𝐹 supp 0 )))) ↔ (𝐺 Σg 𝐹) = (seq1( + , (𝐹 ∘ (𝐻𝑓)))‘(♯‘𝑊)))))
9993, 98spcv 3561 . . 3 (∀𝑥(∃𝑔(𝑔:(1...(♯‘(𝐹 supp 0 )))–1-1-onto→(𝐹 supp 0 ) ∧ 𝑥 = (seq1( + , (𝐹𝑔))‘(♯‘(𝐹 supp 0 )))) ↔ (𝐺 Σg 𝐹) = 𝑥) → (∃𝑔(𝑔:(1...(♯‘(𝐹 supp 0 )))–1-1-onto→(𝐹 supp 0 ) ∧ (seq1( + , (𝐹 ∘ (𝐻𝑓)))‘(♯‘𝑊)) = (seq1( + , (𝐹𝑔))‘(♯‘(𝐹 supp 0 )))) ↔ (𝐺 Σg 𝐹) = (seq1( + , (𝐹 ∘ (𝐻𝑓)))‘(♯‘𝑊))))
10092, 99syl 17 . 2 (((𝜑𝑊 ≠ ∅) ∧ (¬ 𝐴 ∈ ran ... ∧ 𝑓 Isom < , < ((1...(♯‘𝑊)), 𝑊))) → (∃𝑔(𝑔:(1...(♯‘(𝐹 supp 0 )))–1-1-onto→(𝐹 supp 0 ) ∧ (seq1( + , (𝐹 ∘ (𝐻𝑓)))‘(♯‘𝑊)) = (seq1( + , (𝐹𝑔))‘(♯‘(𝐹 supp 0 )))) ↔ (𝐺 Σg 𝐹) = (seq1( + , (𝐹 ∘ (𝐻𝑓)))‘(♯‘𝑊))))
10159, 100mpbid 232 1 (((𝜑𝑊 ≠ ∅) ∧ (¬ 𝐴 ∈ ran ... ∧ 𝑓 Isom < , < ((1...(♯‘𝑊)), 𝑊))) → (𝐺 Σg 𝐹) = (seq1( + , (𝐹 ∘ (𝐻𝑓)))‘(♯‘𝑊)))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 206  wa 395  wal 1540   = wceq 1542  wex 1781  wcel 2114  ∃!weu 2569  wne 2933  Vcvv 3442  wss 3903  c0 4287   class class class wbr 5100  dom cdm 5632  ran crn 5633  cres 5634  cima 5635  ccom 5636  cio 6454  Fun wfun 6494  wf 6496  1-1wf1 6497  1-1-ontowf1o 6499  cfv 6500   Isom wiso 6501  (class class class)co 7368   supp csupp 8112  cen 8892  Fincfn 8895  1c1 11039   < clt 11178  cn 12157  ...cfz 13435  seqcseq 13936  chash 14265  Basecbs 17148  +gcplusg 17189  0gc0g 17371   Σg cgsu 17372  Mndcmnd 18671  Cntzccntz 19256
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 1912  ax-6 1969  ax-7 2010  ax-8 2116  ax-9 2124  ax-10 2147  ax-11 2163  ax-12 2185  ax-ext 2709  ax-rep 5226  ax-sep 5243  ax-nul 5253  ax-pow 5312  ax-pr 5379  ax-un 7690  ax-cnex 11094  ax-resscn 11095  ax-1cn 11096  ax-icn 11097  ax-addcl 11098  ax-addrcl 11099  ax-mulcl 11100  ax-mulrcl 11101  ax-mulcom 11102  ax-addass 11103  ax-mulass 11104  ax-distr 11105  ax-i2m1 11106  ax-1ne0 11107  ax-1rid 11108  ax-rnegex 11109  ax-rrecex 11110  ax-cnre 11111  ax-pre-lttri 11112  ax-pre-lttrn 11113  ax-pre-ltadd 11114  ax-pre-mulgt0 11115
This theorem depends on definitions:  df-bi 207  df-an 396  df-or 849  df-3or 1088  df-3an 1089  df-tru 1545  df-fal 1555  df-ex 1782  df-nf 1786  df-sb 2069  df-mo 2540  df-eu 2570  df-clab 2716  df-cleq 2729  df-clel 2812  df-nfc 2886  df-ne 2934  df-nel 3038  df-ral 3053  df-rex 3063  df-rmo 3352  df-reu 3353  df-rab 3402  df-v 3444  df-sbc 3743  df-csb 3852  df-dif 3906  df-un 3908  df-in 3910  df-ss 3920  df-pss 3923  df-nul 4288  df-if 4482  df-pw 4558  df-sn 4583  df-pr 4585  df-op 4589  df-uni 4866  df-int 4905  df-iun 4950  df-br 5101  df-opab 5163  df-mpt 5182  df-tr 5208  df-id 5527  df-eprel 5532  df-po 5540  df-so 5541  df-fr 5585  df-we 5587  df-xp 5638  df-rel 5639  df-cnv 5640  df-co 5641  df-dm 5642  df-rn 5643  df-res 5644  df-ima 5645  df-pred 6267  df-ord 6328  df-on 6329  df-lim 6330  df-suc 6331  df-iota 6456  df-fun 6502  df-fn 6503  df-f 6504  df-f1 6505  df-fo 6506  df-f1o 6507  df-fv 6508  df-isom 6509  df-riota 7325  df-ov 7371  df-oprab 7372  df-mpo 7373  df-om 7819  df-1st 7943  df-2nd 7944  df-supp 8113  df-frecs 8233  df-wrecs 8264  df-recs 8313  df-rdg 8351  df-1o 8407  df-er 8645  df-en 8896  df-dom 8897  df-sdom 8898  df-fin 8899  df-card 9863  df-pnf 11180  df-mnf 11181  df-xr 11182  df-ltxr 11183  df-le 11184  df-sub 11378  df-neg 11379  df-nn 12158  df-n0 12414  df-z 12501  df-uz 12764  df-fz 13436  df-fzo 13583  df-seq 13937  df-hash 14266  df-0g 17373  df-gsum 17374  df-mgm 18577  df-sgrp 18656  df-mnd 18672  df-cntz 19258
This theorem is referenced by:  gsumval3  19848
  Copyright terms: Public domain W3C validator