Metamath Proof Explorer


Theorem preimaaa

Description: An element of the preimage of the algebraic numbers by a nonconstant polynomial is an algebraic number. (Contributed by SN, 30-Aug-2026)

Ref Expression
Hypotheses preimaaa.f ⊢ φ → F ∈ Poly ⁡ ℚ
preimaaa.0 ⊢ φ → deg ⁡ F ≠ 0
preimaaa.a ⊢ φ → A ∈ ℂ
preimaaa.1 ⊢ φ → F ⁡ A ∈ 𝔸
Assertion preimaaa ⊢ φ → A ∈ 𝔸

Proof

Step Hyp Ref Expression
1 preimaaa.f ⊢ φ → F ∈ Poly ⁡ ℚ
2 preimaaa.0 ⊢ φ → deg ⁡ F ≠ 0
3 preimaaa.a ⊢ φ → A ∈ ℂ
4 preimaaa.1 ⊢ φ → F ⁡ A ∈ 𝔸
5 elqaa ⊢ F ⁡ A ∈ 𝔸 ↔ F ⁡ A ∈ ℂ ∧ ∃ g ∈ Poly ⁡ ℚ ∖ 0 𝑝 g ⁡ F ⁡ A = 0
6 5 simprbi ⊢ F ⁡ A ∈ 𝔸 → ∃ g ∈ Poly ⁡ ℚ ∖ 0 𝑝 g ⁡ F ⁡ A = 0
7 4 6 syl ⊢ φ → ∃ g ∈ Poly ⁡ ℚ ∖ 0 𝑝 g ⁡ F ⁡ A = 0
8 fveq1 ⊢ f = g ∘ F → f ⁡ A = g ∘ F ⁡ A
9 8 eqeq1d ⊢ f = g ∘ F → f ⁡ A = 0 ↔ g ∘ F ⁡ A = 0
10 eldifi ⊢ g ∈ Poly ⁡ ℚ ∖ 0 𝑝 → g ∈ Poly ⁡ ℚ
11 10 ad2antrl ⊢ φ ∧ g ∈ Poly ⁡ ℚ ∖ 0 𝑝 ∧ g ⁡ F ⁡ A = 0 → g ∈ Poly ⁡ ℚ
12 1 adantr ⊢ φ ∧ g ∈ Poly ⁡ ℚ ∖ 0 𝑝 ∧ g ⁡ F ⁡ A = 0 → F ∈ Poly ⁡ ℚ
13 qaddcl ⊢ a ∈ ℚ ∧ b ∈ ℚ → a + b ∈ ℚ
14 13 adantl ⊢ φ ∧ g ∈ Poly ⁡ ℚ ∖ 0 𝑝 ∧ g ⁡ F ⁡ A = 0 ∧ a ∈ ℚ ∧ b ∈ ℚ → a + b ∈ ℚ
15 qmulcl ⊢ a ∈ ℚ ∧ b ∈ ℚ → a ⁢ b ∈ ℚ
16 15 adantl ⊢ φ ∧ g ∈ Poly ⁡ ℚ ∖ 0 𝑝 ∧ g ⁡ F ⁡ A = 0 ∧ a ∈ ℚ ∧ b ∈ ℚ → a ⁢ b ∈ ℚ
17 11 12 14 16 plyco ⊢ φ ∧ g ∈ Poly ⁡ ℚ ∖ 0 𝑝 ∧ g ⁡ F ⁡ A = 0 → g ∘ F ∈ Poly ⁡ ℚ
18 eldifsni ⊢ g ∈ Poly ⁡ ℚ ∖ 0 𝑝 → g ≠ 0 𝑝
19 18 ad2antrl ⊢ φ ∧ g ∈ Poly ⁡ ℚ ∖ 0 𝑝 ∧ g ⁡ F ⁡ A = 0 → g ≠ 0 𝑝
20 2 adantr ⊢ φ ∧ g ∈ Poly ⁡ ℚ ∖ 0 𝑝 ∧ g ⁡ F ⁡ A = 0 → deg ⁡ F ≠ 0
21 11 12 19 20 plyconz ⊢ φ ∧ g ∈ Poly ⁡ ℚ ∖ 0 𝑝 ∧ g ⁡ F ⁡ A = 0 → g ∘ F ≠ 0 𝑝
22 17 21 eldifsnd ⊢ φ ∧ g ∈ Poly ⁡ ℚ ∖ 0 𝑝 ∧ g ⁡ F ⁡ A = 0 → g ∘ F ∈ Poly ⁡ ℚ ∖ 0 𝑝
23 plyf ⊢ F ∈ Poly ⁡ ℚ → F : ℂ ⟶ ℂ
24 1 23 syl ⊢ φ → F : ℂ ⟶ ℂ
25 24 3 fvco3d ⊢ φ → g ∘ F ⁡ A = g ⁡ F ⁡ A
26 25 adantr ⊢ φ ∧ g ∈ Poly ⁡ ℚ ∖ 0 𝑝 → g ∘ F ⁡ A = g ⁡ F ⁡ A
27 26 eqeq1d ⊢ φ ∧ g ∈ Poly ⁡ ℚ ∖ 0 𝑝 → g ∘ F ⁡ A = 0 ↔ g ⁡ F ⁡ A = 0
28 27 biimprd ⊢ φ ∧ g ∈ Poly ⁡ ℚ ∖ 0 𝑝 → g ⁡ F ⁡ A = 0 → g ∘ F ⁡ A = 0
29 28 impr ⊢ φ ∧ g ∈ Poly ⁡ ℚ ∖ 0 𝑝 ∧ g ⁡ F ⁡ A = 0 → g ∘ F ⁡ A = 0
30 9 22 29 rspcedvdw ⊢ φ ∧ g ∈ Poly ⁡ ℚ ∖ 0 𝑝 ∧ g ⁡ F ⁡ A = 0 → ∃ f ∈ Poly ⁡ ℚ ∖ 0 𝑝 f ⁡ A = 0
31 7 30 rexlimddv ⊢ φ → ∃ f ∈ Poly ⁡ ℚ ∖ 0 𝑝 f ⁡ A = 0
32 elqaa ⊢ A ∈ 𝔸 ↔ A ∈ ℂ ∧ ∃ f ∈ Poly ⁡ ℚ ∖ 0 𝑝 f ⁡ A = 0
33 3 31 32 sylanbrc ⊢ φ → A ∈ 𝔸