Theorem elqaalem3 26381

Description: Lemma for elqaa 26382. (Contributed by Mario Carneiro, 23-Jul-2014.) (Revised by AV, 3-Oct-2020.)

Hypotheses

Ref	Expression
elqaa.1	⊢ (𝜑 → 𝐴 ∈ ℂ)
elqaa.2	⊢ (𝜑 → 𝐹 ∈ ((Poly‘ℚ) ∖ {0𝑝}))
elqaa.3	⊢ (𝜑 → (𝐹‘𝐴) = 0)
elqaa.4	⊢ 𝐵 = (coeff‘𝐹)
elqaa.5	⊢ 𝑁 = (𝑘 ∈ ℕ0 ↦ inf({𝑛 ∈ ℕ ∣ ((𝐵‘𝑘) · 𝑛) ∈ ℤ}, ℝ, < ))
elqaa.6	⊢ 𝑅 = (seq0( · , 𝑁)‘(deg‘𝐹))

Assertion

Ref	Expression
elqaalem3	⊢ (𝜑 → 𝐴 ∈ 𝔸)

Distinct variable groups:   𝑘,𝑛,𝐴   𝐵,𝑘,𝑛   𝜑,𝑘   𝑘,𝑁,𝑛   𝑅,𝑘

Allowed substitution hints:   𝜑(𝑛)   𝑅(𝑛)   𝐹(𝑘,𝑛)

Proof of Theorem elqaalem3

