Metamath Proof Explorer


Theorem 2sqr3nconstr

Description: Doubling the cube is an impossible construction, i.e. the cube root of 2 is not constructible with straightedge and compass. Given a cube of edge of length one, a cube of double volume would have an edge of length ( 2 ^c ( 1 / 3 ) ) , however that number is not constructible. This is the first part of Metamath 100 proof #8. Theorem 7.13 of Stewart p. 99. (Contributed by Thierry Arnoux and Saveliy Skresanov, 26-Oct-2025)

Ref Expression
Assertion 2sqr3nconstr ⊢ 2 1 3 ∉ Constr

Proof

Step Hyp Ref Expression
1 eqid ⊢ deg 1 ⁡ ℂ fld ↾ 𝑠 ℚ = deg 1 ⁡ ℂ fld ↾ 𝑠 ℚ
2 eqid ⊢ ℂ fld minPoly ℚ = ℂ fld minPoly ℚ
3 2cnd ⊢ ⊤ → 2 ∈ ℂ
4 3cn ⊢ 3 ∈ ℂ
5 3ne0 ⊢ 3 ≠ 0
6 4 5 reccli ⊢ 1 3 ∈ ℂ
7 6 a1i ⊢ ⊤ → 1 3 ∈ ℂ
8 3 7 cxpcld ⊢ ⊤ → 2 1 3 ∈ ℂ
9 eqidd ⊢ ⊤ → ℂ fld minPoly ℚ ⁡ 2 1 3 = ℂ fld minPoly ℚ ⁡ 2 1 3
10 eqid ⊢ ℂ fld ↾ 𝑠 ℚ = ℂ fld ↾ 𝑠 ℚ
11 eqid ⊢ - Poly 1 ⁡ ℂ fld ↾ 𝑠 ℚ = - Poly 1 ⁡ ℂ fld ↾ 𝑠 ℚ
12 eqid ⊢ ⋅ mulGrp Poly 1 ⁡ ℂ fld ↾ 𝑠 ℚ = ⋅ mulGrp Poly 1 ⁡ ℂ fld ↾ 𝑠 ℚ
13 eqid ⊢ Poly 1 ⁡ ℂ fld ↾ 𝑠 ℚ = Poly 1 ⁡ ℂ fld ↾ 𝑠 ℚ
14 eqid ⊢ algSc ⁡ Poly 1 ⁡ ℂ fld ↾ 𝑠 ℚ = algSc ⁡ Poly 1 ⁡ ℂ fld ↾ 𝑠 ℚ
15 eqid ⊢ var 1 ⁡ ℂ fld ↾ 𝑠 ℚ = var 1 ⁡ ℂ fld ↾ 𝑠 ℚ
16 eqid ⊢ 3 ⋅ mulGrp Poly 1 ⁡ ℂ fld ↾ 𝑠 ℚ var 1 ⁡ ℂ fld ↾ 𝑠 ℚ - Poly 1 ⁡ ℂ fld ↾ 𝑠 ℚ algSc ⁡ Poly 1 ⁡ ℂ fld ↾ 𝑠 ℚ ⁡ 2 = 3 ⋅ mulGrp Poly 1 ⁡ ℂ fld ↾ 𝑠 ℚ var 1 ⁡ ℂ fld ↾ 𝑠 ℚ - Poly 1 ⁡ ℂ fld ↾ 𝑠 ℚ algSc ⁡ Poly 1 ⁡ ℂ fld ↾ 𝑠 ℚ ⁡ 2
17 eqid ⊢ 2 1 3 = 2 1 3
18 10 11 12 13 14 15 1 16 17 2 2sqr3minply ⊢ 3 ⋅ mulGrp Poly 1 ⁡ ℂ fld ↾ 𝑠 ℚ var 1 ⁡ ℂ fld ↾ 𝑠 ℚ - Poly 1 ⁡ ℂ fld ↾ 𝑠 ℚ algSc ⁡ Poly 1 ⁡ ℂ fld ↾ 𝑠 ℚ ⁡ 2 = ℂ fld minPoly ℚ ⁡ 2 1 3 ∧ deg 1 ⁡ ℂ fld ↾ 𝑠 ℚ ⁡ 3 ⋅ mulGrp Poly 1 ⁡ ℂ fld ↾ 𝑠 ℚ var 1 ⁡ ℂ fld ↾ 𝑠 ℚ - Poly 1 ⁡ ℂ fld ↾ 𝑠 ℚ algSc ⁡ Poly 1 ⁡ ℂ fld ↾ 𝑠 ℚ ⁡ 2 = 3
19 18 simpli ⊢ 3 ⋅ mulGrp Poly 1 ⁡ ℂ fld ↾ 𝑠 ℚ var 1 ⁡ ℂ fld ↾ 𝑠 ℚ - Poly 1 ⁡ ℂ fld ↾ 𝑠 ℚ algSc ⁡ Poly 1 ⁡ ℂ fld ↾ 𝑠 ℚ ⁡ 2 = ℂ fld minPoly ℚ ⁡ 2 1 3
20 19 fveq2i ⊢ deg 1 ⁡ ℂ fld ↾ 𝑠 ℚ ⁡ 3 ⋅ mulGrp Poly 1 ⁡ ℂ fld ↾ 𝑠 ℚ var 1 ⁡ ℂ fld ↾ 𝑠 ℚ - Poly 1 ⁡ ℂ fld ↾ 𝑠 ℚ algSc ⁡ Poly 1 ⁡ ℂ fld ↾ 𝑠 ℚ ⁡ 2 = deg 1 ⁡ ℂ fld ↾ 𝑠 ℚ ⁡ ℂ fld minPoly ℚ ⁡ 2 1 3
21 18 simpri ⊢ deg 1 ⁡ ℂ fld ↾ 𝑠 ℚ ⁡ 3 ⋅ mulGrp Poly 1 ⁡ ℂ fld ↾ 𝑠 ℚ var 1 ⁡ ℂ fld ↾ 𝑠 ℚ - Poly 1 ⁡ ℂ fld ↾ 𝑠 ℚ algSc ⁡ Poly 1 ⁡ ℂ fld ↾ 𝑠 ℚ ⁡ 2 = 3
22 20 21 eqtr3i ⊢ deg 1 ⁡ ℂ fld ↾ 𝑠 ℚ ⁡ ℂ fld minPoly ℚ ⁡ 2 1 3 = 3
23 3nn0 ⊢ 3 ∈ ℕ 0
24 22 23 eqeltri ⊢ deg 1 ⁡ ℂ fld ↾ 𝑠 ℚ ⁡ ℂ fld minPoly ℚ ⁡ 2 1 3 ∈ ℕ 0
25 24 a1i ⊢ ⊤ → deg 1 ⁡ ℂ fld ↾ 𝑠 ℚ ⁡ ℂ fld minPoly ℚ ⁡ 2 1 3 ∈ ℕ 0
26 22 a1i ⊢ n ∈ ℕ 0 → deg 1 ⁡ ℂ fld ↾ 𝑠 ℚ ⁡ ℂ fld minPoly ℚ ⁡ 2 1 3 = 3
27 3z ⊢ 3 ∈ ℤ
28 iddvds ⊢ 3 ∈ ℤ → 3 ∥ 3
29 27 28 ax-mp ⊢ 3 ∥ 3
30 simpr ⊢ n ∈ ℕ 0 ∧ 3 = 2 n → 3 = 2 n
31 29 30 breqtrid ⊢ n ∈ ℕ 0 ∧ 3 = 2 n → 3 ∥ 2 n
32 3prm ⊢ 3 ∈ ℙ
33 2prm ⊢ 2 ∈ ℙ
34 prmdvdsexpr ⊢ 3 ∈ ℙ ∧ 2 ∈ ℙ ∧ n ∈ ℕ 0 → 3 ∥ 2 n → 3 = 2
35 32 33 34 mp3an12 ⊢ n ∈ ℕ 0 → 3 ∥ 2 n → 3 = 2
36 35 imp ⊢ n ∈ ℕ 0 ∧ 3 ∥ 2 n → 3 = 2
37 31 36 syldan ⊢ n ∈ ℕ 0 ∧ 3 = 2 n → 3 = 2
38 2re ⊢ 2 ∈ ℝ
39 2lt3 ⊢ 2 < 3
40 38 39 gtneii ⊢ 3 ≠ 2
41 40 neii ⊢ ¬ 3 = 2
42 41 a1i ⊢ n ∈ ℕ 0 ∧ 3 = 2 n → ¬ 3 = 2
43 37 42 pm2.65da ⊢ n ∈ ℕ 0 → ¬ 3 = 2 n
44 43 neqned ⊢ n ∈ ℕ 0 → 3 ≠ 2 n
45 26 44 eqnetrd ⊢ n ∈ ℕ 0 → deg 1 ⁡ ℂ fld ↾ 𝑠 ℚ ⁡ ℂ fld minPoly ℚ ⁡ 2 1 3 ≠ 2 n
46 45 adantl ⊢ ⊤ ∧ n ∈ ℕ 0 → deg 1 ⁡ ℂ fld ↾ 𝑠 ℚ ⁡ ℂ fld minPoly ℚ ⁡ 2 1 3 ≠ 2 n
47 1 2 8 9 25 46 constrcon ⊢ ⊤ → ¬ 2 1 3 ∈ Constr
48 47 mptru ⊢ ¬ 2 1 3 ∈ Constr
49 48 nelir ⊢ 2 1 3 ∉ Constr