Theorem elqaa 25062

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 25056 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 25056	. . 3 ⊢ (𝐴 ∈ 𝔸 ↔ (𝐴 ∈ ℂ ∧ ∃𝑓 ∈ ((Poly‘ℤ) ∖ {0𝑝})(𝑓‘𝐴) = 0))
2		zssq 12431	. . . . . 6 ⊢ ℤ ⊆ ℚ
3		qsscn 12435	. . . . . 6 ⊢ ℚ ⊆ ℂ
4		plyss 24940	. . . . . 6 ⊢ ((ℤ ⊆ ℚ ∧ ℚ ⊆ ℂ) → (Poly‘ℤ) ⊆ (Poly‘ℚ))
5	2, 3, 4	mp2an 692	. . . . 5 ⊢ (Poly‘ℤ) ⊆ (Poly‘ℚ)
6		ssdif 4028	. . . . 5 ⊢ ((Poly‘ℤ) ⊆ (Poly‘ℚ) → ((Poly‘ℤ) ∖ {0𝑝}) ⊆ ((Poly‘ℚ) ∖ {0𝑝}))
7		ssrexv 3942	. . . . 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 620	. . 3 ⊢ ((𝐴 ∈ ℂ ∧ ∃𝑓 ∈ ((Poly‘ℤ) ∖ {0𝑝})(𝑓‘𝐴) = 0) → (𝐴 ∈ ℂ ∧ ∃𝑓 ∈ ((Poly‘ℚ) ∖ {0𝑝})(𝑓‘𝐴) = 0))
10	1, 9	sylbi 220	. 2 ⊢ (𝐴 ∈ 𝔸 → (𝐴 ∈ ℂ ∧ ∃𝑓 ∈ ((Poly‘ℚ) ∖ {0𝑝})(𝑓‘𝐴) = 0))
11		simpll 767	. . . 4 ⊢ (((𝐴 ∈ ℂ ∧ 𝑓 ∈ ((Poly‘ℚ) ∖ {0𝑝})) ∧ (𝑓‘𝐴) = 0) → 𝐴 ∈ ℂ)
12		simplr 769	. . . 4 ⊢ (((𝐴 ∈ ℂ ∧ 𝑓 ∈ ((Poly‘ℚ) ∖ {0𝑝})) ∧ (𝑓‘𝐴) = 0) → 𝑓 ∈ ((Poly‘ℚ) ∖ {0𝑝}))
13		simpr 488	. . . 4 ⊢ (((𝐴 ∈ ℂ ∧ 𝑓 ∈ ((Poly‘ℚ) ∖ {0𝑝})) ∧ (𝑓‘𝐴) = 0) → (𝑓‘𝐴) = 0)
14		eqid 2738	. . . 4 ⊢ (coeff‘𝑓) = (coeff‘𝑓)
15		fveq2 6668	. . . . . . . . . 10 ⊢ (𝑚 = 𝑘 → ((coeff‘𝑓)‘𝑚) = ((coeff‘𝑓)‘𝑘))
16	15	oveq1d 7179	. . . . . . . . 9 ⊢ (𝑚 = 𝑘 → (((coeff‘𝑓)‘𝑚) · 𝑗) = (((coeff‘𝑓)‘𝑘) · 𝑗))
17	16	eleq1d 2817	. . . . . . . 8 ⊢ (𝑚 = 𝑘 → ((((coeff‘𝑓)‘𝑚) · 𝑗) ∈ ℤ ↔ (((coeff‘𝑓)‘𝑘) · 𝑗) ∈ ℤ))
18	17	rabbidv 3380	. . . . . . 7 ⊢ (𝑚 = 𝑘 → {𝑗 ∈ ℕ ∣ (((coeff‘𝑓)‘𝑚) · 𝑗) ∈ ℤ} = {𝑗 ∈ ℕ ∣ (((coeff‘𝑓)‘𝑘) · 𝑗) ∈ ℤ})
19		oveq2 7172	. . . . . . . . 9 ⊢ (𝑗 = 𝑛 → (((coeff‘𝑓)‘𝑘) · 𝑗) = (((coeff‘𝑓)‘𝑘) · 𝑛))
20	19	eleq1d 2817	. . . . . . . 8 ⊢ (𝑗 = 𝑛 → ((((coeff‘𝑓)‘𝑘) · 𝑗) ∈ ℤ ↔ (((coeff‘𝑓)‘𝑘) · 𝑛) ∈ ℤ))
21	20	cbvrabv 3392	. . . . . . 7 ⊢ {𝑗 ∈ ℕ ∣ (((coeff‘𝑓)‘𝑘) · 𝑗) ∈ ℤ} = {𝑛 ∈ ℕ ∣ (((coeff‘𝑓)‘𝑘) · 𝑛) ∈ ℤ}
22	18, 21	eqtrdi 2789	. . . . . 6 ⊢ (𝑚 = 𝑘 → {𝑗 ∈ ℕ ∣ (((coeff‘𝑓)‘𝑚) · 𝑗) ∈ ℤ} = {𝑛 ∈ ℕ ∣ (((coeff‘𝑓)‘𝑘) · 𝑛) ∈ ℤ})
23	22	infeq1d 9007	. . . . 5 ⊢ (𝑚 = 𝑘 → inf({𝑗 ∈ ℕ ∣ (((coeff‘𝑓)‘𝑚) · 𝑗) ∈ ℤ}, ℝ, < ) = inf({𝑛 ∈ ℕ ∣ (((coeff‘𝑓)‘𝑘) · 𝑛) ∈ ℤ}, ℝ, < ))
24	23	cbvmptv 5130	. . . 4 ⊢ (𝑚 ∈ ℕ0 ↦ inf({𝑗 ∈ ℕ ∣ (((coeff‘𝑓)‘𝑚) · 𝑗) ∈ ℤ}, ℝ, < )) = (𝑘 ∈ ℕ0 ↦ inf({𝑛 ∈ ℕ ∣ (((coeff‘𝑓)‘𝑘) · 𝑛) ∈ ℤ}, ℝ, < ))
25		eqid 2738	. . . 4 ⊢ (seq0( · , (𝑚 ∈ ℕ0 ↦ inf({𝑗 ∈ ℕ ∣ (((coeff‘𝑓)‘𝑚) · 𝑗) ∈ ℤ}, ℝ, < )))‘(deg‘𝑓)) = (seq0( · , (𝑚 ∈ ℕ0 ↦ inf({𝑗 ∈ ℕ ∣ (((coeff‘𝑓)‘𝑚) · 𝑗) ∈ ℤ}, ℝ, < )))‘(deg‘𝑓))
26	11, 12, 13, 14, 24, 25	elqaalem3 25061	. . 3 ⊢ (((𝐴 ∈ ℂ ∧ 𝑓 ∈ ((Poly‘ℚ) ∖ {0𝑝})) ∧ (𝑓‘𝐴) = 0) → 𝐴 ∈ 𝔸)
27	26	r19.29an 3197	. 2 ⊢ ((𝐴 ∈ ℂ ∧ ∃𝑓 ∈ ((Poly‘ℚ) ∖ {0𝑝})(𝑓‘𝐴) = 0) → 𝐴 ∈ 𝔸)
28	10, 27	impbii 212	1 ⊢ (𝐴 ∈ 𝔸 ↔ (𝐴 ∈ ℂ ∧ ∃𝑓 ∈ ((Poly‘ℚ) ∖ {0𝑝})(𝑓‘𝐴) = 0))

