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

Theorem cos9thpiminply 34187
Description: The polynomial ((𝑋↑3) + ((-3 · 𝑋) + 1)) is the minimal polynomial for 𝐴 over , and its degree is 3. (Contributed by Thierry Arnoux, 14-Nov-2025.)
Hypotheses
Ref Expression
cos9thpiminplylem3.1 𝑂 = (exp‘((i · (2 · π)) / 3))
cos9thpiminplylem4.2 𝑍 = (𝑂𝑐(1 / 3))
cos9thpiminplylem5.3 𝐴 = (𝑍 + (1 / 𝑍))
cos9thpiminply.q 𝑄 = (ℂflds ℚ)
cos9thpiminply.4 + = (+g𝑃)
cos9thpiminply.5 · = (.r𝑃)
cos9thpiminply.6 = (.g‘(mulGrp‘𝑃))
cos9thpiminply.p 𝑃 = (Poly1𝑄)
cos9thpiminply.k 𝐾 = (algSc‘𝑃)
cos9thpiminply.x 𝑋 = (var1𝑄)
cos9thpiminply.d 𝐷 = (deg1𝑄)
cos9thpiminply.f 𝐹 = ((3 𝑋) + (((𝐾‘-3) · 𝑋) + (𝐾‘1)))
cos9thpiminply.m 𝑀 = (ℂfld minPoly ℚ)
Assertion
Ref Expression
cos9thpiminply (𝐹 = (𝑀𝐴) ∧ (𝐷𝐹) = 3)

