Metamath Proof Explorer


Theorem psrmonprod

Description: Finite product of bags of variables in a power series. Here the function G maps a bag of variables to the corresponding monomial. (Contributed by Thierry Arnoux, 16-Mar-2026)

Ref Expression
Hypotheses psrmonprod.s ⊢ S = I mPwSer R
psrmonprod.b ⊢ B = Base S
psrmonprod.r ⊢ φ → R ∈ CRing
psrmonprod.i ⊢ φ → I ∈ V
psrmonprod.d ⊢ D = h ∈ ℕ 0 I | finSupp 0 ⁡ h
psrmonprod.a ⊢ φ → A ∈ Fin
psrmonprod.f ⊢ φ → F : A ⟶ D
psrmonprod.1 ⊢ 1 ˙ = 1 R
psrmonprod.0 ⊢ 0 ˙ = 0 R
psrmonprod.m ⊢ M = mulGrp S
psrmonprod.g ⊢ G = y ∈ D ⟼ z ∈ D ⟼ if z = y 1 ˙ 0 ˙
Assertion psrmonprod ⊢ φ → ∑ M G ∘ F = G ⁡ i ∈ I ⟼ ∑ ℂ fld x ∈ A F ⁡ x ⁡ i

Proof

Step Hyp Ref Expression
1 psrmonprod.s ⊢ S = I mPwSer R
2 psrmonprod.b ⊢ B = Base S
3 psrmonprod.r ⊢ φ → R ∈ CRing
4 psrmonprod.i ⊢ φ → I ∈ V
5 psrmonprod.d ⊢ D = h ∈ ℕ 0 I | finSupp 0 ⁡ h
6 psrmonprod.a ⊢ φ → A ∈ Fin
7 psrmonprod.f ⊢ φ → F : A ⟶ D
8 psrmonprod.1 ⊢ 1 ˙ = 1 R
9 psrmonprod.0 ⊢ 0 ˙ = 0 R
10 psrmonprod.m ⊢ M = mulGrp S
11 psrmonprod.g ⊢ G = y ∈ D ⟼ z ∈ D ⟼ if z = y 1 ˙ 0 ˙
12 7 ffvelcdmda ⊢ φ ∧ k ∈ A → F ⁡ k ∈ D
13 7 feqmptd ⊢ φ → F = k ∈ A ⟼ F ⁡ k
14 fvexd ⊢ φ ∧ y ∈ D → Base R ∈ V
15 ovex ⊢ ℕ 0 I ∈ V
16 5 15 rabex2 ⊢ D ∈ V
17 16 a1i ⊢ φ ∧ y ∈ D → D ∈ V
18 eqid ⊢ Base R = Base R
19 3 crngringd ⊢ φ → R ∈ Ring
20 18 8 19 ringidcld ⊢ φ → 1 ˙ ∈ Base R
21 20 ad2antrr ⊢ φ ∧ y ∈ D ∧ z ∈ D → 1 ˙ ∈ Base R
22 3 crnggrpd ⊢ φ → R ∈ Grp
23 18 9 22 grpidcld ⊢ φ → 0 ˙ ∈ Base R
24 23 ad2antrr ⊢ φ ∧ y ∈ D ∧ z ∈ D → 0 ˙ ∈ Base R
25 21 24 ifcld ⊢ φ ∧ y ∈ D ∧ z ∈ D → if z = y 1 ˙ 0 ˙ ∈ Base R
26 25 fmpttd ⊢ φ ∧ y ∈ D → z ∈ D ⟼ if z = y 1 ˙ 0 ˙ : D ⟶ Base R
27 14 17 26 elmapdd ⊢ φ ∧ y ∈ D → z ∈ D ⟼ if z = y 1 ˙ 0 ˙ ∈ Base R D
28 5 psrbasfsupp ⊢ D = h ∈ ℕ 0 I | h -1 ℕ ∈ Fin
29 1 18 28 2 4 psrbas ⊢ φ → B = Base R D
30 29 adantr ⊢ φ ∧ y ∈ D → B = Base R D
31 27 30 eleqtrrd ⊢ φ ∧ y ∈ D → z ∈ D ⟼ if z = y 1 ˙ 0 ˙ ∈ B
32 31 11 fmptd ⊢ φ → G : D ⟶ B
33 32 feqmptd ⊢ φ → G = y ∈ D ⟼ G ⁡ y
34 fveq2 ⊢ y = F ⁡ k → G ⁡ y = G ⁡ F ⁡ k
35 12 13 33 34 fmptco ⊢ φ → G ∘ F = k ∈ A ⟼ G ⁡ F ⁡ k
36 35 oveq2d ⊢ φ → ∑ M G ∘ F = ∑ M k ∈ A G ⁡ F ⁡ k
37 mpteq1 ⊢ a = ∅ → k ∈ a ⟼ G ⁡ F ⁡ k = k ∈ ∅ ⟼ G ⁡ F ⁡ k
38 37 oveq2d ⊢ a = ∅ → ∑ M k ∈ a G ⁡ F ⁡ k = ∑ M k ∈ ∅ G ⁡ F ⁡ k
39 mpteq1 ⊢ a = ∅ → x ∈ a ⟼ F ⁡ x ⁡ i = x ∈ ∅ ⟼ F ⁡ x ⁡ i
40 39 oveq2d ⊢ a = ∅ → ∑ ℂ fld x ∈ a F ⁡ x ⁡ i = ∑ ℂ fld x ∈ ∅ F ⁡ x ⁡ i
41 40 mpteq2dv ⊢ a = ∅ → i ∈ I ⟼ ∑ ℂ fld x ∈ a F ⁡ x ⁡ i = i ∈ I ⟼ ∑ ℂ fld x ∈ ∅ F ⁡ x ⁡ i
42 41 fveq2d ⊢ a = ∅ → G ⁡ i ∈ I ⟼ ∑ ℂ fld x ∈ a F ⁡ x ⁡ i = G ⁡ i ∈ I ⟼ ∑ ℂ fld x ∈ ∅ F ⁡ x ⁡ i
43 38 42 eqeq12d ⊢ a = ∅ → ∑ M k ∈ a G ⁡ F ⁡ k = G ⁡ i ∈ I ⟼ ∑ ℂ fld x ∈ a F ⁡ x ⁡ i ↔ ∑ M k ∈ ∅ G ⁡ F ⁡ k = G ⁡ i ∈ I ⟼ ∑ ℂ fld x ∈ ∅ F ⁡ x ⁡ i
44 mpteq1 ⊢ a = b → k ∈ a ⟼ G ⁡ F ⁡ k = k ∈ b ⟼ G ⁡ F ⁡ k
45 44 oveq2d ⊢ a = b → ∑ M k ∈ a G ⁡ F ⁡ k = ∑ M k ∈ b G ⁡ F ⁡ k
46 mpteq1 ⊢ a = b → x ∈ a ⟼ F ⁡ x ⁡ i = x ∈ b ⟼ F ⁡ x ⁡ i
47 46 oveq2d ⊢ a = b → ∑ ℂ fld x ∈ a F ⁡ x ⁡ i = ∑ ℂ fld x ∈ b F ⁡ x ⁡ i
48 47 mpteq2dv ⊢ a = b → i ∈ I ⟼ ∑ ℂ fld x ∈ a F ⁡ x ⁡ i = i ∈ I ⟼ ∑ ℂ fld x ∈ b F ⁡ x ⁡ i
49 48 fveq2d ⊢ a = b → G ⁡ i ∈ I ⟼ ∑ ℂ fld x ∈ a F ⁡ x ⁡ i = G ⁡ i ∈ I ⟼ ∑ ℂ fld x ∈ b F ⁡ x ⁡ i
50 45 49 eqeq12d ⊢ a = b → ∑ M k ∈ a G ⁡ F ⁡ k = G ⁡ i ∈ I ⟼ ∑ ℂ fld x ∈ a F ⁡ x ⁡ i ↔ ∑ M k ∈ b G ⁡ F ⁡ k = G ⁡ i ∈ I ⟼ ∑ ℂ fld x ∈ b F ⁡ x ⁡ i
51 mpteq1 ⊢ a = b ∪ f → k ∈ a ⟼ G ⁡ F ⁡ k = k ∈ b ∪ f ⟼ G ⁡ F ⁡ k
52 51 oveq2d ⊢ a = b ∪ f → ∑ M k ∈ a G ⁡ F ⁡ k = ∑ M k ∈ b ∪ f G ⁡ F ⁡ k
53 mpteq1 ⊢ a = b ∪ f → x ∈ a ⟼ F ⁡ x ⁡ i = x ∈ b ∪ f ⟼ F ⁡ x ⁡ i
54 53 oveq2d ⊢ a = b ∪ f → ∑ ℂ fld x ∈ a F ⁡ x ⁡ i = ∑ ℂ fld x ∈ b ∪ f F ⁡ x ⁡ i
55 54 mpteq2dv ⊢ a = b ∪ f → i ∈ I ⟼ ∑ ℂ fld x ∈ a F ⁡ x ⁡ i = i ∈ I ⟼ ∑ ℂ fld x ∈ b ∪ f F ⁡ x ⁡ i
56 55 fveq2d ⊢ a = b ∪ f → G ⁡ i ∈ I ⟼ ∑ ℂ fld x ∈ a F ⁡ x ⁡ i = G ⁡ i ∈ I ⟼ ∑ ℂ fld x ∈ b ∪ f F ⁡ x ⁡ i
57 52 56 eqeq12d ⊢ a = b ∪ f → ∑ M k ∈ a G ⁡ F ⁡ k = G ⁡ i ∈ I ⟼ ∑ ℂ fld x ∈ a F ⁡ x ⁡ i ↔ ∑ M k ∈ b ∪ f G ⁡ F ⁡ k = G ⁡ i ∈ I ⟼ ∑ ℂ fld x ∈ b ∪ f F ⁡ x ⁡ i
58 mpteq1 ⊢ a = A → k ∈ a ⟼ G ⁡ F ⁡ k = k ∈ A ⟼ G ⁡ F ⁡ k
59 58 oveq2d ⊢ a = A → ∑ M k ∈ a G ⁡ F ⁡ k = ∑ M k ∈ A G ⁡ F ⁡ k
60 mpteq1 ⊢ a = A → x ∈ a ⟼ F ⁡ x ⁡ i = x ∈ A ⟼ F ⁡ x ⁡ i
61 60 oveq2d ⊢ a = A → ∑ ℂ fld x ∈ a F ⁡ x ⁡ i = ∑ ℂ fld x ∈ A F ⁡ x ⁡ i
62 61 mpteq2dv ⊢ a = A → i ∈ I ⟼ ∑ ℂ fld x ∈ a F ⁡ x ⁡ i = i ∈ I ⟼ ∑ ℂ fld x ∈ A F ⁡ x ⁡ i
63 62 fveq2d ⊢ a = A → G ⁡ i ∈ I ⟼ ∑ ℂ fld x ∈ a F ⁡ x ⁡ i = G ⁡ i ∈ I ⟼ ∑ ℂ fld x ∈ A F ⁡ x ⁡ i
64 59 63 eqeq12d ⊢ a = A → ∑ M k ∈ a G ⁡ F ⁡ k = G ⁡ i ∈ I ⟼ ∑ ℂ fld x ∈ a F ⁡ x ⁡ i ↔ ∑ M k ∈ A G ⁡ F ⁡ k = G ⁡ i ∈ I ⟼ ∑ ℂ fld x ∈ A F ⁡ x ⁡ i
65 eqid ⊢ 1 S = 1 S
66 10 65 ringidval ⊢ 1 S = 0 M
67 66 gsum0 ⊢ ∑ M ∅ = 1 S
68 mpt0 ⊢ k ∈ ∅ ⟼ G ⁡ F ⁡ k = ∅
69 68 oveq2i ⊢ ∑ M k ∈ ∅ G ⁡ F ⁡ k = ∑ M ∅
70 69 a1i ⊢ φ → ∑ M k ∈ ∅ G ⁡ F ⁡ k = ∑ M ∅
71 mpt0 ⊢ x ∈ ∅ ⟼ F ⁡ x ⁡ i = ∅
72 71 oveq2i ⊢ ∑ ℂ fld x ∈ ∅ F ⁡ x ⁡ i = ∑ ℂ fld ∅
73 cnfld0 ⊢ 0 = 0 ℂ fld
74 73 gsum0 ⊢ ∑ ℂ fld ∅ = 0
75 72 74 eqtri ⊢ ∑ ℂ fld x ∈ ∅ F ⁡ x ⁡ i = 0
76 75 mpteq2i ⊢ i ∈ I ⟼ ∑ ℂ fld x ∈ ∅ F ⁡ x ⁡ i = i ∈ I ⟼ 0
77 fconstmpt ⊢ I × 0 = i ∈ I ⟼ 0
78 76 77 eqtr4i ⊢ i ∈ I ⟼ ∑ ℂ fld x ∈ ∅ F ⁡ x ⁡ i = I × 0
79 78 a1i ⊢ φ → i ∈ I ⟼ ∑ ℂ fld x ∈ ∅ F ⁡ x ⁡ i = I × 0
80 79 eqeq2d ⊢ φ → y = i ∈ I ⟼ ∑ ℂ fld x ∈ ∅ F ⁡ x ⁡ i ↔ y = I × 0
81 80 biimpa ⊢ φ ∧ y = i ∈ I ⟼ ∑ ℂ fld x ∈ ∅ F ⁡ x ⁡ i → y = I × 0
82 81 eqeq2d ⊢ φ ∧ y = i ∈ I ⟼ ∑ ℂ fld x ∈ ∅ F ⁡ x ⁡ i → z = y ↔ z = I × 0
83 82 ifbid ⊢ φ ∧ y = i ∈ I ⟼ ∑ ℂ fld x ∈ ∅ F ⁡ x ⁡ i → if z = y 1 ˙ 0 ˙ = if z = I × 0 1 ˙ 0 ˙
84 83 mpteq2dv ⊢ φ ∧ y = i ∈ I ⟼ ∑ ℂ fld x ∈ ∅ F ⁡ x ⁡ i → z ∈ D ⟼ if z = y 1 ˙ 0 ˙ = z ∈ D ⟼ if z = I × 0 1 ˙ 0 ˙
85 1 4 19 28 9 8 65 psr1 ⊢ φ → 1 S = z ∈ D ⟼ if z = I × 0 1 ˙ 0 ˙
86 85 adantr ⊢ φ ∧ y = i ∈ I ⟼ ∑ ℂ fld x ∈ ∅ F ⁡ x ⁡ i → 1 S = z ∈ D ⟼ if z = I × 0 1 ˙ 0 ˙
87 84 86 eqtr4d ⊢ φ ∧ y = i ∈ I ⟼ ∑ ℂ fld x ∈ ∅ F ⁡ x ⁡ i → z ∈ D ⟼ if z = y 1 ˙ 0 ˙ = 1 S
88 breq1 ⊢ h = i ∈ I ⟼ ∑ ℂ fld x ∈ ∅ F ⁡ x ⁡ i → finSupp 0 ⁡ h ↔ finSupp 0 ⁡ i ∈ I ⟼ ∑ ℂ fld x ∈ ∅ F ⁡ x ⁡ i
89 nn0ex ⊢ ℕ 0 ∈ V
90 89 a1i ⊢ φ → ℕ 0 ∈ V
91 0nn0 ⊢ 0 ∈ ℕ 0
92 91 fconst6 ⊢ I × 0 : I ⟶ ℕ 0
93 92 a1i ⊢ φ → I × 0 : I ⟶ ℕ 0
94 90 4 93 elmapdd ⊢ φ → I × 0 ∈ ℕ 0 I
95 78 94 eqeltrid ⊢ φ → i ∈ I ⟼ ∑ ℂ fld x ∈ ∅ F ⁡ x ⁡ i ∈ ℕ 0 I
96 91 a1i ⊢ φ → 0 ∈ ℕ 0
97 4 96 fczfsuppd ⊢ φ → finSupp 0 ⁡ I × 0
98 78 97 eqbrtrid ⊢ φ → finSupp 0 ⁡ i ∈ I ⟼ ∑ ℂ fld x ∈ ∅ F ⁡ x ⁡ i
99 88 95 98 elrabd ⊢ φ → i ∈ I ⟼ ∑ ℂ fld x ∈ ∅ F ⁡ x ⁡ i ∈ h ∈ ℕ 0 I | finSupp 0 ⁡ h
100 99 5 eleqtrrdi ⊢ φ → i ∈ I ⟼ ∑ ℂ fld x ∈ ∅ F ⁡ x ⁡ i ∈ D
101 fvexd ⊢ φ → 1 S ∈ V
102 11 87 100 101 fvmptd2 ⊢ φ → G ⁡ i ∈ I ⟼ ∑ ℂ fld x ∈ ∅ F ⁡ x ⁡ i = 1 S
103 67 70 102 3eqtr4a ⊢ φ → ∑ M k ∈ ∅ G ⁡ F ⁡ k = G ⁡ i ∈ I ⟼ ∑ ℂ fld x ∈ ∅ F ⁡ x ⁡ i
104 2fveq3 ⊢ k = l → G ⁡ F ⁡ k = G ⁡ F ⁡ l
105 104 cbvmptv ⊢ k ∈ b ∪ f ⟼ G ⁡ F ⁡ k = l ∈ b ∪ f ⟼ G ⁡ F ⁡ l
106 105 oveq2i ⊢ ∑ M k ∈ b ∪ f G ⁡ F ⁡ k = ∑ M l ∈ b ∪ f G ⁡ F ⁡ l
107 10 2 mgpbas ⊢ B = Base M
108 eqid ⊢ ⋅ S = ⋅ S
109 10 108 mgpplusg ⊢ ⋅ S = + M
110 1 4 3 psrcrng ⊢ φ → S ∈ CRing
111 10 crngmgp ⊢ S ∈ CRing → M ∈ CMnd
112 110 111 syl ⊢ φ → M ∈ CMnd
113 112 ad3antrrr ⊢ φ ∧ b ⊆ A ∧ f ∈ A ∖ b ∧ ∑ M k ∈ b G ⁡ F ⁡ k = G ⁡ i ∈ I ⟼ ∑ ℂ fld x ∈ b F ⁡ x ⁡ i → M ∈ CMnd
114 6 adantr ⊢ φ ∧ b ⊆ A → A ∈ Fin
115 simpr ⊢ φ ∧ b ⊆ A → b ⊆ A
116 114 115 ssfid ⊢ φ ∧ b ⊆ A → b ∈ Fin
117 116 ad2antrr ⊢ φ ∧ b ⊆ A ∧ f ∈ A ∖ b ∧ ∑ M k ∈ b G ⁡ F ⁡ k = G ⁡ i ∈ I ⟼ ∑ ℂ fld x ∈ b F ⁡ x ⁡ i → b ∈ Fin
118 32 ad4antr ⊢ φ ∧ b ⊆ A ∧ f ∈ A ∖ b ∧ ∑ M k ∈ b G ⁡ F ⁡ k = G ⁡ i ∈ I ⟼ ∑ ℂ fld x ∈ b F ⁡ x ⁡ i ∧ l ∈ b → G : D ⟶ B
119 7 ad4antr ⊢ φ ∧ b ⊆ A ∧ f ∈ A ∖ b ∧ ∑ M k ∈ b G ⁡ F ⁡ k = G ⁡ i ∈ I ⟼ ∑ ℂ fld x ∈ b F ⁡ x ⁡ i ∧ l ∈ b → F : A ⟶ D
120 simpllr ⊢ φ ∧ b ⊆ A ∧ f ∈ A ∖ b ∧ ∑ M k ∈ b G ⁡ F ⁡ k = G ⁡ i ∈ I ⟼ ∑ ℂ fld x ∈ b F ⁡ x ⁡ i → b ⊆ A
121 120 sselda ⊢ φ ∧ b ⊆ A ∧ f ∈ A ∖ b ∧ ∑ M k ∈ b G ⁡ F ⁡ k = G ⁡ i ∈ I ⟼ ∑ ℂ fld x ∈ b F ⁡ x ⁡ i ∧ l ∈ b → l ∈ A
122 119 121 ffvelcdmd ⊢ φ ∧ b ⊆ A ∧ f ∈ A ∖ b ∧ ∑ M k ∈ b G ⁡ F ⁡ k = G ⁡ i ∈ I ⟼ ∑ ℂ fld x ∈ b F ⁡ x ⁡ i ∧ l ∈ b → F ⁡ l ∈ D
123 118 122 ffvelcdmd ⊢ φ ∧ b ⊆ A ∧ f ∈ A ∖ b ∧ ∑ M k ∈ b G ⁡ F ⁡ k = G ⁡ i ∈ I ⟼ ∑ ℂ fld x ∈ b F ⁡ x ⁡ i ∧ l ∈ b → G ⁡ F ⁡ l ∈ B
124 simplr ⊢ φ ∧ b ⊆ A ∧ f ∈ A ∖ b ∧ ∑ M k ∈ b G ⁡ F ⁡ k = G ⁡ i ∈ I ⟼ ∑ ℂ fld x ∈ b F ⁡ x ⁡ i → f ∈ A ∖ b
125 124 eldifbd ⊢ φ ∧ b ⊆ A ∧ f ∈ A ∖ b ∧ ∑ M k ∈ b G ⁡ F ⁡ k = G ⁡ i ∈ I ⟼ ∑ ℂ fld x ∈ b F ⁡ x ⁡ i → ¬ f ∈ b
126 32 ad3antrrr ⊢ φ ∧ b ⊆ A ∧ f ∈ A ∖ b ∧ ∑ M k ∈ b G ⁡ F ⁡ k = G ⁡ i ∈ I ⟼ ∑ ℂ fld x ∈ b F ⁡ x ⁡ i → G : D ⟶ B
127 7 ad3antrrr ⊢ φ ∧ b ⊆ A ∧ f ∈ A ∖ b ∧ ∑ M k ∈ b G ⁡ F ⁡ k = G ⁡ i ∈ I ⟼ ∑ ℂ fld x ∈ b F ⁡ x ⁡ i → F : A ⟶ D
128 124 eldifad ⊢ φ ∧ b ⊆ A ∧ f ∈ A ∖ b ∧ ∑ M k ∈ b G ⁡ F ⁡ k = G ⁡ i ∈ I ⟼ ∑ ℂ fld x ∈ b F ⁡ x ⁡ i → f ∈ A
129 127 128 ffvelcdmd ⊢ φ ∧ b ⊆ A ∧ f ∈ A ∖ b ∧ ∑ M k ∈ b G ⁡ F ⁡ k = G ⁡ i ∈ I ⟼ ∑ ℂ fld x ∈ b F ⁡ x ⁡ i → F ⁡ f ∈ D
130 126 129 ffvelcdmd ⊢ φ ∧ b ⊆ A ∧ f ∈ A ∖ b ∧ ∑ M k ∈ b G ⁡ F ⁡ k = G ⁡ i ∈ I ⟼ ∑ ℂ fld x ∈ b F ⁡ x ⁡ i → G ⁡ F ⁡ f ∈ B
131 2fveq3 ⊢ l = f → G ⁡ F ⁡ l = G ⁡ F ⁡ f
132 107 109 113 117 123 124 125 130 131 gsumunsn ⊢ φ ∧ b ⊆ A ∧ f ∈ A ∖ b ∧ ∑ M k ∈ b G ⁡ F ⁡ k = G ⁡ i ∈ I ⟼ ∑ ℂ fld x ∈ b F ⁡ x ⁡ i → ∑ M l ∈ b ∪ f G ⁡ F ⁡ l = ∑ M l ∈ b G ⁡ F ⁡ l ⋅ S G ⁡ F ⁡ f
133 104 cbvmptv ⊢ k ∈ b ⟼ G ⁡ F ⁡ k = l ∈ b ⟼ G ⁡ F ⁡ l
134 133 oveq2i ⊢ ∑ M k ∈ b G ⁡ F ⁡ k = ∑ M l ∈ b G ⁡ F ⁡ l
135 id ⊢ ∑ M k ∈ b G ⁡ F ⁡ k = G ⁡ i ∈ I ⟼ ∑ ℂ fld x ∈ b F ⁡ x ⁡ i → ∑ M k ∈ b G ⁡ F ⁡ k = G ⁡ i ∈ I ⟼ ∑ ℂ fld x ∈ b F ⁡ x ⁡ i
136 134 135 eqtr3id ⊢ ∑ M k ∈ b G ⁡ F ⁡ k = G ⁡ i ∈ I ⟼ ∑ ℂ fld x ∈ b F ⁡ x ⁡ i → ∑ M l ∈ b G ⁡ F ⁡ l = G ⁡ i ∈ I ⟼ ∑ ℂ fld x ∈ b F ⁡ x ⁡ i
137 136 oveq1d ⊢ ∑ M k ∈ b G ⁡ F ⁡ k = G ⁡ i ∈ I ⟼ ∑ ℂ fld x ∈ b F ⁡ x ⁡ i → ∑ M l ∈ b G ⁡ F ⁡ l ⋅ S G ⁡ F ⁡ f = G ⁡ i ∈ I ⟼ ∑ ℂ fld x ∈ b F ⁡ x ⁡ i ⋅ S G ⁡ F ⁡ f
138 137 adantl ⊢ φ ∧ b ⊆ A ∧ f ∈ A ∖ b ∧ ∑ M k ∈ b G ⁡ F ⁡ k = G ⁡ i ∈ I ⟼ ∑ ℂ fld x ∈ b F ⁡ x ⁡ i → ∑ M l ∈ b G ⁡ F ⁡ l ⋅ S G ⁡ F ⁡ f = G ⁡ i ∈ I ⟼ ∑ ℂ fld x ∈ b F ⁡ x ⁡ i ⋅ S G ⁡ F ⁡ f
139 4 ad2antrr ⊢ φ ∧ b ⊆ A ∧ f ∈ A ∖ b → I ∈ V
140 19 ad2antrr ⊢ φ ∧ b ⊆ A ∧ f ∈ A ∖ b → R ∈ Ring
141 breq1 ⊢ h = i ∈ I ⟼ ∑ ℂ fld x ∈ b F ⁡ x ⁡ i → finSupp 0 ⁡ h ↔ finSupp 0 ⁡ i ∈ I ⟼ ∑ ℂ fld x ∈ b F ⁡ x ⁡ i
142 89 a1i ⊢ φ ∧ b ⊆ A ∧ f ∈ A ∖ b → ℕ 0 ∈ V
143 cnfldfld ⊢ ℂ fld ∈ Field
144 id ⊢ ℂ fld ∈ Field → ℂ fld ∈ Field
145 144 fldcrngd ⊢ ℂ fld ∈ Field → ℂ fld ∈ CRing
146 crngring ⊢ ℂ fld ∈ CRing → ℂ fld ∈ Ring
147 ringcmn ⊢ ℂ fld ∈ Ring → ℂ fld ∈ CMnd
148 145 146 147 3syl ⊢ ℂ fld ∈ Field → ℂ fld ∈ CMnd
149 143 148 ax-mp ⊢ ℂ fld ∈ CMnd
150 149 a1i ⊢ φ ∧ b ⊆ A ∧ f ∈ A ∖ b ∧ i ∈ I → ℂ fld ∈ CMnd
151 116 ad2antrr ⊢ φ ∧ b ⊆ A ∧ f ∈ A ∖ b ∧ i ∈ I → b ∈ Fin
152 nn0subm ⊢ ℕ 0 ∈ SubMnd ⁡ ℂ fld
153 152 a1i ⊢ φ ∧ b ⊆ A ∧ f ∈ A ∖ b ∧ i ∈ I → ℕ 0 ∈ SubMnd ⁡ ℂ fld
154 5 ssrab3 ⊢ D ⊆ ℕ 0 I
155 7 ad2antrr ⊢ φ ∧ b ⊆ A ∧ f ∈ A ∖ b → F : A ⟶ D
156 155 ad2antrr ⊢ φ ∧ b ⊆ A ∧ f ∈ A ∖ b ∧ i ∈ I ∧ x ∈ b → F : A ⟶ D
157 simpllr ⊢ φ ∧ b ⊆ A ∧ f ∈ A ∖ b ∧ i ∈ I → b ⊆ A
158 157 sselda ⊢ φ ∧ b ⊆ A ∧ f ∈ A ∖ b ∧ i ∈ I ∧ x ∈ b → x ∈ A
159 156 158 ffvelcdmd ⊢ φ ∧ b ⊆ A ∧ f ∈ A ∖ b ∧ i ∈ I ∧ x ∈ b → F ⁡ x ∈ D
160 154 159 sselid ⊢ φ ∧ b ⊆ A ∧ f ∈ A ∖ b ∧ i ∈ I ∧ x ∈ b → F ⁡ x ∈ ℕ 0 I
161 160 elmaprd ⊢ φ ∧ b ⊆ A ∧ f ∈ A ∖ b ∧ i ∈ I ∧ x ∈ b → F ⁡ x : I ⟶ ℕ 0
162 simplr ⊢ φ ∧ b ⊆ A ∧ f ∈ A ∖ b ∧ i ∈ I ∧ x ∈ b → i ∈ I
163 161 162 ffvelcdmd ⊢ φ ∧ b ⊆ A ∧ f ∈ A ∖ b ∧ i ∈ I ∧ x ∈ b → F ⁡ x ⁡ i ∈ ℕ 0
164 163 fmpttd ⊢ φ ∧ b ⊆ A ∧ f ∈ A ∖ b ∧ i ∈ I → x ∈ b ⟼ F ⁡ x ⁡ i : b ⟶ ℕ 0
165 91 a1i ⊢ φ ∧ b ⊆ A ∧ f ∈ A ∖ b ∧ i ∈ I → 0 ∈ ℕ 0
166 164 151 165 fdmfifsupp ⊢ φ ∧ b ⊆ A ∧ f ∈ A ∖ b ∧ i ∈ I → finSupp 0 ⁡ x ∈ b ⟼ F ⁡ x ⁡ i
167 73 150 151 153 164 166 gsumsubmcl ⊢ φ ∧ b ⊆ A ∧ f ∈ A ∖ b ∧ i ∈ I → ∑ ℂ fld x ∈ b F ⁡ x ⁡ i ∈ ℕ 0
168 167 fmpttd ⊢ φ ∧ b ⊆ A ∧ f ∈ A ∖ b → i ∈ I ⟼ ∑ ℂ fld x ∈ b F ⁡ x ⁡ i : I ⟶ ℕ 0
169 142 139 168 elmapdd ⊢ φ ∧ b ⊆ A ∧ f ∈ A ∖ b → i ∈ I ⟼ ∑ ℂ fld x ∈ b F ⁡ x ⁡ i ∈ ℕ 0 I
170 91 a1i ⊢ φ ∧ b ⊆ A ∧ f ∈ A ∖ b → 0 ∈ ℕ 0
171 168 ffund ⊢ φ ∧ b ⊆ A ∧ f ∈ A ∖ b → Fun ⁡ i ∈ I ⟼ ∑ ℂ fld x ∈ b F ⁡ x ⁡ i
172 116 adantr ⊢ φ ∧ b ⊆ A ∧ f ∈ A ∖ b → b ∈ Fin
173 155 adantr ⊢ φ ∧ b ⊆ A ∧ f ∈ A ∖ b ∧ x ∈ b → F : A ⟶ D
174 simplr ⊢ φ ∧ b ⊆ A ∧ f ∈ A ∖ b → b ⊆ A
175 174 sselda ⊢ φ ∧ b ⊆ A ∧ f ∈ A ∖ b ∧ x ∈ b → x ∈ A
176 173 175 ffvelcdmd ⊢ φ ∧ b ⊆ A ∧ f ∈ A ∖ b ∧ x ∈ b → F ⁡ x ∈ D
177 154 176 sselid ⊢ φ ∧ b ⊆ A ∧ f ∈ A ∖ b ∧ x ∈ b → F ⁡ x ∈ ℕ 0 I
178 177 elmaprd ⊢ φ ∧ b ⊆ A ∧ f ∈ A ∖ b ∧ x ∈ b → F ⁡ x : I ⟶ ℕ 0
179 178 feqmptd ⊢ φ ∧ b ⊆ A ∧ f ∈ A ∖ b ∧ x ∈ b → F ⁡ x = i ∈ I ⟼ F ⁡ x ⁡ i
180 179 oveq1d ⊢ φ ∧ b ⊆ A ∧ f ∈ A ∖ b ∧ x ∈ b → F ⁡ x supp 0 = i ∈ I ⟼ F ⁡ x ⁡ i supp 0
181 breq1 ⊢ h = F ⁡ x → finSupp 0 ⁡ h ↔ finSupp 0 ⁡ F ⁡ x
182 176 5 eleqtrdi ⊢ φ ∧ b ⊆ A ∧ f ∈ A ∖ b ∧ x ∈ b → F ⁡ x ∈ h ∈ ℕ 0 I | finSupp 0 ⁡ h
183 181 182 elrabrd ⊢ φ ∧ b ⊆ A ∧ f ∈ A ∖ b ∧ x ∈ b → finSupp 0 ⁡ F ⁡ x
184 183 fsuppimpd ⊢ φ ∧ b ⊆ A ∧ f ∈ A ∖ b ∧ x ∈ b → F ⁡ x supp 0 ∈ Fin
185 180 184 eqeltrrd ⊢ φ ∧ b ⊆ A ∧ f ∈ A ∖ b ∧ x ∈ b → i ∈ I ⟼ F ⁡ x ⁡ i supp 0 ∈ Fin
186 185 ralrimiva ⊢ φ ∧ b ⊆ A ∧ f ∈ A ∖ b → ∀ x ∈ b i ∈ I ⟼ F ⁡ x ⁡ i supp 0 ∈ Fin
187 iunfi ⊢ b ∈ Fin ∧ ∀ x ∈ b i ∈ I ⟼ F ⁡ x ⁡ i supp 0 ∈ Fin → ⋃ x ∈ b supp 0 ⁡ i ∈ I ⟼ F ⁡ x ⁡ i ∈ Fin
188 172 186 187 syl2anc ⊢ φ ∧ b ⊆ A ∧ f ∈ A ∖ b → ⋃ x ∈ b supp 0 ⁡ i ∈ I ⟼ F ⁡ x ⁡ i ∈ Fin
189 cmnmnd ⊢ ℂ fld ∈ CMnd → ℂ fld ∈ Mnd
190 149 189 ax-mp ⊢ ℂ fld ∈ Mnd
191 190 a1i ⊢ φ ∧ b ⊆ A ∧ f ∈ A ∖ b → ℂ fld ∈ Mnd
192 114 adantr ⊢ φ ∧ b ⊆ A ∧ f ∈ A ∖ b → A ∈ Fin
193 192 174 ssexd ⊢ φ ∧ b ⊆ A ∧ f ∈ A ∖ b → b ∈ V
194 73 191 193 139 163 suppgsumssiun ⊢ φ ∧ b ⊆ A ∧ f ∈ A ∖ b → i ∈ I ⟼ ∑ ℂ fld x ∈ b F ⁡ x ⁡ i supp 0 ⊆ ⋃ x ∈ b supp 0 ⁡ i ∈ I ⟼ F ⁡ x ⁡ i
195 188 194 ssfid ⊢ φ ∧ b ⊆ A ∧ f ∈ A ∖ b → i ∈ I ⟼ ∑ ℂ fld x ∈ b F ⁡ x ⁡ i supp 0 ∈ Fin
196 169 170 171 195 isfsuppd ⊢ φ ∧ b ⊆ A ∧ f ∈ A ∖ b → finSupp 0 ⁡ i ∈ I ⟼ ∑ ℂ fld x ∈ b F ⁡ x ⁡ i
197 141 169 196 elrabd ⊢ φ ∧ b ⊆ A ∧ f ∈ A ∖ b → i ∈ I ⟼ ∑ ℂ fld x ∈ b F ⁡ x ⁡ i ∈ h ∈ ℕ 0 I | finSupp 0 ⁡ h
198 197 5 eleqtrrdi ⊢ φ ∧ b ⊆ A ∧ f ∈ A ∖ b → i ∈ I ⟼ ∑ ℂ fld x ∈ b F ⁡ x ⁡ i ∈ D
199 difssd ⊢ φ ∧ b ⊆ A → A ∖ b ⊆ A
200 199 sselda ⊢ φ ∧ b ⊆ A ∧ f ∈ A ∖ b → f ∈ A
201 155 200 ffvelcdmd ⊢ φ ∧ b ⊆ A ∧ f ∈ A ∖ b → F ⁡ f ∈ D
202 1 2 9 8 5 139 140 198 108 201 11 psrmonmul2 ⊢ φ ∧ b ⊆ A ∧ f ∈ A ∖ b → G ⁡ i ∈ I ⟼ ∑ ℂ fld x ∈ b F ⁡ x ⁡ i ⋅ S G ⁡ F ⁡ f = G ⁡ i ∈ I ⟼ ∑ ℂ fld x ∈ b F ⁡ x ⁡ i + f F ⁡ f
203 168 ffnd ⊢ φ ∧ b ⊆ A ∧ f ∈ A ∖ b → i ∈ I ⟼ ∑ ℂ fld x ∈ b F ⁡ x ⁡ i Fn I
204 154 201 sselid ⊢ φ ∧ b ⊆ A ∧ f ∈ A ∖ b → F ⁡ f ∈ ℕ 0 I
205 204 elmaprd ⊢ φ ∧ b ⊆ A ∧ f ∈ A ∖ b → F ⁡ f : I ⟶ ℕ 0
206 205 ffnd ⊢ φ ∧ b ⊆ A ∧ f ∈ A ∖ b → F ⁡ f Fn I
207 nfv ⊢ Ⅎ i φ ∧ b ⊆ A ∧ f ∈ A ∖ b
208 ovexd ⊢ φ ∧ b ⊆ A ∧ f ∈ A ∖ b ∧ i ∈ I → ∑ ℂ fld x ∈ b ∪ f F ⁡ x ⁡ i ∈ V
209 eqid ⊢ i ∈ I ⟼ ∑ ℂ fld x ∈ b ∪ f F ⁡ x ⁡ i = i ∈ I ⟼ ∑ ℂ fld x ∈ b ∪ f F ⁡ x ⁡ i
210 207 208 209 fnmptd ⊢ φ ∧ b ⊆ A ∧ f ∈ A ∖ b → i ∈ I ⟼ ∑ ℂ fld x ∈ b ∪ f F ⁡ x ⁡ i Fn I
211 eqid ⊢ i ∈ I ⟼ ∑ ℂ fld x ∈ b F ⁡ x ⁡ i = i ∈ I ⟼ ∑ ℂ fld x ∈ b F ⁡ x ⁡ i
212 fveq2 ⊢ i = j → F ⁡ x ⁡ i = F ⁡ x ⁡ j
213 212 mpteq2dv ⊢ i = j → x ∈ b ⟼ F ⁡ x ⁡ i = x ∈ b ⟼ F ⁡ x ⁡ j
214 213 oveq2d ⊢ i = j → ∑ ℂ fld x ∈ b F ⁡ x ⁡ i = ∑ ℂ fld x ∈ b F ⁡ x ⁡ j
215 simpr ⊢ φ ∧ b ⊆ A ∧ f ∈ A ∖ b ∧ j ∈ I → j ∈ I
216 ovexd ⊢ φ ∧ b ⊆ A ∧ f ∈ A ∖ b ∧ j ∈ I → ∑ ℂ fld x ∈ b F ⁡ x ⁡ j ∈ V
217 211 214 215 216 fvmptd3 ⊢ φ ∧ b ⊆ A ∧ f ∈ A ∖ b ∧ j ∈ I → i ∈ I ⟼ ∑ ℂ fld x ∈ b F ⁡ x ⁡ i ⁡ j = ∑ ℂ fld x ∈ b F ⁡ x ⁡ j
218 eqidd ⊢ φ ∧ b ⊆ A ∧ f ∈ A ∖ b ∧ j ∈ I → F ⁡ f ⁡ j = F ⁡ f ⁡ j
219 212 mpteq2dv ⊢ i = j → x ∈ b ∪ f ⟼ F ⁡ x ⁡ i = x ∈ b ∪ f ⟼ F ⁡ x ⁡ j
220 219 oveq2d ⊢ i = j → ∑ ℂ fld x ∈ b ∪ f F ⁡ x ⁡ i = ∑ ℂ fld x ∈ b ∪ f F ⁡ x ⁡ j
221 ovexd ⊢ φ ∧ b ⊆ A ∧ f ∈ A ∖ b ∧ j ∈ I → ∑ ℂ fld x ∈ b ∪ f F ⁡ x ⁡ j ∈ V
222 209 220 215 221 fvmptd3 ⊢ φ ∧ b ⊆ A ∧ f ∈ A ∖ b ∧ j ∈ I → i ∈ I ⟼ ∑ ℂ fld x ∈ b ∪ f F ⁡ x ⁡ i ⁡ j = ∑ ℂ fld x ∈ b ∪ f F ⁡ x ⁡ j
223 cnfldbas ⊢ ℂ = Base ℂ fld
224 cnfldadd ⊢ + = + ℂ fld
225 149 a1i ⊢ φ ∧ b ⊆ A ∧ f ∈ A ∖ b ∧ j ∈ I → ℂ fld ∈ CMnd
226 172 adantr ⊢ φ ∧ b ⊆ A ∧ f ∈ A ∖ b ∧ j ∈ I → b ∈ Fin
227 178 adantlr ⊢ φ ∧ b ⊆ A ∧ f ∈ A ∖ b ∧ j ∈ I ∧ x ∈ b → F ⁡ x : I ⟶ ℕ 0
228 nn0sscn ⊢ ℕ 0 ⊆ ℂ
229 228 a1i ⊢ φ ∧ b ⊆ A ∧ f ∈ A ∖ b ∧ j ∈ I ∧ x ∈ b → ℕ 0 ⊆ ℂ
230 227 229 fssd ⊢ φ ∧ b ⊆ A ∧ f ∈ A ∖ b ∧ j ∈ I ∧ x ∈ b → F ⁡ x : I ⟶ ℂ
231 simplr ⊢ φ ∧ b ⊆ A ∧ f ∈ A ∖ b ∧ j ∈ I ∧ x ∈ b → j ∈ I
232 230 231 ffvelcdmd ⊢ φ ∧ b ⊆ A ∧ f ∈ A ∖ b ∧ j ∈ I ∧ x ∈ b → F ⁡ x ⁡ j ∈ ℂ
233 simplr ⊢ φ ∧ b ⊆ A ∧ f ∈ A ∖ b ∧ j ∈ I → f ∈ A ∖ b
234 233 eldifbd ⊢ φ ∧ b ⊆ A ∧ f ∈ A ∖ b ∧ j ∈ I → ¬ f ∈ b
235 205 adantr ⊢ φ ∧ b ⊆ A ∧ f ∈ A ∖ b ∧ j ∈ I → F ⁡ f : I ⟶ ℕ 0
236 228 a1i ⊢ φ ∧ b ⊆ A ∧ f ∈ A ∖ b ∧ j ∈ I → ℕ 0 ⊆ ℂ
237 235 236 fssd ⊢ φ ∧ b ⊆ A ∧ f ∈ A ∖ b ∧ j ∈ I → F ⁡ f : I ⟶ ℂ
238 237 215 ffvelcdmd ⊢ φ ∧ b ⊆ A ∧ f ∈ A ∖ b ∧ j ∈ I → F ⁡ f ⁡ j ∈ ℂ
239 fveq2 ⊢ x = f → F ⁡ x = F ⁡ f
240 239 fveq1d ⊢ x = f → F ⁡ x ⁡ j = F ⁡ f ⁡ j
241 223 224 225 226 232 233 234 238 240 gsumunsn ⊢ φ ∧ b ⊆ A ∧ f ∈ A ∖ b ∧ j ∈ I → ∑ ℂ fld x ∈ b ∪ f F ⁡ x ⁡ j = ∑ ℂ fld x ∈ b F ⁡ x ⁡ j + F ⁡ f ⁡ j
242 222 241 eqtr2d ⊢ φ ∧ b ⊆ A ∧ f ∈ A ∖ b ∧ j ∈ I → ∑ ℂ fld x ∈ b F ⁡ x ⁡ j + F ⁡ f ⁡ j = i ∈ I ⟼ ∑ ℂ fld x ∈ b ∪ f F ⁡ x ⁡ i ⁡ j
243 139 203 206 210 217 218 242 offveq ⊢ φ ∧ b ⊆ A ∧ f ∈ A ∖ b → i ∈ I ⟼ ∑ ℂ fld x ∈ b F ⁡ x ⁡ i + f F ⁡ f = i ∈ I ⟼ ∑ ℂ fld x ∈ b ∪ f F ⁡ x ⁡ i
244 243 fveq2d ⊢ φ ∧ b ⊆ A ∧ f ∈ A ∖ b → G ⁡ i ∈ I ⟼ ∑ ℂ fld x ∈ b F ⁡ x ⁡ i + f F ⁡ f = G ⁡ i ∈ I ⟼ ∑ ℂ fld x ∈ b ∪ f F ⁡ x ⁡ i
245 202 244 eqtrd ⊢ φ ∧ b ⊆ A ∧ f ∈ A ∖ b → G ⁡ i ∈ I ⟼ ∑ ℂ fld x ∈ b F ⁡ x ⁡ i ⋅ S G ⁡ F ⁡ f = G ⁡ i ∈ I ⟼ ∑ ℂ fld x ∈ b ∪ f F ⁡ x ⁡ i
246 245 adantr ⊢ φ ∧ b ⊆ A ∧ f ∈ A ∖ b ∧ ∑ M k ∈ b G ⁡ F ⁡ k = G ⁡ i ∈ I ⟼ ∑ ℂ fld x ∈ b F ⁡ x ⁡ i → G ⁡ i ∈ I ⟼ ∑ ℂ fld x ∈ b F ⁡ x ⁡ i ⋅ S G ⁡ F ⁡ f = G ⁡ i ∈ I ⟼ ∑ ℂ fld x ∈ b ∪ f F ⁡ x ⁡ i
247 132 138 246 3eqtrd ⊢ φ ∧ b ⊆ A ∧ f ∈ A ∖ b ∧ ∑ M k ∈ b G ⁡ F ⁡ k = G ⁡ i ∈ I ⟼ ∑ ℂ fld x ∈ b F ⁡ x ⁡ i → ∑ M l ∈ b ∪ f G ⁡ F ⁡ l = G ⁡ i ∈ I ⟼ ∑ ℂ fld x ∈ b ∪ f F ⁡ x ⁡ i
248 106 247 eqtrid ⊢ φ ∧ b ⊆ A ∧ f ∈ A ∖ b ∧ ∑ M k ∈ b G ⁡ F ⁡ k = G ⁡ i ∈ I ⟼ ∑ ℂ fld x ∈ b F ⁡ x ⁡ i → ∑ M k ∈ b ∪ f G ⁡ F ⁡ k = G ⁡ i ∈ I ⟼ ∑ ℂ fld x ∈ b ∪ f F ⁡ x ⁡ i
249 248 ex ⊢ φ ∧ b ⊆ A ∧ f ∈ A ∖ b → ∑ M k ∈ b G ⁡ F ⁡ k = G ⁡ i ∈ I ⟼ ∑ ℂ fld x ∈ b F ⁡ x ⁡ i → ∑ M k ∈ b ∪ f G ⁡ F ⁡ k = G ⁡ i ∈ I ⟼ ∑ ℂ fld x ∈ b ∪ f F ⁡ x ⁡ i
250 249 anasss ⊢ φ ∧ b ⊆ A ∧ f ∈ A ∖ b → ∑ M k ∈ b G ⁡ F ⁡ k = G ⁡ i ∈ I ⟼ ∑ ℂ fld x ∈ b F ⁡ x ⁡ i → ∑ M k ∈ b ∪ f G ⁡ F ⁡ k = G ⁡ i ∈ I ⟼ ∑ ℂ fld x ∈ b ∪ f F ⁡ x ⁡ i
251 43 50 57 64 103 250 6 findcard2d ⊢ φ → ∑ M k ∈ A G ⁡ F ⁡ k = G ⁡ i ∈ I ⟼ ∑ ℂ fld x ∈ A F ⁡ x ⁡ i
252 36 251 eqtrd ⊢ φ → ∑ M G ∘ F = G ⁡ i ∈ I ⟼ ∑ ℂ fld x ∈ A F ⁡ x ⁡ i