Theorem elqaa 26646

Description: The set of numbers generated by the roots of polynomials in the rational numbers is the same as the set of algebraic numbers, which by elaa 26640 are defined only in terms of polynomials over the integers. (Contributed by Mario Carneiro, 23-Jul-2014.) (Proof shortened by AV, 3-Oct-2020.)

Assertion

Ref	Expression
elqaa	⊢ (𝐴 ∈ 𝔸 ↔ (𝐴 ∈ ℂ ∧ ∃𝑓 ∈ ((Poly‘ℚ) ∖ {0𝑝})(𝑓‘𝐴) = 0))

Distinct variable group:   𝐴,𝑓

Proof of Theorem elqaa

Dummy variables 𝑘 𝑚 𝑛 𝑗 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		elaa 26640	. . 3 ⊢ (𝐴 ∈ 𝔸 ↔ (𝐴 ∈ ℂ ∧ ∃𝑓 ∈ ((Poly‘ℤ) ∖ {0𝑝})(𝑓‘𝐴) = 0))
2		zssq 13084	. . . . . 6 ⊢ ℤ ⊆ ℚ
3		qsscn 13088	. . . . . 6 ⊢ ℚ ⊆ ℂ
4		plyss 26518	. . . . . 6 ⊢ ((ℤ ⊆ ℚ ∧ ℚ ⊆ ℂ) → (Poly‘ℤ) ⊆ (Poly‘ℚ))
5	2, 3, 4	mp2an 705	. . . . 5 ⊢ (Poly‘ℤ) ⊆ (Poly‘ℚ)
6		ssdif 4091	. . . . 5 ⊢ ((Poly‘ℤ) ⊆ (Poly‘ℚ) → ((Poly‘ℤ) ∖ {0𝑝}) ⊆ ((Poly‘ℚ) ∖ {0𝑝}))
7		ssrexv 3999	. . . . 5 ⊢ (((Poly‘ℤ) ∖ {0𝑝}) ⊆ ((Poly‘ℚ) ∖ {0𝑝}) → (∃𝑓 ∈ ((Poly‘ℤ) ∖ {0𝑝})(𝑓‘𝐴) = 0 → ∃𝑓 ∈ ((Poly‘ℚ) ∖ {0𝑝})(𝑓‘𝐴) = 0))
8	5, 6, 7	mp2b 10	. . . 4 ⊢ (∃𝑓 ∈ ((Poly‘ℤ) ∖ {0𝑝})(𝑓‘𝐴) = 0 → ∃𝑓 ∈ ((Poly‘ℚ) ∖ {0𝑝})(𝑓‘𝐴) = 0)
9	8	anim2i 629	. . 3 ⊢ ((𝐴 ∈ ℂ ∧ ∃𝑓 ∈ ((Poly‘ℤ) ∖ {0𝑝})(𝑓‘𝐴) = 0) → (𝐴 ∈ ℂ ∧ ∃𝑓 ∈ ((Poly‘ℚ) ∖ {0𝑝})(𝑓‘𝐴) = 0))
10	1, 9	sylbi 220	. 2 ⊢ (𝐴 ∈ 𝔸 → (𝐴 ∈ ℂ ∧ ∃𝑓 ∈ ((Poly‘ℚ) ∖ {0𝑝})(𝑓‘𝐴) = 0))
11		simpll 779	. . . 4 ⊢ (((𝐴 ∈ ℂ ∧ 𝑓 ∈ ((Poly‘ℚ) ∖ {0𝑝})) ∧ (𝑓‘𝐴) = 0) → 𝐴 ∈ ℂ)
12		simplr 781	. . . 4 ⊢ (((𝐴 ∈ ℂ ∧ 𝑓 ∈ ((Poly‘ℚ) ∖ {0𝑝})) ∧ (𝑓‘𝐴) = 0) → 𝑓 ∈ ((Poly‘ℚ) ∖ {0𝑝}))
13		simpr 490	. . . 4 ⊢ (((𝐴 ∈ ℂ ∧ 𝑓 ∈ ((Poly‘ℚ) ∖ {0𝑝})) ∧ (𝑓‘𝐴) = 0) → (𝑓‘𝐴) = 0)
14		eqid 2761	. . . 4 ⊢ (coeff‘𝑓) = (coeff‘𝑓)
15		fveq2 6886	. . . . . . . . . 10 ⊢ (𝑚 = 𝑘 → ((coeff‘𝑓)‘𝑚) = ((coeff‘𝑓)‘𝑘))
16	15	oveq1d 7436	. . . . . . . . 9 ⊢ (𝑚 = 𝑘 → (((coeff‘𝑓)‘𝑚) · 𝑗) = (((coeff‘𝑓)‘𝑘) · 𝑗))
17	16	eleq1d 2846	. . . . . . . 8 ⊢ (𝑚 = 𝑘 → ((((coeff‘𝑓)‘𝑚) · 𝑗) ∈ ℤ ↔ (((coeff‘𝑓)‘𝑘) · 𝑗) ∈ ℤ))
18	17	rabbidv 3420	. . . . . . 7 ⊢ (𝑚 = 𝑘 → {𝑗 ∈ ℕ ∣ (((coeff‘𝑓)‘𝑚) · 𝑗) ∈ ℤ} = {𝑗 ∈ ℕ ∣ (((coeff‘𝑓)‘𝑘) · 𝑗) ∈ ℤ})
19		oveq2 7429	. . . . . . . . 9 ⊢ (𝑗 = 𝑛 → (((coeff‘𝑓)‘𝑘) · 𝑗) = (((coeff‘𝑓)‘𝑘) · 𝑛))
20	19	eleq1d 2846	. . . . . . . 8 ⊢ (𝑗 = 𝑛 → ((((coeff‘𝑓)‘𝑘) · 𝑗) ∈ ℤ ↔ (((coeff‘𝑓)‘𝑘) · 𝑛) ∈ ℤ))
21	20	cbvrabv 3423	. . . . . . 7 ⊢ {𝑗 ∈ ℕ ∣ (((coeff‘𝑓)‘𝑘) · 𝑗) ∈ ℤ} = {𝑛 ∈ ℕ ∣ (((coeff‘𝑓)‘𝑘) · 𝑛) ∈ ℤ}
22	18, 21	eqtrdi 2812	. . . . . 6 ⊢ (𝑚 = 𝑘 → {𝑗 ∈ ℕ ∣ (((coeff‘𝑓)‘𝑚) · 𝑗) ∈ ℤ} = {𝑛 ∈ ℕ ∣ (((coeff‘𝑓)‘𝑘) · 𝑛) ∈ ℤ})
23	22	infeq1d 9471	. . . . 5 ⊢ (𝑚 = 𝑘 → inf({𝑗 ∈ ℕ ∣ (((coeff‘𝑓)‘𝑚) · 𝑗) ∈ ℤ}, ℝ, < ) = inf({𝑛 ∈ ℕ ∣ (((coeff‘𝑓)‘𝑘) · 𝑛) ∈ ℤ}, ℝ, < ))
24	23	cbvmptv 5209	. . . 4 ⊢ (𝑚 ∈ ℕ0 ↦ inf({𝑗 ∈ ℕ ∣ (((coeff‘𝑓)‘𝑚) · 𝑗) ∈ ℤ}, ℝ, < )) = (𝑘 ∈ ℕ0 ↦ inf({𝑛 ∈ ℕ ∣ (((coeff‘𝑓)‘𝑘) · 𝑛) ∈ ℤ}, ℝ, < ))
25		eqid 2761	. . . 4 ⊢ (seq0( · , (𝑚 ∈ ℕ0 ↦ inf({𝑗 ∈ ℕ ∣ (((coeff‘𝑓)‘𝑚) · 𝑗) ∈ ℤ}, ℝ, < )))‘(deg‘𝑓)) = (seq0( · , (𝑚 ∈ ℕ0 ↦ inf({𝑗 ∈ ℕ ∣ (((coeff‘𝑓)‘𝑚) · 𝑗) ∈ ℤ}, ℝ, < )))‘(deg‘𝑓))
26	11, 12, 13, 14, 24, 25	elqaalem3 26645	. . 3 ⊢ (((𝐴 ∈ ℂ ∧ 𝑓 ∈ ((Poly‘ℚ) ∖ {0𝑝})) ∧ (𝑓‘𝐴) = 0) → 𝐴 ∈ 𝔸)
27	26	r19.29an 3167	. 2 ⊢ ((𝐴 ∈ ℂ ∧ ∃𝑓 ∈ ((Poly‘ℚ) ∖ {0𝑝})(𝑓‘𝐴) = 0) → 𝐴 ∈ 𝔸)
28	10, 27	impbii 212	1 ⊢ (𝐴 ∈ 𝔸 ↔ (𝐴 ∈ ℂ ∧ ∃𝑓 ∈ ((Poly‘ℚ) ∖ {0𝑝})(𝑓‘𝐴) = 0))