Dummy variables 𝑓 𝑚 𝑥 𝑦 𝑧 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		elqaa.1	. 2 ⊢ (𝜑 → 𝐴 ∈ ℂ)
2		cnex 11265	. . . . . . . 8 ⊢ ℂ ∈ V
3	2	a1i 11	. . . . . . 7 ⊢ (𝜑 → ℂ ∈ V)
4		elqaa.6	. . . . . . . . 9 ⊢ 𝑅 = (seq0( · , 𝑁)‘(deg‘𝐹))
5	4	fvexi 6934	. . . . . . . 8 ⊢ 𝑅 ∈ V
6	5	a1i 11	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑧 ∈ ℂ) → 𝑅 ∈ V)
7		fvexd 6935	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑧 ∈ ℂ) → (𝐹‘𝑧) ∈ V)
8		fconstmpt 5762	. . . . . . . 8 ⊢ (ℂ × {𝑅}) = (𝑧 ∈ ℂ ↦ 𝑅)
9	8	a1i 11	. . . . . . 7 ⊢ (𝜑 → (ℂ × {𝑅}) = (𝑧 ∈ ℂ ↦ 𝑅))
10		elqaa.2	. . . . . . . . . 10 ⊢ (𝜑 → 𝐹 ∈ ((Poly‘ℚ) ∖ {0𝑝}))
11	10	eldifad 3988	. . . . . . . . 9 ⊢ (𝜑 → 𝐹 ∈ (Poly‘ℚ))
12		plyf 26257	. . . . . . . . 9 ⊢ (𝐹 ∈ (Poly‘ℚ) → 𝐹:ℂ⟶ℂ)
13	11, 12	syl 17	. . . . . . . 8 ⊢ (𝜑 → 𝐹:ℂ⟶ℂ)
14	13	feqmptd 6990	. . . . . . 7 ⊢ (𝜑 → 𝐹 = (𝑧 ∈ ℂ ↦ (𝐹‘𝑧)))
15	3, 6, 7, 9, 14	offval2 7734	. . . . . 6 ⊢ (𝜑 → ((ℂ × {𝑅}) ∘f · 𝐹) = (𝑧 ∈ ℂ ↦ (𝑅 · (𝐹‘𝑧))))
16		fzfid 14024	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑧 ∈ ℂ) → (0...(deg‘𝐹)) ∈ Fin)
17		nn0uz 12945	. . . . . . . . . . . . . 14 ⊢ ℕ0 = (ℤ≥‘0)
18		0zd 12651	. . . . . . . . . . . . . 14 ⊢ (𝜑 → 0 ∈ ℤ)
19		ssrab2 4103	. . . . . . . . . . . . . . 15 ⊢ {𝑛 ∈ ℕ ∣ ((𝐵‘𝑚) · 𝑛) ∈ ℤ} ⊆ ℕ
20		fveq2 6920	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝑘 = 𝑚 → (𝐵‘𝑘) = (𝐵‘𝑚))
21	20	oveq1d 7463	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑘 = 𝑚 → ((𝐵‘𝑘) · 𝑛) = ((𝐵‘𝑚) · 𝑛))
22	21	eleq1d 2829	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑘 = 𝑚 → (((𝐵‘𝑘) · 𝑛) ∈ ℤ ↔ ((𝐵‘𝑚) · 𝑛) ∈ ℤ))
23	22	rabbidv 3451	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑘 = 𝑚 → {𝑛 ∈ ℕ ∣ ((𝐵‘𝑘) · 𝑛) ∈ ℤ} = {𝑛 ∈ ℕ ∣ ((𝐵‘𝑚) · 𝑛) ∈ ℤ})
24	23	infeq1d 9546	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑘 = 𝑚 → inf({𝑛 ∈ ℕ ∣ ((𝐵‘𝑘) · 𝑛) ∈ ℤ}, ℝ, < ) = inf({𝑛 ∈ ℕ ∣ ((𝐵‘𝑚) · 𝑛) ∈ ℤ}, ℝ, < ))
25		elqaa.5	. . . . . . . . . . . . . . . . . 18 ⊢ 𝑁 = (𝑘 ∈ ℕ0 ↦ inf({𝑛 ∈ ℕ ∣ ((𝐵‘𝑘) · 𝑛) ∈ ℤ}, ℝ, < ))
26		ltso 11370	. . . . . . . . . . . . . . . . . . 19 ⊢ < Or ℝ
27	26	infex 9562	. . . . . . . . . . . . . . . . . 18 ⊢ inf({𝑛 ∈ ℕ ∣ ((𝐵‘𝑚) · 𝑛) ∈ ℤ}, ℝ, < ) ∈ V
28	24, 25, 27	fvmpt 7029	. . . . . . . . . . . . . . . . 17 ⊢ (𝑚 ∈ ℕ0 → (𝑁‘𝑚) = inf({𝑛 ∈ ℕ ∣ ((𝐵‘𝑚) · 𝑛) ∈ ℤ}, ℝ, < ))
29	28	adantl 481	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑚 ∈ ℕ0) → (𝑁‘𝑚) = inf({𝑛 ∈ ℕ ∣ ((𝐵‘𝑚) · 𝑛) ∈ ℤ}, ℝ, < ))
30		nnuz 12946	. . . . . . . . . . . . . . . . . 18 ⊢ ℕ = (ℤ≥‘1)
31	19, 30	sseqtri 4045	. . . . . . . . . . . . . . . . 17 ⊢ {𝑛 ∈ ℕ ∣ ((𝐵‘𝑚) · 𝑛) ∈ ℤ} ⊆ (ℤ≥‘1)
32		0z 12650	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ 0 ∈ ℤ
33		zq 13019	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (0 ∈ ℤ → 0 ∈ ℚ)
34	32, 33	ax-mp 5	. . . . . . . . . . . . . . . . . . . . 21 ⊢ 0 ∈ ℚ
35		elqaa.4	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ 𝐵 = (coeff‘𝐹)
36	35	coef2 26290	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝐹 ∈ (Poly‘ℚ) ∧ 0 ∈ ℚ) → 𝐵:ℕ0⟶ℚ)
37	11, 34, 36	sylancl 585	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝜑 → 𝐵:ℕ0⟶ℚ)
38	37	ffvelcdmda 7118	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝜑 ∧ 𝑚 ∈ ℕ0) → (𝐵‘𝑚) ∈ ℚ)
39		qmulz 13016	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝐵‘𝑚) ∈ ℚ → ∃𝑛 ∈ ℕ ((𝐵‘𝑚) · 𝑛) ∈ ℤ)
40	38, 39	syl 17	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑚 ∈ ℕ0) → ∃𝑛 ∈ ℕ ((𝐵‘𝑚) · 𝑛) ∈ ℤ)
41		rabn0 4412	. . . . . . . . . . . . . . . . . 18 ⊢ ({𝑛 ∈ ℕ ∣ ((𝐵‘𝑚) · 𝑛) ∈ ℤ} ≠ ∅ ↔ ∃𝑛 ∈ ℕ ((𝐵‘𝑚) · 𝑛) ∈ ℤ)
42	40, 41	sylibr 234	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑚 ∈ ℕ0) → {𝑛 ∈ ℕ ∣ ((𝐵‘𝑚) · 𝑛) ∈ ℤ} ≠ ∅)
43		infssuzcl 12997	. . . . . . . . . . . . . . . . 17 ⊢ (({𝑛 ∈ ℕ ∣ ((𝐵‘𝑚) · 𝑛) ∈ ℤ} ⊆ (ℤ≥‘1) ∧ {𝑛 ∈ ℕ ∣ ((𝐵‘𝑚) · 𝑛) ∈ ℤ} ≠ ∅) → inf({𝑛 ∈ ℕ ∣ ((𝐵‘𝑚) · 𝑛) ∈ ℤ}, ℝ, < ) ∈ {𝑛 ∈ ℕ ∣ ((𝐵‘𝑚) · 𝑛) ∈ ℤ})
44	31, 42, 43	sylancr 586	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑚 ∈ ℕ0) → inf({𝑛 ∈ ℕ ∣ ((𝐵‘𝑚) · 𝑛) ∈ ℤ}, ℝ, < ) ∈ {𝑛 ∈ ℕ ∣ ((𝐵‘𝑚) · 𝑛) ∈ ℤ})
45	29, 44	eqeltrd 2844	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑚 ∈ ℕ0) → (𝑁‘𝑚) ∈ {𝑛 ∈ ℕ ∣ ((𝐵‘𝑚) · 𝑛) ∈ ℤ})
46	19, 45	sselid 4006	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑚 ∈ ℕ0) → (𝑁‘𝑚) ∈ ℕ)
47		nnmulcl 12317	. . . . . . . . . . . . . . 15 ⊢ ((𝑚 ∈ ℕ ∧ 𝑘 ∈ ℕ) → (𝑚 · 𝑘) ∈ ℕ)
48	47	adantl 481	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ (𝑚 ∈ ℕ ∧ 𝑘 ∈ ℕ)) → (𝑚 · 𝑘) ∈ ℕ)
49	17, 18, 46, 48	seqf 14074	. . . . . . . . . . . . 13 ⊢ (𝜑 → seq0( · , 𝑁):ℕ0⟶ℕ)
50		dgrcl 26292	. . . . . . . . . . . . . 14 ⊢ (𝐹 ∈ (Poly‘ℚ) → (deg‘𝐹) ∈ ℕ0)
51	11, 50	syl 17	. . . . . . . . . . . . 13 ⊢ (𝜑 → (deg‘𝐹) ∈ ℕ0)
52	49, 51	ffvelcdmd 7119	. . . . . . . . . . . 12 ⊢ (𝜑 → (seq0( · , 𝑁)‘(deg‘𝐹)) ∈ ℕ)
53	4, 52	eqeltrid 2848	. . . . . . . . . . 11 ⊢ (𝜑 → 𝑅 ∈ ℕ)
54	53	nncnd 12309	. . . . . . . . . 10 ⊢ (𝜑 → 𝑅 ∈ ℂ)
55	54	adantr 480	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑧 ∈ ℂ) → 𝑅 ∈ ℂ)
56		elfznn0 13677	. . . . . . . . . 10 ⊢ (𝑚 ∈ (0...(deg‘𝐹)) → 𝑚 ∈ ℕ0)
57	35	coef3 26291	. . . . . . . . . . . . . 14 ⊢ (𝐹 ∈ (Poly‘ℚ) → 𝐵:ℕ0⟶ℂ)
58	11, 57	syl 17	. . . . . . . . . . . . 13 ⊢ (𝜑 → 𝐵:ℕ0⟶ℂ)
59	58	adantr 480	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑧 ∈ ℂ) → 𝐵:ℕ0⟶ℂ)
60	59	ffvelcdmda 7118	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑧 ∈ ℂ) ∧ 𝑚 ∈ ℕ0) → (𝐵‘𝑚) ∈ ℂ)
61		expcl 14130	. . . . . . . . . . . 12 ⊢ ((𝑧 ∈ ℂ ∧ 𝑚 ∈ ℕ0) → (𝑧↑𝑚) ∈ ℂ)
62	61	adantll 713	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑧 ∈ ℂ) ∧ 𝑚 ∈ ℕ0) → (𝑧↑𝑚) ∈ ℂ)
63	60, 62	mulcld 11310	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑧 ∈ ℂ) ∧ 𝑚 ∈ ℕ0) → ((𝐵‘𝑚) · (𝑧↑𝑚)) ∈ ℂ)
64	56, 63	sylan2 592	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑧 ∈ ℂ) ∧ 𝑚 ∈ (0...(deg‘𝐹))) → ((𝐵‘𝑚) · (𝑧↑𝑚)) ∈ ℂ)
65	16, 55, 64	fsummulc2 15832	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑧 ∈ ℂ) → (𝑅 · Σ𝑚 ∈ (0...(deg‘𝐹))((𝐵‘𝑚) · (𝑧↑𝑚))) = Σ𝑚 ∈ (0...(deg‘𝐹))(𝑅 · ((𝐵‘𝑚) · (𝑧↑𝑚))))
66		eqid 2740	. . . . . . . . . . 11 ⊢ (deg‘𝐹) = (deg‘𝐹)
67	35, 66	coeid2 26298	. . . . . . . . . 10 ⊢ ((𝐹 ∈ (Poly‘ℚ) ∧ 𝑧 ∈ ℂ) → (𝐹‘𝑧) = Σ𝑚 ∈ (0...(deg‘𝐹))((𝐵‘𝑚) · (𝑧↑𝑚)))
68	11, 67	sylan 579	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑧 ∈ ℂ) → (𝐹‘𝑧) = Σ𝑚 ∈ (0...(deg‘𝐹))((𝐵‘𝑚) · (𝑧↑𝑚)))
69	68	oveq2d 7464	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑧 ∈ ℂ) → (𝑅 · (𝐹‘𝑧)) = (𝑅 · Σ𝑚 ∈ (0...(deg‘𝐹))((𝐵‘𝑚) · (𝑧↑𝑚))))
70	55	adantr 480	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑧 ∈ ℂ) ∧ 𝑚 ∈ ℕ0) → 𝑅 ∈ ℂ)
71	70, 60, 62	mulassd 11313	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑧 ∈ ℂ) ∧ 𝑚 ∈ ℕ0) → ((𝑅 · (𝐵‘𝑚)) · (𝑧↑𝑚)) = (𝑅 · ((𝐵‘𝑚) · (𝑧↑𝑚))))
72	56, 71	sylan2 592	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑧 ∈ ℂ) ∧ 𝑚 ∈ (0...(deg‘𝐹))) → ((𝑅 · (𝐵‘𝑚)) · (𝑧↑𝑚)) = (𝑅 · ((𝐵‘𝑚) · (𝑧↑𝑚))))
73	72	sumeq2dv 15750	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑧 ∈ ℂ) → Σ𝑚 ∈ (0...(deg‘𝐹))((𝑅 · (𝐵‘𝑚)) · (𝑧↑𝑚)) = Σ𝑚 ∈ (0...(deg‘𝐹))(𝑅 · ((𝐵‘𝑚) · (𝑧↑𝑚))))
74	65, 69, 73	3eqtr4d 2790	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑧 ∈ ℂ) → (𝑅 · (𝐹‘𝑧)) = Σ𝑚 ∈ (0...(deg‘𝐹))((𝑅 · (𝐵‘𝑚)) · (𝑧↑𝑚)))
75	74	mpteq2dva 5266	. . . . . 6 ⊢ (𝜑 → (𝑧 ∈ ℂ ↦ (𝑅 · (𝐹‘𝑧))) = (𝑧 ∈ ℂ ↦ Σ𝑚 ∈ (0...(deg‘𝐹))((𝑅 · (𝐵‘𝑚)) · (𝑧↑𝑚))))
76	15, 75	eqtrd 2780	. . . . 5 ⊢ (𝜑 → ((ℂ × {𝑅}) ∘f · 𝐹) = (𝑧 ∈ ℂ ↦ Σ𝑚 ∈ (0...(deg‘𝐹))((𝑅 · (𝐵‘𝑚)) · (𝑧↑𝑚))))
77		zsscn 12647	. . . . . . 7 ⊢ ℤ ⊆ ℂ
78	77	a1i 11	. . . . . 6 ⊢ (𝜑 → ℤ ⊆ ℂ)
79	54	adantr 480	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑚 ∈ ℕ0) → 𝑅 ∈ ℂ)
80	46	nncnd 12309	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑚 ∈ ℕ0) → (𝑁‘𝑚) ∈ ℂ)
81	46	nnne0d 12343	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑚 ∈ ℕ0) → (𝑁‘𝑚) ≠ 0)
82	79, 80, 81	divcan2d 12072	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑚 ∈ ℕ0) → ((𝑁‘𝑚) · (𝑅 / (𝑁‘𝑚))) = 𝑅)
83	82	oveq2d 7464	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑚 ∈ ℕ0) → ((𝐵‘𝑚) · ((𝑁‘𝑚) · (𝑅 / (𝑁‘𝑚)))) = ((𝐵‘𝑚) · 𝑅))
84	58	ffvelcdmda 7118	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑚 ∈ ℕ0) → (𝐵‘𝑚) ∈ ℂ)
85	79, 80, 81	divcld 12070	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑚 ∈ ℕ0) → (𝑅 / (𝑁‘𝑚)) ∈ ℂ)
86	84, 80, 85	mulassd 11313	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑚 ∈ ℕ0) → (((𝐵‘𝑚) · (𝑁‘𝑚)) · (𝑅 / (𝑁‘𝑚))) = ((𝐵‘𝑚) · ((𝑁‘𝑚) · (𝑅 / (𝑁‘𝑚)))))
87	79, 84	mulcomd 11311	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑚 ∈ ℕ0) → (𝑅 · (𝐵‘𝑚)) = ((𝐵‘𝑚) · 𝑅))
88	83, 86, 87	3eqtr4rd 2791	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑚 ∈ ℕ0) → (𝑅 · (𝐵‘𝑚)) = (((𝐵‘𝑚) · (𝑁‘𝑚)) · (𝑅 / (𝑁‘𝑚))))
89	56, 88	sylan2 592	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑚 ∈ (0...(deg‘𝐹))) → (𝑅 · (𝐵‘𝑚)) = (((𝐵‘𝑚) · (𝑁‘𝑚)) · (𝑅 / (𝑁‘𝑚))))
90		oveq2 7456	. . . . . . . . . . . . 13 ⊢ (𝑛 = (𝑁‘𝑚) → ((𝐵‘𝑚) · 𝑛) = ((𝐵‘𝑚) · (𝑁‘𝑚)))
91	90	eleq1d 2829	. . . . . . . . . . . 12 ⊢ (𝑛 = (𝑁‘𝑚) → (((𝐵‘𝑚) · 𝑛) ∈ ℤ ↔ ((𝐵‘𝑚) · (𝑁‘𝑚)) ∈ ℤ))
92	91	elrab 3708	. . . . . . . . . . 11 ⊢ ((𝑁‘𝑚) ∈ {𝑛 ∈ ℕ ∣ ((𝐵‘𝑚) · 𝑛) ∈ ℤ} ↔ ((𝑁‘𝑚) ∈ ℕ ∧ ((𝐵‘𝑚) · (𝑁‘𝑚)) ∈ ℤ))
93	92	simprbi 496	. . . . . . . . . 10 ⊢ ((𝑁‘𝑚) ∈ {𝑛 ∈ ℕ ∣ ((𝐵‘𝑚) · 𝑛) ∈ ℤ} → ((𝐵‘𝑚) · (𝑁‘𝑚)) ∈ ℤ)
94	45, 93	syl 17	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑚 ∈ ℕ0) → ((𝐵‘𝑚) · (𝑁‘𝑚)) ∈ ℤ)
95	56, 94	sylan2 592	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑚 ∈ (0...(deg‘𝐹))) → ((𝐵‘𝑚) · (𝑁‘𝑚)) ∈ ℤ)
96		elqaa.3	. . . . . . . . . 10 ⊢ (𝜑 → (𝐹‘𝐴) = 0)
97		eqid 2740	. . . . . . . . . 10 ⊢ (𝑥 ∈ V, 𝑦 ∈ V ↦ ((𝑥 · 𝑦) mod (𝑁‘𝑚))) = (𝑥 ∈ V, 𝑦 ∈ V ↦ ((𝑥 · 𝑦) mod (𝑁‘𝑚)))
98	1, 10, 96, 35, 25, 4, 97	elqaalem2 26380	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑚 ∈ (0...(deg‘𝐹))) → (𝑅 mod (𝑁‘𝑚)) = 0)
99	53	adantr 480	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑚 ∈ (0...(deg‘𝐹))) → 𝑅 ∈ ℕ)
100	56, 46	sylan2 592	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑚 ∈ (0...(deg‘𝐹))) → (𝑁‘𝑚) ∈ ℕ)
101		nnre 12300	. . . . . . . . . . 11 ⊢ (𝑅 ∈ ℕ → 𝑅 ∈ ℝ)
102		nnrp 13068	. . . . . . . . . . 11 ⊢ ((𝑁‘𝑚) ∈ ℕ → (𝑁‘𝑚) ∈ ℝ+)
103		mod0 13927	. . . . . . . . . . 11 ⊢ ((𝑅 ∈ ℝ ∧ (𝑁‘𝑚) ∈ ℝ+) → ((𝑅 mod (𝑁‘𝑚)) = 0 ↔ (𝑅 / (𝑁‘𝑚)) ∈ ℤ))
104	101, 102, 103	syl2an 595	. . . . . . . . . 10 ⊢ ((𝑅 ∈ ℕ ∧ (𝑁‘𝑚) ∈ ℕ) → ((𝑅 mod (𝑁‘𝑚)) = 0 ↔ (𝑅 / (𝑁‘𝑚)) ∈ ℤ))
105	99, 100, 104	syl2anc 583	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑚 ∈ (0...(deg‘𝐹))) → ((𝑅 mod (𝑁‘𝑚)) = 0 ↔ (𝑅 / (𝑁‘𝑚)) ∈ ℤ))
106	98, 105	mpbid 232	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑚 ∈ (0...(deg‘𝐹))) → (𝑅 / (𝑁‘𝑚)) ∈ ℤ)
107	95, 106	zmulcld 12753	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑚 ∈ (0...(deg‘𝐹))) → (((𝐵‘𝑚) · (𝑁‘𝑚)) · (𝑅 / (𝑁‘𝑚))) ∈ ℤ)
108	89, 107	eqeltrd 2844	. . . . . 6 ⊢ ((𝜑 ∧ 𝑚 ∈ (0...(deg‘𝐹))) → (𝑅 · (𝐵‘𝑚)) ∈ ℤ)
109	78, 51, 108	elplyd 26261	. . . . 5 ⊢ (𝜑 → (𝑧 ∈ ℂ ↦ Σ𝑚 ∈ (0...(deg‘𝐹))((𝑅 · (𝐵‘𝑚)) · (𝑧↑𝑚))) ∈ (Poly‘ℤ))
110	76, 109	eqeltrd 2844	. . . 4 ⊢ (𝜑 → ((ℂ × {𝑅}) ∘f · 𝐹) ∈ (Poly‘ℤ))
111		eldifsn 4811	. . . . . . 7 ⊢ (𝐹 ∈ ((Poly‘ℚ) ∖ {0𝑝}) ↔ (𝐹 ∈ (Poly‘ℚ) ∧ 𝐹 ≠ 0𝑝))
112	10, 111	sylib 218	. . . . . 6 ⊢ (𝜑 → (𝐹 ∈ (Poly‘ℚ) ∧ 𝐹 ≠ 0𝑝))
113	112	simprd 495	. . . . 5 ⊢ (𝜑 → 𝐹 ≠ 0𝑝)
114		oveq1 7455	. . . . . . 7 ⊢ (((ℂ × {𝑅}) ∘f · 𝐹) = 0𝑝 → (((ℂ × {𝑅}) ∘f · 𝐹) ∘f / (ℂ × {𝑅})) = (0𝑝 ∘f / (ℂ × {𝑅})))
115	13	ffvelcdmda 7118	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑧 ∈ ℂ) → (𝐹‘𝑧) ∈ ℂ)
116	53	nnne0d 12343	. . . . . . . . . . . 12 ⊢ (𝜑 → 𝑅 ≠ 0)
117	116	adantr 480	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑧 ∈ ℂ) → 𝑅 ≠ 0)
118	115, 55, 117	divcan3d 12075	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑧 ∈ ℂ) → ((𝑅 · (𝐹‘𝑧)) / 𝑅) = (𝐹‘𝑧))
119	118	mpteq2dva 5266	. . . . . . . . 9 ⊢ (𝜑 → (𝑧 ∈ ℂ ↦ ((𝑅 · (𝐹‘𝑧)) / 𝑅)) = (𝑧 ∈ ℂ ↦ (𝐹‘𝑧)))
120		ovexd 7483	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑧 ∈ ℂ) → (𝑅 · (𝐹‘𝑧)) ∈ V)
121	3, 120, 6, 15, 9	offval2 7734	. . . . . . . . 9 ⊢ (𝜑 → (((ℂ × {𝑅}) ∘f · 𝐹) ∘f / (ℂ × {𝑅})) = (𝑧 ∈ ℂ ↦ ((𝑅 · (𝐹‘𝑧)) / 𝑅)))
122	119, 121, 14	3eqtr4d 2790	. . . . . . . 8 ⊢ (𝜑 → (((ℂ × {𝑅}) ∘f · 𝐹) ∘f / (ℂ × {𝑅})) = 𝐹)
123	54, 116	div0d 12069	. . . . . . . . . 10 ⊢ (𝜑 → (0 / 𝑅) = 0)
124	123	mpteq2dv 5268	. . . . . . . . 9 ⊢ (𝜑 → (𝑧 ∈ ℂ ↦ (0 / 𝑅)) = (𝑧 ∈ ℂ ↦ 0))
125		0cnd 11283	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑧 ∈ ℂ) → 0 ∈ ℂ)
126		df-0p 25724	. . . . . . . . . . . 12 ⊢ 0𝑝 = (ℂ × {0})
127		fconstmpt 5762	. . . . . . . . . . . 12 ⊢ (ℂ × {0}) = (𝑧 ∈ ℂ ↦ 0)
128	126, 127	eqtri 2768	. . . . . . . . . . 11 ⊢ 0𝑝 = (𝑧 ∈ ℂ ↦ 0)
129	128	a1i 11	. . . . . . . . . 10 ⊢ (𝜑 → 0𝑝 = (𝑧 ∈ ℂ ↦ 0))
130	3, 125, 6, 129, 9	offval2 7734	. . . . . . . . 9 ⊢ (𝜑 → (0𝑝 ∘f / (ℂ × {𝑅})) = (𝑧 ∈ ℂ ↦ (0 / 𝑅)))
131	124, 130, 129	3eqtr4d 2790	. . . . . . . 8 ⊢ (𝜑 → (0𝑝 ∘f / (ℂ × {𝑅})) = 0𝑝)
132	122, 131	eqeq12d 2756	. . . . . . 7 ⊢ (𝜑 → ((((ℂ × {𝑅}) ∘f · 𝐹) ∘f / (ℂ × {𝑅})) = (0𝑝 ∘f / (ℂ × {𝑅})) ↔ 𝐹 = 0𝑝))
133	114, 132	imbitrid 244	. . . . . 6 ⊢ (𝜑 → (((ℂ × {𝑅}) ∘f · 𝐹) = 0𝑝 → 𝐹 = 0𝑝))
134	133	necon3d 2967	. . . . 5 ⊢ (𝜑 → (𝐹 ≠ 0𝑝 → ((ℂ × {𝑅}) ∘f · 𝐹) ≠ 0𝑝))
135	113, 134	mpd 15	. . . 4 ⊢ (𝜑 → ((ℂ × {𝑅}) ∘f · 𝐹) ≠ 0𝑝)
136		eldifsn 4811	. . . 4 ⊢ (((ℂ × {𝑅}) ∘f · 𝐹) ∈ ((Poly‘ℤ) ∖ {0𝑝}) ↔ (((ℂ × {𝑅}) ∘f · 𝐹) ∈ (Poly‘ℤ) ∧ ((ℂ × {𝑅}) ∘f · 𝐹) ≠ 0𝑝))
137	110, 135, 136	sylanbrc 582	. . 3 ⊢ (𝜑 → ((ℂ × {𝑅}) ∘f · 𝐹) ∈ ((Poly‘ℤ) ∖ {0𝑝}))
138	5	fconst 6807	. . . . . . 7 ⊢ (ℂ × {𝑅}):ℂ⟶{𝑅}
139		ffn 6747	. . . . . . 7 ⊢ ((ℂ × {𝑅}):ℂ⟶{𝑅} → (ℂ × {𝑅}) Fn ℂ)
140	138, 139	mp1i 13	. . . . . 6 ⊢ (𝜑 → (ℂ × {𝑅}) Fn ℂ)
141	13	ffnd 6748	. . . . . 6 ⊢ (𝜑 → 𝐹 Fn ℂ)
142		inidm 4248	. . . . . 6 ⊢ (ℂ ∩ ℂ) = ℂ
143	5	fvconst2 7241	. . . . . . 7 ⊢ (𝐴 ∈ ℂ → ((ℂ × {𝑅})‘𝐴) = 𝑅)
144	143	adantl 481	. . . . . 6 ⊢ ((𝜑 ∧ 𝐴 ∈ ℂ) → ((ℂ × {𝑅})‘𝐴) = 𝑅)
145	96	adantr 480	. . . . . 6 ⊢ ((𝜑 ∧ 𝐴 ∈ ℂ) → (𝐹‘𝐴) = 0)
146	140, 141, 3, 3, 142, 144, 145	ofval 7725	. . . . 5 ⊢ ((𝜑 ∧ 𝐴 ∈ ℂ) → (((ℂ × {𝑅}) ∘f · 𝐹)‘𝐴) = (𝑅 · 0))
147	1, 146	mpdan 686	. . . 4 ⊢ (𝜑 → (((ℂ × {𝑅}) ∘f · 𝐹)‘𝐴) = (𝑅 · 0))
148	54	mul01d 11489	. . . 4 ⊢ (𝜑 → (𝑅 · 0) = 0)
149	147, 148	eqtrd 2780	. . 3 ⊢ (𝜑 → (((ℂ × {𝑅}) ∘f · 𝐹)‘𝐴) = 0)
150		fveq1 6919	. . . . 5 ⊢ (𝑓 = ((ℂ × {𝑅}) ∘f · 𝐹) → (𝑓‘𝐴) = (((ℂ × {𝑅}) ∘f · 𝐹)‘𝐴))
151	150	eqeq1d 2742	. . . 4 ⊢ (𝑓 = ((ℂ × {𝑅}) ∘f · 𝐹) → ((𝑓‘𝐴) = 0 ↔ (((ℂ × {𝑅}) ∘f · 𝐹)‘𝐴) = 0))
152	151	rspcev 3635	. . 3 ⊢ ((((ℂ × {𝑅}) ∘f · 𝐹) ∈ ((Poly‘ℤ) ∖ {0𝑝}) ∧ (((ℂ × {𝑅}) ∘f · 𝐹)‘𝐴) = 0) → ∃𝑓 ∈ ((Poly‘ℤ) ∖ {0𝑝})(𝑓‘𝐴) = 0)
153	137, 149, 152	syl2anc 583	. 2 ⊢ (𝜑 → ∃𝑓 ∈ ((Poly‘ℤ) ∖ {0𝑝})(𝑓‘𝐴) = 0)
154		elaa 26376	. 2 ⊢ (𝐴 ∈ 𝔸 ↔ (𝐴 ∈ ℂ ∧ ∃𝑓 ∈ ((Poly‘ℤ) ∖ {0𝑝})(𝑓‘𝐴) = 0))
155	1, 153, 154	sylanbrc 582	1 ⊢ (𝜑 → 𝐴 ∈ 𝔸)

