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

Theorem aks6d1c7 42297
Description: 𝑁 is a prime power if the hypotheses of the AKS algorithm hold. Claim 7 of Theorem 6.1 https://www3.nd.edu/%7eandyp/notes/AKS.pdf. (Contributed by metakunt, 16-May-2025.)
Hypotheses
Ref Expression
aks6d1c7.1 = {⟨𝑒, 𝑓⟩ ∣ (𝑒 ∈ ℕ ∧ 𝑓 ∈ (Base‘(Poly1𝐾)) ∧ ∀𝑦 ∈ ((mulGrp‘𝐾) PrimRoots 𝑅)(𝑒(.g‘(mulGrp‘𝐾))(((eval1𝐾)‘𝑓)‘𝑦)) = (((eval1𝐾)‘𝑓)‘(𝑒(.g‘(mulGrp‘𝐾))𝑦)))}
aks6d1c7.2 𝑃 = (chr‘𝐾)
aks6d1c7.3 (𝜑𝐾 ∈ Field)
aks6d1c7.4 (𝜑𝑃 ∈ ℙ)
aks6d1c7.5 (𝜑𝑅 ∈ ℕ)
aks6d1c7.6 (𝜑𝑁 ∈ (ℤ‘3))
aks6d1c7.7 (𝜑𝑃𝑁)
aks6d1c7.8 (𝜑 → (𝑁 gcd 𝑅) = 1)
aks6d1c7.9 𝐴 = (⌊‘((√‘(ϕ‘𝑅)) · (2 logb 𝑁)))
aks6d1c7.10 (𝜑 → ((2 logb 𝑁)↑2) < ((od𝑅)‘𝑁))
aks6d1c7.11 (𝜑 → (𝑥 ∈ (Base‘𝐾) ↦ (𝑃(.g‘(mulGrp‘𝐾))𝑥)) ∈ (𝐾 RingIso 𝐾))
aks6d1c7.12 (𝜑𝑀 ∈ ((mulGrp‘𝐾) PrimRoots 𝑅))
aks6d1c7.13 (𝜑 → ∀𝑏 ∈ (1...𝐴)(𝑏 gcd 𝑁) = 1)
aks6d1c7.14 (𝜑 → ∀𝑎 ∈ (1...𝐴)𝑁 ((var1𝐾)(+g‘(Poly1𝐾))((algSc‘(Poly1𝐾))‘((ℤRHom‘𝐾)‘𝑎))))
Assertion
Ref Expression
aks6d1c7 (𝜑𝑁 = (𝑃↑(𝑃 pCnt 𝑁)))
Distinct variable groups:   ,𝑎   𝐴,𝑎   𝐴,𝑏   𝐴,𝑒,𝑓,𝑦   𝑥,𝐴,𝑦   𝐾,𝑎   𝐾,𝑏   𝑒,𝐾,𝑓,𝑦   𝑥,𝐾   𝑀,𝑎   𝑀,𝑏   𝑥,𝑀,𝑦   𝑁,𝑎   𝑁,𝑏   𝑒,𝑁,𝑓,𝑦   𝑥,𝑁   𝑃,𝑎   𝑃,𝑏   𝑃,𝑒,𝑓,𝑦   𝑥,𝑃   𝑅,𝑎   𝑅,𝑒,𝑓,𝑦   𝑥,𝑅   𝜑,𝑎   𝜑,𝑏   𝜑,𝑥,𝑦
Allowed substitution hints:   𝜑(𝑒,𝑓)   (𝑥,𝑦,𝑒,𝑓,𝑏)   𝑅(𝑏)   𝑀(𝑒,𝑓)

