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

Theorem evl1deg3 33661
Description: Evaluation of a univariate polynomial of degree 3. (Contributed by Thierry Arnoux, 14-Jun-2025.)
Hypotheses
Ref Expression
evl1deg1.1 𝑃 = (Poly1𝑅)
evl1deg1.2 𝑂 = (eval1𝑅)
evl1deg1.3 𝐾 = (Base‘𝑅)
evl1deg1.4 𝑈 = (Base‘𝑃)
evl1deg1.5 · = (.r𝑅)
evl1deg1.6 + = (+g𝑅)
evl1deg2.p = (.g‘(mulGrp‘𝑅))
evl1deg3.f 𝐹 = (coe1𝑀)
evl1deg3.e 𝐸 = (deg1𝑅)
evl1deg3.a 𝐴 = (𝐹‘3)
evl1deg3.b 𝐵 = (𝐹‘2)
evl1deg3.c 𝐶 = (𝐹‘1)
evl1deg3.d 𝐷 = (𝐹‘0)
evl1deg3.r (𝜑𝑅 ∈ CRing)
evl1deg3.m (𝜑𝑀𝑈)
evl1deg3.1 (𝜑 → (𝐸𝑀) = 3)
evl1deg3.x (𝜑𝑋𝐾)
Assertion
Ref Expression
evl1deg3 (𝜑 → ((𝑂𝑀)‘𝑋) = (((𝐴 · (3 𝑋)) + (𝐵 · (2 𝑋))) + ((𝐶 · 𝑋) + 𝐷)))