Syntax hints:   → wi 4   ↔ wb 206   ∧ wa 395   = wceq 1537   ∈ wcel 2108   ≠ wne 2946  ∃wrex 3076  {crab 3443  Vcvv 3488   ∖ cdif 3973   ⊆ wss 3976  ∅c0 4352  {csn 4648   ↦ cmpt 5249   × cxp 5698   Fn wfn 6568  ⟶wf 6569  ‘cfv 6573  (class class class)co 7448   ∈ cmpo 7450   ∘_f cof 7712  infcinf 9510  ℂcc 11182  ℝcr 11183  0cc0 11184  1c1 11185   · cmul 11189   < clt 11324   / cdiv 11947  ℕcn 12293  ℕ₀cn0 12553  ℤcz 12639  ℤ_≥cuz 12903  ℚcq 13013  ℝ⁺crp 13057  ...cfz 13567   mod cmo 13920  seqcseq 14052  ↑cexp 14112  Σcsu 15734  0_𝑝c0p 25723  Polycply 26243  coeffccoe 26245  degcdgr 26246  𝔸caa 26374

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1793  ax-4 1807  ax-5 1909  ax-6 1967  ax-7 2007  ax-8 2110  ax-9 2118  ax-10 2141  ax-11 2158  ax-12 2178  ax-ext 2711  ax-rep 5303  ax-sep 5317  ax-nul 5324  ax-pow 5383  ax-pr 5447  ax-un 7770  ax-inf2 9710  ax-cnex 11240  ax-resscn 11241  ax-1cn 11242  ax-icn 11243  ax-addcl 11244  ax-addrcl 11245  ax-mulcl 11246  ax-mulrcl 11247  ax-mulcom 11248  ax-addass 11249  ax-mulass 11250  ax-distr 11251  ax-i2m1 11252  ax-1ne0 11253  ax-1rid 11254  ax-rnegex 11255  ax-rrecex 11256  ax-cnre 11257  ax-pre-lttri 11258  ax-pre-lttrn 11259  ax-pre-ltadd 11260  ax-pre-mulgt0 11261  ax-pre-sup 11262

This theorem depends on definitions:  df-bi 207  df-an 396  df-or 847  df-3or 1088  df-3an 1089  df-tru 1540  df-fal 1550  df-ex 1778  df-nf 1782  df-sb 2065  df-mo 2543  df-eu 2572  df-clab 2718  df-cleq 2732  df-clel 2819  df-nfc 2895  df-ne 2947  df-nel 3053  df-ral 3068  df-rex 3077  df-rmo 3388  df-reu 3389  df-rab 3444  df-v 3490  df-sbc 3805  df-csb 3922  df-dif 3979  df-un 3981  df-in 3983  df-ss 3993  df-pss 3996  df-nul 4353  df-if 4549  df-pw 4624  df-sn 4649  df-pr 4651  df-op 4655  df-uni 4932  df-int 4971  df-iun 5017  df-br 5167  df-opab 5229  df-mpt 5250  df-tr 5284  df-id 5593  df-eprel 5599  df-po 5607  df-so 5608  df-fr 5652  df-se 5653  df-we 5654  df-xp 5706  df-rel 5707  df-cnv 5708  df-co 5709  df-dm 5710  df-rn 5711  df-res 5712  df-ima 5713  df-pred 6332  df-ord 6398  df-on 6399  df-lim 6400  df-suc 6401  df-iota 6525  df-fun 6575  df-fn 6576  df-f 6577  df-f1 6578  df-fo 6579  df-f1o 6580  df-fv 6581  df-isom 6582  df-riota 7404  df-ov 7451  df-oprab 7452  df-mpo 7453  df-of 7714  df-om 7904  df-1st 8030  df-2nd 8031  df-frecs 8322  df-wrecs 8353  df-recs 8427  df-rdg 8466  df-1o 8522  df-er 8763  df-map 8886  df-pm 8887  df-en 9004  df-dom 9005  df-sdom 9006  df-fin 9007  df-sup 9511  df-inf 9512  df-oi 9579  df-card 10008  df-pnf 11326  df-mnf 11327  df-xr 11328  df-ltxr 11329  df-le 11330  df-sub 11522  df-neg 11523  df-div 11948  df-nn 12294  df-2 12356  df-3 12357  df-n0 12554  df-z 12640  df-uz 12904  df-q 13014  df-rp 13058  df-fz 13568  df-fzo 13712  df-fl 13843  df-mod 13921  df-seq 14053  df-exp 14113  df-hash 14380  df-cj 15148  df-re 15149  df-im 15150  df-sqrt 15284  df-abs 15285  df-clim 15534  df-rlim 15535  df-sum 15735  df-0p 25724  df-ply 26247  df-coe 26249  df-dgr 26250  df-aa 26375

This theorem is referenced by:  elqaa  26382