Syntax hints:   → wi 4   ↔ wb 209   ∧ wa 399   = wceq 1542   ∈ wcel 2113  ∃wrex 3054  {crab 3057   ∖ cdif 3838   ⊆ wss 3841  {csn 4513   ↦ cmpt 5107  ‘cfv 6333  (class class class)co 7164  infcinf 8971  ℂcc 10606  ℝcr 10607  0cc0 10608   · cmul 10613   < clt 10746  ℕcn 11709  ℕ₀cn0 11969  ℤcz 12055  ℚcq 12423  seqcseq 13453  0_𝑝c0p 24414  Polycply 24925  coeffccoe 24927  degcdgr 24928  𝔸caa 25054

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1802  ax-4 1816  ax-5 1916  ax-6 1974  ax-7 2019  ax-8 2115  ax-9 2123  ax-10 2144  ax-11 2161  ax-12 2178  ax-ext 2710  ax-rep 5151  ax-sep 5164  ax-nul 5171  ax-pow 5229  ax-pr 5293  ax-un 7473  ax-inf2 9170  ax-cnex 10664  ax-resscn 10665  ax-1cn 10666  ax-icn 10667  ax-addcl 10668  ax-addrcl 10669  ax-mulcl 10670  ax-mulrcl 10671  ax-mulcom 10672  ax-addass 10673  ax-mulass 10674  ax-distr 10675  ax-i2m1 10676  ax-1ne0 10677  ax-1rid 10678  ax-rnegex 10679  ax-rrecex 10680  ax-cnre 10681  ax-pre-lttri 10682  ax-pre-lttrn 10683  ax-pre-ltadd 10684  ax-pre-mulgt0 10685  ax-pre-sup 10686

This theorem depends on definitions:  df-bi 210  df-an 400  df-or 847  df-3or 1089  df-3an 1090  df-tru 1545  df-fal 1555  df-ex 1787  df-nf 1791  df-sb 2074  df-mo 2540  df-eu 2570  df-clab 2717  df-cleq 2730  df-clel 2811  df-nfc 2881  df-ne 2935  df-nel 3039  df-ral 3058  df-rex 3059  df-reu 3060  df-rmo 3061  df-rab 3062  df-v 3399  df-sbc 3680  df-csb 3789  df-dif 3844  df-un 3846  df-in 3848  df-ss 3858  df-pss 3860  df-nul 4210  df-if 4412  df-pw 4487  df-sn 4514  df-pr 4516  df-tp 4518  df-op 4520  df-uni 4794  df-int 4834  df-iun 4880  df-br 5028  df-opab 5090  df-mpt 5108  df-tr 5134  df-id 5425  df-eprel 5430  df-po 5438  df-so 5439  df-fr 5478  df-se 5479  df-we 5480  df-xp 5525  df-rel 5526  df-cnv 5527  df-co 5528  df-dm 5529  df-rn 5530  df-res 5531  df-ima 5532  df-pred 6123  df-ord 6169  df-on 6170  df-lim 6171  df-suc 6172  df-iota 6291  df-fun 6335  df-fn 6336  df-f 6337  df-f1 6338  df-fo 6339  df-f1o 6340  df-fv 6341  df-isom 6342  df-riota 7121  df-ov 7167  df-oprab 7168  df-mpo 7169  df-of 7419  df-om 7594  df-1st 7707  df-2nd 7708  df-wrecs 7969  df-recs 8030  df-rdg 8068  df-1o 8124  df-er 8313  df-map 8432  df-pm 8433  df-en 8549  df-dom 8550  df-sdom 8551  df-fin 8552  df-sup 8972  df-inf 8973  df-oi 9040  df-card 9434  df-pnf 10748  df-mnf 10749  df-xr 10750  df-ltxr 10751  df-le 10752  df-sub 10943  df-neg 10944  df-div 11369  df-nn 11710  df-2 11772  df-3 11773  df-n0 11970  df-z 12056  df-uz 12318  df-q 12424  df-rp 12466  df-fz 12975  df-fzo 13118  df-fl 13246  df-mod 13322  df-seq 13454  df-exp 13515  df-hash 13776  df-cj 14541  df-re 14542  df-im 14543  df-sqrt 14677  df-abs 14678  df-clim 14928  df-rlim 14929  df-sum 15129  df-0p 24415  df-ply 24929  df-coe 24931  df-dgr 24932  df-aa 25055

This theorem is referenced by:  qaa  25063  dgraalem  40526  dgraaub  40529  aaitgo  40543  aacllem  45942