Proof of Theorem evl1deg3
Dummy variables 𝑖 𝑗 𝑘 𝑥 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 oveq2 7364 . . . . . 6 (𝑥 = 𝑋 → (𝑘 𝑥) = (𝑘 𝑋))
21oveq2d 7372 . . . . 5 (𝑥 = 𝑋 → ((𝐹𝑘) · (𝑘 𝑥)) = ((𝐹𝑘) · (𝑘 𝑋)))
32mpteq2dv 5166 . . . 4 (𝑥 = 𝑋 → (𝑘 ∈ ℕ0 ↦ ((𝐹𝑘) · (𝑘 𝑥))) = (𝑘 ∈ ℕ0 ↦ ((𝐹𝑘) · (𝑘 𝑋))))
43oveq2d 7372 . . 3 (𝑥 = 𝑋 → (𝑅 Σg (𝑘 ∈ ℕ0 ↦ ((𝐹𝑘) · (𝑘 𝑥)))) = (𝑅 Σg (𝑘 ∈ ℕ0 ↦ ((𝐹𝑘) · (𝑘 𝑋)))))
5 evl1deg1.2 . . . 4 𝑂 = (eval1𝑅)
6 evl1deg1.1 . . . 4 𝑃 = (Poly1𝑅)
7 evl1deg1.3 . . . 4 𝐾 = (Base‘𝑅)
8 evl1deg1.4 . . . 4 𝑈 = (Base‘𝑃)
9 evl1deg3.r . . . 4 (𝜑𝑅 ∈ CRing)
10 evl1deg3.m . . . 4 (𝜑𝑀𝑈)
11 evl1deg1.5 . . . 4 · = (.r𝑅)
12 evl1deg2.p . . . 4 = (.g‘(mulGrp‘𝑅))
13 evl1deg3.f . . . 4 𝐹 = (coe1𝑀)
145, 6, 7, 8, 9, 10, 11, 12, 13evl1fpws 33647 . . 3 (𝜑 → (𝑂𝑀) = (𝑥𝐾 ↦ (𝑅 Σg (𝑘 ∈ ℕ0 ↦ ((𝐹𝑘) · (𝑘 𝑥))))))
15 evl1deg3.x . . 3 (𝜑𝑋𝐾)
16 ovexd 7391 . . 3 (𝜑 → (𝑅 Σg (𝑘 ∈ ℕ0 ↦ ((𝐹𝑘) · (𝑘 𝑋)))) ∈ V)
174, 14, 15, 16fvmptd4 6960 . 2 (𝜑 → ((𝑂𝑀)‘𝑋) = (𝑅 Σg (𝑘 ∈ ℕ0 ↦ ((𝐹𝑘) · (𝑘 𝑋)))))
18 eqid 2739 . . 3 (0g𝑅) = (0g𝑅)
19 evl1deg1.6 . . 3 + = (+g𝑅)
209crngringd 20218 . . . 4 (𝜑𝑅 ∈ Ring)
2120ringcmnd 20256 . . 3 (𝜑𝑅 ∈ CMnd)
22 nn0ex 12434 . . . 4 0 ∈ V
2322a1i 11 . . 3 (𝜑 → ℕ0 ∈ V)
2420adantr 481 . . . 4 ((𝜑𝑘 ∈ ℕ0) → 𝑅 ∈ Ring)
2513, 8, 6, 7coe1fvalcl 22197 . . . . 5 ((𝑀𝑈𝑘 ∈ ℕ0) → (𝐹𝑘) ∈ 𝐾)
2610, 25sylan 586 . . . 4 ((𝜑𝑘 ∈ ℕ0) → (𝐹𝑘) ∈ 𝐾)
27 eqid 2739 . . . . . 6 (mulGrp‘𝑅) = (mulGrp‘𝑅)
2827, 7mgpbas 20117 . . . . 5 𝐾 = (Base‘(mulGrp‘𝑅))
2927ringmgp 20211 . . . . . . 7 (𝑅 ∈ Ring → (mulGrp‘𝑅) ∈ Mnd)
3020, 29syl 17 . . . . . 6 (𝜑 → (mulGrp‘𝑅) ∈ Mnd)
3130adantr 481 . . . . 5 ((𝜑𝑘 ∈ ℕ0) → (mulGrp‘𝑅) ∈ Mnd)
32 simpr 485 . . . . 5 ((𝜑𝑘 ∈ ℕ0) → 𝑘 ∈ ℕ0)
3315adantr 481 . . . . 5 ((𝜑𝑘 ∈ ℕ0) → 𝑋𝐾)
3428, 12, 31, 32, 33mulgnn0cld 19062 . . . 4 ((𝜑𝑘 ∈ ℕ0) → (𝑘 𝑋) ∈ 𝐾)
357, 11, 24, 26, 34ringcld 20232 . . 3 ((𝜑𝑘 ∈ ℕ0) → ((𝐹𝑘) · (𝑘 𝑋)) ∈ 𝐾)
36 fvexd 6842 . . . 4 (𝜑 → (0g𝑅) ∈ V)
37 fveq2 6827 . . . . 5 (𝑘 = 𝑗 → (𝐹𝑘) = (𝐹𝑗))
38 oveq1 7363 . . . . 5 (𝑘 = 𝑗 → (𝑘 𝑋) = (𝑗 𝑋))
3937, 38oveq12d 7374 . . . 4 (𝑘 = 𝑗 → ((𝐹𝑘) · (𝑘 𝑋)) = ((𝐹𝑗) · (𝑗 𝑋)))
40 breq1 5075 . . . . . . 7 (𝑖 = (𝐸𝑀) → (𝑖 < 𝑗 ↔ (𝐸𝑀) < 𝑗))
4140imbi1d 342 . . . . . 6 (𝑖 = (𝐸𝑀) → ((𝑖 < 𝑗 → ((𝐹𝑗) · (𝑗 𝑋)) = (0g𝑅)) ↔ ((𝐸𝑀) < 𝑗 → ((𝐹𝑗) · (𝑗 𝑋)) = (0g𝑅))))
4241ralbidv 3162 . . . . 5 (𝑖 = (𝐸𝑀) → (∀𝑗 ∈ ℕ0 (𝑖 < 𝑗 → ((𝐹𝑗) · (𝑗 𝑋)) = (0g𝑅)) ↔ ∀𝑗 ∈ ℕ0 ((𝐸𝑀) < 𝑗 → ((𝐹𝑗) · (𝑗 𝑋)) = (0g𝑅))))
43 evl1deg3.1 . . . . . 6 (𝜑 → (𝐸𝑀) = 3)
44 3nn0 12446 . . . . . . 7 3 ∈ ℕ0
4544a1i 11 . . . . . 6 (𝜑 → 3 ∈ ℕ0)
4643, 45eqeltrd 2839 . . . . 5 (𝜑 → (𝐸𝑀) ∈ ℕ0)
4710ad2antrr 732 . . . . . . . . . 10 (((𝜑𝑗 ∈ ℕ0) ∧ (𝐸𝑀) < 𝑗) → 𝑀𝑈)
48 simplr 774 . . . . . . . . . 10 (((𝜑𝑗 ∈ ℕ0) ∧ (𝐸𝑀) < 𝑗) → 𝑗 ∈ ℕ0)
49 simpr 485 . . . . . . . . . 10 (((𝜑𝑗 ∈ ℕ0) ∧ (𝐸𝑀) < 𝑗) → (𝐸𝑀) < 𝑗)
50 evl1deg3.e . . . . . . . . . . 11 𝐸 = (deg1𝑅)
5150, 6, 8, 18, 13deg1lt 26080 . . . . . . . . . 10 ((𝑀𝑈𝑗 ∈ ℕ0 ∧ (𝐸𝑀) < 𝑗) → (𝐹𝑗) = (0g𝑅))
5247, 48, 49, 51syl3anc 1379 . . . . . . . . 9 (((𝜑𝑗 ∈ ℕ0) ∧ (𝐸𝑀) < 𝑗) → (𝐹𝑗) = (0g𝑅))
5352oveq1d 7371 . . . . . . . 8 (((𝜑𝑗 ∈ ℕ0) ∧ (𝐸𝑀) < 𝑗) → ((𝐹𝑗) · (𝑗 𝑋)) = ((0g𝑅) · (𝑗 𝑋)))
5420ad2antrr 732 . . . . . . . . 9 (((𝜑𝑗 ∈ ℕ0) ∧ (𝐸𝑀) < 𝑗) → 𝑅 ∈ Ring)
5554, 29syl 17 . . . . . . . . . 10 (((𝜑𝑗 ∈ ℕ0) ∧ (𝐸𝑀) < 𝑗) → (mulGrp‘𝑅) ∈ Mnd)
5615ad2antrr 732 . . . . . . . . . 10 (((𝜑𝑗 ∈ ℕ0) ∧ (𝐸𝑀) < 𝑗) → 𝑋𝐾)
5728, 12, 55, 48, 56mulgnn0cld 19062 . . . . . . . . 9 (((𝜑𝑗 ∈ ℕ0) ∧ (𝐸𝑀) < 𝑗) → (𝑗 𝑋) ∈ 𝐾)
587, 11, 18, 54, 57ringlzd 20267 . . . . . . . 8 (((𝜑𝑗 ∈ ℕ0) ∧ (𝐸𝑀) < 𝑗) → ((0g𝑅) · (𝑗 𝑋)) = (0g𝑅))
5953, 58eqtrd 2774 . . . . . . 7 (((𝜑𝑗 ∈ ℕ0) ∧ (𝐸𝑀) < 𝑗) → ((𝐹𝑗) · (𝑗 𝑋)) = (0g𝑅))
6059ex 413 . . . . . 6 ((𝜑𝑗 ∈ ℕ0) → ((𝐸𝑀) < 𝑗 → ((𝐹𝑗) · (𝑗 𝑋)) = (0g𝑅)))
6160ralrimiva 3131 . . . . 5 (𝜑 → ∀𝑗 ∈ ℕ0 ((𝐸𝑀) < 𝑗 → ((𝐹𝑗) · (𝑗 𝑋)) = (0g𝑅)))
6242, 46, 61rspcedvdw 3563 . . . 4 (𝜑 → ∃𝑖 ∈ ℕ0𝑗 ∈ ℕ0 (𝑖 < 𝑗 → ((𝐹𝑗) · (𝑗 𝑋)) = (0g𝑅)))
6336, 35, 39, 62mptnn0fsuppd 13951 . . 3 (𝜑 → (𝑘 ∈ ℕ0 ↦ ((𝐹𝑘) · (𝑘 𝑋))) finSupp (0g𝑅))
64 fzouzdisj 13641 . . . 4 ((0..^4) ∩ (ℤ‘4)) = ∅
6564a1i 11 . . 3 (𝜑 → ((0..^4) ∩ (ℤ‘4)) = ∅)
66 nn0uz 12817 . . . . 5 0 = (ℤ‘0)
67 4nn0 12447 . . . . . . 7 4 ∈ ℕ0
6867, 66eleqtri 2837 . . . . . 6 4 ∈ (ℤ‘0)
69 fzouzsplit 13640 . . . . . 6 (4 ∈ (ℤ‘0) → (ℤ‘0) = ((0..^4) ∪ (ℤ‘4)))
7068, 69ax-mp 5 . . . . 5 (ℤ‘0) = ((0..^4) ∪ (ℤ‘4))
7166, 70eqtri 2762 . . . 4 0 = ((0..^4) ∪ (ℤ‘4))
7271a1i 11 . . 3 (𝜑 → ℕ0 = ((0..^4) ∪ (ℤ‘4)))
737, 18, 19, 21, 23, 35, 63, 65, 72gsumsplit2 19895 . 2 (𝜑 → (𝑅 Σg (𝑘 ∈ ℕ0 ↦ ((𝐹𝑘) · (𝑘 𝑋)))) = ((𝑅 Σg (𝑘 ∈ (0..^4) ↦ ((𝐹𝑘) · (𝑘 𝑋)))) + (𝑅 Σg (𝑘 ∈ (ℤ‘4) ↦ ((𝐹𝑘) · (𝑘 𝑋))))))
74 fzofi 13927 . . . . . 6 (0..^4) ∈ Fin
7574a1i 11 . . . . 5 (𝜑 → (0..^4) ∈ Fin)
76 fzo0ssnn0 13692 . . . . . . . 8 (0..^4) ⊆ ℕ0
7776a1i 11 . . . . . . 7 (𝜑 → (0..^4) ⊆ ℕ0)
7877sselda 3915 . . . . . 6 ((𝜑𝑘 ∈ (0..^4)) → 𝑘 ∈ ℕ0)
7978, 35syldan 597 . . . . 5 ((𝜑𝑘 ∈ (0..^4)) → ((𝐹𝑘) · (𝑘 𝑋)) ∈ 𝐾)
80 0ne2 12374 . . . . . . 7 0 ≠ 2
81 1ne2 12375 . . . . . . 7 1 ≠ 2
82 0re 11137 . . . . . . . 8 0 ∈ ℝ
83 3pos 12277 . . . . . . . 8 0 < 3
8482, 83ltneii 11250 . . . . . . 7 0 ≠ 3
85 1re 11135 . . . . . . . 8 1 ∈ ℝ
86 1lt3 12340 . . . . . . . 8 1 < 3
8785, 86ltneii 11250 . . . . . . 7 1 ≠ 3
88 disjpr2 4645 . . . . . . 7 (((0 ≠ 2 ∧ 1 ≠ 2) ∧ (0 ≠ 3 ∧ 1 ≠ 3)) → ({0, 1} ∩ {2, 3}) = ∅)
8980, 81, 84, 87, 88mp4an 699 . . . . . 6 ({0, 1} ∩ {2, 3}) = ∅
9089a1i 11 . . . . 5 (𝜑 → ({0, 1} ∩ {2, 3}) = ∅)
91 fzo0to42pr 13699 . . . . . 6 (0..^4) = ({0, 1} ∪ {2, 3})
9291a1i 11 . . . . 5 (𝜑 → (0..^4) = ({0, 1} ∪ {2, 3}))
937, 19, 21, 75, 79, 90, 92gsummptfidmsplit 19896 . . . 4 (𝜑 → (𝑅 Σg (𝑘 ∈ (0..^4) ↦ ((𝐹𝑘) · (𝑘 𝑋)))) = ((𝑅 Σg (𝑘 ∈ {0, 1} ↦ ((𝐹𝑘) · (𝑘 𝑋)))) + (𝑅 Σg (𝑘 ∈ {2, 3} ↦ ((𝐹𝑘) · (𝑘 𝑋))))))
9410adantr 481 . . . . . . . . 9 ((𝜑𝑘 ∈ (ℤ‘4)) → 𝑀𝑈)
95 uzss 12802 . . . . . . . . . . . . 13 (4 ∈ (ℤ‘0) → (ℤ‘4) ⊆ (ℤ‘0))
9668, 95ax-mp 5 . . . . . . . . . . . 12 (ℤ‘4) ⊆ (ℤ‘0)
9796, 66sseqtrri 3964 . . . . . . . . . . 11 (ℤ‘4) ⊆ ℕ0
9897a1i 11 . . . . . . . . . 10 (𝜑 → (ℤ‘4) ⊆ ℕ0)
9998sselda 3915 . . . . . . . . 9 ((𝜑𝑘 ∈ (ℤ‘4)) → 𝑘 ∈ ℕ0)
10043adantr 481 . . . . . . . . . 10 ((𝜑𝑘 ∈ (ℤ‘4)) → (𝐸𝑀) = 3)
101 3p1e4 12312 . . . . . . . . . . . . . 14 (3 + 1) = 4
102101fveq2i 6830 . . . . . . . . . . . . 13 (ℤ‘(3 + 1)) = (ℤ‘4)
103102eleq2i 2831 . . . . . . . . . . . 12 (𝑘 ∈ (ℤ‘(3 + 1)) ↔ 𝑘 ∈ (ℤ‘4))
104 3z 12551 . . . . . . . . . . . . 13 3 ∈ ℤ
105 eluzp1l 12806 . . . . . . . . . . . . 13 ((3 ∈ ℤ ∧ 𝑘 ∈ (ℤ‘(3 + 1))) → 3 < 𝑘)
106104, 105mpan 696 . . . . . . . . . . . 12 (𝑘 ∈ (ℤ‘(3 + 1)) → 3 < 𝑘)
107103, 106sylbir 236 . . . . . . . . . . 11 (𝑘 ∈ (ℤ‘4) → 3 < 𝑘)
108107adantl 482 . . . . . . . . . 10 ((𝜑𝑘 ∈ (ℤ‘4)) → 3 < 𝑘)
109100, 108eqbrtrd 5094 . . . . . . . . 9 ((𝜑𝑘 ∈ (ℤ‘4)) → (𝐸𝑀) < 𝑘)
11050, 6, 8, 18, 13deg1lt 26080 . . . . . . . . 9 ((𝑀𝑈𝑘 ∈ ℕ0 ∧ (𝐸𝑀) < 𝑘) → (𝐹𝑘) = (0g𝑅))
11194, 99, 109, 110syl3anc 1379 . . . . . . . 8 ((𝜑𝑘 ∈ (ℤ‘4)) → (𝐹𝑘) = (0g𝑅))
112111oveq1d 7371 . . . . . . 7 ((𝜑𝑘 ∈ (ℤ‘4)) → ((𝐹𝑘) · (𝑘 𝑋)) = ((0g𝑅) · (𝑘 𝑋)))
11320adantr 481 . . . . . . . 8 ((𝜑𝑘 ∈ (ℤ‘4)) → 𝑅 ∈ Ring)
114113, 29syl 17 . . . . . . . . 9 ((𝜑𝑘 ∈ (ℤ‘4)) → (mulGrp‘𝑅) ∈ Mnd)
11515adantr 481 . . . . . . . . 9 ((𝜑𝑘 ∈ (ℤ‘4)) → 𝑋𝐾)
11628, 12, 114, 99, 115mulgnn0cld 19062 . . . . . . . 8 ((𝜑𝑘 ∈ (ℤ‘4)) → (𝑘 𝑋) ∈ 𝐾)
1177, 11, 18, 113, 116ringlzd 20267 . . . . . . 7 ((𝜑𝑘 ∈ (ℤ‘4)) → ((0g𝑅) · (𝑘 𝑋)) = (0g𝑅))
118112, 117eqtrd 2774 . . . . . 6 ((𝜑𝑘 ∈ (ℤ‘4)) → ((𝐹𝑘) · (𝑘 𝑋)) = (0g𝑅))
119118mpteq2dva 5165 . . . . 5 (𝜑 → (𝑘 ∈ (ℤ‘4) ↦ ((𝐹𝑘) · (𝑘 𝑋))) = (𝑘 ∈ (ℤ‘4) ↦ (0g𝑅)))
120119oveq2d 7372 . . . 4 (𝜑 → (𝑅 Σg (𝑘 ∈ (ℤ‘4) ↦ ((𝐹𝑘) · (𝑘 𝑋)))) = (𝑅 Σg (𝑘 ∈ (ℤ‘4) ↦ (0g𝑅))))
12193, 120oveq12d 7374 . . 3 (𝜑 → ((𝑅 Σg (𝑘 ∈ (0..^4) ↦ ((𝐹𝑘) · (𝑘 𝑋)))) + (𝑅 Σg (𝑘 ∈ (ℤ‘4) ↦ ((𝐹𝑘) · (𝑘 𝑋))))) = (((𝑅 Σg (𝑘 ∈ {0, 1} ↦ ((𝐹𝑘) · (𝑘 𝑋)))) + (𝑅 Σg (𝑘 ∈ {2, 3} ↦ ((𝐹𝑘) · (𝑘 𝑋))))) + (𝑅 Σg (𝑘 ∈ (ℤ‘4) ↦ (0g𝑅)))))
122 0nn0 12443 . . . . . . . . 9 0 ∈ ℕ0
123122a1i 11 . . . . . . . 8 (𝜑 → 0 ∈ ℕ0)
124 1nn0 12444 . . . . . . . . 9 1 ∈ ℕ0
125124a1i 11 . . . . . . . 8 (𝜑 → 1 ∈ ℕ0)
126 0ne1 12243 . . . . . . . . 9 0 ≠ 1
127126a1i 11 . . . . . . . 8 (𝜑 → 0 ≠ 1)
12813, 8, 6, 7coe1fvalcl 22197 . . . . . . . . . 10 ((𝑀𝑈 ∧ 0 ∈ ℕ0) → (𝐹‘0) ∈ 𝐾)
12910, 122, 128sylancl 592 . . . . . . . . 9 (𝜑 → (𝐹‘0) ∈ 𝐾)
13028, 12, 30, 123, 15mulgnn0cld 19062 . . . . . . . . 9 (𝜑 → (0 𝑋) ∈ 𝐾)
1317, 11, 20, 129, 130ringcld 20232 . . . . . . . 8 (𝜑 → ((𝐹‘0) · (0 𝑋)) ∈ 𝐾)
13213, 8, 6, 7coe1fvalcl 22197 . . . . . . . . . 10 ((𝑀𝑈 ∧ 1 ∈ ℕ0) → (𝐹‘1) ∈ 𝐾)
13310, 124, 132sylancl 592 . . . . . . . . 9 (𝜑 → (𝐹‘1) ∈ 𝐾)
13428, 12, 30, 125, 15mulgnn0cld 19062 . . . . . . . . 9 (𝜑 → (1 𝑋) ∈ 𝐾)
1357, 11, 20, 133, 134ringcld 20232 . . . . . . . 8 (𝜑 → ((𝐹‘1) · (1 𝑋)) ∈ 𝐾)
136 fveq2 6827 . . . . . . . . . 10 (𝑘 = 0 → (𝐹𝑘) = (𝐹‘0))
137 oveq1 7363 . . . . . . . . . 10 (𝑘 = 0 → (𝑘 𝑋) = (0 𝑋))
138136, 137oveq12d 7374 . . . . . . . . 9 (𝑘 = 0 → ((𝐹𝑘) · (𝑘 𝑋)) = ((𝐹‘0) · (0 𝑋)))
139 fveq2 6827 . . . . . . . . . 10 (𝑘 = 1 → (𝐹𝑘) = (𝐹‘1))
140 oveq1 7363 . . . . . . . . . 10 (𝑘 = 1 → (𝑘 𝑋) = (1 𝑋))
141139, 140oveq12d 7374 . . . . . . . . 9 (𝑘 = 1 → ((𝐹𝑘) · (𝑘 𝑋)) = ((𝐹‘1) · (1 𝑋)))
1427, 19, 138, 141gsumpr 19921 . . . . . . . 8 ((𝑅 ∈ CMnd ∧ (0 ∈ ℕ0 ∧ 1 ∈ ℕ0 ∧ 0 ≠ 1) ∧ (((𝐹‘0) · (0 𝑋)) ∈ 𝐾 ∧ ((𝐹‘1) · (1 𝑋)) ∈ 𝐾)) → (𝑅 Σg (𝑘 ∈ {0, 1} ↦ ((𝐹𝑘) · (𝑘 𝑋)))) = (((𝐹‘0) · (0 𝑋)) + ((𝐹‘1) · (1 𝑋))))
14321, 123, 125, 127, 131, 135, 142syl132anc 1396 . . . . . . 7 (𝜑 → (𝑅 Σg (𝑘 ∈ {0, 1} ↦ ((𝐹𝑘) · (𝑘 𝑋)))) = (((𝐹‘0) · (0 𝑋)) + ((𝐹‘1) · (1 𝑋))))
144 eqid 2739 . . . . . . . . . 10 (1r𝑅) = (1r𝑅)
145 evl1deg3.d . . . . . . . . . . 11 𝐷 = (𝐹‘0)
146145, 129eqeltrid 2843 . . . . . . . . . 10 (𝜑𝐷𝐾)
1477, 11, 144, 20, 146ringridmd 20245 . . . . . . . . 9 (𝜑 → (𝐷 · (1r𝑅)) = 𝐷)
148147oveq1d 7371 . . . . . . . 8 (𝜑 → ((𝐷 · (1r𝑅)) + (𝐶 · 𝑋)) = (𝐷 + (𝐶 · 𝑋)))
149145a1i 11 . . . . . . . . . 10 (𝜑𝐷 = (𝐹‘0))
15027, 144ringidval 20155 . . . . . . . . . . . . 13 (1r𝑅) = (0g‘(mulGrp‘𝑅))
15128, 150, 12mulg0 19041 . . . . . . . . . . . 12 (𝑋𝐾 → (0 𝑋) = (1r𝑅))
15215, 151syl 17 . . . . . . . . . . 11 (𝜑 → (0 𝑋) = (1r𝑅))
153152eqcomd 2745 . . . . . . . . . 10 (𝜑 → (1r𝑅) = (0 𝑋))
154149, 153oveq12d 7374 . . . . . . . . 9 (𝜑 → (𝐷 · (1r𝑅)) = ((𝐹‘0) · (0 𝑋)))
155 evl1deg3.c . . . . . . . . . . 11 𝐶 = (𝐹‘1)
156155a1i 11 . . . . . . . . . 10 (𝜑𝐶 = (𝐹‘1))
15728, 12mulg1 19048 . . . . . . . . . . . 12 (𝑋𝐾 → (1 𝑋) = 𝑋)
15815, 157syl 17 . . . . . . . . . . 11 (𝜑 → (1 𝑋) = 𝑋)
159158eqcomd 2745 . . . . . . . . . 10 (𝜑𝑋 = (1 𝑋))
160156, 159oveq12d 7374 . . . . . . . . 9 (𝜑 → (𝐶 · 𝑋) = ((𝐹‘1) · (1 𝑋)))
161154, 160oveq12d 7374 . . . . . . . 8 (𝜑 → ((𝐷 · (1r𝑅)) + (𝐶 · 𝑋)) = (((𝐹‘0) · (0 𝑋)) + ((𝐹‘1) · (1 𝑋))))
162160, 135eqeltrd 2839 . . . . . . . . 9 (𝜑 → (𝐶 · 𝑋) ∈ 𝐾)
1637, 19ringcom 20252 . . . . . . . . 9 ((𝑅 ∈ Ring ∧ 𝐷𝐾 ∧ (𝐶 · 𝑋) ∈ 𝐾) → (𝐷 + (𝐶 · 𝑋)) = ((𝐶 · 𝑋) + 𝐷))
16420, 146, 162, 163syl3anc 1379 . . . . . . . 8 (𝜑 → (𝐷 + (𝐶 · 𝑋)) = ((𝐶 · 𝑋) + 𝐷))
165148, 161, 1643eqtr3d 2782 . . . . . . 7 (𝜑 → (((𝐹‘0) · (0 𝑋)) + ((𝐹‘1) · (1 𝑋))) = ((𝐶 · 𝑋) + 𝐷))
166143, 165eqtrd 2774 . . . . . 6 (𝜑 → (𝑅 Σg (𝑘 ∈ {0, 1} ↦ ((𝐹𝑘) · (𝑘 𝑋)))) = ((𝐶 · 𝑋) + 𝐷))
167 2nn0 12445 . . . . . . . . 9 2 ∈ ℕ0
168167a1i 11 . . . . . . . 8 (𝜑 → 2 ∈ ℕ0)
169 2re 12246 . . . . . . . . . 10 2 ∈ ℝ
170 2lt3 12339 . . . . . . . . . 10 2 < 3
171169, 170ltneii 11250 . . . . . . . . 9 2 ≠ 3
172171a1i 11 . . . . . . . 8 (𝜑 → 2 ≠ 3)
173 evl1deg3.b . . . . . . . . . 10 𝐵 = (𝐹‘2)
17413, 8, 6, 7coe1fvalcl 22197 . . . . . . . . . . 11 ((𝑀𝑈 ∧ 2 ∈ ℕ0) → (𝐹‘2) ∈ 𝐾)
17510, 167, 174sylancl 592 . . . . . . . . . 10 (𝜑 → (𝐹‘2) ∈ 𝐾)
176173, 175eqeltrid 2843 . . . . . . . . 9 (𝜑𝐵𝐾)
17728, 12, 30, 168, 15mulgnn0cld 19062 . . . . . . . . 9 (𝜑 → (2 𝑋) ∈ 𝐾)
1787, 11, 20, 176, 177ringcld 20232 . . . . . . . 8 (𝜑 → (𝐵 · (2 𝑋)) ∈ 𝐾)
179 evl1deg3.a . . . . . . . . . 10 𝐴 = (𝐹‘3)
18013, 8, 6, 7coe1fvalcl 22197 . . . . . . . . . . 11 ((𝑀𝑈 ∧ 3 ∈ ℕ0) → (𝐹‘3) ∈ 𝐾)
18110, 44, 180sylancl 592 . . . . . . . . . 10 (𝜑 → (𝐹‘3) ∈ 𝐾)
182179, 181eqeltrid 2843 . . . . . . . . 9 (𝜑𝐴𝐾)
18328, 12, 30, 45, 15mulgnn0cld 19062 . . . . . . . . 9 (𝜑 → (3 𝑋) ∈ 𝐾)
1847, 11, 20, 182, 183ringcld 20232 . . . . . . . 8 (𝜑 → (𝐴 · (3 𝑋)) ∈ 𝐾)
185 fveq2 6827 . . . . . . . . . . 11 (𝑘 = 2 → (𝐹𝑘) = (𝐹‘2))
186185, 173eqtr4di 2792 . . . . . . . . . 10 (𝑘 = 2 → (𝐹𝑘) = 𝐵)
187 oveq1 7363 . . . . . . . . . 10 (𝑘 = 2 → (𝑘 𝑋) = (2 𝑋))
188186, 187oveq12d 7374 . . . . . . . . 9 (𝑘 = 2 → ((𝐹𝑘) · (𝑘 𝑋)) = (𝐵 · (2 𝑋)))
189 fveq2 6827 . . . . . . . . . . 11 (𝑘 = 3 → (𝐹𝑘) = (𝐹‘3))
190189, 179eqtr4di 2792 . . . . . . . . . 10 (𝑘 = 3 → (𝐹𝑘) = 𝐴)
191 oveq1 7363 . . . . . . . . . 10 (𝑘 = 3 → (𝑘 𝑋) = (3 𝑋))
192190, 191oveq12d 7374 . . . . . . . . 9 (𝑘 = 3 → ((𝐹𝑘) · (𝑘 𝑋)) = (𝐴 · (3 𝑋)))
1937, 19, 188, 192gsumpr 19921 . . . . . . . 8 ((𝑅 ∈ CMnd ∧ (2 ∈ ℕ0 ∧ 3 ∈ ℕ0 ∧ 2 ≠ 3) ∧ ((𝐵 · (2 𝑋)) ∈ 𝐾 ∧ (𝐴 · (3 𝑋)) ∈ 𝐾)) → (𝑅 Σg (𝑘 ∈ {2, 3} ↦ ((𝐹𝑘) · (𝑘 𝑋)))) = ((𝐵 · (2 𝑋)) + (𝐴 · (3 𝑋))))
19421, 168, 45, 172, 178, 184, 193syl132anc 1396 . . . . . . 7 (𝜑 → (𝑅 Σg (𝑘 ∈ {2, 3} ↦ ((𝐹𝑘) · (𝑘 𝑋)))) = ((𝐵 · (2 𝑋)) + (𝐴 · (3 𝑋))))
1957, 19cmncom 19764 . . . . . . . 8 ((𝑅 ∈ CMnd ∧ (𝐵 · (2 𝑋)) ∈ 𝐾 ∧ (𝐴 · (3 𝑋)) ∈ 𝐾) → ((𝐵 · (2 𝑋)) + (𝐴 · (3 𝑋))) = ((𝐴 · (3 𝑋)) + (𝐵 · (2 𝑋))))
19621, 178, 184, 195syl3anc 1379 . . . . . . 7 (𝜑 → ((𝐵 · (2 𝑋)) + (𝐴 · (3 𝑋))) = ((𝐴 · (3 𝑋)) + (𝐵 · (2 𝑋))))
197194, 196eqtrd 2774 . . . . . 6 (𝜑 → (𝑅 Σg (𝑘 ∈ {2, 3} ↦ ((𝐹𝑘) · (𝑘 𝑋)))) = ((𝐴 · (3 𝑋)) + (𝐵 · (2 𝑋))))
198166, 197oveq12d 7374 . . . . 5 (𝜑 → ((𝑅 Σg (𝑘 ∈ {0, 1} ↦ ((𝐹𝑘) · (𝑘 𝑋)))) + (𝑅 Σg (𝑘 ∈ {2, 3} ↦ ((𝐹𝑘) · (𝑘 𝑋))))) = (((𝐶 · 𝑋) + 𝐷) + ((𝐴 · (3 𝑋)) + (𝐵 · (2 𝑋)))))
1999crnggrpd 20219 . . . . . . 7 (𝜑𝑅 ∈ Grp)
2007, 19, 199, 162, 146grpcld 18914 . . . . . 6 (𝜑 → ((𝐶 · 𝑋) + 𝐷) ∈ 𝐾)
2017, 19, 199, 184, 178grpcld 18914 . . . . . 6 (𝜑 → ((𝐴 · (3 𝑋)) + (𝐵 · (2 𝑋))) ∈ 𝐾)
2027, 19cmncom 19764 . . . . . 6 ((𝑅 ∈ CMnd ∧ ((𝐶 · 𝑋) + 𝐷) ∈ 𝐾 ∧ ((𝐴 · (3 𝑋)) + (𝐵 · (2 𝑋))) ∈ 𝐾) → (((𝐶 · 𝑋) + 𝐷) + ((𝐴 · (3 𝑋)) + (𝐵 · (2 𝑋)))) = (((𝐴 · (3 𝑋)) + (𝐵 · (2 𝑋))) + ((𝐶 · 𝑋) + 𝐷)))
20321, 200, 201, 202syl3anc 1379 . . . . 5 (𝜑 → (((𝐶 · 𝑋) + 𝐷) + ((𝐴 · (3 𝑋)) + (𝐵 · (2 𝑋)))) = (((𝐴 · (3 𝑋)) + (𝐵 · (2 𝑋))) + ((𝐶 · 𝑋) + 𝐷)))
204198, 203eqtrd 2774 . . . 4 (𝜑 → ((𝑅 Σg (𝑘 ∈ {0, 1} ↦ ((𝐹𝑘) · (𝑘 𝑋)))) + (𝑅 Σg (𝑘 ∈ {2, 3} ↦ ((𝐹𝑘) · (𝑘 𝑋))))) = (((𝐴 · (3 𝑋)) + (𝐵 · (2 𝑋))) + ((𝐶 · 𝑋) + 𝐷)))
205199grpmndd 18913 . . . . 5 (𝜑𝑅 ∈ Mnd)
206 fvexd 6842 . . . . 5 (𝜑 → (ℤ‘4) ∈ V)
20718gsumz 18795 . . . . 5 ((𝑅 ∈ Mnd ∧ (ℤ‘4) ∈ V) → (𝑅 Σg (𝑘 ∈ (ℤ‘4) ↦ (0g𝑅))) = (0g𝑅))
208205, 206, 207syl2anc 590 . . . 4 (𝜑 → (𝑅 Σg (𝑘 ∈ (ℤ‘4) ↦ (0g𝑅))) = (0g𝑅))
209204, 208oveq12d 7374 . . 3 (𝜑 → (((𝑅 Σg (𝑘 ∈ {0, 1} ↦ ((𝐹𝑘) · (𝑘 𝑋)))) + (𝑅 Σg (𝑘 ∈ {2, 3} ↦ ((𝐹𝑘) · (𝑘 𝑋))))) + (𝑅 Σg (𝑘 ∈ (ℤ‘4) ↦ (0g𝑅)))) = ((((𝐴 · (3 𝑋)) + (𝐵 · (2 𝑋))) + ((𝐶 · 𝑋) + 𝐷)) + (0g𝑅)))
2107, 19, 199, 201, 200grpcld 18914 . . . 4 (𝜑 → (((𝐴 · (3 𝑋)) + (𝐵 · (2 𝑋))) + ((𝐶 · 𝑋) + 𝐷)) ∈ 𝐾)
2117, 19, 18, 199, 210grpridd 18937 . . 3 (𝜑 → ((((𝐴 · (3 𝑋)) + (𝐵 · (2 𝑋))) + ((𝐶 · 𝑋) + 𝐷)) + (0g𝑅)) = (((𝐴 · (3 𝑋)) + (𝐵 · (2 𝑋))) + ((𝐶 · 𝑋) + 𝐷)))
212121, 209, 2113eqtrd 2778 . 2 (𝜑 → ((𝑅 Σg (𝑘 ∈ (0..^4) ↦ ((𝐹𝑘) · (𝑘 𝑋)))) + (𝑅 Σg (𝑘 ∈ (ℤ‘4) ↦ ((𝐹𝑘) · (𝑘 𝑋))))) = (((𝐴 · (3 𝑋)) + (𝐵 · (2 𝑋))) + ((𝐶 · 𝑋) + 𝐷)))
21317, 73, 2123eqtrd 2778 1 (𝜑 → ((𝑂𝑀)‘𝑋) = (((𝐴 · (3 𝑋)) + (𝐵 · (2 𝑋))) + ((𝐶 · 𝑋) + 𝐷)))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wa 396   = wceq 1547  wcel 2119  wne 2934  wral 3053  Vcvv 3431  cun 3881  cin 3882  wss 3883  c0 4261  {cpr 4557   class class class wbr 5072  cmpt 5153  cfv 6485  (class class class)co 7356  Fincfn 8883  0cc0 11029  1c1 11030   + caddc 11032   < clt 11170  2c2 12227  3c3 12228  4c4 12229  0cn0 12428  cz 12515  cuz 12779  ..^cfzo 13599  Basecbs 17170  +gcplusg 17211  .rcmulr 17212  0gc0g 17393   Σg cgsu 17394  Mndcmnd 18693  .gcmg 19034  CMndccmn 19746  mulGrpcmgp 20112  1rcur 20153  Ringcrg 20205  CRingccrg 20206  Poly1cpl1 22162  coe1cco1 22163  eval1ce1 22300  deg1cdg1 26037
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1802  ax-4 1816  ax-5 1917  ax-6 1974  ax-7 2015  ax-8 2121  ax-9 2129  ax-10 2152  ax-11 2168  ax-12 2189  ax-ext 2711  ax-rep 5199  ax-sep 5218  ax-nul 5228  ax-pow 5294  ax-pr 5362  ax-un 7678  ax-cnex 11085  ax-resscn 11086  ax-1cn 11087  ax-icn 11088  ax-addcl 11089  ax-addrcl 11090  ax-mulcl 11091  ax-mulrcl 11092  ax-mulcom 11093  ax-addass 11094  ax-mulass 11095  ax-distr 11096  ax-i2m1 11097  ax-1ne0 11098  ax-1rid 11099  ax-rnegex 11100  ax-rrecex 11101  ax-cnre 11102  ax-pre-lttri 11103  ax-pre-lttrn 11104  ax-pre-ltadd 11105  ax-pre-mulgt0 11106  ax-pre-sup 11107  ax-addf 11108
This theorem depends on definitions:  df-bi 208  df-an 397  df-or 854  df-3or 1093  df-3an 1094  df-tru 1550  df-fal 1560  df-ex 1787  df-nf 1791  df-sb 2074  df-mo 2543  df-eu 2573  df-clab 2718  df-cleq 2731  df-clel 2814  df-nfc 2888  df-ne 2935  df-nel 3039  df-ral 3054  df-rex 3064  df-rmo 3344  df-reu 3345  df-rab 3392  df-v 3433  df-sbc 3724  df-csb 3832  df-dif 3886  df-un 3888  df-in 3890  df-ss 3900  df-pss 3903  df-nul 4262  df-if 4455  df-pw 4531  df-sn 4556  df-pr 4558  df-tp 4560  df-op 4562  df-uni 4839  df-int 4878  df-iun 4923  df-iin 4924  df-br 5073  df-opab 5135  df-mpt 5154  df-tr 5180  df-id 5513  df-eprel 5518  df-po 5526  df-so 5527  df-fr 5571  df-se 5572  df-we 5573  df-xp 5624  df-rel 5625  df-cnv 5626  df-co 5627  df-dm 5628  df-rn 5629  df-res 5630  df-ima 5631  df-pred 6252  df-ord 6313  df-on 6314  df-lim 6315  df-suc 6316  df-iota 6441  df-fun 6487  df-fn 6488  df-f 6489  df-f1 6490  df-fo 6491  df-f1o 6492  df-fv 6493  df-isom 6494  df-riota 7313  df-ov 7359  df-oprab 7360  df-mpo 7361  df-of 7620  df-ofr 7621  df-om 7807  df-1st 7931  df-2nd 7932  df-supp 8101  df-frecs 8221  df-wrecs 8252  df-recs 8301  df-rdg 8339  df-1o 8395  df-2o 8396  df-er 8633  df-map 8765  df-pm 8766  df-ixp 8836  df-en 8884  df-dom 8885  df-sdom 8886  df-fin 8887  df-fsupp 9265  df-sup 9345  df-oi 9415  df-card 9854  df-pnf 11172  df-mnf 11173  df-xr 11174  df-ltxr 11175  df-le 11176  df-sub 11370  df-neg 11371  df-nn 12166  df-2 12235  df-3 12236  df-4 12237  df-5 12238  df-6 12239  df-7 12240  df-8 12241  df-9 12242  df-n0 12429  df-z 12516  df-dec 12636  df-uz 12780  df-fz 13453  df-fzo 13600  df-seq 13955  df-hash 14284  df-struct 17108  df-sets 17125  df-slot 17143  df-ndx 17155  df-base 17171  df-ress 17192  df-plusg 17224  df-mulr 17225  df-starv 17226  df-sca 17227  df-vsca 17228  df-ip 17229  df-tset 17230  df-ple 17231  df-ds 17233  df-unif 17234  df-hom 17235  df-cco 17236  df-0g 17395  df-gsum 17396  df-prds 17401  df-pws 17403  df-mre 17539  df-mrc 17540  df-acs 17542  df-mgm 18599  df-sgrp 18678  df-mnd 18694  df-mhm 18742  df-submnd 18743  df-grp 18903  df-minusg 18904  df-sbg 18905  df-mulg 19035  df-subg 19090  df-ghm 19179  df-cntz 19283  df-cmn 19748  df-abl 19749  df-mgp 20113  df-rng 20125  df-ur 20154  df-srg 20159  df-ring 20207  df-cring 20208  df-rhm 20443  df-subrng 20518  df-subrg 20542  df-lmod 20852  df-lss 20922  df-lsp 20962  df-cnfld 21348  df-assa 21828  df-asp 21829  df-ascl 21830  df-psr 21884  df-mvr 21885  df-mpl 21886  df-opsr 21888  df-evls 22050  df-evl 22051  df-psr1 22165  df-vr1 22166  df-ply1 22167  df-coe1 22168  df-evls1 22301  df-evl1 22302  df-mdeg 26038  df-deg1 26039
This theorem is referenced by:  2sqr3minply  33964
  Copyright terms: Public domain W3C validator