Metamath Proof Explorer


Theorem evl1gprodd

Description: Polynomial evaluation builder for a finite group product of polynomials. (Contributed by metakunt, 29-Apr-2025)

Ref Expression
Hypotheses evl1gprodd.1 ⊢ O = eval 1 ⁡ R
evl1gprodd.2 ⊢ P = Poly 1 ⁡ R
evl1gprodd.3 ⊢ Q = mulGrp P
evl1gprodd.4 ⊢ B = Base R
evl1gprodd.5 ⊢ U = Base P
evl1gprodd.6 ⊢ S = mulGrp R
evl1gprodd.7 ⊢ φ → R ∈ CRing
evl1gprodd.8 ⊢ φ → Y ∈ B
evl1gprodd.9 ⊢ φ → ∀ x ∈ N M ∈ U
evl1gprodd.10 ⊢ φ → N ∈ Fin
Assertion evl1gprodd ⊢ φ → O ⁡ ∑ Q x ∈ N M ⁡ Y = ∑ S x ∈ N O ⁡ M ⁡ Y

Proof

Step Hyp Ref Expression
1 evl1gprodd.1 ⊢ O = eval 1 ⁡ R
2 evl1gprodd.2 ⊢ P = Poly 1 ⁡ R
3 evl1gprodd.3 ⊢ Q = mulGrp P
4 evl1gprodd.4 ⊢ B = Base R
5 evl1gprodd.5 ⊢ U = Base P
6 evl1gprodd.6 ⊢ S = mulGrp R
7 evl1gprodd.7 ⊢ φ → R ∈ CRing
8 evl1gprodd.8 ⊢ φ → Y ∈ B
9 evl1gprodd.9 ⊢ φ → ∀ x ∈ N M ∈ U
10 evl1gprodd.10 ⊢ φ → N ∈ Fin
11 mpteq1 ⊢ a = ∅ → x ∈ a ⟼ M = x ∈ ∅ ⟼ M
12 11 oveq2d ⊢ a = ∅ → ∑ Q x ∈ a M = ∑ Q x ∈ ∅ M
13 12 fveq2d ⊢ a = ∅ → O ⁡ ∑ Q x ∈ a M = O ⁡ ∑ Q x ∈ ∅ M
14 13 fveq1d ⊢ a = ∅ → O ⁡ ∑ Q x ∈ a M ⁡ Y = O ⁡ ∑ Q x ∈ ∅ M ⁡ Y
15 mpteq1 ⊢ a = ∅ → x ∈ a ⟼ O ⁡ M ⁡ Y = x ∈ ∅ ⟼ O ⁡ M ⁡ Y
16 15 oveq2d ⊢ a = ∅ → ∑ S x ∈ a O ⁡ M ⁡ Y = ∑ S x ∈ ∅ O ⁡ M ⁡ Y
17 14 16 eqeq12d ⊢ a = ∅ → O ⁡ ∑ Q x ∈ a M ⁡ Y = ∑ S x ∈ a O ⁡ M ⁡ Y ↔ O ⁡ ∑ Q x ∈ ∅ M ⁡ Y = ∑ S x ∈ ∅ O ⁡ M ⁡ Y
18 mpteq1 ⊢ a = b → x ∈ a ⟼ M = x ∈ b ⟼ M
19 18 oveq2d ⊢ a = b → ∑ Q x ∈ a M = ∑ Q x ∈ b M
20 19 fveq2d ⊢ a = b → O ⁡ ∑ Q x ∈ a M = O ⁡ ∑ Q x ∈ b M
21 20 fveq1d ⊢ a = b → O ⁡ ∑ Q x ∈ a M ⁡ Y = O ⁡ ∑ Q x ∈ b M ⁡ Y
22 mpteq1 ⊢ a = b → x ∈ a ⟼ O ⁡ M ⁡ Y = x ∈ b ⟼ O ⁡ M ⁡ Y
23 22 oveq2d ⊢ a = b → ∑ S x ∈ a O ⁡ M ⁡ Y = ∑ S x ∈ b O ⁡ M ⁡ Y
24 21 23 eqeq12d ⊢ a = b → O ⁡ ∑ Q x ∈ a M ⁡ Y = ∑ S x ∈ a O ⁡ M ⁡ Y ↔ O ⁡ ∑ Q x ∈ b M ⁡ Y = ∑ S x ∈ b O ⁡ M ⁡ Y
25 mpteq1 ⊢ a = b ∪ c → x ∈ a ⟼ M = x ∈ b ∪ c ⟼ M
26 25 oveq2d ⊢ a = b ∪ c → ∑ Q x ∈ a M = ∑ Q x ∈ b ∪ c M
27 26 fveq2d ⊢ a = b ∪ c → O ⁡ ∑ Q x ∈ a M = O ⁡ ∑ Q x ∈ b ∪ c M
28 27 fveq1d ⊢ a = b ∪ c → O ⁡ ∑ Q x ∈ a M ⁡ Y = O ⁡ ∑ Q x ∈ b ∪ c M ⁡ Y
29 mpteq1 ⊢ a = b ∪ c → x ∈ a ⟼ O ⁡ M ⁡ Y = x ∈ b ∪ c ⟼ O ⁡ M ⁡ Y
30 29 oveq2d ⊢ a = b ∪ c → ∑ S x ∈ a O ⁡ M ⁡ Y = ∑ S x ∈ b ∪ c O ⁡ M ⁡ Y
31 28 30 eqeq12d ⊢ a = b ∪ c → O ⁡ ∑ Q x ∈ a M ⁡ Y = ∑ S x ∈ a O ⁡ M ⁡ Y ↔ O ⁡ ∑ Q x ∈ b ∪ c M ⁡ Y = ∑ S x ∈ b ∪ c O ⁡ M ⁡ Y
32 mpteq1 ⊢ a = N → x ∈ a ⟼ M = x ∈ N ⟼ M
33 32 oveq2d ⊢ a = N → ∑ Q x ∈ a M = ∑ Q x ∈ N M
34 33 fveq2d ⊢ a = N → O ⁡ ∑ Q x ∈ a M = O ⁡ ∑ Q x ∈ N M
35 34 fveq1d ⊢ a = N → O ⁡ ∑ Q x ∈ a M ⁡ Y = O ⁡ ∑ Q x ∈ N M ⁡ Y
36 mpteq1 ⊢ a = N → x ∈ a ⟼ O ⁡ M ⁡ Y = x ∈ N ⟼ O ⁡ M ⁡ Y
37 36 oveq2d ⊢ a = N → ∑ S x ∈ a O ⁡ M ⁡ Y = ∑ S x ∈ N O ⁡ M ⁡ Y
38 35 37 eqeq12d ⊢ a = N → O ⁡ ∑ Q x ∈ a M ⁡ Y = ∑ S x ∈ a O ⁡ M ⁡ Y ↔ O ⁡ ∑ Q x ∈ N M ⁡ Y = ∑ S x ∈ N O ⁡ M ⁡ Y
39 mpt0 ⊢ x ∈ ∅ ⟼ M = ∅
40 39 a1i ⊢ φ → x ∈ ∅ ⟼ M = ∅
41 40 oveq2d ⊢ φ → ∑ Q x ∈ ∅ M = ∑ Q ∅
42 41 fveq2d ⊢ φ → O ⁡ ∑ Q x ∈ ∅ M = O ⁡ ∑ Q ∅
43 42 fveq1d ⊢ φ → O ⁡ ∑ Q x ∈ ∅ M ⁡ Y = O ⁡ ∑ Q ∅ ⁡ Y
44 mpt0 ⊢ x ∈ ∅ ⟼ O ⁡ M ⁡ Y = ∅
45 44 a1i ⊢ φ → x ∈ ∅ ⟼ O ⁡ M ⁡ Y = ∅
46 45 oveq2d ⊢ φ → ∑ S x ∈ ∅ O ⁡ M ⁡ Y = ∑ S ∅
47 eqid ⊢ 0 S = 0 S
48 47 gsum0 ⊢ ∑ S ∅ = 0 S
49 48 a1i ⊢ φ → ∑ S ∅ = 0 S
50 eqid ⊢ 1 R = 1 R
51 6 50 ringidval ⊢ 1 R = 0 S
52 51 eqcomi ⊢ 0 S = 1 R
53 52 a1i ⊢ φ → 0 S = 1 R
54 eqid ⊢ algSc ⁡ P = algSc ⁡ P
55 7 crngringd ⊢ φ → R ∈ Ring
56 6 ringmgp ⊢ R ∈ Ring → S ∈ Mnd
57 55 56 syl ⊢ φ → S ∈ Mnd
58 eqid ⊢ Base S = Base S
59 58 47 mndidcl ⊢ S ∈ Mnd → 0 S ∈ Base S
60 57 59 syl ⊢ φ → 0 S ∈ Base S
61 eqid ⊢ Base R = Base R
62 6 61 mgpbas ⊢ Base R = Base S
63 4 62 eqtri ⊢ B = Base S
64 60 63 eleqtrrdi ⊢ φ → 0 S ∈ B
65 51 a1i ⊢ φ → 1 R = 0 S
66 65 eleq1d ⊢ φ → 1 R ∈ B ↔ 0 S ∈ B
67 64 66 mpbird ⊢ φ → 1 R ∈ B
68 1 2 4 54 5 7 67 8 evl1scad ⊢ φ → algSc ⁡ P ⁡ 1 R ∈ U ∧ O ⁡ algSc ⁡ P ⁡ 1 R ⁡ Y = 1 R
69 68 simprd ⊢ φ → O ⁡ algSc ⁡ P ⁡ 1 R ⁡ Y = 1 R
70 69 eqcomd ⊢ φ → 1 R = O ⁡ algSc ⁡ P ⁡ 1 R ⁡ Y
71 eqid ⊢ 1 P = 1 P
72 2 54 50 71 ply1scl1 ⊢ R ∈ Ring → algSc ⁡ P ⁡ 1 R = 1 P
73 55 72 syl ⊢ φ → algSc ⁡ P ⁡ 1 R = 1 P
74 3 71 ringidval ⊢ 1 P = 0 Q
75 74 a1i ⊢ φ → 1 P = 0 Q
76 73 75 eqtrd ⊢ φ → algSc ⁡ P ⁡ 1 R = 0 Q
77 76 fveq2d ⊢ φ → O ⁡ algSc ⁡ P ⁡ 1 R = O ⁡ 0 Q
78 77 fveq1d ⊢ φ → O ⁡ algSc ⁡ P ⁡ 1 R ⁡ Y = O ⁡ 0 Q ⁡ Y
79 70 78 eqtrd ⊢ φ → 1 R = O ⁡ 0 Q ⁡ Y
80 53 79 eqtrd ⊢ φ → 0 S = O ⁡ 0 Q ⁡ Y
81 eqid ⊢ 0 Q = 0 Q
82 81 gsum0 ⊢ ∑ Q ∅ = 0 Q
83 82 a1i ⊢ φ → ∑ Q ∅ = 0 Q
84 83 eqcomd ⊢ φ → 0 Q = ∑ Q ∅
85 84 fveq2d ⊢ φ → O ⁡ 0 Q = O ⁡ ∑ Q ∅
86 85 fveq1d ⊢ φ → O ⁡ 0 Q ⁡ Y = O ⁡ ∑ Q ∅ ⁡ Y
87 49 80 86 3eqtrd ⊢ φ → ∑ S ∅ = O ⁡ ∑ Q ∅ ⁡ Y
88 46 87 eqtr2d ⊢ φ → O ⁡ ∑ Q ∅ ⁡ Y = ∑ S x ∈ ∅ O ⁡ M ⁡ Y
89 43 88 eqtrd ⊢ φ → O ⁡ ∑ Q x ∈ ∅ M ⁡ Y = ∑ S x ∈ ∅ O ⁡ M ⁡ Y
90 nfcv ⊢ Ⅎ _ y M
91 nfcsb1v ⊢ Ⅎ _ x ⦋ y / x⦌ M
92 csbeq1a ⊢ x = y → M = ⦋ y / x⦌ M
93 90 91 92 cbvmpt ⊢ x ∈ b ∪ c ⟼ M = y ∈ b ∪ c ⟼ ⦋ y / x⦌ M
94 93 a1i ⊢ φ ∧ b ⊆ N ∧ c ∈ N ∖ b ∧ O ⁡ ∑ Q x ∈ b M ⁡ Y = ∑ S x ∈ b O ⁡ M ⁡ Y → x ∈ b ∪ c ⟼ M = y ∈ b ∪ c ⟼ ⦋ y / x⦌ M
95 94 oveq2d ⊢ φ ∧ b ⊆ N ∧ c ∈ N ∖ b ∧ O ⁡ ∑ Q x ∈ b M ⁡ Y = ∑ S x ∈ b O ⁡ M ⁡ Y → ∑ Q x ∈ b ∪ c M = ∑ Q y ∈ b ∪ c ⦋ y / x⦌ M
96 95 fveq2d ⊢ φ ∧ b ⊆ N ∧ c ∈ N ∖ b ∧ O ⁡ ∑ Q x ∈ b M ⁡ Y = ∑ S x ∈ b O ⁡ M ⁡ Y → O ⁡ ∑ Q x ∈ b ∪ c M = O ⁡ ∑ Q y ∈ b ∪ c ⦋ y / x⦌ M
97 96 fveq1d ⊢ φ ∧ b ⊆ N ∧ c ∈ N ∖ b ∧ O ⁡ ∑ Q x ∈ b M ⁡ Y = ∑ S x ∈ b O ⁡ M ⁡ Y → O ⁡ ∑ Q x ∈ b ∪ c M ⁡ Y = O ⁡ ∑ Q y ∈ b ∪ c ⦋ y / x⦌ M ⁡ Y
98 eqid ⊢ Base Q = Base Q
99 eqid ⊢ ⋅ P = ⋅ P
100 3 99 mgpplusg ⊢ ⋅ P = + Q
101 2 ply1crng ⊢ R ∈ CRing → P ∈ CRing
102 7 101 syl ⊢ φ → P ∈ CRing
103 3 crngmgp ⊢ P ∈ CRing → Q ∈ CMnd
104 102 103 syl ⊢ φ → Q ∈ CMnd
105 104 adantr ⊢ φ ∧ b ⊆ N ∧ c ∈ N ∖ b → Q ∈ CMnd
106 105 adantr ⊢ φ ∧ b ⊆ N ∧ c ∈ N ∖ b ∧ O ⁡ ∑ Q x ∈ b M ⁡ Y = ∑ S x ∈ b O ⁡ M ⁡ Y → Q ∈ CMnd
107 10 ad2antrr ⊢ φ ∧ b ⊆ N ∧ c ∈ N ∖ b ∧ O ⁡ ∑ Q x ∈ b M ⁡ Y = ∑ S x ∈ b O ⁡ M ⁡ Y → N ∈ Fin
108 simplrl ⊢ φ ∧ b ⊆ N ∧ c ∈ N ∖ b ∧ O ⁡ ∑ Q x ∈ b M ⁡ Y = ∑ S x ∈ b O ⁡ M ⁡ Y → b ⊆ N
109 107 108 ssfid ⊢ φ ∧ b ⊆ N ∧ c ∈ N ∖ b ∧ O ⁡ ∑ Q x ∈ b M ⁡ Y = ∑ S x ∈ b O ⁡ M ⁡ Y → b ∈ Fin
110 9 ad3antrrr ⊢ φ ∧ b ⊆ N ∧ c ∈ N ∖ b ∧ O ⁡ ∑ Q x ∈ b M ⁡ Y = ∑ S x ∈ b O ⁡ M ⁡ Y ∧ y ∈ b → ∀ x ∈ N M ∈ U
111 108 sselda ⊢ φ ∧ b ⊆ N ∧ c ∈ N ∖ b ∧ O ⁡ ∑ Q x ∈ b M ⁡ Y = ∑ S x ∈ b O ⁡ M ⁡ Y ∧ y ∈ b → y ∈ N
112 rspcsbela ⊢ y ∈ N ∧ ∀ x ∈ N M ∈ U → ⦋ y / x⦌ M ∈ U
113 112 expcom ⊢ ∀ x ∈ N M ∈ U → y ∈ N → ⦋ y / x⦌ M ∈ U
114 113 imp ⊢ ∀ x ∈ N M ∈ U ∧ y ∈ N → ⦋ y / x⦌ M ∈ U
115 110 111 114 syl2anc ⊢ φ ∧ b ⊆ N ∧ c ∈ N ∖ b ∧ O ⁡ ∑ Q x ∈ b M ⁡ Y = ∑ S x ∈ b O ⁡ M ⁡ Y ∧ y ∈ b → ⦋ y / x⦌ M ∈ U
116 3 5 mgpbas ⊢ U = Base Q
117 116 eqcomi ⊢ Base Q = U
118 117 a1i ⊢ φ → Base Q = U
119 118 adantr ⊢ φ ∧ b ⊆ N ∧ c ∈ N ∖ b → Base Q = U
120 119 adantr ⊢ φ ∧ b ⊆ N ∧ c ∈ N ∖ b ∧ O ⁡ ∑ Q x ∈ b M ⁡ Y = ∑ S x ∈ b O ⁡ M ⁡ Y → Base Q = U
121 120 adantr ⊢ φ ∧ b ⊆ N ∧ c ∈ N ∖ b ∧ O ⁡ ∑ Q x ∈ b M ⁡ Y = ∑ S x ∈ b O ⁡ M ⁡ Y ∧ y ∈ b → Base Q = U
122 121 eleq2d ⊢ φ ∧ b ⊆ N ∧ c ∈ N ∖ b ∧ O ⁡ ∑ Q x ∈ b M ⁡ Y = ∑ S x ∈ b O ⁡ M ⁡ Y ∧ y ∈ b → ⦋ y / x⦌ M ∈ Base Q ↔ ⦋ y / x⦌ M ∈ U
123 115 122 mpbird ⊢ φ ∧ b ⊆ N ∧ c ∈ N ∖ b ∧ O ⁡ ∑ Q x ∈ b M ⁡ Y = ∑ S x ∈ b O ⁡ M ⁡ Y ∧ y ∈ b → ⦋ y / x⦌ M ∈ Base Q
124 simplrr ⊢ φ ∧ b ⊆ N ∧ c ∈ N ∖ b ∧ O ⁡ ∑ Q x ∈ b M ⁡ Y = ∑ S x ∈ b O ⁡ M ⁡ Y → c ∈ N ∖ b
125 124 eldifbd ⊢ φ ∧ b ⊆ N ∧ c ∈ N ∖ b ∧ O ⁡ ∑ Q x ∈ b M ⁡ Y = ∑ S x ∈ b O ⁡ M ⁡ Y → ¬ c ∈ b
126 124 eldifad ⊢ φ ∧ b ⊆ N ∧ c ∈ N ∖ b ∧ O ⁡ ∑ Q x ∈ b M ⁡ Y = ∑ S x ∈ b O ⁡ M ⁡ Y → c ∈ N
127 9 ad2antrr ⊢ φ ∧ b ⊆ N ∧ c ∈ N ∖ b ∧ O ⁡ ∑ Q x ∈ b M ⁡ Y = ∑ S x ∈ b O ⁡ M ⁡ Y → ∀ x ∈ N M ∈ U
128 rspcsbela ⊢ c ∈ N ∧ ∀ x ∈ N M ∈ U → ⦋ c / x⦌ M ∈ U
129 126 127 128 syl2anc ⊢ φ ∧ b ⊆ N ∧ c ∈ N ∖ b ∧ O ⁡ ∑ Q x ∈ b M ⁡ Y = ∑ S x ∈ b O ⁡ M ⁡ Y → ⦋ c / x⦌ M ∈ U
130 120 eleq2d ⊢ φ ∧ b ⊆ N ∧ c ∈ N ∖ b ∧ O ⁡ ∑ Q x ∈ b M ⁡ Y = ∑ S x ∈ b O ⁡ M ⁡ Y → ⦋ c / x⦌ M ∈ Base Q ↔ ⦋ c / x⦌ M ∈ U
131 129 130 mpbird ⊢ φ ∧ b ⊆ N ∧ c ∈ N ∖ b ∧ O ⁡ ∑ Q x ∈ b M ⁡ Y = ∑ S x ∈ b O ⁡ M ⁡ Y → ⦋ c / x⦌ M ∈ Base Q
132 csbeq1 ⊢ y = c → ⦋ y / x⦌ M = ⦋ c / x⦌ M
133 98 100 106 109 123 124 125 131 132 gsumunsn ⊢ φ ∧ b ⊆ N ∧ c ∈ N ∖ b ∧ O ⁡ ∑ Q x ∈ b M ⁡ Y = ∑ S x ∈ b O ⁡ M ⁡ Y → ∑ Q y ∈ b ∪ c ⦋ y / x⦌ M = ∑ Q y ∈ b ⦋ y / x⦌ M ⋅ P ⦋ c / x⦌ M
134 133 fveq2d ⊢ φ ∧ b ⊆ N ∧ c ∈ N ∖ b ∧ O ⁡ ∑ Q x ∈ b M ⁡ Y = ∑ S x ∈ b O ⁡ M ⁡ Y → O ⁡ ∑ Q y ∈ b ∪ c ⦋ y / x⦌ M = O ⁡ ∑ Q y ∈ b ⦋ y / x⦌ M ⋅ P ⦋ c / x⦌ M
135 134 fveq1d ⊢ φ ∧ b ⊆ N ∧ c ∈ N ∖ b ∧ O ⁡ ∑ Q x ∈ b M ⁡ Y = ∑ S x ∈ b O ⁡ M ⁡ Y → O ⁡ ∑ Q y ∈ b ∪ c ⦋ y / x⦌ M ⁡ Y = O ⁡ ∑ Q y ∈ b ⦋ y / x⦌ M ⋅ P ⦋ c / x⦌ M ⁡ Y
136 7 ad2antrr ⊢ φ ∧ b ⊆ N ∧ c ∈ N ∖ b ∧ O ⁡ ∑ Q x ∈ b M ⁡ Y = ∑ S x ∈ b O ⁡ M ⁡ Y → R ∈ CRing
137 8 ad2antrr ⊢ φ ∧ b ⊆ N ∧ c ∈ N ∖ b ∧ O ⁡ ∑ Q x ∈ b M ⁡ Y = ∑ S x ∈ b O ⁡ M ⁡ Y → Y ∈ B
138 115 ralrimiva ⊢ φ ∧ b ⊆ N ∧ c ∈ N ∖ b ∧ O ⁡ ∑ Q x ∈ b M ⁡ Y = ∑ S x ∈ b O ⁡ M ⁡ Y → ∀ y ∈ b ⦋ y / x⦌ M ∈ U
139 116 106 109 138 gsummptcl ⊢ φ ∧ b ⊆ N ∧ c ∈ N ∖ b ∧ O ⁡ ∑ Q x ∈ b M ⁡ Y = ∑ S x ∈ b O ⁡ M ⁡ Y → ∑ Q y ∈ b ⦋ y / x⦌ M ∈ U
140 92 equcoms ⊢ y = x → M = ⦋ y / x⦌ M
141 140 eqcomd ⊢ y = x → ⦋ y / x⦌ M = M
142 91 90 141 cbvmpt ⊢ y ∈ b ⟼ ⦋ y / x⦌ M = x ∈ b ⟼ M
143 142 a1i ⊢ φ ∧ b ⊆ N ∧ c ∈ N ∖ b ∧ O ⁡ ∑ Q x ∈ b M ⁡ Y = ∑ S x ∈ b O ⁡ M ⁡ Y → y ∈ b ⟼ ⦋ y / x⦌ M = x ∈ b ⟼ M
144 143 oveq2d ⊢ φ ∧ b ⊆ N ∧ c ∈ N ∖ b ∧ O ⁡ ∑ Q x ∈ b M ⁡ Y = ∑ S x ∈ b O ⁡ M ⁡ Y → ∑ Q y ∈ b ⦋ y / x⦌ M = ∑ Q x ∈ b M
145 144 fveq2d ⊢ φ ∧ b ⊆ N ∧ c ∈ N ∖ b ∧ O ⁡ ∑ Q x ∈ b M ⁡ Y = ∑ S x ∈ b O ⁡ M ⁡ Y → O ⁡ ∑ Q y ∈ b ⦋ y / x⦌ M = O ⁡ ∑ Q x ∈ b M
146 145 fveq1d ⊢ φ ∧ b ⊆ N ∧ c ∈ N ∖ b ∧ O ⁡ ∑ Q x ∈ b M ⁡ Y = ∑ S x ∈ b O ⁡ M ⁡ Y → O ⁡ ∑ Q y ∈ b ⦋ y / x⦌ M ⁡ Y = O ⁡ ∑ Q x ∈ b M ⁡ Y
147 139 146 jca ⊢ φ ∧ b ⊆ N ∧ c ∈ N ∖ b ∧ O ⁡ ∑ Q x ∈ b M ⁡ Y = ∑ S x ∈ b O ⁡ M ⁡ Y → ∑ Q y ∈ b ⦋ y / x⦌ M ∈ U ∧ O ⁡ ∑ Q y ∈ b ⦋ y / x⦌ M ⁡ Y = O ⁡ ∑ Q x ∈ b M ⁡ Y
148 eqidd ⊢ φ ∧ b ⊆ N ∧ c ∈ N ∖ b ∧ O ⁡ ∑ Q x ∈ b M ⁡ Y = ∑ S x ∈ b O ⁡ M ⁡ Y → O ⁡ ⦋ c / x⦌ M ⁡ Y = O ⁡ ⦋ c / x⦌ M ⁡ Y
149 129 148 jca ⊢ φ ∧ b ⊆ N ∧ c ∈ N ∖ b ∧ O ⁡ ∑ Q x ∈ b M ⁡ Y = ∑ S x ∈ b O ⁡ M ⁡ Y → ⦋ c / x⦌ M ∈ U ∧ O ⁡ ⦋ c / x⦌ M ⁡ Y = O ⁡ ⦋ c / x⦌ M ⁡ Y
150 eqid ⊢ ⋅ R = ⋅ R
151 1 2 4 5 136 137 147 149 99 150 evl1muld ⊢ φ ∧ b ⊆ N ∧ c ∈ N ∖ b ∧ O ⁡ ∑ Q x ∈ b M ⁡ Y = ∑ S x ∈ b O ⁡ M ⁡ Y → ∑ Q y ∈ b ⦋ y / x⦌ M ⋅ P ⦋ c / x⦌ M ∈ U ∧ O ⁡ ∑ Q y ∈ b ⦋ y / x⦌ M ⋅ P ⦋ c / x⦌ M ⁡ Y = O ⁡ ∑ Q x ∈ b M ⁡ Y ⋅ R O ⁡ ⦋ c / x⦌ M ⁡ Y
152 151 simprd ⊢ φ ∧ b ⊆ N ∧ c ∈ N ∖ b ∧ O ⁡ ∑ Q x ∈ b M ⁡ Y = ∑ S x ∈ b O ⁡ M ⁡ Y → O ⁡ ∑ Q y ∈ b ⦋ y / x⦌ M ⋅ P ⦋ c / x⦌ M ⁡ Y = O ⁡ ∑ Q x ∈ b M ⁡ Y ⋅ R O ⁡ ⦋ c / x⦌ M ⁡ Y
153 135 152 eqtrd ⊢ φ ∧ b ⊆ N ∧ c ∈ N ∖ b ∧ O ⁡ ∑ Q x ∈ b M ⁡ Y = ∑ S x ∈ b O ⁡ M ⁡ Y → O ⁡ ∑ Q y ∈ b ∪ c ⦋ y / x⦌ M ⁡ Y = O ⁡ ∑ Q x ∈ b M ⁡ Y ⋅ R O ⁡ ⦋ c / x⦌ M ⁡ Y
154 97 153 eqtrd ⊢ φ ∧ b ⊆ N ∧ c ∈ N ∖ b ∧ O ⁡ ∑ Q x ∈ b M ⁡ Y = ∑ S x ∈ b O ⁡ M ⁡ Y → O ⁡ ∑ Q x ∈ b ∪ c M ⁡ Y = O ⁡ ∑ Q x ∈ b M ⁡ Y ⋅ R O ⁡ ⦋ c / x⦌ M ⁡ Y
155 6 150 mgpplusg ⊢ ⋅ R = + S
156 eqid ⊢ mulGrp R = mulGrp R
157 156 crngmgp ⊢ R ∈ CRing → mulGrp R ∈ CMnd
158 7 157 syl ⊢ φ → mulGrp R ∈ CMnd
159 6 158 eqeltrid ⊢ φ → S ∈ CMnd
160 159 adantr ⊢ φ ∧ b ⊆ N ∧ c ∈ N ∖ b → S ∈ CMnd
161 160 adantr ⊢ φ ∧ b ⊆ N ∧ c ∈ N ∖ b ∧ O ⁡ ∑ Q x ∈ b M ⁡ Y = ∑ S x ∈ b O ⁡ M ⁡ Y → S ∈ CMnd
162 csbfv12 ⊢ ⦋ y / x⦌ O ⁡ M ⁡ Y = ⦋ y / x⦌ O ⁡ M ⁡ ⦋ y / x⦌ Y
163 csbfv2g ⊢ y ∈ V → ⦋ y / x⦌ O ⁡ M = O ⁡ ⦋ y / x⦌ M
164 163 elv ⊢ ⦋ y / x⦌ O ⁡ M = O ⁡ ⦋ y / x⦌ M
165 vex ⊢ y ∈ V
166 nfcv ⊢ Ⅎ _ x Y
167 165 166 csbgfi ⊢ ⦋ y / x⦌ Y = Y
168 164 167 fveq12i ⊢ ⦋ y / x⦌ O ⁡ M ⁡ ⦋ y / x⦌ Y = O ⁡ ⦋ y / x⦌ M ⁡ Y
169 162 168 eqtri ⊢ ⦋ y / x⦌ O ⁡ M ⁡ Y = O ⁡ ⦋ y / x⦌ M ⁡ Y
170 62 eqcomi ⊢ Base S = Base R
171 7 ad3antrrr ⊢ φ ∧ b ⊆ N ∧ c ∈ N ∖ b ∧ O ⁡ ∑ Q x ∈ b M ⁡ Y = ∑ S x ∈ b O ⁡ M ⁡ Y ∧ y ∈ b → R ∈ CRing
172 8 ad3antrrr ⊢ φ ∧ b ⊆ N ∧ c ∈ N ∖ b ∧ O ⁡ ∑ Q x ∈ b M ⁡ Y = ∑ S x ∈ b O ⁡ M ⁡ Y ∧ y ∈ b → Y ∈ B
173 63 eqcomi ⊢ Base S = B
174 173 a1i ⊢ φ ∧ b ⊆ N ∧ c ∈ N ∖ b ∧ O ⁡ ∑ Q x ∈ b M ⁡ Y = ∑ S x ∈ b O ⁡ M ⁡ Y ∧ y ∈ b → Base S = B
175 174 eleq2d ⊢ φ ∧ b ⊆ N ∧ c ∈ N ∖ b ∧ O ⁡ ∑ Q x ∈ b M ⁡ Y = ∑ S x ∈ b O ⁡ M ⁡ Y ∧ y ∈ b → Y ∈ Base S ↔ Y ∈ B
176 172 175 mpbird ⊢ φ ∧ b ⊆ N ∧ c ∈ N ∖ b ∧ O ⁡ ∑ Q x ∈ b M ⁡ Y = ∑ S x ∈ b O ⁡ M ⁡ Y ∧ y ∈ b → Y ∈ Base S
177 1 2 170 5 171 176 115 fveval1fvcl ⊢ φ ∧ b ⊆ N ∧ c ∈ N ∖ b ∧ O ⁡ ∑ Q x ∈ b M ⁡ Y = ∑ S x ∈ b O ⁡ M ⁡ Y ∧ y ∈ b → O ⁡ ⦋ y / x⦌ M ⁡ Y ∈ Base S
178 169 177 eqeltrid ⊢ φ ∧ b ⊆ N ∧ c ∈ N ∖ b ∧ O ⁡ ∑ Q x ∈ b M ⁡ Y = ∑ S x ∈ b O ⁡ M ⁡ Y ∧ y ∈ b → ⦋ y / x⦌ O ⁡ M ⁡ Y ∈ Base S
179 1 2 4 5 136 137 129 fveval1fvcl ⊢ φ ∧ b ⊆ N ∧ c ∈ N ∖ b ∧ O ⁡ ∑ Q x ∈ b M ⁡ Y = ∑ S x ∈ b O ⁡ M ⁡ Y → O ⁡ ⦋ c / x⦌ M ⁡ Y ∈ B
180 179 63 eleqtrdi ⊢ φ ∧ b ⊆ N ∧ c ∈ N ∖ b ∧ O ⁡ ∑ Q x ∈ b M ⁡ Y = ∑ S x ∈ b O ⁡ M ⁡ Y → O ⁡ ⦋ c / x⦌ M ⁡ Y ∈ Base S
181 nfcv ⊢ Ⅎ _ x c
182 nfcv ⊢ Ⅎ _ x O
183 181 nfcsb1 ⊢ Ⅎ _ x ⦋ c / x⦌ M
184 182 183 nffv ⊢ Ⅎ _ x O ⁡ ⦋ c / x⦌ M
185 184 166 nffv ⊢ Ⅎ _ x O ⁡ ⦋ c / x⦌ M ⁡ Y
186 csbeq1a ⊢ x = c → M = ⦋ c / x⦌ M
187 186 fveq2d ⊢ x = c → O ⁡ M = O ⁡ ⦋ c / x⦌ M
188 187 fveq1d ⊢ x = c → O ⁡ M ⁡ Y = O ⁡ ⦋ c / x⦌ M ⁡ Y
189 181 185 188 csbhypf ⊢ y = c → ⦋ y / x⦌ O ⁡ M ⁡ Y = O ⁡ ⦋ c / x⦌ M ⁡ Y
190 58 155 161 109 178 124 125 180 189 gsumunsn ⊢ φ ∧ b ⊆ N ∧ c ∈ N ∖ b ∧ O ⁡ ∑ Q x ∈ b M ⁡ Y = ∑ S x ∈ b O ⁡ M ⁡ Y → ∑ S y ∈ b ∪ c ⦋ y / x⦌ O ⁡ M ⁡ Y = ∑ S y ∈ b ⦋ y / x⦌ O ⁡ M ⁡ Y ⋅ R O ⁡ ⦋ c / x⦌ M ⁡ Y
191 simpr ⊢ φ ∧ b ⊆ N ∧ c ∈ N ∖ b ∧ O ⁡ ∑ Q x ∈ b M ⁡ Y = ∑ S x ∈ b O ⁡ M ⁡ Y → O ⁡ ∑ Q x ∈ b M ⁡ Y = ∑ S x ∈ b O ⁡ M ⁡ Y
192 nfcv ⊢ Ⅎ _ y O ⁡ M ⁡ Y
193 nfcsb1v ⊢ Ⅎ _ x ⦋ y / x⦌ O ⁡ M ⁡ Y
194 csbeq1a ⊢ x = y → O ⁡ M ⁡ Y = ⦋ y / x⦌ O ⁡ M ⁡ Y
195 192 193 194 cbvmpt ⊢ x ∈ b ⟼ O ⁡ M ⁡ Y = y ∈ b ⟼ ⦋ y / x⦌ O ⁡ M ⁡ Y
196 195 a1i ⊢ φ ∧ b ⊆ N ∧ c ∈ N ∖ b ∧ O ⁡ ∑ Q x ∈ b M ⁡ Y = ∑ S x ∈ b O ⁡ M ⁡ Y → x ∈ b ⟼ O ⁡ M ⁡ Y = y ∈ b ⟼ ⦋ y / x⦌ O ⁡ M ⁡ Y
197 196 oveq2d ⊢ φ ∧ b ⊆ N ∧ c ∈ N ∖ b ∧ O ⁡ ∑ Q x ∈ b M ⁡ Y = ∑ S x ∈ b O ⁡ M ⁡ Y → ∑ S x ∈ b O ⁡ M ⁡ Y = ∑ S y ∈ b ⦋ y / x⦌ O ⁡ M ⁡ Y
198 191 197 eqtr2d ⊢ φ ∧ b ⊆ N ∧ c ∈ N ∖ b ∧ O ⁡ ∑ Q x ∈ b M ⁡ Y = ∑ S x ∈ b O ⁡ M ⁡ Y → ∑ S y ∈ b ⦋ y / x⦌ O ⁡ M ⁡ Y = O ⁡ ∑ Q x ∈ b M ⁡ Y
199 198 oveq1d ⊢ φ ∧ b ⊆ N ∧ c ∈ N ∖ b ∧ O ⁡ ∑ Q x ∈ b M ⁡ Y = ∑ S x ∈ b O ⁡ M ⁡ Y → ∑ S y ∈ b ⦋ y / x⦌ O ⁡ M ⁡ Y ⋅ R O ⁡ ⦋ c / x⦌ M ⁡ Y = O ⁡ ∑ Q x ∈ b M ⁡ Y ⋅ R O ⁡ ⦋ c / x⦌ M ⁡ Y
200 190 199 eqtrd ⊢ φ ∧ b ⊆ N ∧ c ∈ N ∖ b ∧ O ⁡ ∑ Q x ∈ b M ⁡ Y = ∑ S x ∈ b O ⁡ M ⁡ Y → ∑ S y ∈ b ∪ c ⦋ y / x⦌ O ⁡ M ⁡ Y = O ⁡ ∑ Q x ∈ b M ⁡ Y ⋅ R O ⁡ ⦋ c / x⦌ M ⁡ Y
201 200 eqcomd ⊢ φ ∧ b ⊆ N ∧ c ∈ N ∖ b ∧ O ⁡ ∑ Q x ∈ b M ⁡ Y = ∑ S x ∈ b O ⁡ M ⁡ Y → O ⁡ ∑ Q x ∈ b M ⁡ Y ⋅ R O ⁡ ⦋ c / x⦌ M ⁡ Y = ∑ S y ∈ b ∪ c ⦋ y / x⦌ O ⁡ M ⁡ Y
202 154 201 eqtrd ⊢ φ ∧ b ⊆ N ∧ c ∈ N ∖ b ∧ O ⁡ ∑ Q x ∈ b M ⁡ Y = ∑ S x ∈ b O ⁡ M ⁡ Y → O ⁡ ∑ Q x ∈ b ∪ c M ⁡ Y = ∑ S y ∈ b ∪ c ⦋ y / x⦌ O ⁡ M ⁡ Y
203 192 193 194 cbvmpt ⊢ x ∈ b ∪ c ⟼ O ⁡ M ⁡ Y = y ∈ b ∪ c ⟼ ⦋ y / x⦌ O ⁡ M ⁡ Y
204 203 eqcomi ⊢ y ∈ b ∪ c ⟼ ⦋ y / x⦌ O ⁡ M ⁡ Y = x ∈ b ∪ c ⟼ O ⁡ M ⁡ Y
205 204 a1i ⊢ φ ∧ b ⊆ N ∧ c ∈ N ∖ b ∧ O ⁡ ∑ Q x ∈ b M ⁡ Y = ∑ S x ∈ b O ⁡ M ⁡ Y → y ∈ b ∪ c ⟼ ⦋ y / x⦌ O ⁡ M ⁡ Y = x ∈ b ∪ c ⟼ O ⁡ M ⁡ Y
206 205 oveq2d ⊢ φ ∧ b ⊆ N ∧ c ∈ N ∖ b ∧ O ⁡ ∑ Q x ∈ b M ⁡ Y = ∑ S x ∈ b O ⁡ M ⁡ Y → ∑ S y ∈ b ∪ c ⦋ y / x⦌ O ⁡ M ⁡ Y = ∑ S x ∈ b ∪ c O ⁡ M ⁡ Y
207 202 206 eqtrd ⊢ φ ∧ b ⊆ N ∧ c ∈ N ∖ b ∧ O ⁡ ∑ Q x ∈ b M ⁡ Y = ∑ S x ∈ b O ⁡ M ⁡ Y → O ⁡ ∑ Q x ∈ b ∪ c M ⁡ Y = ∑ S x ∈ b ∪ c O ⁡ M ⁡ Y
208 207 ex ⊢ φ ∧ b ⊆ N ∧ c ∈ N ∖ b → O ⁡ ∑ Q x ∈ b M ⁡ Y = ∑ S x ∈ b O ⁡ M ⁡ Y → O ⁡ ∑ Q x ∈ b ∪ c M ⁡ Y = ∑ S x ∈ b ∪ c O ⁡ M ⁡ Y
209 17 24 31 38 89 208 10 findcard2d ⊢ φ → O ⁡ ∑ Q x ∈ N M ⁡ Y = ∑ S x ∈ N O ⁡ M ⁡ Y