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 34246
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 2765 . . . 4 (ℂfld evalSub1 ℚ) = (ℂfld evalSub1 ℚ)
2 cos9thpiminply.p . . . . 5 𝑃 = (Poly1𝑄)
3 cos9thpiminply.q . . . . . 6 𝑄 = (ℂflds ℚ)
43fveq2i 6888 . . . . 5 (Poly1𝑄) = (Poly1‘(ℂflds ℚ))
52, 4eqtri 2788 . . . 4 𝑃 = (Poly1‘(ℂflds ℚ))
6 cnfldbas 21580 . . . 4 ℂ = (Base‘ℂfld)
7 cnfldfld 33730 . . . . 5 fld ∈ Field
87a1i 11 . . . 4 (⊤ → ℂfld ∈ Field)
9 cndrng 21605 . . . . . 6 fld ∈ DivRing
10 qsubdrg 21623 . . . . . . 7 (ℚ ∈ (SubRing‘ℂfld) ∧ (ℂflds ℚ) ∈ DivRing)
1110simpli 489 . . . . . 6 ℚ ∈ (SubRing‘ℂfld)
1210simpri 491 . . . . . 6 (ℂflds ℚ) ∈ DivRing
13 issdrg 20945 . . . . . 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 11178 . . . . . . . . . . . . 13 i ∈ ℂ
2019a1i 11 . . . . . . . . . . . 12 (⊤ → i ∈ ℂ)
21 2cnd 12338 . . . . . . . . . . . . 13 (⊤ → 2 ∈ ℂ)
22 picn 26676 . . . . . . . . . . . . . 14 π ∈ ℂ
2322a1i 11 . . . . . . . . . . . . 13 (⊤ → π ∈ ℂ)
2421, 23mulcld 11248 . . . . . . . . . . . 12 (⊤ → (2 · π) ∈ ℂ)
2520, 24mulcld 11248 . . . . . . . . . . 11 (⊤ → (i · (2 · π)) ∈ ℂ)
26 3cn 12341 . . . . . . . . . . . 12 3 ∈ ℂ
2726a1i 11 . . . . . . . . . . 11 (⊤ → 3 ∈ ℂ)
28 3ne0 12369 . . . . . . . . . . . 12 3 ≠ 0
2928a1i 11 . . . . . . . . . . 11 (⊤ → 3 ≠ 0)
3025, 27, 29divcld 12010 . . . . . . . . . 10 (⊤ → ((i · (2 · π)) / 3) ∈ ℂ)
3130efcld 16163 . . . . . . . . 9 (⊤ → (exp‘((i · (2 · π)) / 3)) ∈ ℂ)
3218, 31eqeltrid 2869 . . . . . . . 8 (⊤ → 𝑂 ∈ ℂ)
3327, 29reccld 12003 . . . . . . . 8 (⊤ → (1 / 3) ∈ ℂ)
3432, 33cxpcld 26928 . . . . . . 7 (⊤ → (𝑂𝑐(1 / 3)) ∈ ℂ)
3517, 34eqeltrid 2869 . . . . . 6 (⊤ → 𝑍 ∈ ℂ)
3617a1i 11 . . . . . . . 8 (⊤ → 𝑍 = (𝑂𝑐(1 / 3)))
3718a1i 11 . . . . . . . . . 10 (⊤ → 𝑂 = (exp‘((i · (2 · π)) / 3)))
3830efne0d 16177 . . . . . . . . . 10 (⊤ → (exp‘((i · (2 · π)) / 3)) ≠ 0)
3937, 38eqnetrd 3027 . . . . . . . . 9 (⊤ → 𝑂 ≠ 0)
4032, 39, 33cxpne0d 26933 . . . . . . . 8 (⊤ → (𝑂𝑐(1 / 3)) ≠ 0)
4136, 40eqnetrd 3027 . . . . . . 7 (⊤ → 𝑍 ≠ 0)
4235, 41reccld 12003 . . . . . 6 (⊤ → (1 / 𝑍) ∈ ℂ)
4335, 42addcld 11247 . . . . 5 (⊤ → (𝑍 + (1 / 𝑍)) ∈ ℂ)
4416, 43eqeltrid 2869 . . . 4 (⊤ → 𝐴 ∈ ℂ)
45 cnfld0 21600 . . . 4 0 = (0g‘ℂfld)
46 cos9thpiminply.m . . . 4 𝑀 = (ℂfld minPoly ℚ)
47 eqid 2765 . . . 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 34245 . . . . 5 (⊤ → (((ℂfld evalSub1 ℚ)‘𝐹)‘𝐴) = ((𝐴↑3) + ((-3 · 𝐴) + 1)))
5618, 17, 16cos9thpiminplylem5 34244 . . . . 5 ((𝐴↑3) + ((-3 · 𝐴) + 1)) = 0
5755, 56eqtrdi 2816 . . . 4 (⊤ → (((ℂfld evalSub1 ℚ)‘𝐹)‘𝐴) = 0)
583qrng0 27840 . . . . 5 0 = (0g𝑄)
59 eqid 2765 . . . . 5 (eval1𝑄) = (eval1𝑄)
60 eqid 2765 . . . . 5 (Base‘𝑃) = (Base‘𝑃)
613qfld 33686 . . . . . 6 𝑄 ∈ Field
6261a1i 11 . . . . 5 (⊤ → 𝑄 ∈ Field)
633qdrng 27839 . . . . . . . . . . 11 𝑄 ∈ DivRing
6463a1i 11 . . . . . . . . . 10 (⊤ → 𝑄 ∈ DivRing)
6564drngringd 20889 . . . . . . . . 9 (⊤ → 𝑄 ∈ Ring)
662ply1ring 22461 . . . . . . . . 9 (𝑄 ∈ Ring → 𝑃 ∈ Ring)
6765, 66syl 18 . . . . . . . 8 (⊤ → 𝑃 ∈ Ring)
6867ringgrpd 20372 . . . . . . 7 (⊤ → 𝑃 ∈ Grp)
69 eqid 2765 . . . . . . . . 9 (mulGrp‘𝑃) = (mulGrp‘𝑃)
7069, 60mgpbas 20269 . . . . . . . 8 (Base‘𝑃) = (Base‘(mulGrp‘𝑃))
7169ringmgp 20369 . . . . . . . . 9 (𝑃 ∈ Ring → (mulGrp‘𝑃) ∈ Mnd)
7267, 71syl 18 . . . . . . . 8 (⊤ → (mulGrp‘𝑃) ∈ Mnd)
73 3nn0 12541 . . . . . . . . 9 3 ∈ ℕ0
7473a1i 11 . . . . . . . 8 (⊤ → 3 ∈ ℕ0)
7552, 2, 60vr1cl 22431 . . . . . . . . 9 (𝑄 ∈ Ring → 𝑋 ∈ (Base‘𝑃))
7665, 75syl 18 . . . . . . . 8 (⊤ → 𝑋 ∈ (Base‘𝑃))
7770, 50, 72, 74, 76mulgnn0cld 19209 . . . . . . 7 (⊤ → (3 𝑋) ∈ (Base‘𝑃))
782ply1sca 22466 . . . . . . . . . . . 12 (𝑄 ∈ DivRing → 𝑄 = (Scalar‘𝑃))
7963, 78ax-mp 5 . . . . . . . . . . 11 𝑄 = (Scalar‘𝑃)
802ply1lmod 22465 . . . . . . . . . . . 12 (𝑄 ∈ Ring → 𝑃 ∈ LMod)
8165, 80syl 18 . . . . . . . . . . 11 (⊤ → 𝑃 ∈ LMod)
823qrngbas 27838 . . . . . . . . . . 11 ℚ = (Base‘𝑄)
8351, 79, 67, 81, 82, 60asclf 22085 . . . . . . . . . 10 (⊤ → 𝐾:ℚ⟶(Base‘𝑃))
8474nn0zd 12635 . . . . . . . . . . 11 (⊤ → 3 ∈ ℤ)
85 zq 12998 . . . . . . . . . . 11 (3 ∈ ℤ → 3 ∈ ℚ)
86 qnegcl 13010 . . . . . . . . . . 11 (3 ∈ ℚ → -3 ∈ ℚ)
8784, 85, 863syl 19 . . . . . . . . . 10 (⊤ → -3 ∈ ℚ)
8883, 87ffvelcdmd 7084 . . . . . . . . 9 (⊤ → (𝐾‘-3) ∈ (Base‘𝑃))
8960, 49, 67, 88, 76ringcld 20387 . . . . . . . 8 (⊤ → ((𝐾‘-3) · 𝑋) ∈ (Base‘𝑃))
90 1zzd 12644 . . . . . . . . . 10 (⊤ → 1 ∈ ℤ)
91 zq 12998 . . . . . . . . . 10 (1 ∈ ℤ → 1 ∈ ℚ)
9290, 91syl 18 . . . . . . . . 9 (⊤ → 1 ∈ ℚ)
9383, 92ffvelcdmd 7084 . . . . . . . 8 (⊤ → (𝐾‘1) ∈ (Base‘𝑃))
9460, 48, 68, 89, 93grpcld 19062 . . . . . . 7 (⊤ → (((𝐾‘-3) · 𝑋) + (𝐾‘1)) ∈ (Base‘𝑃))
9560, 48, 68, 77, 94grpcld 19062 . . . . . 6 (⊤ → ((3 𝑋) + (((𝐾‘-3) · 𝑋) + (𝐾‘1))) ∈ (Base‘𝑃))
9654, 95eqeltrid 2869 . . . . 5 (⊤ → 𝐹 ∈ (Base‘𝑃))
9762fldcrngd 20896 . . . . . . . . 9 (⊤ → 𝑄 ∈ CRing)
9859, 2, 60, 97, 82, 96evl1fvf 33921 . . . . . . . 8 (⊤ → ((eval1𝑄)‘𝐹):ℚ⟶ℚ)
9998ffnd 6710 . . . . . . 7 (⊤ → ((eval1𝑄)‘𝐹) Fn ℚ)
100 fniniseg2 7061 . . . . . . 7 (((eval1𝑄)‘𝐹) Fn ℚ → (((eval1𝑄)‘𝐹) “ {0}) = {𝑥 ∈ ℚ ∣ (((eval1𝑄)‘𝐹)‘𝑥) = 0})
10199, 100syl 18 . . . . . 6 (⊤ → (((eval1𝑄)‘𝐹) “ {0}) = {𝑥 ∈ ℚ ∣ (((eval1𝑄)‘𝐹)‘𝑥) = 0})
10259, 82evl1fval1 22545 . . . . . . . . . . . . . . 15 (eval1𝑄) = (𝑄 evalSub1 ℚ)
103102a1i 11 . . . . . . . . . . . . . 14 (𝑥 ∈ ℚ → (eval1𝑄) = (𝑄 evalSub1 ℚ))
104103fveq1d 6887 . . . . . . . . . . . . 13 (𝑥 ∈ ℚ → ((eval1𝑄)‘𝐹) = ((𝑄 evalSub1 ℚ)‘𝐹))
105104fveq1d 6887 . . . . . . . . . . . 12 (𝑥 ∈ ℚ → (((eval1𝑄)‘𝐹)‘𝑥) = (((𝑄 evalSub1 ℚ)‘𝐹)‘𝑥))
106 eqid 2765 . . . . . . . . . . . . . . 15 (𝑄 evalSub1 ℚ) = (𝑄 evalSub1 ℚ)
107 cncrng 21597 . . . . . . . . . . . . . . . 16 fld ∈ CRing
108107a1i 11 . . . . . . . . . . . . . . 15 (𝑥 ∈ ℚ → ℂfld ∈ CRing)
10911a1i 11 . . . . . . . . . . . . . . 15 (𝑥 ∈ ℚ → ℚ ∈ (SubRing‘ℂfld))
11097mptru 1577 . . . . . . . . . . . . . . . . . 18 𝑄 ∈ CRing
111110a1i 11 . . . . . . . . . . . . . . . . 17 (𝑥 ∈ ℚ → 𝑄 ∈ CRing)
112111crngringd 20376 . . . . . . . . . . . . . . . 16 (𝑥 ∈ ℚ → 𝑄 ∈ Ring)
11382subrgid 20726 . . . . . . . . . . . . . . . 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 33923 . . . . . . . . . . . . . 14 (𝑥 ∈ ℚ → ((𝑄 evalSub1 ℚ)‘𝐹) = (((ℂfld evalSub1 ℚ)‘𝐹) ↾ ℚ))
118117fveq1d 6887 . . . . . . . . . . . . 13 (𝑥 ∈ ℚ → (((𝑄 evalSub1 ℚ)‘𝐹)‘𝑥) = ((((ℂfld evalSub1 ℚ)‘𝐹) ↾ ℚ)‘𝑥))
119 fvres 6904 . . . . . . . . . . . . 13 (𝑥 ∈ ℚ → ((((ℂfld evalSub1 ℚ)‘𝐹) ↾ ℚ)‘𝑥) = (((ℂfld evalSub1 ℚ)‘𝐹)‘𝑥))
120118, 119eqtr2d 2801 . . . . . . . . . . . 12 (𝑥 ∈ ℚ → (((ℂfld evalSub1 ℚ)‘𝐹)‘𝑥) = (((𝑄 evalSub1 ℚ)‘𝐹)‘𝑥))
121 qcn 13007 . . . . . . . . . . . . 13 (𝑥 ∈ ℚ → 𝑥 ∈ ℂ)
12218, 17, 16, 3, 48, 49, 50, 2, 51, 52, 53, 54, 121cos9thpiminplylem6 34245 . . . . . . . . . . . 12 (𝑥 ∈ ℚ → (((ℂfld evalSub1 ℚ)‘𝐹)‘𝑥) = ((𝑥↑3) + ((-3 · 𝑥) + 1)))
123105, 120, 1223eqtr2d 2806 . . . . . . . . . . 11 (𝑥 ∈ ℚ → (((eval1𝑄)‘𝐹)‘𝑥) = ((𝑥↑3) + ((-3 · 𝑥) + 1)))
124 id 23 . . . . . . . . . . . 12 (𝑥 ∈ ℚ → 𝑥 ∈ ℚ)
125124cos9thpiminplylem2 34241 . . . . . . . . . . 11 (𝑥 ∈ ℚ → ((𝑥↑3) + ((-3 · 𝑥) + 1)) ≠ 0)
126123, 125eqnetrd 3027 . . . . . . . . . 10 (𝑥 ∈ ℚ → (((eval1𝑄)‘𝐹)‘𝑥) ≠ 0)
127126neneqd 2965 . . . . . . . . 9 (𝑥 ∈ ℚ → ¬ (((eval1𝑄)‘𝐹)‘𝑥) = 0)
128127rgen 3083 . . . . . . . 8 𝑥 ∈ ℚ ¬ (((eval1𝑄)‘𝐹)‘𝑥) = 0
129128a1i 11 . . . . . . 7 (⊤ → ∀𝑥 ∈ ℚ ¬ (((eval1𝑄)‘𝐹)‘𝑥) = 0)
130 rabeq0 4345 . . . . . . 7 ({𝑥 ∈ ℚ ∣ (((eval1𝑄)‘𝐹)‘𝑥) = 0} = ∅ ↔ ∀𝑥 ∈ ℚ ¬ (((eval1𝑄)‘𝐹)‘𝑥) = 0)
131129, 130sylibr 237 . . . . . 6 (⊤ → {𝑥 ∈ ℚ ∣ (((eval1𝑄)‘𝐹)‘𝑥) = 0} = ∅)
132101, 131eqtrd 2800 . . . . 5 (⊤ → (((eval1𝑄)‘𝐹) “ {0}) = ∅)
13354a1i 11 . . . . . . 7 (⊤ → 𝐹 = ((3 𝑋) + (((𝐾‘-3) · 𝑋) + (𝐾‘1))))
134133fveq2d 6889 . . . . . 6 (⊤ → (𝐷𝐹) = (𝐷‘((3 𝑋) + (((𝐾‘-3) · 𝑋) + (𝐾‘1)))))
135 1lt3 12435 . . . . . . . . 9 1 < 3
136135a1i 11 . . . . . . . 8 (⊤ → 1 < 3)
137 0lt1 11755 . . . . . . . . . . . 12 0 < 1
138137a1i 11 . . . . . . . . . . 11 (⊤ → 0 < 1)
139138gt0ne0d 11797 . . . . . . . . . . . 12 (⊤ → 1 ≠ 0)
14053, 2, 82, 51, 58deg1scl 26325 . . . . . . . . . . . 12 ((𝑄 ∈ Ring ∧ 1 ∈ ℚ ∧ 1 ≠ 0) → (𝐷‘(𝐾‘1)) = 0)
14165, 92, 139, 140syl3anc 1398 . . . . . . . . . . 11 (⊤ → (𝐷‘(𝐾‘1)) = 0)
142 drngdomn 20903 . . . . . . . . . . . . . 14 (𝑄 ∈ DivRing → 𝑄 ∈ Domn)
14363, 142mp1i 14 . . . . . . . . . . . . 13 (⊤ → 𝑄 ∈ Domn)
14427, 29negne0d 11586 . . . . . . . . . . . . . 14 (⊤ → -3 ≠ 0)
1452, 51, 58, 47, 82ply1scln0 22506 . . . . . . . . . . . . . 14 ((𝑄 ∈ Ring ∧ -3 ∈ ℚ ∧ -3 ≠ 0) → (𝐾‘-3) ≠ (0g𝑃))
14665, 87, 144, 145syl3anc 1398 . . . . . . . . . . . . 13 (⊤ → (𝐾‘-3) ≠ (0g𝑃))
147107a1i 11 . . . . . . . . . . . . . 14 (⊤ → ℂfld ∈ CRing)
148 drngnzr 20902 . . . . . . . . . . . . . . 15 (ℂfld ∈ DivRing → ℂfld ∈ NzRing)
1499, 148mp1i 14 . . . . . . . . . . . . . 14 (⊤ → ℂfld ∈ NzRing)
15011a1i 11 . . . . . . . . . . . . . 14 (⊤ → ℚ ∈ (SubRing‘ℂfld))
15152, 47, 3, 2, 147, 149, 150vr1nz 33951 . . . . . . . . . . . . 13 (⊤ → 𝑋 ≠ (0g𝑃))
15253, 2, 60, 49, 47, 143, 88, 146, 76, 151deg1mul 26327 . . . . . . . . . . . 12 (⊤ → (𝐷‘((𝐾‘-3) · 𝑋)) = ((𝐷‘(𝐾‘-3)) + (𝐷𝑋)))
15353, 2, 82, 51, 58deg1scl 26325 . . . . . . . . . . . . . 14 ((𝑄 ∈ Ring ∧ -3 ∈ ℚ ∧ -3 ≠ 0) → (𝐷‘(𝐾‘-3)) = 0)
15465, 87, 144, 153syl3anc 1398 . . . . . . . . . . . . 13 (⊤ → (𝐷‘(𝐾‘-3)) = 0)
155 drngnzr 20902 . . . . . . . . . . . . . . 15 (𝑄 ∈ DivRing → 𝑄 ∈ NzRing)
15663, 155mp1i 14 . . . . . . . . . . . . . 14 (⊤ → 𝑄 ∈ NzRing)
15753, 2, 52, 156deg1vr 33950 . . . . . . . . . . . . 13 (⊤ → (𝐷𝑋) = 1)
158154, 157oveq12d 7437 . . . . . . . . . . . 12 (⊤ → ((𝐷‘(𝐾‘-3)) + (𝐷𝑋)) = (0 + 1))
159 1cnd 11221 . . . . . . . . . . . . 13 (⊤ → 1 ∈ ℂ)
160159addlidd 11430 . . . . . . . . . . . 12 (⊤ → (0 + 1) = 1)
161152, 158, 1603eqtrd 2804 . . . . . . . . . . 11 (⊤ → (𝐷‘((𝐾‘-3) · 𝑋)) = 1)
162138, 141, 1613brtr4d 5145 . . . . . . . . . 10 (⊤ → (𝐷‘(𝐾‘1)) < (𝐷‘((𝐾‘-3) · 𝑋)))
1632, 53, 65, 60, 48, 89, 93, 162deg1add 26315 . . . . . . . . 9 (⊤ → (𝐷‘(((𝐾‘-3) · 𝑋) + (𝐾‘1))) = (𝐷‘((𝐾‘-3) · 𝑋)))
164163, 161eqtrd 2800 . . . . . . . 8 (⊤ → (𝐷‘(((𝐾‘-3) · 𝑋) + (𝐾‘1))) = 1)
16553, 2, 52, 69, 50deg1pw 26333 . . . . . . . . 9 ((𝑄 ∈ NzRing ∧ 3 ∈ ℕ0) → (𝐷‘(3 𝑋)) = 3)
166156, 74, 165syl2anc 596 . . . . . . . 8 (⊤ → (𝐷‘(3 𝑋)) = 3)
167136, 164, 1663brtr4d 5145 . . . . . . 7 (⊤ → (𝐷‘(((𝐾‘-3) · 𝑋) + (𝐾‘1))) < (𝐷‘(3 𝑋)))
1682, 53, 65, 60, 48, 77, 94, 167deg1add 26315 . . . . . 6 (⊤ → (𝐷‘((3 𝑋) + (((𝐾‘-3) · 𝑋) + (𝐾‘1)))) = (𝐷‘(3 𝑋)))
169134, 168, 1663eqtrd 2804 . . . . 5 (⊤ → (𝐷𝐹) = 3)
17058, 59, 53, 2, 60, 62, 96, 132, 169ply1dg3rt0irred 33942 . . . 4 (⊤ → 𝐹 ∈ (Irred‘𝑃))
171 eqid 2765 . . . . . . 7 (Irred‘𝑃) = (Irred‘𝑃)
172171, 47irredn0 20555 . . . . . 6 ((𝑃 ∈ Ring ∧ 𝐹 ∈ (Irred‘𝑃)) → 𝐹 ≠ (0g𝑃))
17367, 170, 172syl2anc 596 . . . . 5 (⊤ → 𝐹 ≠ (0g𝑃))
174169fveq2d 6889 . . . . . 6 (⊤ → ((coe1𝐹)‘(𝐷𝐹)) = ((coe1𝐹)‘3))
175133fveq2d 6889 . . . . . . . 8 (⊤ → (coe1𝐹) = (coe1‘((3 𝑋) + (((𝐾‘-3) · 𝑋) + (𝐾‘1)))))
176175fveq1d 6887 . . . . . . 7 (⊤ → ((coe1𝐹)‘3) = ((coe1‘((3 𝑋) + (((𝐾‘-3) · 𝑋) + (𝐾‘1))))‘3))
177 cnfldadd 21582 . . . . . . . . . . 11 + = (+g‘ℂfld)
1783, 177ressplusg 17370 . . . . . . . . . 10 (ℚ ∈ (SubRing‘ℂfld) → + = (+g𝑄))
17911, 178ax-mp 5 . . . . . . . . 9 + = (+g𝑄)
1802, 60, 48, 179coe1addfv 22480 . . . . . . . 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 4495 . . . . . . . . . 10 (𝑖 = 3 → if(𝑖 = 3, 1, 0) = 1)
1833qrng1 27841 . . . . . . . . . . 11 1 = (1r𝑄)
1842, 52, 50, 65, 74, 58, 183coe1mon 33945 . . . . . . . . . 10 (⊤ → (coe1‘(3 𝑋)) = (𝑖 ∈ ℕ0 ↦ if(𝑖 = 3, 1, 0)))
185182, 184, 74, 159fvmptd4 7018 . . . . . . . . 9 (⊤ → ((coe1‘(3 𝑋))‘3) = 1)
1862, 60, 48, 179coe1addfv 22480 . . . . . . . . . . 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 22413 . . . . . . . . . . . . . . . . 17 (𝑄 ∈ CRing → 𝑃 ∈ AssAlg)
18997, 188syl 18 . . . . . . . . . . . . . . . 16 (⊤ → 𝑃 ∈ AssAlg)
190 eqid 2765 . . . . . . . . . . . . . . . . 17 ( ·𝑠𝑃) = ( ·𝑠𝑃)
19151, 79, 82, 60, 49, 190asclmul1 22090 . . . . . . . . . . . . . . . 16 ((𝑃 ∈ AssAlg ∧ -3 ∈ ℚ ∧ 𝑋 ∈ (Base‘𝑃)) → ((𝐾‘-3) · 𝑋) = (-3( ·𝑠𝑃)𝑋))
192189, 87, 76, 191syl3anc 1398 . . . . . . . . . . . . . . 15 (⊤ → ((𝐾‘-3) · 𝑋) = (-3( ·𝑠𝑃)𝑋))
19370, 50mulg1 19195 . . . . . . . . . . . . . . . . 17 (𝑋 ∈ (Base‘𝑃) → (1 𝑋) = 𝑋)
19476, 193syl 18 . . . . . . . . . . . . . . . 16 (⊤ → (1 𝑋) = 𝑋)
195194oveq2d 7435 . . . . . . . . . . . . . . 15 (⊤ → (-3( ·𝑠𝑃)(1 𝑋)) = (-3( ·𝑠𝑃)𝑋))
196192, 195eqtr4d 2803 . . . . . . . . . . . . . 14 (⊤ → ((𝐾‘-3) · 𝑋) = (-3( ·𝑠𝑃)(1 𝑋)))
197196fveq2d 6889 . . . . . . . . . . . . 13 (⊤ → (coe1‘((𝐾‘-3) · 𝑋)) = (coe1‘(-3( ·𝑠𝑃)(1 𝑋))))
198197fveq1d 6887 . . . . . . . . . . . 12 (⊤ → ((coe1‘((𝐾‘-3) · 𝑋))‘3) = ((coe1‘(-3( ·𝑠𝑃)(1 𝑋)))‘3))
199 1nn0 12539 . . . . . . . . . . . . . 14 1 ∈ ℕ0
200199a1i 11 . . . . . . . . . . . . 13 (⊤ → 1 ∈ ℕ0)
201 1red 11228 . . . . . . . . . . . . . 14 (⊤ → 1 ∈ ℝ)
202201, 136ltned 11365 . . . . . . . . . . . . 13 (⊤ → 1 ≠ 3)
20358, 82, 2, 52, 190, 69, 50, 65, 87, 200, 74, 202coe1tmfv2 22490 . . . . . . . . . . . 12 (⊤ → ((coe1‘(-3( ·𝑠𝑃)(1 𝑋)))‘3) = 0)
204198, 203eqtrd 2800 . . . . . . . . . . 11 (⊤ → ((coe1‘((𝐾‘-3) · 𝑋))‘3) = 0)
2052, 51, 82, 58coe1scl 22502 . . . . . . . . . . . . 13 ((𝑄 ∈ Ring ∧ 1 ∈ ℚ) → (coe1‘(𝐾‘1)) = (𝑖 ∈ ℕ0 ↦ if(𝑖 = 0, 1, 0)))
20665, 92, 205syl2anc 596 . . . . . . . . . . . 12 (⊤ → (coe1‘(𝐾‘1)) = (𝑖 ∈ ℕ0 ↦ if(𝑖 = 0, 1, 0)))
207 simpr 490 . . . . . . . . . . . . . . 15 ((⊤ ∧ 𝑖 = 3) → 𝑖 = 3)
20828a1i 11 . . . . . . . . . . . . . . 15 ((⊤ ∧ 𝑖 = 3) → 3 ≠ 0)
209207, 208eqnetrd 3027 . . . . . . . . . . . . . 14 ((⊤ ∧ 𝑖 = 3) → 𝑖 ≠ 0)
210209neneqd 2965 . . . . . . . . . . . . 13 ((⊤ ∧ 𝑖 = 3) → ¬ 𝑖 = 0)
211210iffalsed 4500 . . . . . . . . . . . 12 ((⊤ ∧ 𝑖 = 3) → if(𝑖 = 0, 1, 0) = 0)
212 0zd 12622 . . . . . . . . . . . 12 (⊤ → 0 ∈ ℤ)
213206, 211, 74, 212fvmptd 7001 . . . . . . . . . . 11 (⊤ → ((coe1‘(𝐾‘1))‘3) = 0)
214204, 213oveq12d 7437 . . . . . . . . . 10 (⊤ → (((coe1‘((𝐾‘-3) · 𝑋))‘3) + ((coe1‘(𝐾‘1))‘3)) = (0 + 0))
215 00id 11404 . . . . . . . . . . 11 (0 + 0) = 0
216215a1i 11 . . . . . . . . . 10 (⊤ → (0 + 0) = 0)
217187, 214, 2163eqtrd 2804 . . . . . . . . 9 (⊤ → ((coe1‘(((𝐾‘-3) · 𝑋) + (𝐾‘1)))‘3) = 0)
218185, 217oveq12d 7437 . . . . . . . 8 (⊤ → (((coe1‘(3 𝑋))‘3) + ((coe1‘(((𝐾‘-3) · 𝑋) + (𝐾‘1)))‘3)) = (1 + 0))
219159addridd 11429 . . . . . . . 8 (⊤ → (1 + 0) = 1)
220218, 219eqtrd 2800 . . . . . . 7 (⊤ → (((coe1‘(3 𝑋))‘3) + ((coe1‘(((𝐾‘-3) · 𝑋) + (𝐾‘1)))‘3)) = 1)
221176, 181, 2203eqtrd 2804 . . . . . 6 (⊤ → ((coe1𝐹)‘3) = 1)
222174, 221eqtrd 2800 . . . . 5 (⊤ → ((coe1𝐹)‘(𝐷𝐹)) = 1)
2233fveq2i 6888 . . . . . . 7 (Monic1p𝑄) = (Monic1p‘(ℂflds ℚ))
224223eqcomi 2774 . . . . . 6 (Monic1p‘(ℂflds ℚ)) = (Monic1p𝑄)
2252, 60, 47, 53, 224, 183ismon1p 26355 . . . . 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 34174 . . 3 (⊤ → 𝐹 = (𝑀𝐴))
228227, 169jca 521 . 2 (⊤ → (𝐹 = (𝑀𝐴) ∧ (𝐷𝐹) = 3))
229228mptru 1577 1 (𝐹 = (𝑀𝐴) ∧ (𝐷𝐹) = 3)
Colors of variables:    wff setvar class
This proof depends on syntax axioms:  ¬ wn 3  wa 401   = wceq 1570  wtru 1571  wcel 2146  wne 2960  wral 3081  {crab 3418  c0 4286  ifcif 4489  {csn 4591   class class class wbr 5111  cmpt 5194  ccnv 5662  cres 5665  cima 5666   Fn wfn 6535  cfv 6540  (class class class)co 7419  cc 11117  0cc0 11119  1c1 11120  ici 11121   + caddc 11122   · cmul 11124   < clt 11262  -cneg 11461   / cdiv 11890  2c2 12314  3c3 12315  0cn0 12523  cz 12610  cq 12992  cexp 14119  expce 16141  πcpi 16146  Basecbs 17295  s cress 17316  +gcplusg 17336  .rcmulr 17337  Scalarcsca 17339   ·𝑠 cvsca 17340  0gc0g 17518  Mndcmnd 18828  .gcmg 19181  mulGrpcmgp 20264  Ringcrg 20363  CRingccrg 20364  Irredcir 20488  NzRingcnzr 20663  SubRingcsubrg 20722  Domncdomn 20845  DivRingcdr 20881  Fieldcfield 20882  SubDRingcsdrg 20943  LModclmod 21035  fldccnfld 21576  AssAlgcasa 22054  algSccascl 22056  var1cv1 22390  Poly1cpl1 22391  coe1cco1 22392   evalSub1 ces1 22527  eval1ce1 22528  deg1cdg1 26266  Monic1pcmn1 26338  𝑐ccxp 26775   minPoly cminply 34157
This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1828  ax-4 1842  ax-5 1943  ax-6 2000  ax-7 2041  ax-8 2148  ax-9 2156  ax-10 2179  ax-11 2195  ax-12 2216  ax-ext 2737  ax-rep 5240  ax-sep 5259  ax-nul 5271  ax-pow 5338  ax-pr 5406  ax-un 7742  ax-inf2 9617  ax-cnex 11175  ax-resscn 11176  ax-1cn 11177  ax-icn 11178  ax-addcl 11179  ax-addrcl 11180  ax-mulcl 11181  ax-mulrcl 11182  ax-mulcom 11183  ax-addass 11184  ax-mulass 11185  ax-distr 11186  ax-i2m1 11187  ax-1ne0 11188  ax-1rid 11189  ax-rnegex 11190  ax-rrecex 11191  ax-cnre 11192  ax-pre-lttri 11193  ax-pre-lttrn 11194  ax-pre-ltadd 11195  ax-pre-mulgt0 11196  ax-pre-sup 11197  ax-addf 11198  ax-mulf 11199
This proof depends on definitions:  df-bi 210  df-an 402  df-or 862  df-3or 1104  df-3an 1105  df-tru 1573  df-fal 1583  df-ex 1813  df-nf 1817  df-sb 2100  df-mo 2569  df-eu 2599  df-clab 2744  df-cleq 2757  df-clel 2840  df-nfc 2914  df-ne 2961  df-nel 3067  df-ral 3082  df-rex 3092  df-rmo 3371  df-reu 3372  df-rab 3419  df-v 3459  df-sbc 3747  df-csb 3855  df-dif 3909  df-un 3911  df-in 3913  df-ss 3923  df-pss 3926  df-nul 4287  df-if 4490  df-pw 4566  df-sn 4592  df-pr 4594  df-tp 4596  df-op 4598  df-uni 4875  df-int 4915  df-iun 4960  df-iin 4961  df-br 5112  df-opab 5176  df-mpt 5195  df-tr 5221  df-id 5558  df-eprel 5563  df-po 5571  df-so 5572  df-fr 5616  df-se 5617  df-we 5618  df-xp 5669  df-rel 5670  df-cnv 5671  df-co 5672  df-dm 5673  df-rn 5674  df-res 5675  df-ima 5676  df-pred 6306  df-ord 6367  df-on 6368  df-lim 6369  df-suc 6370  df-iota 6496  df-fun 6542  df-fn 6543  df-f 6544  df-f1 6545  df-fo 6546  df-f1o 6547  df-fv 6548  df-isom 6549  df-riota 7376  df-ov 7422  df-oprab 7423  df-mpo 7424  df-of 7684  df-ofr 7685  df-om 7869  df-1st 7992  df-2nd 7993  df-supp 8163  df-tpos 8228  df-frecs 8284  df-wrecs 8315  df-recs 8364  df-rdg 8403  df-1o 8459  df-2o 8460  df-er 8700  df-map 8832  df-pm 8833  df-ixp 8902  df-en 8950  df-dom 8951  df-sdom 8952  df-fin 8953  df-fsupp 9329  df-fi 9378  df-sup 9409  df-inf 9410  df-oi 9479  df-card 9941  df-pnf 11264  df-mnf 11265  df-xr 11266  df-ltxr 11267  df-le 11268  df-sub 11462  df-neg 11463  df-div 11891  df-nn 12253  df-2 12322  df-3 12323  df-4 12324  df-5 12325  df-6 12326  df-7 12327  df-8 12328  df-9 12329  df-n0 12524  df-z 12611  df-dec 12732  df-uz 12883  df-q 12993  df-rp 13037  df-xneg 13157  df-xadd 13158  df-xmul 13159  df-ioo 13396  df-ioc 13397  df-ico 13398  df-icc 13399  df-fz 13556  df-fzo 13704  df-fl 13847  df-mod 13925  df-seq 14060  df-exp 14120  df-fac 14332  df-bc 14361  df-hash 14389  df-shft 15132  df-sgn 15152  df-cj 15178  df-re 15179  df-im 15180  df-sqrt 15314  df-abs 15315  df-limsup 15550  df-clim 15567  df-rlim 15568  df-sum 15766  df-ef 16147  df-sin 16149  df-cos 16150  df-pi 16152  df-dvds 16337  df-gcd 16579  df-prm 16756  df-struct 17233  df-sets 17250  df-slot 17268  df-ndx 17280  df-base 17296  df-ress 17317  df-plusg 17349  df-mulr 17350  df-starv 17351  df-sca 17352  df-vsca 17353  df-ip 17354  df-tset 17355  df-ple 17356  df-ds 17358  df-unif 17359  df-hom 17360  df-cco 17361  df-rest 17501  df-topn 17502  df-0g 17520  df-gsum 17521  df-topgen 17522  df-pt 17523  df-prds 17526  df-pws 17528  df-xrs 17582  df-qtop 17587  df-imas 17588  df-xps 17590  df-mre 17664  df-mrc 17665  df-acs 17667  df-mgm 18724  df-sgrp 18813  df-mnd 18829  df-mhm 18882  df-submnd 18883  df-grp 19051  df-minusg 19052  df-sbg 19053  df-mulg 19182  df-subg 19237  df-ghm 19332  df-cntz 19435  df-cmn 19900  df-abl 19901  df-mgp 20265  df-rng 20279  df-ur 20312  df-srg 20317  df-ring 20365  df-cring 20366  df-oppr 20469  df-dvdsr 20489  df-unit 20490  df-irred 20491  df-invr 20520  df-dvr 20533  df-rhm 20604  df-nzr 20664  df-subrng 20699  df-subrg 20723  df-rlreg 20847  df-domn 20848  df-idom 20849  df-drng 20883  df-field 20884  df-sdrg 20944  df-lmod 21037  df-lss 21107  df-lsp 21147  df-sra 21348  df-rgmod 21349  df-lidl 21386  df-rsp 21387  df-psmet 21568  df-xmet 21569  df-met 21570  df-bl 21571  df-mopn 21572  df-fbas 21573  df-fg 21574  df-cnfld 21577  df-assa 22057  df-asp 22058  df-ascl 22059  df-psr 22113  df-mvr 22114  df-mpl 22115  df-opsr 22117  df-evls 22279  df-evl 22280  df-psr1 22394  df-vr1 22395  df-ply1 22396  df-coe1 22397  df-evls1 22529  df-evl1 22530  df-top 23105  df-topon 23122  df-topsp 23144  df-bases 23157  df-cld 23230  df-ntr 23231  df-cls 23232  df-nei 23309  df-lp 23347  df-perf 23348  df-cn 23438  df-cnp 23439  df-haus 23526  df-tx 23774  df-hmeo 23967  df-fil 24058  df-fm 24150  df-flim 24151  df-flf 24152  df-xms 24532  df-ms 24533  df-tms 24534  df-cncf 25092  df-limc 26080  df-dv 26081  df-mdeg 26267  df-deg1 26268  df-mon1 26343  df-uc1p 26344  df-q1p 26345  df-r1p 26346  df-ig1p 26347  df-log 26776  df-cxp 26777  df-irng 34142  df-minply 34158
This theorem is used by:  cos9thpinconstrlem2  34248
  Copyright terms: Public domain W3C validator