This proof depends on syntax axioms:   → wi 4   ↔ wb 209   ∧ wa 401   = wceq 1570   ∈ wcel 2145  ∃wrex 3087  {crab 3413   ∖ cdif 3896   ⊆ wss 3914  {csn 4584   ↦ cmpt 5186  ‘cfv 6539  (class class class)co 7421  infcinf 9434  ℂcc 11199  ℝcr 11200  0cc0 11201   · cmul 11206   < clt 11344  ℕcn 12336  ℕ₀cn0 12607  ℤcz 12694  ℚcq 13076  seqcseq 14145  0_𝑝c0p 25991  Polycply 26503  coeffccoe 26505  degcdgr 26506  𝔸caa 26638

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 2147  ax-9 2155  ax-10 2178  ax-11 2194  ax-12 2213  ax-ext 2733  ax-rep 5232  ax-sep 5249  ax-nul 5260  ax-pow 5327  ax-pr 5391  ax-un 7752  ax-inf2 9643  ax-cnex 11257  ax-resscn 11258  ax-1cn 11259  ax-icn 11260  ax-addcl 11261  ax-addrcl 11262  ax-mulcl 11263  ax-mulrcl 11264  ax-mulcom 11265  ax-addass 11266  ax-mulass 11267  ax-distr 11268  ax-i2m1 11269  ax-1ne0 11270  ax-1rid 11271  ax-rnegex 11272  ax-rrecex 11273  ax-cnre 11274  ax-pre-lttri 11275  ax-pre-lttrn 11276  ax-pre-ltadd 11277  ax-pre-mulgt0 11278  ax-pre-sup 11279

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 2565  df-eu 2595  df-clab 2740  df-cleq 2753  df-clel 2836  df-nfc 2910  df-ne 2957  df-nel 3063  df-ral 3078  df-rex 3088  df-rmo 3366  df-reu 3367  df-rab 3414  df-v 3453  df-sbc 3740  df-csb 3848  df-dif 3900  df-un 3902  df-in 3904  df-ss 3915  df-pss 4035  df-nul 4280  df-if 4483  df-pw 4559  df-sn 4585  df-pr 4587  df-op 4591  df-uni 4868  df-int 4908  df-iun 4953  df-br 5104  df-opab 5168  df-mpt 5187  df-tr 5213  df-id 5546  df-eprel 5551  df-po 5559  df-so 5560  df-fr 5604  df-se 5605  df-we 5606  df-xp 5657  df-rel 5658  df-cnv 5659  df-co 5660  df-dm 5661  df-rn 5662  df-res 5663  df-ima 5664  df-pred 6305  df-ord 6366  df-on 6367  df-lim 6368  df-suc 6369  df-iota 6495  df-fun 6541  df-fn 6542  df-f 6543  df-f1 6544  df-fo 6545  df-f1o 6546  df-fv 6547  df-isom 6548  df-riota 7378  df-ov 7424  df-oprab 7425  df-mpo 7426  df-of 7694  df-om 7879  df-1st 8002  df-2nd 8003  df-frecs 8300  df-wrecs 8331  df-recs 8380  df-rdg 8419  df-1o 8477  df-er 8718  df-map 8850  df-pm 8851  df-en 8975  df-dom 8976  df-sdom 8977  df-fin 8978  df-sup 9435  df-inf 9436  df-oi 9505  df-card 10021  df-pnf 11346  df-mnf 11347  df-xr 11348  df-ltxr 11349  df-le 11350  df-sub 11544  df-neg 11545  df-div 11975  df-nn 12337  df-2 12406  df-3 12407  df-n0 12608  df-z 12695  df-uz 12967  df-q 13077  df-rp 13122  df-fz 13641  df-fzo 13790  df-fl 13933  df-mod 14011  df-seq 14146  df-exp 14206  df-hash 14476  df-cj 15267  df-re 15268  df-im 15269  df-sqrt 15403  df-abs 15404  df-clim 15656  df-rlim 15657  df-sum 15855  df-0p 25992  df-ply 26507  df-coe 26509  df-dgr 26510  df-aa 26639

This theorem is used by:  preimaaa  26647  qaa  26648  dgraalem  44148  dgraaub  44151  aaitgo  44165  sqrtnzqaa  47915  aacllem  50940