Proof of Theorem cos9thpiminply
Dummy variables 𝑖 𝑥 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 eqid 2763 . . . 4 (ℂfld evalSub1 ℚ) = (ℂfld evalSub1 ℚ)
2 cos9thpiminply.p . . . . 5 𝑃 = (Poly1𝑄)
3 cos9thpiminply.q . . . . . 6 𝑄 = (ℂflds ℚ)
43fveq2i 6884 . . . . 5 (Poly1𝑄) = (Poly1‘(ℂflds ℚ))
52, 4eqtri 2786 . . . 4 𝑃 = (Poly1‘(ℂflds ℚ))
6 cnfldbas 21535 . . . 4 ℂ = (Base‘ℂfld)
7 cnfldfld 33671 . . . . 5 fld ∈ Field
87a1i 11 . . . 4 (⊤ → ℂfld ∈ Field)
9 cndrng 21560 . . . . . 6 fld ∈ DivRing
10 qsubdrg 21578 . . . . . . 7 (ℚ ∈ (SubRing‘ℂfld) ∧ (ℂflds ℚ) ∈ DivRing)
1110simpli 488 . . . . . 6 ℚ ∈ (SubRing‘ℂfld)
1210simpri 490 . . . . . 6 (ℂflds ℚ) ∈ DivRing
13 issdrg 20900 . . . . . 6 (ℚ ∈ (SubDRing‘ℂfld) ↔ (ℂfld ∈ DivRing ∧ ℚ ∈ (SubRing‘ℂfld) ∧ (ℂflds ℚ) ∈ DivRing))
149, 11, 12, 13mpbir3an 1360 . . . . 5 ℚ ∈ (SubDRing‘ℂfld)
1514a1i 11 . . . 4 (⊤ → ℚ ∈ (SubDRing‘ℂfld))
16 cos9thpiminplylem5.3 . . . . 5 𝐴 = (𝑍 + (1 / 𝑍))
17 cos9thpiminplylem4.2 . . . . . . 7 𝑍 = (𝑂𝑐(1 / 3))
18 cos9thpiminplylem3.1 . . . . . . . . 9 𝑂 = (exp‘((i · (2 · π)) / 3))
19 ax-icn 11163 . . . . . . . . . . . . 13 i ∈ ℂ
2019a1i 11 . . . . . . . . . . . 12 (⊤ → i ∈ ℂ)
21 2cnd 12323 . . . . . . . . . . . . 13 (⊤ → 2 ∈ ℂ)
22 picn 26630 . . . . . . . . . . . . . 14 π ∈ ℂ
2322a1i 11 . . . . . . . . . . . . 13 (⊤ → π ∈ ℂ)
2421, 23mulcld 11233 . . . . . . . . . . . 12 (⊤ → (2 · π) ∈ ℂ)
2520, 24mulcld 11233 . . . . . . . . . . 11 (⊤ → (i · (2 · π)) ∈ ℂ)
26 3cn 12326 . . . . . . . . . . . 12 3 ∈ ℂ
2726a1i 11 . . . . . . . . . . 11 (⊤ → 3 ∈ ℂ)
28 3ne0 12354 . . . . . . . . . . . 12 3 ≠ 0
2928a1i 11 . . . . . . . . . . 11 (⊤ → 3 ≠ 0)
3025, 27, 29divcld 11995 . . . . . . . . . 10 (⊤ → ((i · (2 · π)) / 3) ∈ ℂ)
3130efcld 16141 . . . . . . . . 9 (⊤ → (exp‘((i · (2 · π)) / 3)) ∈ ℂ)
3218, 31eqeltrid 2867 . . . . . . . 8 (⊤ → 𝑂 ∈ ℂ)
3327, 29reccld 11988 . . . . . . . 8 (⊤ → (1 / 3) ∈ ℂ)
3432, 33cxpcld 26882 . . . . . . 7 (⊤ → (𝑂𝑐(1 / 3)) ∈ ℂ)
3517, 34eqeltrid 2867 . . . . . 6 (⊤ → 𝑍 ∈ ℂ)
3617a1i 11 . . . . . . . 8 (⊤ → 𝑍 = (𝑂𝑐(1 / 3)))
3718a1i 11 . . . . . . . . . 10 (⊤ → 𝑂 = (exp‘((i · (2 · π)) / 3)))
3830efne0d 16155 . . . . . . . . . 10 (⊤ → (exp‘((i · (2 · π)) / 3)) ≠ 0)
3937, 38eqnetrd 3025 . . . . . . . . 9 (⊤ → 𝑂 ≠ 0)
4032, 39, 33cxpne0d 26887 . . . . . . . 8 (⊤ → (𝑂𝑐(1 / 3)) ≠ 0)
4136, 40eqnetrd 3025 . . . . . . 7 (⊤ → 𝑍 ≠ 0)
4235, 41reccld 11988 . . . . . 6 (⊤ → (1 / 𝑍) ∈ ℂ)
4335, 42addcld 11232 . . . . 5 (⊤ → (𝑍 + (1 / 𝑍)) ∈ ℂ)
4416, 43eqeltrid 2867 . . . 4 (⊤ → 𝐴 ∈ ℂ)
45 cnfld0 21555 . . . 4 0 = (0g‘ℂfld)
46 cos9thpiminply.m . . . 4 𝑀 = (ℂfld minPoly ℚ)
47 eqid 2763 . . . 4 (0g𝑃) = (0g𝑃)
48 cos9thpiminply.4 . . . . . 6 + = (+g𝑃)
49 cos9thpiminply.5 . . . . . 6 · = (.r𝑃)
50 cos9thpiminply.6 . . . . . 6 = (.g‘(mulGrp‘𝑃))
51 cos9thpiminply.k . . . . . 6 𝐾 = (algSc‘𝑃)
52 cos9thpiminply.x . . . . . 6 𝑋 = (var1𝑄)
53 cos9thpiminply.d . . . . . 6 𝐷 = (deg1𝑄)
54 cos9thpiminply.f . . . . . 6 𝐹 = ((3 𝑋) + (((𝐾‘-3) · 𝑋) + (𝐾‘1)))
5518, 17, 16, 3, 48, 49, 50, 2, 51, 52, 53, 54, 44cos9thpiminplylem6 34186 . . . . 5 (⊤ → (((ℂfld evalSub1 ℚ)‘𝐹)‘𝐴) = ((𝐴↑3) + ((-3 · 𝐴) + 1)))
5618, 17, 16cos9thpiminplylem5 34185 . . . . 5 ((𝐴↑3) + ((-3 · 𝐴) + 1)) = 0
5755, 56eqtrdi 2814 . . . 4 (⊤ → (((ℂfld evalSub1 ℚ)‘𝐹)‘𝐴) = 0)
583qrng0 27794 . . . . 5 0 = (0g𝑄)
59 eqid 2763 . . . . 5 (eval1𝑄) = (eval1𝑄)
60 eqid 2763 . . . . 5 (Base‘𝑃) = (Base‘𝑃)
613qfld 33627 . . . . . 6 𝑄 ∈ Field
6261a1i 11 . . . . 5 (⊤ → 𝑄 ∈ Field)
633qdrng 27793 . . . . . . . . . . 11 𝑄 ∈ DivRing
6463a1i 11 . . . . . . . . . 10 (⊤ → 𝑄 ∈ DivRing)
6564drngringd 20844 . . . . . . . . 9 (⊤ → 𝑄 ∈ Ring)
662ply1ring 22416 . . . . . . . . 9 (𝑄 ∈ Ring → 𝑃 ∈ Ring)
6765, 66syl 18 . . . . . . . 8 (⊤ → 𝑃 ∈ Ring)
6867ringgrpd 20328 . . . . . . 7 (⊤ → 𝑃 ∈ Grp)
69 eqid 2763 . . . . . . . . 9 (mulGrp‘𝑃) = (mulGrp‘𝑃)
7069, 60mgpbas 20225 . . . . . . . 8 (Base‘𝑃) = (Base‘(mulGrp‘𝑃))
7169ringmgp 20325 . . . . . . . . 9 (𝑃 ∈ Ring → (mulGrp‘𝑃) ∈ Mnd)
7267, 71syl 18 . . . . . . . 8 (⊤ → (mulGrp‘𝑃) ∈ Mnd)
73 3nn0 12526 . . . . . . . . 9 3 ∈ ℕ0
7473a1i 11 . . . . . . . 8 (⊤ → 3 ∈ ℕ0)
7552, 2, 60vr1cl 22386 . . . . . . . . 9 (𝑄 ∈ Ring → 𝑋 ∈ (Base‘𝑃))
7665, 75syl 18 . . . . . . . 8 (⊤ → 𝑋 ∈ (Base‘𝑃))
7770, 50, 72, 74, 76mulgnn0cld 19165 . . . . . . 7 (⊤ → (3 𝑋) ∈ (Base‘𝑃))
782ply1sca 22421 . . . . . . . . . . . 12 (𝑄 ∈ DivRing → 𝑄 = (Scalar‘𝑃))
7963, 78ax-mp 5 . . . . . . . . . . 11 𝑄 = (Scalar‘𝑃)
802ply1lmod 22420 . . . . . . . . . . . 12 (𝑄 ∈ Ring → 𝑃 ∈ LMod)
8165, 80syl 18 . . . . . . . . . . 11 (⊤ → 𝑃 ∈ LMod)
823qrngbas 27792 . . . . . . . . . . 11 ℚ = (Base‘𝑄)
8351, 79, 67, 81, 82, 60asclf 22040 . . . . . . . . . 10 (⊤ → 𝐾:ℚ⟶(Base‘𝑃))
8474nn0zd 12620 . . . . . . . . . . 11 (⊤ → 3 ∈ ℤ)
85 zq 12982 . . . . . . . . . . 11 (3 ∈ ℤ → 3 ∈ ℚ)
86 qnegcl 12994 . . . . . . . . . . 11 (3 ∈ ℚ → -3 ∈ ℚ)
8784, 85, 863syl 19 . . . . . . . . . 10 (⊤ → -3 ∈ ℚ)
8883, 87ffvelcdmd 7080 . . . . . . . . 9 (⊤ → (𝐾‘-3) ∈ (Base‘𝑃))
8960, 49, 67, 88, 76ringcld 20343 . . . . . . . 8 (⊤ → ((𝐾‘-3) · 𝑋) ∈ (Base‘𝑃))
90 1zzd 12629 . . . . . . . . . 10 (⊤ → 1 ∈ ℤ)
91 zq 12982 . . . . . . . . . 10 (1 ∈ ℤ → 1 ∈ ℚ)
9290, 91syl 18 . . . . . . . . 9 (⊤ → 1 ∈ ℚ)
9383, 92ffvelcdmd 7080 . . . . . . . 8 (⊤ → (𝐾‘1) ∈ (Base‘𝑃))
9460, 48, 68, 89, 93grpcld 19018 . . . . . . 7 (⊤ → (((𝐾‘-3) · 𝑋) + (𝐾‘1)) ∈ (Base‘𝑃))
9560, 48, 68, 77, 94grpcld 19018 . . . . . 6 (⊤ → ((3 𝑋) + (((𝐾‘-3) · 𝑋) + (𝐾‘1))) ∈ (Base‘𝑃))
9654, 95eqeltrid 2867 . . . . 5 (⊤ → 𝐹 ∈ (Base‘𝑃))
9762fldcrngd 20851 . . . . . . . . 9 (⊤ → 𝑄 ∈ CRing)
9859, 2, 60, 97, 82, 96evl1fvf 33862 . . . . . . . 8 (⊤ → ((eval1𝑄)‘𝐹):ℚ⟶ℚ)
9998ffnd 6706 . . . . . . 7 (⊤ → ((eval1𝑄)‘𝐹) Fn ℚ)
100 fniniseg2 7057 . . . . . . 7 (((eval1𝑄)‘𝐹) Fn ℚ → (((eval1𝑄)‘𝐹) “ {0}) = {𝑥 ∈ ℚ ∣ (((eval1𝑄)‘𝐹)‘𝑥) = 0})
10199, 100syl 18 . . . . . 6 (⊤ → (((eval1𝑄)‘𝐹) “ {0}) = {𝑥 ∈ ℚ ∣ (((eval1𝑄)‘𝐹)‘𝑥) = 0})
10259, 82evl1fval1 22500 . . . . . . . . . . . . . . 15 (eval1𝑄) = (𝑄 evalSub1 ℚ)
103102a1i 11 . . . . . . . . . . . . . 14 (𝑥 ∈ ℚ → (eval1𝑄) = (𝑄 evalSub1 ℚ))
104103fveq1d 6883 . . . . . . . . . . . . 13 (𝑥 ∈ ℚ → ((eval1𝑄)‘𝐹) = ((𝑄 evalSub1 ℚ)‘𝐹))
105104fveq1d 6883 . . . . . . . . . . . 12 (𝑥 ∈ ℚ → (((eval1𝑄)‘𝐹)‘𝑥) = (((𝑄 evalSub1 ℚ)‘𝐹)‘𝑥))
106 eqid 2763 . . . . . . . . . . . . . . 15 (𝑄 evalSub1 ℚ) = (𝑄 evalSub1 ℚ)
107 cncrng 21552 . . . . . . . . . . . . . . . 16 fld ∈ CRing
108107a1i 11 . . . . . . . . . . . . . . 15 (𝑥 ∈ ℚ → ℂfld ∈ CRing)
10911a1i 11 . . . . . . . . . . . . . . 15 (𝑥 ∈ ℚ → ℚ ∈ (SubRing‘ℂfld))
11097mptru 1577 . . . . . . . . . . . . . . . . . 18 𝑄 ∈ CRing
111110a1i 11 . . . . . . . . . . . . . . . . 17 (𝑥 ∈ ℚ → 𝑄 ∈ CRing)
112111crngringd 20332 . . . . . . . . . . . . . . . 16 (𝑥 ∈ ℚ → 𝑄 ∈ Ring)
11382subrgid 20681 . . . . . . . . . . . . . . . 16 (𝑄 ∈ Ring → ℚ ∈ (SubRing‘𝑄))
114112, 113syl 18 . . . . . . . . . . . . . . 15 (𝑥 ∈ ℚ → ℚ ∈ (SubRing‘𝑄))
11596mptru 1577 . . . . . . . . . . . . . . . 16 𝐹 ∈ (Base‘𝑃)
116115a1i 11 . . . . . . . . . . . . . . 15 (𝑥 ∈ ℚ → 𝐹 ∈ (Base‘𝑃))
1173, 1, 106, 2, 3, 60, 108, 109, 114, 116ressply1evls1 33864 . . . . . . . . . . . . . 14 (𝑥 ∈ ℚ → ((𝑄 evalSub1 ℚ)‘𝐹) = (((ℂfld evalSub1 ℚ)‘𝐹) ↾ ℚ))
118117fveq1d 6883 . . . . . . . . . . . . 13 (𝑥 ∈ ℚ → (((𝑄 evalSub1 ℚ)‘𝐹)‘𝑥) = ((((ℂfld evalSub1 ℚ)‘𝐹) ↾ ℚ)‘𝑥))
119 fvres 6900 . . . . . . . . . . . . 13 (𝑥 ∈ ℚ → ((((ℂfld evalSub1 ℚ)‘𝐹) ↾ ℚ)‘𝑥) = (((ℂfld evalSub1 ℚ)‘𝐹)‘𝑥))
120118, 119eqtr2d 2799 . . . . . . . . . . . 12 (𝑥 ∈ ℚ → (((ℂfld evalSub1 ℚ)‘𝐹)‘𝑥) = (((𝑄 evalSub1 ℚ)‘𝐹)‘𝑥))
121 qcn 12991 . . . . . . . . . . . . 13 (𝑥 ∈ ℚ → 𝑥 ∈ ℂ)
12218, 17, 16, 3, 48, 49, 50, 2, 51, 52, 53, 54, 121cos9thpiminplylem6 34186 . . . . . . . . . . . 12 (𝑥 ∈ ℚ → (((ℂfld evalSub1 ℚ)‘𝐹)‘𝑥) = ((𝑥↑3) + ((-3 · 𝑥) + 1)))
123105, 120, 1223eqtr2d 2804 . . . . . . . . . . 11 (𝑥 ∈ ℚ → (((eval1𝑄)‘𝐹)‘𝑥) = ((𝑥↑3) + ((-3 · 𝑥) + 1)))
124 id 23 . . . . . . . . . . . 12 (𝑥 ∈ ℚ → 𝑥 ∈ ℚ)
125124cos9thpiminplylem2 34182 . . . . . . . . . . 11 (𝑥 ∈ ℚ → ((𝑥↑3) + ((-3 · 𝑥) + 1)) ≠ 0)
126123, 125eqnetrd 3025 . . . . . . . . . 10 (𝑥 ∈ ℚ → (((eval1𝑄)‘𝐹)‘𝑥) ≠ 0)
127126neneqd 2963 . . . . . . . . 9 (𝑥 ∈ ℚ → ¬ (((eval1𝑄)‘𝐹)‘𝑥) = 0)
128127rgen 3081 . . . . . . . 8 𝑥 ∈ ℚ ¬ (((eval1𝑄)‘𝐹)‘𝑥) = 0
129128a1i 11 . . . . . . 7 (⊤ → ∀𝑥 ∈ ℚ ¬ (((eval1𝑄)‘𝐹)‘𝑥) = 0)
130 rabeq0 4345 . . . . . . 7 ({𝑥 ∈ ℚ ∣ (((eval1𝑄)‘𝐹)‘𝑥) = 0} = ∅ ↔ ∀𝑥 ∈ ℚ ¬ (((eval1𝑄)‘𝐹)‘𝑥) = 0)
131129, 130sylibr 237 . . . . . 6 (⊤ → {𝑥 ∈ ℚ ∣ (((eval1𝑄)‘𝐹)‘𝑥) = 0} = ∅)
132101, 131eqtrd 2798 . . . . 5 (⊤ → (((eval1𝑄)‘𝐹) “ {0}) = ∅)
13354a1i 11 . . . . . . 7 (⊤ → 𝐹 = ((3 𝑋) + (((𝐾‘-3) · 𝑋) + (𝐾‘1))))
134133fveq2d 6885 . . . . . 6 (⊤ → (𝐷𝐹) = (𝐷‘((3 𝑋) + (((𝐾‘-3) · 𝑋) + (𝐾‘1)))))
135 1lt3 12420 . . . . . . . . 9 1 < 3
136135a1i 11 . . . . . . . 8 (⊤ → 1 < 3)
137 0lt1 11740 . . . . . . . . . . . 12 0 < 1
138137a1i 11 . . . . . . . . . . 11 (⊤ → 0 < 1)
139138gt0ne0d 11782 . . . . . . . . . . . 12 (⊤ → 1 ≠ 0)
14053, 2, 82, 51, 58deg1scl 26279 . . . . . . . . . . . 12 ((𝑄 ∈ Ring ∧ 1 ∈ ℚ ∧ 1 ≠ 0) → (𝐷‘(𝐾‘1)) = 0)
14165, 92, 139, 140syl3anc 1398 . . . . . . . . . . 11 (⊤ → (𝐷‘(𝐾‘1)) = 0)
142 drngdomn 20858 . . . . . . . . . . . . . 14 (𝑄 ∈ DivRing → 𝑄 ∈ Domn)
14363, 142mp1i 14 . . . . . . . . . . . . 13 (⊤ → 𝑄 ∈ Domn)
14427, 29negne0d 11571 . . . . . . . . . . . . . 14 (⊤ → -3 ≠ 0)
1452, 51, 58, 47, 82ply1scln0 22461 . . . . . . . . . . . . . 14 ((𝑄 ∈ Ring ∧ -3 ∈ ℚ ∧ -3 ≠ 0) → (𝐾‘-3) ≠ (0g𝑃))
14665, 87, 144, 145syl3anc 1398 . . . . . . . . . . . . 13 (⊤ → (𝐾‘-3) ≠ (0g𝑃))
147107a1i 11 . . . . . . . . . . . . . 14 (⊤ → ℂfld ∈ CRing)
148 drngnzr 20857 . . . . . . . . . . . . . . 15 (ℂfld ∈ DivRing → ℂfld ∈ NzRing)
1499, 148mp1i 14 . . . . . . . . . . . . . 14 (⊤ → ℂfld ∈ NzRing)
15011a1i 11 . . . . . . . . . . . . . 14 (⊤ → ℚ ∈ (SubRing‘ℂfld))
15152, 47, 3, 2, 147, 149, 150vr1nz 33892 . . . . . . . . . . . . 13 (⊤ → 𝑋 ≠ (0g𝑃))
15253, 2, 60, 49, 47, 143, 88, 146, 76, 151deg1mul 26281 . . . . . . . . . . . 12 (⊤ → (𝐷‘((𝐾‘-3) · 𝑋)) = ((𝐷‘(𝐾‘-3)) + (𝐷𝑋)))
15353, 2, 82, 51, 58deg1scl 26279 . . . . . . . . . . . . . 14 ((𝑄 ∈ Ring ∧ -3 ∈ ℚ ∧ -3 ≠ 0) → (𝐷‘(𝐾‘-3)) = 0)
15465, 87, 144, 153syl3anc 1398 . . . . . . . . . . . . 13 (⊤ → (𝐷‘(𝐾‘-3)) = 0)
155 drngnzr 20857 . . . . . . . . . . . . . . 15 (𝑄 ∈ DivRing → 𝑄 ∈ NzRing)
15663, 155mp1i 14 . . . . . . . . . . . . . 14 (⊤ → 𝑄 ∈ NzRing)
15753, 2, 52, 156deg1vr 33891 . . . . . . . . . . . . 13 (⊤ → (𝐷𝑋) = 1)
158154, 157oveq12d 7428 . . . . . . . . . . . 12 (⊤ → ((𝐷‘(𝐾‘-3)) + (𝐷𝑋)) = (0 + 1))
159 1cnd 11206 . . . . . . . . . . . . 13 (⊤ → 1 ∈ ℂ)
160159addlidd 11415 . . . . . . . . . . . 12 (⊤ → (0 + 1) = 1)
161152, 158, 1603eqtrd 2802 . . . . . . . . . . 11 (⊤ → (𝐷‘((𝐾‘-3) · 𝑋)) = 1)
162138, 141, 1613brtr4d 5143 . . . . . . . . . 10 (⊤ → (𝐷‘(𝐾‘1)) < (𝐷‘((𝐾‘-3) · 𝑋)))
1632, 53, 65, 60, 48, 89, 93, 162deg1add 26269 . . . . . . . . 9 (⊤ → (𝐷‘(((𝐾‘-3) · 𝑋) + (𝐾‘1))) = (𝐷‘((𝐾‘-3) · 𝑋)))
164163, 161eqtrd 2798 . . . . . . . 8 (⊤ → (𝐷‘(((𝐾‘-3) · 𝑋) + (𝐾‘1))) = 1)
16553, 2, 52, 69, 50deg1pw 26287 . . . . . . . . 9 ((𝑄 ∈ NzRing ∧ 3 ∈ ℕ0) → (𝐷‘(3 𝑋)) = 3)
166156, 74, 165syl2anc 595 . . . . . . . 8 (⊤ → (𝐷‘(3 𝑋)) = 3)
167136, 164, 1663brtr4d 5143 . . . . . . 7 (⊤ → (𝐷‘(((𝐾‘-3) · 𝑋) + (𝐾‘1))) < (𝐷‘(3 𝑋)))
1682, 53, 65, 60, 48, 77, 94, 167deg1add 26269 . . . . . 6 (⊤ → (𝐷‘((3 𝑋) + (((𝐾‘-3) · 𝑋) + (𝐾‘1)))) = (𝐷‘(3 𝑋)))
169134, 168, 1663eqtrd 2802 . . . . 5 (⊤ → (𝐷𝐹) = 3)
17058, 59, 53, 2, 60, 62, 96, 132, 169ply1dg3rt0irred 33883 . . . 4 (⊤ → 𝐹 ∈ (Irred‘𝑃))
171 eqid 2763 . . . . . . 7 (Irred‘𝑃) = (Irred‘𝑃)
172171, 47irredn0 20510 . . . . . 6 ((𝑃 ∈ Ring ∧ 𝐹 ∈ (Irred‘𝑃)) → 𝐹 ≠ (0g𝑃))
17367, 170, 172syl2anc 595 . . . . 5 (⊤ → 𝐹 ≠ (0g𝑃))
174169fveq2d 6885 . . . . . 6 (⊤ → ((coe1𝐹)‘(𝐷𝐹)) = ((coe1𝐹)‘3))
175133fveq2d 6885 . . . . . . . 8 (⊤ → (coe1𝐹) = (coe1‘((3 𝑋) + (((𝐾‘-3) · 𝑋) + (𝐾‘1)))))
176175fveq1d 6883 . . . . . . 7 (⊤ → ((coe1𝐹)‘3) = ((coe1‘((3 𝑋) + (((𝐾‘-3) · 𝑋) + (𝐾‘1))))‘3))
177 cnfldadd 21537 . . . . . . . . . . 11 + = (+g‘ℂfld)
1783, 177ressplusg 17348 . . . . . . . . . 10 (ℚ ∈ (SubRing‘ℂfld) → + = (+g𝑄))
17911, 178ax-mp 5 . . . . . . . . 9 + = (+g𝑄)
1802, 60, 48, 179coe1addfv 22435 . . . . . . . 8 (((𝑄 ∈ Ring ∧ (3 𝑋) ∈ (Base‘𝑃) ∧ (((𝐾‘-3) · 𝑋) + (𝐾‘1)) ∈ (Base‘𝑃)) ∧ 3 ∈ ℕ0) → ((coe1‘((3 𝑋) + (((𝐾‘-3) · 𝑋) + (𝐾‘1))))‘3) = (((coe1‘(3 𝑋))‘3) + ((coe1‘(((𝐾‘-3) · 𝑋) + (𝐾‘1)))‘3)))
18165, 77, 94, 74, 180syl31anc 1400 . . . . . . 7 (⊤ → ((coe1‘((3 𝑋) + (((𝐾‘-3) · 𝑋) + (𝐾‘1))))‘3) = (((coe1‘(3 𝑋))‘3) + ((coe1‘(((𝐾‘-3) · 𝑋) + (𝐾‘1)))‘3)))
182 iftrue 4493 . . . . . . . . . 10 (𝑖 = 3 → if(𝑖 = 3, 1, 0) = 1)
1833qrng1 27795 . . . . . . . . . . 11 1 = (1r𝑄)
1842, 52, 50, 65, 74, 58, 183coe1mon 33886 . . . . . . . . . 10 (⊤ → (coe1‘(3 𝑋)) = (𝑖 ∈ ℕ0 ↦ if(𝑖 = 3, 1, 0)))
185182, 184, 74, 159fvmptd4 7014 . . . . . . . . 9 (⊤ → ((coe1‘(3 𝑋))‘3) = 1)
1862, 60, 48, 179coe1addfv 22435 . . . . . . . . . . 11 (((𝑄 ∈ Ring ∧ ((𝐾‘-3) · 𝑋) ∈ (Base‘𝑃) ∧ (𝐾‘1) ∈ (Base‘𝑃)) ∧ 3 ∈ ℕ0) → ((coe1‘(((𝐾‘-3) · 𝑋) + (𝐾‘1)))‘3) = (((coe1‘((𝐾‘-3) · 𝑋))‘3) + ((coe1‘(𝐾‘1))‘3)))
18765, 89, 93, 74, 186syl31anc 1400 . . . . . . . . . 10 (⊤ → ((coe1‘(((𝐾‘-3) · 𝑋) + (𝐾‘1)))‘3) = (((coe1‘((𝐾‘-3) · 𝑋))‘3) + ((coe1‘(𝐾‘1))‘3)))
1882ply1assa 22368 . . . . . . . . . . . . . . . . 17 (𝑄 ∈ CRing → 𝑃 ∈ AssAlg)
18997, 188syl 18 . . . . . . . . . . . . . . . 16 (⊤ → 𝑃 ∈ AssAlg)
190 eqid 2763 . . . . . . . . . . . . . . . . 17 ( ·𝑠𝑃) = ( ·𝑠𝑃)
19151, 79, 82, 60, 49, 190asclmul1 22045 . . . . . . . . . . . . . . . 16 ((𝑃 ∈ AssAlg ∧ -3 ∈ ℚ ∧ 𝑋 ∈ (Base‘𝑃)) → ((𝐾‘-3) · 𝑋) = (-3( ·𝑠𝑃)𝑋))
192189, 87, 76, 191syl3anc 1398 . . . . . . . . . . . . . . 15 (⊤ → ((𝐾‘-3) · 𝑋) = (-3( ·𝑠𝑃)𝑋))
19370, 50mulg1 19151 . . . . . . . . . . . . . . . . 17 (𝑋 ∈ (Base‘𝑃) → (1 𝑋) = 𝑋)
19476, 193syl 18 . . . . . . . . . . . . . . . 16 (⊤ → (1 𝑋) = 𝑋)
195194oveq2d 7426 . . . . . . . . . . . . . . 15 (⊤ → (-3( ·𝑠𝑃)(1 𝑋)) = (-3( ·𝑠𝑃)𝑋))
196192, 195eqtr4d 2801 . . . . . . . . . . . . . 14 (⊤ → ((𝐾‘-3) · 𝑋) = (-3( ·𝑠𝑃)(1 𝑋)))
197196fveq2d 6885 . . . . . . . . . . . . 13 (⊤ → (coe1‘((𝐾‘-3) · 𝑋)) = (coe1‘(-3( ·𝑠𝑃)(1 𝑋))))
198197fveq1d 6883 . . . . . . . . . . . 12 (⊤ → ((coe1‘((𝐾‘-3) · 𝑋))‘3) = ((coe1‘(-3( ·𝑠𝑃)(1 𝑋)))‘3))
199 1nn0 12524 . . . . . . . . . . . . . 14 1 ∈ ℕ0
200199a1i 11 . . . . . . . . . . . . 13 (⊤ → 1 ∈ ℕ0)
201 1red 11213 . . . . . . . . . . . . . 14 (⊤ → 1 ∈ ℝ)
202201, 136ltned 11350 . . . . . . . . . . . . 13 (⊤ → 1 ≠ 3)
20358, 82, 2, 52, 190, 69, 50, 65, 87, 200, 74, 202coe1tmfv2 22445 . . . . . . . . . . . 12 (⊤ → ((coe1‘(-3( ·𝑠𝑃)(1 𝑋)))‘3) = 0)
204198, 203eqtrd 2798 . . . . . . . . . . 11 (⊤ → ((coe1‘((𝐾‘-3) · 𝑋))‘3) = 0)
2052, 51, 82, 58coe1scl 22457 . . . . . . . . . . . . 13 ((𝑄 ∈ Ring ∧ 1 ∈ ℚ) → (coe1‘(𝐾‘1)) = (𝑖 ∈ ℕ0 ↦ if(𝑖 = 0, 1, 0)))
20665, 92, 205syl2anc 595 . . . . . . . . . . . 12 (⊤ → (coe1‘(𝐾‘1)) = (𝑖 ∈ ℕ0 ↦ if(𝑖 = 0, 1, 0)))
207 simpr 489 . . . . . . . . . . . . . . 15 ((⊤ ∧ 𝑖 = 3) → 𝑖 = 3)
20828a1i 11 . . . . . . . . . . . . . . 15 ((⊤ ∧ 𝑖 = 3) → 3 ≠ 0)
209207, 208eqnetrd 3025 . . . . . . . . . . . . . 14 ((⊤ ∧ 𝑖 = 3) → 𝑖 ≠ 0)
210209neneqd 2963 . . . . . . . . . . . . 13 ((⊤ ∧ 𝑖 = 3) → ¬ 𝑖 = 0)
211210iffalsed 4498 . . . . . . . . . . . 12 ((⊤ ∧ 𝑖 = 3) → if(𝑖 = 0, 1, 0) = 0)
212 0zd 12607 . . . . . . . . . . . 12 (⊤ → 0 ∈ ℤ)
213206, 211, 74, 212fvmptd 6997 . . . . . . . . . . 11 (⊤ → ((coe1‘(𝐾‘1))‘3) = 0)
214204, 213oveq12d 7428 . . . . . . . . . 10 (⊤ → (((coe1‘((𝐾‘-3) · 𝑋))‘3) + ((coe1‘(𝐾‘1))‘3)) = (0 + 0))
215 00id 11389 . . . . . . . . . . 11 (0 + 0) = 0
216215a1i 11 . . . . . . . . . 10 (⊤ → (0 + 0) = 0)
217187, 214, 2163eqtrd 2802 . . . . . . . . 9 (⊤ → ((coe1‘(((𝐾‘-3) · 𝑋) + (𝐾‘1)))‘3) = 0)
218185, 217oveq12d 7428 . . . . . . . 8 (⊤ → (((coe1‘(3 𝑋))‘3) + ((coe1‘(((𝐾‘-3) · 𝑋) + (𝐾‘1)))‘3)) = (1 + 0))
219159addridd 11414 . . . . . . . 8 (⊤ → (1 + 0) = 1)
220218, 219eqtrd 2798 . . . . . . 7 (⊤ → (((coe1‘(3 𝑋))‘3) + ((coe1‘(((𝐾‘-3) · 𝑋) + (𝐾‘1)))‘3)) = 1)
221176, 181, 2203eqtrd 2802 . . . . . 6 (⊤ → ((coe1𝐹)‘3) = 1)
222174, 221eqtrd 2798 . . . . 5 (⊤ → ((coe1𝐹)‘(𝐷𝐹)) = 1)
2233fveq2i 6884 . . . . . . 7 (Monic1p𝑄) = (Monic1p‘(ℂflds ℚ))
224223eqcomi 2772 . . . . . 6 (Monic1p‘(ℂflds ℚ)) = (Monic1p𝑄)
2252, 60, 47, 53, 224, 183ismon1p 26309 . . . . 5 (𝐹 ∈ (Monic1p‘(ℂflds ℚ)) ↔ (𝐹 ∈ (Base‘𝑃) ∧ 𝐹 ≠ (0g𝑃) ∧ ((coe1𝐹)‘(𝐷𝐹)) = 1))
22696, 173, 222, 225syl3anbrc 1362 . . . 4 (⊤ → 𝐹 ∈ (Monic1p‘(ℂflds ℚ)))
2271, 5, 6, 8, 15, 44, 45, 46, 47, 57, 170, 226irredminply 34115 . . 3 (⊤ → 𝐹 = (𝑀𝐴))
228227, 169jca 520 . 2 (⊤ → (𝐹 = (𝑀𝐴) ∧ (𝐷𝐹) = 3))
229228mptru 1577 1 (𝐹 = (𝑀𝐴) ∧ (𝐷𝐹) = 3)
Colors of variables:    wff setvar class
This proof depends on syntax axioms:  ¬ wn 3  wa 400   = wceq 1570  wtru 1571  wcel 2143  wne 2958  wral 3079  {crab 3416  c0 4286  ifcif 4487  {csn 4589   class class class wbr 5109  cmpt 5192  ccnv 5660  cres 5663  cima 5664   Fn wfn 6531  cfv 6536  (class class class)co 7410  cc 11102  0cc0 11104  1c1 11105  ici 11106   + caddc 11107   · cmul 11109   < clt 11247  -cneg 11446   / cdiv 11875  2c2 12299  3c3 12300  0cn0 12508  cz 12595  cq 12976  cexp 14102  expce 16119  πcpi 16124  Basecbs 17273  s cress 17294  +gcplusg 17314  .rcmulr 17315  Scalarcsca 17317   ·𝑠 cvsca 17318  0gc0g 17496  Mndcmnd 18796  .gcmg 19137  mulGrpcmgp 20220  Ringcrg 20319  CRingccrg 20320  Irredcir 20443  NzRingcnzr 20618  SubRingcsubrg 20677  Domncdomn 20800  DivRingcdr 20836  Fieldcfield 20837  SubDRingcsdrg 20898  LModclmod 20990  fldccnfld 21531  AssAlgcasa 22009  algSccascl 22011  var1cv1 22345  Poly1cpl1 22346  coe1cco1 22347   evalSub1 ces1 22482  eval1ce1 22483  deg1cdg1 26220  Monic1pcmn1 26292  𝑐ccxp 26729   minPoly cminply 34098
This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1825  ax-4 1839  ax-5 1940  ax-6 1997  ax-7 2038  ax-8 2145  ax-9 2153  ax-10 2176  ax-11 2192  ax-12 2213  ax-ext 2735  ax-rep 5238  ax-sep 5257  ax-nul 5269  ax-pow 5336  ax-pr 5404  ax-un 7732  ax-inf2 9606  ax-cnex 11160  ax-resscn 11161  ax-1cn 11162  ax-icn 11163  ax-addcl 11164  ax-addrcl 11165  ax-mulcl 11166  ax-mulrcl 11167  ax-mulcom 11168  ax-addass 11169  ax-mulass 11170  ax-distr 11171  ax-i2m1 11172  ax-1ne0 11173  ax-1rid 11174  ax-rnegex 11175  ax-rrecex 11176  ax-cnre 11177  ax-pre-lttri 11178  ax-pre-lttrn 11179  ax-pre-ltadd 11180  ax-pre-mulgt0 11181  ax-pre-sup 11182  ax-addf 11183  ax-mulf 11184
This proof depends on definitions:  df-bi 210  df-an 401  df-or 861  df-3or 1104  df-3an 1105  df-tru 1573  df-fal 1583  df-ex 1810  df-nf 1814  df-sb 2097  df-mo 2567  df-eu 2597  df-clab 2742  df-cleq 2755  df-clel 2838  df-nfc 2912  df-ne 2959  df-nel 3065  df-ral 3080  df-rex 3090  df-rmo 3369  df-reu 3370  df-rab 3417  df-v 3457  df-sbc 3745  df-csb 3854  df-dif 3908  df-un 3910  df-in 3912  df-ss 3922  df-pss 3925  df-nul 4287  df-if 4488  df-pw 4564  df-sn 4590  df-pr 4592  df-tp 4594  df-op 4596  df-uni 4873  df-int 4913  df-iun 4958  df-iin 4959  df-br 5110  df-opab 5174  df-mpt 5193  df-tr 5219  df-id 5556  df-eprel 5561  df-po 5569  df-so 5570  df-fr 5614  df-se 5615  df-we 5616  df-xp 5667  df-rel 5668  df-cnv 5669  df-co 5670  df-dm 5671  df-rn 5672  df-res 5673  df-ima 5674  df-pred 6302  df-ord 6363  df-on 6364  df-lim 6365  df-suc 6366  df-iota 6492  df-fun 6538  df-fn 6539  df-f 6540  df-f1 6541  df-fo 6542  df-f1o 6543  df-fv 6544  df-isom 6545  df-riota 7367  df-ov 7413  df-oprab 7414  df-mpo 7415  df-of 7674  df-ofr 7675  df-om 7859  df-1st 7982  df-2nd 7983  df-supp 8153  df-tpos 8218  df-frecs 8274  df-wrecs 8305  df-recs 8354  df-rdg 8393  df-1o 8449  df-2o 8450  df-er 8690  df-map 8822  df-pm 8823  df-ixp 8892  df-en 8940  df-dom 8941  df-sdom 8942  df-fin 8943  df-fsupp 9318  df-fi 9367  df-sup 9398  df-inf 9399  df-oi 9468  df-card 9930  df-pnf 11249  df-mnf 11250  df-xr 11251  df-ltxr 11252  df-le 11253  df-sub 11447  df-neg 11448  df-div 11876  df-nn 12238  df-2 12307  df-3 12308  df-4 12309  df-5 12310  df-6 12311  df-7 12312  df-8 12313  df-9 12314  df-n0 12509  df-z 12596  df-dec 12716  df-uz 12867  df-q 12977  df-rp 13021  df-xneg 13141  df-xadd 13142  df-xmul 13143  df-ioo 13380  df-ioc 13381  df-ico 13382  df-icc 13383  df-fz 13540  df-fzo 13688  df-fl 13830  df-mod 13908  df-seq 14043  df-exp 14103  df-fac 14315  df-bc 14344  df-hash 14372  df-shft 15109  df-sgn 15129  df-cj 15155  df-re 15156  df-im 15157  df-sqrt 15291  df-abs 15292  df-limsup 15527  df-clim 15544  df-rlim 15545  df-sum 15743  df-ef 16125  df-sin 16127  df-cos 16128  df-pi 16130  df-dvds 16315  df-gcd 16557  df-prm 16734  df-struct 17211  df-sets 17228  df-slot 17246  df-ndx 17258  df-base 17274  df-ress 17295  df-plusg 17327  df-mulr 17328  df-starv 17329  df-sca 17330  df-vsca 17331  df-ip 17332  df-tset 17333  df-ple 17334  df-ds 17336  df-unif 17337  df-hom 17338  df-cco 17339  df-rest 17479  df-topn 17480  df-0g 17498  df-gsum 17499  df-topgen 17500  df-pt 17501  df-prds 17504  df-pws 17506  df-xrs 17560  df-qtop 17565  df-imas 17566  df-xps 17568  df-mre 17642  df-mrc 17643  df-acs 17645  df-mgm 18702  df-sgrp 18781  df-mnd 18797  df-mhm 18845  df-submnd 18846  df-grp 19007  df-minusg 19008  df-sbg 19009  df-mulg 19138  df-subg 19193  df-ghm 19288  df-cntz 19391  df-cmn 19856  df-abl 19857  df-mgp 20221  df-rng 20235  df-ur 20268  df-srg 20273  df-ring 20321  df-cring 20322  df-oppr 20424  df-dvdsr 20444  df-unit 20445  df-irred 20446  df-invr 20475  df-dvr 20488  df-rhm 20559  df-nzr 20619  df-subrng 20654  df-subrg 20678  df-rlreg 20802  df-domn 20803  df-idom 20804  df-drng 20838  df-field 20839  df-sdrg 20899  df-lmod 20992  df-lss 21062  df-lsp 21102  df-sra 21303  df-rgmod 21304  df-lidl 21341  df-rsp 21342  df-psmet 21523  df-xmet 21524  df-met 21525  df-bl 21526  df-mopn 21527  df-fbas 21528  df-fg 21529  df-cnfld 21532  df-assa 22012  df-asp 22013  df-ascl 22014  df-psr 22068  df-mvr 22069  df-mpl 22070  df-opsr 22072  df-evls 22234  df-evl 22235  df-psr1 22349  df-vr1 22350  df-ply1 22351  df-coe1 22352  df-evls1 22484  df-evl1 22485  df-top 23060  df-topon 23077  df-topsp 23099  df-bases 23112  df-cld 23185  df-ntr 23186  df-cls 23187  df-nei 23264  df-lp 23302  df-perf 23303  df-cn 23393  df-cnp 23394  df-haus 23481  df-tx 23728  df-hmeo 23921  df-fil 24012  df-fm 24104  df-flim 24105  df-flf 24106  df-xms 24486  df-ms 24487  df-tms 24488  df-cncf 25046  df-limc 26034  df-dv 26035  df-mdeg 26221  df-deg1 26222  df-mon1 26297  df-uc1p 26298  df-q1p 26299  df-r1p 26300  df-ig1p 26301  df-log 26730  df-cxp 26731  df-irng 34083  df-minply 34099
This theorem is used by:  cos9thpinconstrlem2  34189
  Copyright terms: Public domain W3C validator