Proof of Theorem aks6d1c7
Dummy variables 𝑝 𝑞 𝑟 𝑠 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 simpr 484 . . . . . . . 8 (((((𝜑𝑟 ∈ ℙ) ∧ ∀𝑝 ∈ ℙ (𝑝𝑁𝑝 = 𝑟)) ∧ 𝑞 ∈ ℙ) ∧ 𝑞 = 𝑟) → 𝑞 = 𝑟)
2 aks6d1c7.7 . . . . . . . . . . . 12 (𝜑𝑃𝑁)
32ad2antrr 726 . . . . . . . . . . 11 (((𝜑𝑟 ∈ ℙ) ∧ ∀𝑝 ∈ ℙ (𝑝𝑁𝑝 = 𝑟)) → 𝑃𝑁)
4 breq1 5096 . . . . . . . . . . . . . 14 (𝑠 = 𝑃 → (𝑠𝑁𝑃𝑁))
5 eqeq1 2737 . . . . . . . . . . . . . 14 (𝑠 = 𝑃 → (𝑠 = 𝑟𝑃 = 𝑟))
64, 5bibi12d 345 . . . . . . . . . . . . 13 (𝑠 = 𝑃 → ((𝑠𝑁𝑠 = 𝑟) ↔ (𝑃𝑁𝑃 = 𝑟)))
7 nfv 1915 . . . . . . . . . . . . . . . 16 𝑠(𝑝𝑁𝑝 = 𝑟)
8 nfv 1915 . . . . . . . . . . . . . . . 16 𝑝(𝑠𝑁𝑠 = 𝑟)
9 breq1 5096 . . . . . . . . . . . . . . . . 17 (𝑝 = 𝑠 → (𝑝𝑁𝑠𝑁))
10 equequ1 2026 . . . . . . . . . . . . . . . . 17 (𝑝 = 𝑠 → (𝑝 = 𝑟𝑠 = 𝑟))
119, 10bibi12d 345 . . . . . . . . . . . . . . . 16 (𝑝 = 𝑠 → ((𝑝𝑁𝑝 = 𝑟) ↔ (𝑠𝑁𝑠 = 𝑟)))
127, 8, 11cbvralw 3275 . . . . . . . . . . . . . . 15 (∀𝑝 ∈ ℙ (𝑝𝑁𝑝 = 𝑟) ↔ ∀𝑠 ∈ ℙ (𝑠𝑁𝑠 = 𝑟))
1312biimpi 216 . . . . . . . . . . . . . 14 (∀𝑝 ∈ ℙ (𝑝𝑁𝑝 = 𝑟) → ∀𝑠 ∈ ℙ (𝑠𝑁𝑠 = 𝑟))
1413adantl 481 . . . . . . . . . . . . 13 (((𝜑𝑟 ∈ ℙ) ∧ ∀𝑝 ∈ ℙ (𝑝𝑁𝑝 = 𝑟)) → ∀𝑠 ∈ ℙ (𝑠𝑁𝑠 = 𝑟))
15 aks6d1c7.4 . . . . . . . . . . . . . 14 (𝜑𝑃 ∈ ℙ)
1615ad2antrr 726 . . . . . . . . . . . . 13 (((𝜑𝑟 ∈ ℙ) ∧ ∀𝑝 ∈ ℙ (𝑝𝑁𝑝 = 𝑟)) → 𝑃 ∈ ℙ)
176, 14, 16rspcdva 3574 . . . . . . . . . . . 12 (((𝜑𝑟 ∈ ℙ) ∧ ∀𝑝 ∈ ℙ (𝑝𝑁𝑝 = 𝑟)) → (𝑃𝑁𝑃 = 𝑟))
1817biimpd 229 . . . . . . . . . . 11 (((𝜑𝑟 ∈ ℙ) ∧ ∀𝑝 ∈ ℙ (𝑝𝑁𝑝 = 𝑟)) → (𝑃𝑁𝑃 = 𝑟))
193, 18mpd 15 . . . . . . . . . 10 (((𝜑𝑟 ∈ ℙ) ∧ ∀𝑝 ∈ ℙ (𝑝𝑁𝑝 = 𝑟)) → 𝑃 = 𝑟)
2019ad2antrr 726 . . . . . . . . 9 (((((𝜑𝑟 ∈ ℙ) ∧ ∀𝑝 ∈ ℙ (𝑝𝑁𝑝 = 𝑟)) ∧ 𝑞 ∈ ℙ) ∧ 𝑞 = 𝑟) → 𝑃 = 𝑟)
2120eqcomd 2739 . . . . . . . 8 (((((𝜑𝑟 ∈ ℙ) ∧ ∀𝑝 ∈ ℙ (𝑝𝑁𝑝 = 𝑟)) ∧ 𝑞 ∈ ℙ) ∧ 𝑞 = 𝑟) → 𝑟 = 𝑃)
221, 21eqtrd 2768 . . . . . . 7 (((((𝜑𝑟 ∈ ℙ) ∧ ∀𝑝 ∈ ℙ (𝑝𝑁𝑝 = 𝑟)) ∧ 𝑞 ∈ ℙ) ∧ 𝑞 = 𝑟) → 𝑞 = 𝑃)
2322oveq1d 7367 . . . . . 6 (((((𝜑𝑟 ∈ ℙ) ∧ ∀𝑝 ∈ ℙ (𝑝𝑁𝑝 = 𝑟)) ∧ 𝑞 ∈ ℙ) ∧ 𝑞 = 𝑟) → (𝑞 pCnt 𝑁) = (𝑃 pCnt 𝑁))
24 aks6d1c7.6 . . . . . . . . . . . . . . . . . . 19 (𝜑𝑁 ∈ (ℤ‘3))
25 eluzelz 12748 . . . . . . . . . . . . . . . . . . 19 (𝑁 ∈ (ℤ‘3) → 𝑁 ∈ ℤ)
2624, 25syl 17 . . . . . . . . . . . . . . . . . 18 (𝜑𝑁 ∈ ℤ)
27 0red 11122 . . . . . . . . . . . . . . . . . . 19 (𝜑 → 0 ∈ ℝ)
28 3re 12212 . . . . . . . . . . . . . . . . . . . 20 3 ∈ ℝ
2928a1i 11 . . . . . . . . . . . . . . . . . . 19 (𝜑 → 3 ∈ ℝ)
3026zred 12583 . . . . . . . . . . . . . . . . . . 19 (𝜑𝑁 ∈ ℝ)
31 3pos 12237 . . . . . . . . . . . . . . . . . . . 20 0 < 3
3231a1i 11 . . . . . . . . . . . . . . . . . . 19 (𝜑 → 0 < 3)
33 eluzle 12751 . . . . . . . . . . . . . . . . . . . 20 (𝑁 ∈ (ℤ‘3) → 3 ≤ 𝑁)
3424, 33syl 17 . . . . . . . . . . . . . . . . . . 19 (𝜑 → 3 ≤ 𝑁)
3527, 29, 30, 32, 34ltletrd 11280 . . . . . . . . . . . . . . . . . 18 (𝜑 → 0 < 𝑁)
3626, 35jca 511 . . . . . . . . . . . . . . . . 17 (𝜑 → (𝑁 ∈ ℤ ∧ 0 < 𝑁))
37 elnnz 12485 . . . . . . . . . . . . . . . . 17 (𝑁 ∈ ℕ ↔ (𝑁 ∈ ℤ ∧ 0 < 𝑁))
3836, 37sylibr 234 . . . . . . . . . . . . . . . 16 (𝜑𝑁 ∈ ℕ)
39 pcelnn 16784 . . . . . . . . . . . . . . . 16 ((𝑃 ∈ ℙ ∧ 𝑁 ∈ ℕ) → ((𝑃 pCnt 𝑁) ∈ ℕ ↔ 𝑃𝑁))
4015, 38, 39syl2anc 584 . . . . . . . . . . . . . . 15 (𝜑 → ((𝑃 pCnt 𝑁) ∈ ℕ ↔ 𝑃𝑁))
412, 40mpbird 257 . . . . . . . . . . . . . 14 (𝜑 → (𝑃 pCnt 𝑁) ∈ ℕ)
4241nncnd 12148 . . . . . . . . . . . . 13 (𝜑 → (𝑃 pCnt 𝑁) ∈ ℂ)
4342mulridd 11136 . . . . . . . . . . . 12 (𝜑 → ((𝑃 pCnt 𝑁) · 1) = (𝑃 pCnt 𝑁))
4443eqcomd 2739 . . . . . . . . . . 11 (𝜑 → (𝑃 pCnt 𝑁) = ((𝑃 pCnt 𝑁) · 1))
45 1nn0 12404 . . . . . . . . . . . . . . . 16 1 ∈ ℕ0
4645a1i 11 . . . . . . . . . . . . . . 15 (𝜑 → 1 ∈ ℕ0)
47 pcidlem 16786 . . . . . . . . . . . . . . 15 ((𝑃 ∈ ℙ ∧ 1 ∈ ℕ0) → (𝑃 pCnt (𝑃↑1)) = 1)
4815, 46, 47syl2anc 584 . . . . . . . . . . . . . 14 (𝜑 → (𝑃 pCnt (𝑃↑1)) = 1)
4948eqcomd 2739 . . . . . . . . . . . . 13 (𝜑 → 1 = (𝑃 pCnt (𝑃↑1)))
50 prmnn 16587 . . . . . . . . . . . . . . . . 17 (𝑃 ∈ ℙ → 𝑃 ∈ ℕ)
5115, 50syl 17 . . . . . . . . . . . . . . . 16 (𝜑𝑃 ∈ ℕ)
5251nncnd 12148 . . . . . . . . . . . . . . 15 (𝜑𝑃 ∈ ℂ)
5352exp1d 14050 . . . . . . . . . . . . . 14 (𝜑 → (𝑃↑1) = 𝑃)
5453oveq2d 7368 . . . . . . . . . . . . 13 (𝜑 → (𝑃 pCnt (𝑃↑1)) = (𝑃 pCnt 𝑃))
5549, 54eqtrd 2768 . . . . . . . . . . . 12 (𝜑 → 1 = (𝑃 pCnt 𝑃))
5655oveq2d 7368 . . . . . . . . . . 11 (𝜑 → ((𝑃 pCnt 𝑁) · 1) = ((𝑃 pCnt 𝑁) · (𝑃 pCnt 𝑃)))
5744, 56eqtrd 2768 . . . . . . . . . 10 (𝜑 → (𝑃 pCnt 𝑁) = ((𝑃 pCnt 𝑁) · (𝑃 pCnt 𝑃)))
5857adantr 480 . . . . . . . . 9 ((𝜑𝑟 ∈ ℙ) → (𝑃 pCnt 𝑁) = ((𝑃 pCnt 𝑁) · (𝑃 pCnt 𝑃)))
5958ad3antrrr 730 . . . . . . . 8 (((((𝜑𝑟 ∈ ℙ) ∧ ∀𝑝 ∈ ℙ (𝑝𝑁𝑝 = 𝑟)) ∧ 𝑞 ∈ ℙ) ∧ 𝑞 = 𝑟) → (𝑃 pCnt 𝑁) = ((𝑃 pCnt 𝑁) · (𝑃 pCnt 𝑃)))
6016ad2antrr 726 . . . . . . . . . 10 (((((𝜑𝑟 ∈ ℙ) ∧ ∀𝑝 ∈ ℙ (𝑝𝑁𝑝 = 𝑟)) ∧ 𝑞 ∈ ℙ) ∧ 𝑞 = 𝑟) → 𝑃 ∈ ℙ)
61 nnq 12862 . . . . . . . . . . . . . 14 (𝑃 ∈ ℕ → 𝑃 ∈ ℚ)
6251, 61syl 17 . . . . . . . . . . . . 13 (𝜑𝑃 ∈ ℚ)
6351nnne0d 12182 . . . . . . . . . . . . 13 (𝜑𝑃 ≠ 0)
6462, 63jca 511 . . . . . . . . . . . 12 (𝜑 → (𝑃 ∈ ℚ ∧ 𝑃 ≠ 0))
6564adantr 480 . . . . . . . . . . 11 ((𝜑𝑟 ∈ ℙ) → (𝑃 ∈ ℚ ∧ 𝑃 ≠ 0))
6665ad3antrrr 730 . . . . . . . . . 10 (((((𝜑𝑟 ∈ ℙ) ∧ ∀𝑝 ∈ ℙ (𝑝𝑁𝑝 = 𝑟)) ∧ 𝑞 ∈ ℙ) ∧ 𝑞 = 𝑟) → (𝑃 ∈ ℚ ∧ 𝑃 ≠ 0))
6741nnzd 12501 . . . . . . . . . . . . . 14 (𝜑 → (𝑃 pCnt 𝑁) ∈ ℤ)
6867adantr 480 . . . . . . . . . . . . 13 ((𝜑𝑟 ∈ ℙ) → (𝑃 pCnt 𝑁) ∈ ℤ)
6968adantr 480 . . . . . . . . . . . 12 (((𝜑𝑟 ∈ ℙ) ∧ ∀𝑝 ∈ ℙ (𝑝𝑁𝑝 = 𝑟)) → (𝑃 pCnt 𝑁) ∈ ℤ)
7069adantr 480 . . . . . . . . . . 11 ((((𝜑𝑟 ∈ ℙ) ∧ ∀𝑝 ∈ ℙ (𝑝𝑁𝑝 = 𝑟)) ∧ 𝑞 ∈ ℙ) → (𝑃 pCnt 𝑁) ∈ ℤ)
7170adantr 480 . . . . . . . . . 10 (((((𝜑𝑟 ∈ ℙ) ∧ ∀𝑝 ∈ ℙ (𝑝𝑁𝑝 = 𝑟)) ∧ 𝑞 ∈ ℙ) ∧ 𝑞 = 𝑟) → (𝑃 pCnt 𝑁) ∈ ℤ)
72 pcexp 16773 . . . . . . . . . 10 ((𝑃 ∈ ℙ ∧ (𝑃 ∈ ℚ ∧ 𝑃 ≠ 0) ∧ (𝑃 pCnt 𝑁) ∈ ℤ) → (𝑃 pCnt (𝑃↑(𝑃 pCnt 𝑁))) = ((𝑃 pCnt 𝑁) · (𝑃 pCnt 𝑃)))
7360, 66, 71, 72syl3anc 1373 . . . . . . . . 9 (((((𝜑𝑟 ∈ ℙ) ∧ ∀𝑝 ∈ ℙ (𝑝𝑁𝑝 = 𝑟)) ∧ 𝑞 ∈ ℙ) ∧ 𝑞 = 𝑟) → (𝑃 pCnt (𝑃↑(𝑃 pCnt 𝑁))) = ((𝑃 pCnt 𝑁) · (𝑃 pCnt 𝑃)))
7473eqcomd 2739 . . . . . . . 8 (((((𝜑𝑟 ∈ ℙ) ∧ ∀𝑝 ∈ ℙ (𝑝𝑁𝑝 = 𝑟)) ∧ 𝑞 ∈ ℙ) ∧ 𝑞 = 𝑟) → ((𝑃 pCnt 𝑁) · (𝑃 pCnt 𝑃)) = (𝑃 pCnt (𝑃↑(𝑃 pCnt 𝑁))))
7559, 74eqtrd 2768 . . . . . . 7 (((((𝜑𝑟 ∈ ℙ) ∧ ∀𝑝 ∈ ℙ (𝑝𝑁𝑝 = 𝑟)) ∧ 𝑞 ∈ ℙ) ∧ 𝑞 = 𝑟) → (𝑃 pCnt 𝑁) = (𝑃 pCnt (𝑃↑(𝑃 pCnt 𝑁))))
7622eqcomd 2739 . . . . . . . 8 (((((𝜑𝑟 ∈ ℙ) ∧ ∀𝑝 ∈ ℙ (𝑝𝑁𝑝 = 𝑟)) ∧ 𝑞 ∈ ℙ) ∧ 𝑞 = 𝑟) → 𝑃 = 𝑞)
7776oveq1d 7367 . . . . . . 7 (((((𝜑𝑟 ∈ ℙ) ∧ ∀𝑝 ∈ ℙ (𝑝𝑁𝑝 = 𝑟)) ∧ 𝑞 ∈ ℙ) ∧ 𝑞 = 𝑟) → (𝑃 pCnt (𝑃↑(𝑃 pCnt 𝑁))) = (𝑞 pCnt (𝑃↑(𝑃 pCnt 𝑁))))
7875, 77eqtrd 2768 . . . . . 6 (((((𝜑𝑟 ∈ ℙ) ∧ ∀𝑝 ∈ ℙ (𝑝𝑁𝑝 = 𝑟)) ∧ 𝑞 ∈ ℙ) ∧ 𝑞 = 𝑟) → (𝑃 pCnt 𝑁) = (𝑞 pCnt (𝑃↑(𝑃 pCnt 𝑁))))
7923, 78eqtrd 2768 . . . . 5 (((((𝜑𝑟 ∈ ℙ) ∧ ∀𝑝 ∈ ℙ (𝑝𝑁𝑝 = 𝑟)) ∧ 𝑞 ∈ ℙ) ∧ 𝑞 = 𝑟) → (𝑞 pCnt 𝑁) = (𝑞 pCnt (𝑃↑(𝑃 pCnt 𝑁))))
80 breq1 5096 . . . . . . . . . . . 12 (𝑠 = 𝑞 → (𝑠𝑁𝑞𝑁))
81 equequ1 2026 . . . . . . . . . . . 12 (𝑠 = 𝑞 → (𝑠 = 𝑟𝑞 = 𝑟))
8280, 81bibi12d 345 . . . . . . . . . . 11 (𝑠 = 𝑞 → ((𝑠𝑁𝑠 = 𝑟) ↔ (𝑞𝑁𝑞 = 𝑟)))
8314adantr 480 . . . . . . . . . . 11 ((((𝜑𝑟 ∈ ℙ) ∧ ∀𝑝 ∈ ℙ (𝑝𝑁𝑝 = 𝑟)) ∧ 𝑞 ∈ ℙ) → ∀𝑠 ∈ ℙ (𝑠𝑁𝑠 = 𝑟))
84 simpr 484 . . . . . . . . . . 11 ((((𝜑𝑟 ∈ ℙ) ∧ ∀𝑝 ∈ ℙ (𝑝𝑁𝑝 = 𝑟)) ∧ 𝑞 ∈ ℙ) → 𝑞 ∈ ℙ)
8582, 83, 84rspcdva 3574 . . . . . . . . . 10 ((((𝜑𝑟 ∈ ℙ) ∧ ∀𝑝 ∈ ℙ (𝑝𝑁𝑝 = 𝑟)) ∧ 𝑞 ∈ ℙ) → (𝑞𝑁𝑞 = 𝑟))
8685bicomd 223 . . . . . . . . 9 ((((𝜑𝑟 ∈ ℙ) ∧ ∀𝑝 ∈ ℙ (𝑝𝑁𝑝 = 𝑟)) ∧ 𝑞 ∈ ℙ) → (𝑞 = 𝑟𝑞𝑁))
8786notbid 318 . . . . . . . 8 ((((𝜑𝑟 ∈ ℙ) ∧ ∀𝑝 ∈ ℙ (𝑝𝑁𝑝 = 𝑟)) ∧ 𝑞 ∈ ℙ) → (¬ 𝑞 = 𝑟 ↔ ¬ 𝑞𝑁))
8887biimpa 476 . . . . . . 7 (((((𝜑𝑟 ∈ ℙ) ∧ ∀𝑝 ∈ ℙ (𝑝𝑁𝑝 = 𝑟)) ∧ 𝑞 ∈ ℙ) ∧ ¬ 𝑞 = 𝑟) → ¬ 𝑞𝑁)
8984adantr 480 . . . . . . . 8 (((((𝜑𝑟 ∈ ℙ) ∧ ∀𝑝 ∈ ℙ (𝑝𝑁𝑝 = 𝑟)) ∧ 𝑞 ∈ ℙ) ∧ ¬ 𝑞 = 𝑟) → 𝑞 ∈ ℙ)
9038adantr 480 . . . . . . . . 9 ((𝜑𝑟 ∈ ℙ) → 𝑁 ∈ ℕ)
9190ad3antrrr 730 . . . . . . . 8 (((((𝜑𝑟 ∈ ℙ) ∧ ∀𝑝 ∈ ℙ (𝑝𝑁𝑝 = 𝑟)) ∧ 𝑞 ∈ ℙ) ∧ ¬ 𝑞 = 𝑟) → 𝑁 ∈ ℕ)
92 pceq0 16785 . . . . . . . 8 ((𝑞 ∈ ℙ ∧ 𝑁 ∈ ℕ) → ((𝑞 pCnt 𝑁) = 0 ↔ ¬ 𝑞𝑁))
9389, 91, 92syl2anc 584 . . . . . . 7 (((((𝜑𝑟 ∈ ℙ) ∧ ∀𝑝 ∈ ℙ (𝑝𝑁𝑝 = 𝑟)) ∧ 𝑞 ∈ ℙ) ∧ ¬ 𝑞 = 𝑟) → ((𝑞 pCnt 𝑁) = 0 ↔ ¬ 𝑞𝑁))
9488, 93mpbird 257 . . . . . 6 (((((𝜑𝑟 ∈ ℙ) ∧ ∀𝑝 ∈ ℙ (𝑝𝑁𝑝 = 𝑟)) ∧ 𝑞 ∈ ℙ) ∧ ¬ 𝑞 = 𝑟) → (𝑞 pCnt 𝑁) = 0)
95 neqne 2937 . . . . . . . . . . . . 13 𝑞 = 𝑟𝑞𝑟)
9695adantl 481 . . . . . . . . . . . 12 (((((𝜑𝑟 ∈ ℙ) ∧ ∀𝑝 ∈ ℙ (𝑝𝑁𝑝 = 𝑟)) ∧ 𝑞 ∈ ℙ) ∧ ¬ 𝑞 = 𝑟) → 𝑞𝑟)
973adantr 480 . . . . . . . . . . . . . . 15 ((((𝜑𝑟 ∈ ℙ) ∧ ∀𝑝 ∈ ℙ (𝑝𝑁𝑝 = 𝑟)) ∧ 𝑞 ∈ ℙ) → 𝑃𝑁)
9816adantr 480 . . . . . . . . . . . . . . . . 17 ((((𝜑𝑟 ∈ ℙ) ∧ ∀𝑝 ∈ ℙ (𝑝𝑁𝑝 = 𝑟)) ∧ 𝑞 ∈ ℙ) → 𝑃 ∈ ℙ)
996, 83, 98rspcdva 3574 . . . . . . . . . . . . . . . 16 ((((𝜑𝑟 ∈ ℙ) ∧ ∀𝑝 ∈ ℙ (𝑝𝑁𝑝 = 𝑟)) ∧ 𝑞 ∈ ℙ) → (𝑃𝑁𝑃 = 𝑟))
10099biimpd 229 . . . . . . . . . . . . . . 15 ((((𝜑𝑟 ∈ ℙ) ∧ ∀𝑝 ∈ ℙ (𝑝𝑁𝑝 = 𝑟)) ∧ 𝑞 ∈ ℙ) → (𝑃𝑁𝑃 = 𝑟))
10197, 100mpd 15 . . . . . . . . . . . . . 14 ((((𝜑𝑟 ∈ ℙ) ∧ ∀𝑝 ∈ ℙ (𝑝𝑁𝑝 = 𝑟)) ∧ 𝑞 ∈ ℙ) → 𝑃 = 𝑟)
102101adantr 480 . . . . . . . . . . . . 13 (((((𝜑𝑟 ∈ ℙ) ∧ ∀𝑝 ∈ ℙ (𝑝𝑁𝑝 = 𝑟)) ∧ 𝑞 ∈ ℙ) ∧ ¬ 𝑞 = 𝑟) → 𝑃 = 𝑟)
103102eqcomd 2739 . . . . . . . . . . . 12 (((((𝜑𝑟 ∈ ℙ) ∧ ∀𝑝 ∈ ℙ (𝑝𝑁𝑝 = 𝑟)) ∧ 𝑞 ∈ ℙ) ∧ ¬ 𝑞 = 𝑟) → 𝑟 = 𝑃)
10496, 103neeqtrd 2998 . . . . . . . . . . 11 (((((𝜑𝑟 ∈ ℙ) ∧ ∀𝑝 ∈ ℙ (𝑝𝑁𝑝 = 𝑟)) ∧ 𝑞 ∈ ℙ) ∧ ¬ 𝑞 = 𝑟) → 𝑞𝑃)
105104neneqd 2934 . . . . . . . . . 10 (((((𝜑𝑟 ∈ ℙ) ∧ ∀𝑝 ∈ ℙ (𝑝𝑁𝑝 = 𝑟)) ∧ 𝑞 ∈ ℙ) ∧ ¬ 𝑞 = 𝑟) → ¬ 𝑞 = 𝑃)
106 prmuz2 16609 . . . . . . . . . . . . 13 (𝑞 ∈ ℙ → 𝑞 ∈ (ℤ‘2))
107106adantl 481 . . . . . . . . . . . 12 ((((𝜑𝑟 ∈ ℙ) ∧ ∀𝑝 ∈ ℙ (𝑝𝑁𝑝 = 𝑟)) ∧ 𝑞 ∈ ℙ) → 𝑞 ∈ (ℤ‘2))
108107adantr 480 . . . . . . . . . . 11 (((((𝜑𝑟 ∈ ℙ) ∧ ∀𝑝 ∈ ℙ (𝑝𝑁𝑝 = 𝑟)) ∧ 𝑞 ∈ ℙ) ∧ ¬ 𝑞 = 𝑟) → 𝑞 ∈ (ℤ‘2))
10916ad2antrr 726 . . . . . . . . . . 11 (((((𝜑𝑟 ∈ ℙ) ∧ ∀𝑝 ∈ ℙ (𝑝𝑁𝑝 = 𝑟)) ∧ 𝑞 ∈ ℙ) ∧ ¬ 𝑞 = 𝑟) → 𝑃 ∈ ℙ)
110 dvdsprm 16616 . . . . . . . . . . 11 ((𝑞 ∈ (ℤ‘2) ∧ 𝑃 ∈ ℙ) → (𝑞𝑃𝑞 = 𝑃))
111108, 109, 110syl2anc 584 . . . . . . . . . 10 (((((𝜑𝑟 ∈ ℙ) ∧ ∀𝑝 ∈ ℙ (𝑝𝑁𝑝 = 𝑟)) ∧ 𝑞 ∈ ℙ) ∧ ¬ 𝑞 = 𝑟) → (𝑞𝑃𝑞 = 𝑃))
112105, 111mtbird 325 . . . . . . . . 9 (((((𝜑𝑟 ∈ ℙ) ∧ ∀𝑝 ∈ ℙ (𝑝𝑁𝑝 = 𝑟)) ∧ 𝑞 ∈ ℙ) ∧ ¬ 𝑞 = 𝑟) → ¬ 𝑞𝑃)
11351ad4antr 732 . . . . . . . . . . 11 (((((𝜑𝑟 ∈ ℙ) ∧ ∀𝑝 ∈ ℙ (𝑝𝑁𝑝 = 𝑟)) ∧ 𝑞 ∈ ℙ) ∧ ¬ 𝑞 = 𝑟) → 𝑃 ∈ ℕ)
114113nnzd 12501 . . . . . . . . . 10 (((((𝜑𝑟 ∈ ℙ) ∧ ∀𝑝 ∈ ℙ (𝑝𝑁𝑝 = 𝑟)) ∧ 𝑞 ∈ ℙ) ∧ ¬ 𝑞 = 𝑟) → 𝑃 ∈ ℤ)
11541adantr 480 . . . . . . . . . . . . 13 ((𝜑𝑟 ∈ ℙ) → (𝑃 pCnt 𝑁) ∈ ℕ)
116115adantr 480 . . . . . . . . . . . 12 (((𝜑𝑟 ∈ ℙ) ∧ ∀𝑝 ∈ ℙ (𝑝𝑁𝑝 = 𝑟)) → (𝑃 pCnt 𝑁) ∈ ℕ)
117116adantr 480 . . . . . . . . . . 11 ((((𝜑𝑟 ∈ ℙ) ∧ ∀𝑝 ∈ ℙ (𝑝𝑁𝑝 = 𝑟)) ∧ 𝑞 ∈ ℙ) → (𝑃 pCnt 𝑁) ∈ ℕ)
118117adantr 480 . . . . . . . . . 10 (((((𝜑𝑟 ∈ ℙ) ∧ ∀𝑝 ∈ ℙ (𝑝𝑁𝑝 = 𝑟)) ∧ 𝑞 ∈ ℙ) ∧ ¬ 𝑞 = 𝑟) → (𝑃 pCnt 𝑁) ∈ ℕ)
119 prmdvdsexp 16628 . . . . . . . . . 10 ((𝑞 ∈ ℙ ∧ 𝑃 ∈ ℤ ∧ (𝑃 pCnt 𝑁) ∈ ℕ) → (𝑞 ∥ (𝑃↑(𝑃 pCnt 𝑁)) ↔ 𝑞𝑃))
12089, 114, 118, 119syl3anc 1373 . . . . . . . . 9 (((((𝜑𝑟 ∈ ℙ) ∧ ∀𝑝 ∈ ℙ (𝑝𝑁𝑝 = 𝑟)) ∧ 𝑞 ∈ ℙ) ∧ ¬ 𝑞 = 𝑟) → (𝑞 ∥ (𝑃↑(𝑃 pCnt 𝑁)) ↔ 𝑞𝑃))
121112, 120mtbird 325 . . . . . . . 8 (((((𝜑𝑟 ∈ ℙ) ∧ ∀𝑝 ∈ ℙ (𝑝𝑁𝑝 = 𝑟)) ∧ 𝑞 ∈ ℙ) ∧ ¬ 𝑞 = 𝑟) → ¬ 𝑞 ∥ (𝑃↑(𝑃 pCnt 𝑁)))
122109, 91pccld 16764 . . . . . . . . . 10 (((((𝜑𝑟 ∈ ℙ) ∧ ∀𝑝 ∈ ℙ (𝑝𝑁𝑝 = 𝑟)) ∧ 𝑞 ∈ ℙ) ∧ ¬ 𝑞 = 𝑟) → (𝑃 pCnt 𝑁) ∈ ℕ0)
123113, 122nnexpcld 14154 . . . . . . . . 9 (((((𝜑𝑟 ∈ ℙ) ∧ ∀𝑝 ∈ ℙ (𝑝𝑁𝑝 = 𝑟)) ∧ 𝑞 ∈ ℙ) ∧ ¬ 𝑞 = 𝑟) → (𝑃↑(𝑃 pCnt 𝑁)) ∈ ℕ)
124 pceq0 16785 . . . . . . . . 9 ((𝑞 ∈ ℙ ∧ (𝑃↑(𝑃 pCnt 𝑁)) ∈ ℕ) → ((𝑞 pCnt (𝑃↑(𝑃 pCnt 𝑁))) = 0 ↔ ¬ 𝑞 ∥ (𝑃↑(𝑃 pCnt 𝑁))))
12589, 123, 124syl2anc 584 . . . . . . . 8 (((((𝜑𝑟 ∈ ℙ) ∧ ∀𝑝 ∈ ℙ (𝑝𝑁𝑝 = 𝑟)) ∧ 𝑞 ∈ ℙ) ∧ ¬ 𝑞 = 𝑟) → ((𝑞 pCnt (𝑃↑(𝑃 pCnt 𝑁))) = 0 ↔ ¬ 𝑞 ∥ (𝑃↑(𝑃 pCnt 𝑁))))
126121, 125mpbird 257 . . . . . . 7 (((((𝜑𝑟 ∈ ℙ) ∧ ∀𝑝 ∈ ℙ (𝑝𝑁𝑝 = 𝑟)) ∧ 𝑞 ∈ ℙ) ∧ ¬ 𝑞 = 𝑟) → (𝑞 pCnt (𝑃↑(𝑃 pCnt 𝑁))) = 0)
127126eqcomd 2739 . . . . . 6 (((((𝜑𝑟 ∈ ℙ) ∧ ∀𝑝 ∈ ℙ (𝑝𝑁𝑝 = 𝑟)) ∧ 𝑞 ∈ ℙ) ∧ ¬ 𝑞 = 𝑟) → 0 = (𝑞 pCnt (𝑃↑(𝑃 pCnt 𝑁))))
12894, 127eqtrd 2768 . . . . 5 (((((𝜑𝑟 ∈ ℙ) ∧ ∀𝑝 ∈ ℙ (𝑝𝑁𝑝 = 𝑟)) ∧ 𝑞 ∈ ℙ) ∧ ¬ 𝑞 = 𝑟) → (𝑞 pCnt 𝑁) = (𝑞 pCnt (𝑃↑(𝑃 pCnt 𝑁))))
12979, 128pm2.61dan 812 . . . 4 ((((𝜑𝑟 ∈ ℙ) ∧ ∀𝑝 ∈ ℙ (𝑝𝑁𝑝 = 𝑟)) ∧ 𝑞 ∈ ℙ) → (𝑞 pCnt 𝑁) = (𝑞 pCnt (𝑃↑(𝑃 pCnt 𝑁))))
130129ralrimiva 3125 . . 3 (((𝜑𝑟 ∈ ℙ) ∧ ∀𝑝 ∈ ℙ (𝑝𝑁𝑝 = 𝑟)) → ∀𝑞 ∈ ℙ (𝑞 pCnt 𝑁) = (𝑞 pCnt (𝑃↑(𝑃 pCnt 𝑁))))
131 aks6d1c7.1 . . . . 5 = {⟨𝑒, 𝑓⟩ ∣ (𝑒 ∈ ℕ ∧ 𝑓 ∈ (Base‘(Poly1𝐾)) ∧ ∀𝑦 ∈ ((mulGrp‘𝐾) PrimRoots 𝑅)(𝑒(.g‘(mulGrp‘𝐾))(((eval1𝐾)‘𝑓)‘𝑦)) = (((eval1𝐾)‘𝑓)‘(𝑒(.g‘(mulGrp‘𝐾))𝑦)))}
132 aks6d1c7.2 . . . . 5 𝑃 = (chr‘𝐾)
133 aks6d1c7.3 . . . . 5 (𝜑𝐾 ∈ Field)
134 aks6d1c7.5 . . . . 5 (𝜑𝑅 ∈ ℕ)
135 aks6d1c7.8 . . . . 5 (𝜑 → (𝑁 gcd 𝑅) = 1)
136 aks6d1c7.9 . . . . 5 𝐴 = (⌊‘((√‘(ϕ‘𝑅)) · (2 logb 𝑁)))
137 aks6d1c7.10 . . . . 5 (𝜑 → ((2 logb 𝑁)↑2) < ((od𝑅)‘𝑁))
138 aks6d1c7.11 . . . . 5 (𝜑 → (𝑥 ∈ (Base‘𝐾) ↦ (𝑃(.g‘(mulGrp‘𝐾))𝑥)) ∈ (𝐾 RingIso 𝐾))
139 aks6d1c7.12 . . . . 5 (𝜑𝑀 ∈ ((mulGrp‘𝐾) PrimRoots 𝑅))
140 aks6d1c7.13 . . . . 5 (𝜑 → ∀𝑏 ∈ (1...𝐴)(𝑏 gcd 𝑁) = 1)
141 aks6d1c7.14 . . . . 5 (𝜑 → ∀𝑎 ∈ (1...𝐴)𝑁 ((var1𝐾)(+g‘(Poly1𝐾))((algSc‘(Poly1𝐾))‘((ℤRHom‘𝐾)‘𝑎))))
142131, 132, 133, 15, 134, 24, 2, 135, 136, 137, 138, 139, 140, 141aks6d1c7lem4 42296 . . . 4 (𝜑 → ∃!𝑝 ∈ ℙ 𝑝𝑁)
143 reu6 3681 . . . 4 (∃!𝑝 ∈ ℙ 𝑝𝑁 ↔ ∃𝑟 ∈ ℙ ∀𝑝 ∈ ℙ (𝑝𝑁𝑝 = 𝑟))
144142, 143sylib 218 . . 3 (𝜑 → ∃𝑟 ∈ ℙ ∀𝑝 ∈ ℙ (𝑝𝑁𝑝 = 𝑟))
145130, 144r19.29a 3141 . 2 (𝜑 → ∀𝑞 ∈ ℙ (𝑞 pCnt 𝑁) = (𝑞 pCnt (𝑃↑(𝑃 pCnt 𝑁))))
14638nnnn0d 12449 . . 3 (𝜑𝑁 ∈ ℕ0)
14751nnnn0d 12449 . . . 4 (𝜑𝑃 ∈ ℕ0)
14815, 38pccld 16764 . . . 4 (𝜑 → (𝑃 pCnt 𝑁) ∈ ℕ0)
149147, 148nn0expcld 14155 . . 3 (𝜑 → (𝑃↑(𝑃 pCnt 𝑁)) ∈ ℕ0)
150 pc11 16794 . . 3 ((𝑁 ∈ ℕ0 ∧ (𝑃↑(𝑃 pCnt 𝑁)) ∈ ℕ0) → (𝑁 = (𝑃↑(𝑃 pCnt 𝑁)) ↔ ∀𝑞 ∈ ℙ (𝑞 pCnt 𝑁) = (𝑞 pCnt (𝑃↑(𝑃 pCnt 𝑁)))))
151146, 149, 150syl2anc 584 . 2 (𝜑 → (𝑁 = (𝑃↑(𝑃 pCnt 𝑁)) ↔ ∀𝑞 ∈ ℙ (𝑞 pCnt 𝑁) = (𝑞 pCnt (𝑃↑(𝑃 pCnt 𝑁)))))
152145, 151mpbird 257 1 (𝜑𝑁 = (𝑃↑(𝑃 pCnt 𝑁)))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 206  wa 395  w3a 1086   = wceq 1541  wcel 2113  wne 2929  wral 3048  wrex 3057  ∃!wreu 3345   class class class wbr 5093  {copab 5155  cmpt 5174  cfv 6486  (class class class)co 7352  cr 11012  0cc0 11013  1c1 11014   · cmul 11018   < clt 11153  cle 11154  cn 12132  2c2 12187  3c3 12188  0cn0 12388  cz 12475  cuz 12738  cq 12848  ...cfz 13409  cfl 13696  cexp 13970  csqrt 15142  cdvds 16165   gcd cgcd 16407  cprime 16584  odcodz 16676  ϕcphi 16677   pCnt cpc 16750  Basecbs 17122  +gcplusg 17163  .gcmg 18982  mulGrpcmgp 20060   RingIso crs 20390  Fieldcfield 20647  ℤRHomczrh 21438  chrcchr 21440  algSccascl 21791  var1cv1 22089  Poly1cpl1 22090  eval1ce1 22230   logb clogb 26702   PrimRoots cprimroots 42204
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1796  ax-4 1810  ax-5 1911  ax-6 1968  ax-7 2009  ax-8 2115  ax-9 2123  ax-10 2146  ax-11 2162  ax-12 2182  ax-ext 2705  ax-rep 5219  ax-sep 5236  ax-nul 5246  ax-pow 5305  ax-pr 5372  ax-un 7674  ax-inf2 9538  ax-cnex 11069  ax-resscn 11070  ax-1cn 11071  ax-icn 11072  ax-addcl 11073  ax-addrcl 11074  ax-mulcl 11075  ax-mulrcl 11076  ax-mulcom 11077  ax-addass 11078  ax-mulass 11079  ax-distr 11080  ax-i2m1 11081  ax-1ne0 11082  ax-1rid 11083  ax-rnegex 11084  ax-rrecex 11085  ax-cnre 11086  ax-pre-lttri 11087  ax-pre-lttrn 11088  ax-pre-ltadd 11089  ax-pre-mulgt0 11090  ax-pre-sup 11091  ax-addf 11092  ax-mulf 11093
This theorem depends on definitions:  df-bi 207  df-an 396  df-or 848  df-3or 1087  df-3an 1088  df-tru 1544  df-fal 1554  df-ex 1781  df-nf 1785  df-sb 2068  df-mo 2537  df-eu 2566  df-clab 2712  df-cleq 2725  df-clel 2808  df-nfc 2882  df-ne 2930  df-nel 3034  df-ral 3049  df-rex 3058  df-rmo 3347  df-reu 3348  df-rab 3397  df-v 3439  df-sbc 3738  df-csb 3847  df-dif 3901  df-un 3903  df-in 3905  df-ss 3915  df-pss 3918  df-nul 4283  df-if 4475  df-pw 4551  df-sn 4576  df-pr 4578  df-tp 4580  df-op 4582  df-uni 4859  df-int 4898  df-iun 4943  df-iin 4944  df-br 5094  df-opab 5156  df-mpt 5175  df-tr 5201  df-id 5514  df-eprel 5519  df-po 5527  df-so 5528  df-fr 5572  df-se 5573  df-we 5574  df-xp 5625  df-rel 5626  df-cnv 5627  df-co 5628  df-dm 5629  df-rn 5630  df-res 5631  df-ima 5632  df-pred 6253  df-ord 6314  df-on 6315  df-lim 6316  df-suc 6317  df-iota 6442  df-fun 6488  df-fn 6489  df-f 6490  df-f1 6491  df-fo 6492  df-f1o 6493  df-fv 6494  df-isom 6495  df-riota 7309  df-ov 7355  df-oprab 7356  df-mpo 7357  df-of 7616  df-ofr 7617  df-om 7803  df-1st 7927  df-2nd 7928  df-supp 8097  df-tpos 8162  df-frecs 8217  df-wrecs 8248  df-recs 8297  df-rdg 8335  df-1o 8391  df-2o 8392  df-oadd 8395  df-er 8628  df-ec 8630  df-qs 8634  df-map 8758  df-pm 8759  df-ixp 8828  df-en 8876  df-dom 8877  df-sdom 8878  df-fin 8879  df-fsupp 9253  df-fi 9302  df-sup 9333  df-inf 9334  df-oi 9403  df-dju 9801  df-card 9839  df-pnf 11155  df-mnf 11156  df-xr 11157  df-ltxr 11158  df-le 11159  df-sub 11353  df-neg 11354  df-div 11782  df-nn 12133  df-2 12195  df-3 12196  df-4 12197  df-5 12198  df-6 12199  df-7 12200  df-8 12201  df-9 12202  df-n0 12389  df-xnn0 12462  df-z 12476  df-dec 12595  df-uz 12739  df-q 12849  df-rp 12893  df-xneg 13013  df-xadd 13014  df-xmul 13015  df-ioo 13251  df-ioc 13252  df-ico 13253  df-icc 13254  df-fz 13410  df-fzo 13557  df-fl 13698  df-mod 13776  df-seq 13911  df-exp 13971  df-fac 14183  df-bc 14212  df-hash 14240  df-shft 14976  df-cj 15008  df-re 15009  df-im 15010  df-sqrt 15144  df-abs 15145  df-limsup 15380  df-clim 15397  df-rlim 15398  df-sum 15596  df-prod 15813  df-fallfac 15916  df-ef 15976  df-sin 15978  df-cos 15979  df-pi 15981  df-dvds 16166  df-gcd 16408  df-prm 16585  df-odz 16678  df-phi 16679  df-pc 16751  df-struct 17060  df-sets 17077  df-slot 17095  df-ndx 17107  df-base 17123  df-ress 17144  df-plusg 17176  df-mulr 17177  df-starv 17178  df-sca 17179  df-vsca 17180  df-ip 17181  df-tset 17182  df-ple 17183  df-ds 17185  df-unif 17186  df-hom 17187  df-cco 17188  df-rest 17328  df-topn 17329  df-0g 17347  df-gsum 17348  df-topgen 17349  df-pt 17350  df-prds 17353  df-pws 17355  df-xrs 17408  df-qtop 17413  df-imas 17414  df-qus 17415  df-xps 17416  df-mre 17490  df-mrc 17491  df-acs 17493  df-mgm 18550  df-sgrp 18629  df-mnd 18645  df-mhm 18693  df-submnd 18694  df-grp 18851  df-minusg 18852  df-sbg 18853  df-mulg 18983  df-subg 19038  df-nsg 19039  df-eqg 19040  df-ghm 19127  df-gim 19173  df-cntz 19231  df-od 19442  df-cmn 19696  df-abl 19697  df-mgp 20061  df-rng 20073  df-ur 20102  df-srg 20107  df-ring 20155  df-cring 20156  df-oppr 20257  df-dvdsr 20277  df-unit 20278  df-invr 20308  df-dvr 20321  df-rhm 20392  df-rim 20393  df-nzr 20430  df-subrng 20463  df-subrg 20487  df-rlreg 20611  df-domn 20612  df-idom 20613  df-drng 20648  df-field 20649  df-lmod 20797  df-lss 20867  df-lsp 20907  df-sra 21109  df-rgmod 21110  df-lidl 21147  df-rsp 21148  df-2idl 21189  df-psmet 21285  df-xmet 21286  df-met 21287  df-bl 21288  df-mopn 21289  df-fbas 21290  df-fg 21291  df-cnfld 21294  df-zring 21386  df-zrh 21442  df-chr 21444  df-zn 21445  df-assa 21792  df-asp 21793  df-ascl 21794  df-psr 21848  df-mvr 21849  df-mpl 21850  df-opsr 21852  df-evls 22010  df-evl 22011  df-psr1 22093  df-vr1 22094  df-ply1 22095  df-coe1 22096  df-evl1 22232  df-top 22810  df-topon 22827  df-topsp 22849  df-bases 22862  df-cld 22935  df-ntr 22936  df-cls 22937  df-nei 23014  df-lp 23052  df-perf 23053  df-cn 23143  df-cnp 23144  df-haus 23231  df-tx 23478  df-hmeo 23671  df-fil 23762  df-fm 23854  df-flim 23855  df-flf 23856  df-xms 24236  df-ms 24237  df-tms 24238  df-cncf 24799  df-limc 25795  df-dv 25796  df-mdeg 25988  df-deg1 25989  df-mon1 26064  df-uc1p 26065  df-q1p 26066  df-r1p 26067  df-log 26493  df-cxp 26494  df-logb 26703  df-primroots 42205
This theorem is referenced by:  aks5lem6  42305
  Copyright terms: Public domain W3C validator