MPE Home Metamath Proof Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >  aannenlem2 Structured version   Visualization version   GIF version

Theorem aannenlem2 26389
Description: Lemma for aannen 26391. (Contributed by Stefan O'Rear, 16-Nov-2014.)
Hypothesis
Ref Expression
aannenlem.a 𝐻 = (𝑎 ∈ ℕ0 ↦ {𝑏 ∈ ℂ ∣ ∃𝑐 ∈ {𝑑 ∈ (Poly‘ℤ) ∣ (𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ 𝑎 ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ 𝑎)} (𝑐𝑏) = 0})
Assertion
Ref Expression
aannenlem2 𝔸 = ran 𝐻
Distinct variable group:   𝑎,𝑏,𝑐,𝑑,𝑒
Allowed substitution hints:   𝐻(𝑒,𝑎,𝑏,𝑐,𝑑)

Proof of Theorem aannenlem2
Dummy variables 𝑓 𝑔 𝑖 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 fveqeq2 6929 . . . . . . . . . . 11 (𝑏 = 𝑔 → ((𝑐𝑏) = 0 ↔ (𝑐𝑔) = 0))
21rexbidv 3185 . . . . . . . . . 10 (𝑏 = 𝑔 → (∃𝑐 ∈ {𝑑 ∈ (Poly‘ℤ) ∣ (𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ sup(({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}), ℝ*, < ) ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ sup(({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}), ℝ*, < ))} (𝑐𝑏) = 0 ↔ ∃𝑐 ∈ {𝑑 ∈ (Poly‘ℤ) ∣ (𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ sup(({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}), ℝ*, < ) ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ sup(({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}), ℝ*, < ))} (𝑐𝑔) = 0))
3 simp3 1138 . . . . . . . . . 10 (( ∈ ((Poly‘ℤ) ∖ {0𝑝}) ∧ (𝑔) = 0 ∧ 𝑔 ∈ ℂ) → 𝑔 ∈ ℂ)
4 neeq1 3009 . . . . . . . . . . . . 13 (𝑑 = → (𝑑 ≠ 0𝑝 ≠ 0𝑝))
5 fveq2 6920 . . . . . . . . . . . . . 14 (𝑑 = → (deg‘𝑑) = (deg‘))
65breq1d 5176 . . . . . . . . . . . . 13 (𝑑 = → ((deg‘𝑑) ≤ sup(({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}), ℝ*, < ) ↔ (deg‘) ≤ sup(({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}), ℝ*, < )))
7 fveq2 6920 . . . . . . . . . . . . . . . . 17 (𝑑 = → (coeff‘𝑑) = (coeff‘))
87fveq1d 6922 . . . . . . . . . . . . . . . 16 (𝑑 = → ((coeff‘𝑑)‘𝑒) = ((coeff‘)‘𝑒))
98fveq2d 6924 . . . . . . . . . . . . . . 15 (𝑑 = → (abs‘((coeff‘𝑑)‘𝑒)) = (abs‘((coeff‘)‘𝑒)))
109breq1d 5176 . . . . . . . . . . . . . 14 (𝑑 = → ((abs‘((coeff‘𝑑)‘𝑒)) ≤ sup(({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}), ℝ*, < ) ↔ (abs‘((coeff‘)‘𝑒)) ≤ sup(({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}), ℝ*, < )))
1110ralbidv 3184 . . . . . . . . . . . . 13 (𝑑 = → (∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ sup(({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}), ℝ*, < ) ↔ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘)‘𝑒)) ≤ sup(({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}), ℝ*, < )))
124, 6, 113anbi123d 1436 . . . . . . . . . . . 12 (𝑑 = → ((𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ sup(({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}), ℝ*, < ) ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ sup(({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}), ℝ*, < )) ↔ ( ≠ 0𝑝 ∧ (deg‘) ≤ sup(({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}), ℝ*, < ) ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘)‘𝑒)) ≤ sup(({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}), ℝ*, < ))))
13 eldifi 4154 . . . . . . . . . . . . . 14 ( ∈ ((Poly‘ℤ) ∖ {0𝑝}) → ∈ (Poly‘ℤ))
1413adantr 480 . . . . . . . . . . . . 13 (( ∈ ((Poly‘ℤ) ∖ {0𝑝}) ∧ 𝑔 ∈ ℂ) → ∈ (Poly‘ℤ))
15143adant2 1131 . . . . . . . . . . . 12 (( ∈ ((Poly‘ℤ) ∖ {0𝑝}) ∧ (𝑔) = 0 ∧ 𝑔 ∈ ℂ) → ∈ (Poly‘ℤ))
16 eldifsni 4815 . . . . . . . . . . . . . . 15 ( ∈ ((Poly‘ℤ) ∖ {0𝑝}) → ≠ 0𝑝)
1716adantr 480 . . . . . . . . . . . . . 14 (( ∈ ((Poly‘ℤ) ∖ {0𝑝}) ∧ 𝑔 ∈ ℂ) → ≠ 0𝑝)
18 0nn0 12568 . . . . . . . . . . . . . . . . . 18 0 ∈ ℕ0
19 dgrcl 26292 . . . . . . . . . . . . . . . . . . 19 ( ∈ (Poly‘ℤ) → (deg‘) ∈ ℕ0)
2014, 19syl 17 . . . . . . . . . . . . . . . . . 18 (( ∈ ((Poly‘ℤ) ∖ {0𝑝}) ∧ 𝑔 ∈ ℂ) → (deg‘) ∈ ℕ0)
21 prssi 4846 . . . . . . . . . . . . . . . . . 18 ((0 ∈ ℕ0 ∧ (deg‘) ∈ ℕ0) → {0, (deg‘)} ⊆ ℕ0)
2218, 20, 21sylancr 586 . . . . . . . . . . . . . . . . 17 (( ∈ ((Poly‘ℤ) ∖ {0𝑝}) ∧ 𝑔 ∈ ℂ) → {0, (deg‘)} ⊆ ℕ0)
23 ssrab2 4103 . . . . . . . . . . . . . . . . . 18 {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))} ⊆ ℕ0
2423a1i 11 . . . . . . . . . . . . . . . . 17 (( ∈ ((Poly‘ℤ) ∖ {0𝑝}) ∧ 𝑔 ∈ ℂ) → {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))} ⊆ ℕ0)
2522, 24unssd 4215 . . . . . . . . . . . . . . . 16 (( ∈ ((Poly‘ℤ) ∖ {0𝑝}) ∧ 𝑔 ∈ ℂ) → ({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}) ⊆ ℕ0)
26 nn0ssre 12557 . . . . . . . . . . . . . . . . 17 0 ⊆ ℝ
27 ressxr 11334 . . . . . . . . . . . . . . . . 17 ℝ ⊆ ℝ*
2826, 27sstri 4018 . . . . . . . . . . . . . . . 16 0 ⊆ ℝ*
2925, 28sstrdi 4021 . . . . . . . . . . . . . . 15 (( ∈ ((Poly‘ℤ) ∖ {0𝑝}) ∧ 𝑔 ∈ ℂ) → ({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}) ⊆ ℝ*)
30 fvex 6933 . . . . . . . . . . . . . . . . 17 (deg‘) ∈ V
3130prid2 4788 . . . . . . . . . . . . . . . 16 (deg‘) ∈ {0, (deg‘)}
32 elun1 4205 . . . . . . . . . . . . . . . 16 ((deg‘) ∈ {0, (deg‘)} → (deg‘) ∈ ({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}))
3331, 32ax-mp 5 . . . . . . . . . . . . . . 15 (deg‘) ∈ ({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))})
34 supxrub 13386 . . . . . . . . . . . . . . 15 ((({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}) ⊆ ℝ* ∧ (deg‘) ∈ ({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))})) → (deg‘) ≤ sup(({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}), ℝ*, < ))
3529, 33, 34sylancl 585 . . . . . . . . . . . . . 14 (( ∈ ((Poly‘ℤ) ∖ {0𝑝}) ∧ 𝑔 ∈ ℂ) → (deg‘) ≤ sup(({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}), ℝ*, < ))
3629adantr 480 . . . . . . . . . . . . . . . 16 ((( ∈ ((Poly‘ℤ) ∖ {0𝑝}) ∧ 𝑔 ∈ ℂ) ∧ 𝑒 ∈ ℕ0) → ({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}) ⊆ ℝ*)
37 fveq2 6920 . . . . . . . . . . . . . . . . . . . 20 (((coeff‘)‘𝑒) = 0 → (abs‘((coeff‘)‘𝑒)) = (abs‘0))
38 abs0 15334 . . . . . . . . . . . . . . . . . . . 20 (abs‘0) = 0
3937, 38eqtrdi 2796 . . . . . . . . . . . . . . . . . . 19 (((coeff‘)‘𝑒) = 0 → (abs‘((coeff‘)‘𝑒)) = 0)
40 c0ex 11284 . . . . . . . . . . . . . . . . . . . . 21 0 ∈ V
4140prid1 4787 . . . . . . . . . . . . . . . . . . . 20 0 ∈ {0, (deg‘)}
42 elun1 4205 . . . . . . . . . . . . . . . . . . . 20 (0 ∈ {0, (deg‘)} → 0 ∈ ({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}))
4341, 42ax-mp 5 . . . . . . . . . . . . . . . . . . 19 0 ∈ ({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))})
4439, 43eqeltrdi 2852 . . . . . . . . . . . . . . . . . 18 (((coeff‘)‘𝑒) = 0 → (abs‘((coeff‘)‘𝑒)) ∈ ({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}))
4544adantl 481 . . . . . . . . . . . . . . . . 17 (((( ∈ ((Poly‘ℤ) ∖ {0𝑝}) ∧ 𝑔 ∈ ℂ) ∧ 𝑒 ∈ ℕ0) ∧ ((coeff‘)‘𝑒) = 0) → (abs‘((coeff‘)‘𝑒)) ∈ ({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}))
46 eqeq1 2744 . . . . . . . . . . . . . . . . . . . 20 (𝑔 = (abs‘((coeff‘)‘𝑒)) → (𝑔 = (abs‘((coeff‘)‘𝑖)) ↔ (abs‘((coeff‘)‘𝑒)) = (abs‘((coeff‘)‘𝑖))))
4746rexbidv 3185 . . . . . . . . . . . . . . . . . . 19 (𝑔 = (abs‘((coeff‘)‘𝑒)) → (∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖)) ↔ ∃𝑖 ∈ (0...(deg‘))(abs‘((coeff‘)‘𝑒)) = (abs‘((coeff‘)‘𝑖))))
48 0z 12650 . . . . . . . . . . . . . . . . . . . . . . 23 0 ∈ ℤ
49 eqid 2740 . . . . . . . . . . . . . . . . . . . . . . . 24 (coeff‘) = (coeff‘)
5049coef2 26290 . . . . . . . . . . . . . . . . . . . . . . 23 (( ∈ (Poly‘ℤ) ∧ 0 ∈ ℤ) → (coeff‘):ℕ0⟶ℤ)
5114, 48, 50sylancl 585 . . . . . . . . . . . . . . . . . . . . . 22 (( ∈ ((Poly‘ℤ) ∖ {0𝑝}) ∧ 𝑔 ∈ ℂ) → (coeff‘):ℕ0⟶ℤ)
5251ffvelcdmda 7118 . . . . . . . . . . . . . . . . . . . . 21 ((( ∈ ((Poly‘ℤ) ∖ {0𝑝}) ∧ 𝑔 ∈ ℂ) ∧ 𝑒 ∈ ℕ0) → ((coeff‘)‘𝑒) ∈ ℤ)
53 nn0abscl 15361 . . . . . . . . . . . . . . . . . . . . 21 (((coeff‘)‘𝑒) ∈ ℤ → (abs‘((coeff‘)‘𝑒)) ∈ ℕ0)
5452, 53syl 17 . . . . . . . . . . . . . . . . . . . 20 ((( ∈ ((Poly‘ℤ) ∖ {0𝑝}) ∧ 𝑔 ∈ ℂ) ∧ 𝑒 ∈ ℕ0) → (abs‘((coeff‘)‘𝑒)) ∈ ℕ0)
5554adantr 480 . . . . . . . . . . . . . . . . . . 19 (((( ∈ ((Poly‘ℤ) ∖ {0𝑝}) ∧ 𝑔 ∈ ℂ) ∧ 𝑒 ∈ ℕ0) ∧ ((coeff‘)‘𝑒) ≠ 0) → (abs‘((coeff‘)‘𝑒)) ∈ ℕ0)
56 simplr 768 . . . . . . . . . . . . . . . . . . . . 21 (((( ∈ ((Poly‘ℤ) ∖ {0𝑝}) ∧ 𝑔 ∈ ℂ) ∧ 𝑒 ∈ ℕ0) ∧ ((coeff‘)‘𝑒) ≠ 0) → 𝑒 ∈ ℕ0)
5720ad2antrr 725 . . . . . . . . . . . . . . . . . . . . 21 (((( ∈ ((Poly‘ℤ) ∖ {0𝑝}) ∧ 𝑔 ∈ ℂ) ∧ 𝑒 ∈ ℕ0) ∧ ((coeff‘)‘𝑒) ≠ 0) → (deg‘) ∈ ℕ0)
5814ad2antrr 725 . . . . . . . . . . . . . . . . . . . . . 22 (((( ∈ ((Poly‘ℤ) ∖ {0𝑝}) ∧ 𝑔 ∈ ℂ) ∧ 𝑒 ∈ ℕ0) ∧ ((coeff‘)‘𝑒) ≠ 0) → ∈ (Poly‘ℤ))
59 simpr 484 . . . . . . . . . . . . . . . . . . . . . 22 (((( ∈ ((Poly‘ℤ) ∖ {0𝑝}) ∧ 𝑔 ∈ ℂ) ∧ 𝑒 ∈ ℕ0) ∧ ((coeff‘)‘𝑒) ≠ 0) → ((coeff‘)‘𝑒) ≠ 0)
60 eqid 2740 . . . . . . . . . . . . . . . . . . . . . . 23 (deg‘) = (deg‘)
6149, 60dgrub 26293 . . . . . . . . . . . . . . . . . . . . . 22 (( ∈ (Poly‘ℤ) ∧ 𝑒 ∈ ℕ0 ∧ ((coeff‘)‘𝑒) ≠ 0) → 𝑒 ≤ (deg‘))
6258, 56, 59, 61syl3anc 1371 . . . . . . . . . . . . . . . . . . . . 21 (((( ∈ ((Poly‘ℤ) ∖ {0𝑝}) ∧ 𝑔 ∈ ℂ) ∧ 𝑒 ∈ ℕ0) ∧ ((coeff‘)‘𝑒) ≠ 0) → 𝑒 ≤ (deg‘))
63 elfz2nn0 13675 . . . . . . . . . . . . . . . . . . . . 21 (𝑒 ∈ (0...(deg‘)) ↔ (𝑒 ∈ ℕ0 ∧ (deg‘) ∈ ℕ0𝑒 ≤ (deg‘)))
6456, 57, 62, 63syl3anbrc 1343 . . . . . . . . . . . . . . . . . . . 20 (((( ∈ ((Poly‘ℤ) ∖ {0𝑝}) ∧ 𝑔 ∈ ℂ) ∧ 𝑒 ∈ ℕ0) ∧ ((coeff‘)‘𝑒) ≠ 0) → 𝑒 ∈ (0...(deg‘)))
65 eqid 2740 . . . . . . . . . . . . . . . . . . . 20 (abs‘((coeff‘)‘𝑒)) = (abs‘((coeff‘)‘𝑒))
66 2fveq3 6925 . . . . . . . . . . . . . . . . . . . . 21 (𝑖 = 𝑒 → (abs‘((coeff‘)‘𝑖)) = (abs‘((coeff‘)‘𝑒)))
6766rspceeqv 3658 . . . . . . . . . . . . . . . . . . . 20 ((𝑒 ∈ (0...(deg‘)) ∧ (abs‘((coeff‘)‘𝑒)) = (abs‘((coeff‘)‘𝑒))) → ∃𝑖 ∈ (0...(deg‘))(abs‘((coeff‘)‘𝑒)) = (abs‘((coeff‘)‘𝑖)))
6864, 65, 67sylancl 585 . . . . . . . . . . . . . . . . . . 19 (((( ∈ ((Poly‘ℤ) ∖ {0𝑝}) ∧ 𝑔 ∈ ℂ) ∧ 𝑒 ∈ ℕ0) ∧ ((coeff‘)‘𝑒) ≠ 0) → ∃𝑖 ∈ (0...(deg‘))(abs‘((coeff‘)‘𝑒)) = (abs‘((coeff‘)‘𝑖)))
6947, 55, 68elrabd 3710 . . . . . . . . . . . . . . . . . 18 (((( ∈ ((Poly‘ℤ) ∖ {0𝑝}) ∧ 𝑔 ∈ ℂ) ∧ 𝑒 ∈ ℕ0) ∧ ((coeff‘)‘𝑒) ≠ 0) → (abs‘((coeff‘)‘𝑒)) ∈ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))})
70 elun2 4206 . . . . . . . . . . . . . . . . . 18 ((abs‘((coeff‘)‘𝑒)) ∈ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))} → (abs‘((coeff‘)‘𝑒)) ∈ ({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}))
7169, 70syl 17 . . . . . . . . . . . . . . . . 17 (((( ∈ ((Poly‘ℤ) ∖ {0𝑝}) ∧ 𝑔 ∈ ℂ) ∧ 𝑒 ∈ ℕ0) ∧ ((coeff‘)‘𝑒) ≠ 0) → (abs‘((coeff‘)‘𝑒)) ∈ ({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}))
7245, 71pm2.61dane 3035 . . . . . . . . . . . . . . . 16 ((( ∈ ((Poly‘ℤ) ∖ {0𝑝}) ∧ 𝑔 ∈ ℂ) ∧ 𝑒 ∈ ℕ0) → (abs‘((coeff‘)‘𝑒)) ∈ ({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}))
73 supxrub 13386 . . . . . . . . . . . . . . . 16 ((({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}) ⊆ ℝ* ∧ (abs‘((coeff‘)‘𝑒)) ∈ ({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))})) → (abs‘((coeff‘)‘𝑒)) ≤ sup(({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}), ℝ*, < ))
7436, 72, 73syl2anc 583 . . . . . . . . . . . . . . 15 ((( ∈ ((Poly‘ℤ) ∖ {0𝑝}) ∧ 𝑔 ∈ ℂ) ∧ 𝑒 ∈ ℕ0) → (abs‘((coeff‘)‘𝑒)) ≤ sup(({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}), ℝ*, < ))
7574ralrimiva 3152 . . . . . . . . . . . . . 14 (( ∈ ((Poly‘ℤ) ∖ {0𝑝}) ∧ 𝑔 ∈ ℂ) → ∀𝑒 ∈ ℕ0 (abs‘((coeff‘)‘𝑒)) ≤ sup(({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}), ℝ*, < ))
7617, 35, 753jca 1128 . . . . . . . . . . . . 13 (( ∈ ((Poly‘ℤ) ∖ {0𝑝}) ∧ 𝑔 ∈ ℂ) → ( ≠ 0𝑝 ∧ (deg‘) ≤ sup(({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}), ℝ*, < ) ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘)‘𝑒)) ≤ sup(({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}), ℝ*, < )))
77763adant2 1131 . . . . . . . . . . . 12 (( ∈ ((Poly‘ℤ) ∖ {0𝑝}) ∧ (𝑔) = 0 ∧ 𝑔 ∈ ℂ) → ( ≠ 0𝑝 ∧ (deg‘) ≤ sup(({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}), ℝ*, < ) ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘)‘𝑒)) ≤ sup(({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}), ℝ*, < )))
7812, 15, 77elrabd 3710 . . . . . . . . . . 11 (( ∈ ((Poly‘ℤ) ∖ {0𝑝}) ∧ (𝑔) = 0 ∧ 𝑔 ∈ ℂ) → ∈ {𝑑 ∈ (Poly‘ℤ) ∣ (𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ sup(({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}), ℝ*, < ) ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ sup(({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}), ℝ*, < ))})
79 simp2 1137 . . . . . . . . . . 11 (( ∈ ((Poly‘ℤ) ∖ {0𝑝}) ∧ (𝑔) = 0 ∧ 𝑔 ∈ ℂ) → (𝑔) = 0)
80 fveq1 6919 . . . . . . . . . . . . 13 (𝑐 = → (𝑐𝑔) = (𝑔))
8180eqeq1d 2742 . . . . . . . . . . . 12 (𝑐 = → ((𝑐𝑔) = 0 ↔ (𝑔) = 0))
8281rspcev 3635 . . . . . . . . . . 11 (( ∈ {𝑑 ∈ (Poly‘ℤ) ∣ (𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ sup(({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}), ℝ*, < ) ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ sup(({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}), ℝ*, < ))} ∧ (𝑔) = 0) → ∃𝑐 ∈ {𝑑 ∈ (Poly‘ℤ) ∣ (𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ sup(({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}), ℝ*, < ) ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ sup(({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}), ℝ*, < ))} (𝑐𝑔) = 0)
8378, 79, 82syl2anc 583 . . . . . . . . . 10 (( ∈ ((Poly‘ℤ) ∖ {0𝑝}) ∧ (𝑔) = 0 ∧ 𝑔 ∈ ℂ) → ∃𝑐 ∈ {𝑑 ∈ (Poly‘ℤ) ∣ (𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ sup(({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}), ℝ*, < ) ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ sup(({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}), ℝ*, < ))} (𝑐𝑔) = 0)
842, 3, 83elrabd 3710 . . . . . . . . 9 (( ∈ ((Poly‘ℤ) ∖ {0𝑝}) ∧ (𝑔) = 0 ∧ 𝑔 ∈ ℂ) → 𝑔 ∈ {𝑏 ∈ ℂ ∣ ∃𝑐 ∈ {𝑑 ∈ (Poly‘ℤ) ∣ (𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ sup(({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}), ℝ*, < ) ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ sup(({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}), ℝ*, < ))} (𝑐𝑏) = 0})
85 prfi 9391 . . . . . . . . . . . . . 14 {0, (deg‘)} ∈ Fin
86 fzfi 14023 . . . . . . . . . . . . . . . 16 (0...(deg‘)) ∈ Fin
87 abrexfi 9422 . . . . . . . . . . . . . . . 16 ((0...(deg‘)) ∈ Fin → {𝑔 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))} ∈ Fin)
8886, 87ax-mp 5 . . . . . . . . . . . . . . 15 {𝑔 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))} ∈ Fin
89 rabssab 4108 . . . . . . . . . . . . . . 15 {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))} ⊆ {𝑔 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}
90 ssfi 9240 . . . . . . . . . . . . . . 15 (({𝑔 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))} ∈ Fin ∧ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))} ⊆ {𝑔 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}) → {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))} ∈ Fin)
9188, 89, 90mp2an 691 . . . . . . . . . . . . . 14 {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))} ∈ Fin
92 unfi 9238 . . . . . . . . . . . . . 14 (({0, (deg‘)} ∈ Fin ∧ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))} ∈ Fin) → ({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}) ∈ Fin)
9385, 91, 92mp2an 691 . . . . . . . . . . . . 13 ({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}) ∈ Fin
9433ne0ii 4367 . . . . . . . . . . . . 13 ({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}) ≠ ∅
95 xrltso 13203 . . . . . . . . . . . . . 14 < Or ℝ*
96 fisupcl 9538 . . . . . . . . . . . . . 14 (( < Or ℝ* ∧ (({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}) ∈ Fin ∧ ({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}) ≠ ∅ ∧ ({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}) ⊆ ℝ*)) → sup(({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}), ℝ*, < ) ∈ ({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}))
9795, 96mpan 689 . . . . . . . . . . . . 13 ((({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}) ∈ Fin ∧ ({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}) ≠ ∅ ∧ ({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}) ⊆ ℝ*) → sup(({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}), ℝ*, < ) ∈ ({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}))
9893, 94, 29, 97mp3an12i 1465 . . . . . . . . . . . 12 (( ∈ ((Poly‘ℤ) ∖ {0𝑝}) ∧ 𝑔 ∈ ℂ) → sup(({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}), ℝ*, < ) ∈ ({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}))
9925, 98sseldd 4009 . . . . . . . . . . 11 (( ∈ ((Poly‘ℤ) ∖ {0𝑝}) ∧ 𝑔 ∈ ℂ) → sup(({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}), ℝ*, < ) ∈ ℕ0)
100993adant2 1131 . . . . . . . . . 10 (( ∈ ((Poly‘ℤ) ∖ {0𝑝}) ∧ (𝑔) = 0 ∧ 𝑔 ∈ ℂ) → sup(({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}), ℝ*, < ) ∈ ℕ0)
101 eqidd 2741 . . . . . . . . . 10 (( ∈ ((Poly‘ℤ) ∖ {0𝑝}) ∧ (𝑔) = 0 ∧ 𝑔 ∈ ℂ) → {𝑏 ∈ ℂ ∣ ∃𝑐 ∈ {𝑑 ∈ (Poly‘ℤ) ∣ (𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ sup(({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}), ℝ*, < ) ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ sup(({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}), ℝ*, < ))} (𝑐𝑏) = 0} = {𝑏 ∈ ℂ ∣ ∃𝑐 ∈ {𝑑 ∈ (Poly‘ℤ) ∣ (𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ sup(({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}), ℝ*, < ) ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ sup(({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}), ℝ*, < ))} (𝑐𝑏) = 0})
102 breq2 5170 . . . . . . . . . . . . . . 15 (𝑎 = sup(({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}), ℝ*, < ) → ((deg‘𝑑) ≤ 𝑎 ↔ (deg‘𝑑) ≤ sup(({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}), ℝ*, < )))
103 breq2 5170 . . . . . . . . . . . . . . . 16 (𝑎 = sup(({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}), ℝ*, < ) → ((abs‘((coeff‘𝑑)‘𝑒)) ≤ 𝑎 ↔ (abs‘((coeff‘𝑑)‘𝑒)) ≤ sup(({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}), ℝ*, < )))
104103ralbidv 3184 . . . . . . . . . . . . . . 15 (𝑎 = sup(({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}), ℝ*, < ) → (∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ 𝑎 ↔ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ sup(({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}), ℝ*, < )))
105102, 1043anbi23d 1439 . . . . . . . . . . . . . 14 (𝑎 = sup(({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}), ℝ*, < ) → ((𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ 𝑎 ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ 𝑎) ↔ (𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ sup(({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}), ℝ*, < ) ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ sup(({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}), ℝ*, < ))))
106105rabbidv 3451 . . . . . . . . . . . . 13 (𝑎 = sup(({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}), ℝ*, < ) → {𝑑 ∈ (Poly‘ℤ) ∣ (𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ 𝑎 ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ 𝑎)} = {𝑑 ∈ (Poly‘ℤ) ∣ (𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ sup(({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}), ℝ*, < ) ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ sup(({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}), ℝ*, < ))})
107106rexeqdv 3335 . . . . . . . . . . . 12 (𝑎 = sup(({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}), ℝ*, < ) → (∃𝑐 ∈ {𝑑 ∈ (Poly‘ℤ) ∣ (𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ 𝑎 ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ 𝑎)} (𝑐𝑏) = 0 ↔ ∃𝑐 ∈ {𝑑 ∈ (Poly‘ℤ) ∣ (𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ sup(({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}), ℝ*, < ) ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ sup(({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}), ℝ*, < ))} (𝑐𝑏) = 0))
108107rabbidv 3451 . . . . . . . . . . 11 (𝑎 = sup(({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}), ℝ*, < ) → {𝑏 ∈ ℂ ∣ ∃𝑐 ∈ {𝑑 ∈ (Poly‘ℤ) ∣ (𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ 𝑎 ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ 𝑎)} (𝑐𝑏) = 0} = {𝑏 ∈ ℂ ∣ ∃𝑐 ∈ {𝑑 ∈ (Poly‘ℤ) ∣ (𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ sup(({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}), ℝ*, < ) ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ sup(({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}), ℝ*, < ))} (𝑐𝑏) = 0})
109108rspceeqv 3658 . . . . . . . . . 10 ((sup(({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}), ℝ*, < ) ∈ ℕ0 ∧ {𝑏 ∈ ℂ ∣ ∃𝑐 ∈ {𝑑 ∈ (Poly‘ℤ) ∣ (𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ sup(({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}), ℝ*, < ) ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ sup(({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}), ℝ*, < ))} (𝑐𝑏) = 0} = {𝑏 ∈ ℂ ∣ ∃𝑐 ∈ {𝑑 ∈ (Poly‘ℤ) ∣ (𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ sup(({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}), ℝ*, < ) ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ sup(({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}), ℝ*, < ))} (𝑐𝑏) = 0}) → ∃𝑎 ∈ ℕ0 {𝑏 ∈ ℂ ∣ ∃𝑐 ∈ {𝑑 ∈ (Poly‘ℤ) ∣ (𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ sup(({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}), ℝ*, < ) ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ sup(({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}), ℝ*, < ))} (𝑐𝑏) = 0} = {𝑏 ∈ ℂ ∣ ∃𝑐 ∈ {𝑑 ∈ (Poly‘ℤ) ∣ (𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ 𝑎 ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ 𝑎)} (𝑐𝑏) = 0})
110100, 101, 109syl2anc 583 . . . . . . . . 9 (( ∈ ((Poly‘ℤ) ∖ {0𝑝}) ∧ (𝑔) = 0 ∧ 𝑔 ∈ ℂ) → ∃𝑎 ∈ ℕ0 {𝑏 ∈ ℂ ∣ ∃𝑐 ∈ {𝑑 ∈ (Poly‘ℤ) ∣ (𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ sup(({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}), ℝ*, < ) ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ sup(({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}), ℝ*, < ))} (𝑐𝑏) = 0} = {𝑏 ∈ ℂ ∣ ∃𝑐 ∈ {𝑑 ∈ (Poly‘ℤ) ∣ (𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ 𝑎 ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ 𝑎)} (𝑐𝑏) = 0})
111 cnex 11265 . . . . . . . . . . 11 ℂ ∈ V
112111rabex 5357 . . . . . . . . . 10 {𝑏 ∈ ℂ ∣ ∃𝑐 ∈ {𝑑 ∈ (Poly‘ℤ) ∣ (𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ sup(({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}), ℝ*, < ) ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ sup(({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}), ℝ*, < ))} (𝑐𝑏) = 0} ∈ V
113 eleq2 2833 . . . . . . . . . . 11 (𝑓 = {𝑏 ∈ ℂ ∣ ∃𝑐 ∈ {𝑑 ∈ (Poly‘ℤ) ∣ (𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ sup(({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}), ℝ*, < ) ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ sup(({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}), ℝ*, < ))} (𝑐𝑏) = 0} → (𝑔𝑓𝑔 ∈ {𝑏 ∈ ℂ ∣ ∃𝑐 ∈ {𝑑 ∈ (Poly‘ℤ) ∣ (𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ sup(({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}), ℝ*, < ) ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ sup(({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}), ℝ*, < ))} (𝑐𝑏) = 0}))
114 eqeq1 2744 . . . . . . . . . . . 12 (𝑓 = {𝑏 ∈ ℂ ∣ ∃𝑐 ∈ {𝑑 ∈ (Poly‘ℤ) ∣ (𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ sup(({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}), ℝ*, < ) ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ sup(({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}), ℝ*, < ))} (𝑐𝑏) = 0} → (𝑓 = {𝑏 ∈ ℂ ∣ ∃𝑐 ∈ {𝑑 ∈ (Poly‘ℤ) ∣ (𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ 𝑎 ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ 𝑎)} (𝑐𝑏) = 0} ↔ {𝑏 ∈ ℂ ∣ ∃𝑐 ∈ {𝑑 ∈ (Poly‘ℤ) ∣ (𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ sup(({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}), ℝ*, < ) ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ sup(({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}), ℝ*, < ))} (𝑐𝑏) = 0} = {𝑏 ∈ ℂ ∣ ∃𝑐 ∈ {𝑑 ∈ (Poly‘ℤ) ∣ (𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ 𝑎 ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ 𝑎)} (𝑐𝑏) = 0}))
115114rexbidv 3185 . . . . . . . . . . 11 (𝑓 = {𝑏 ∈ ℂ ∣ ∃𝑐 ∈ {𝑑 ∈ (Poly‘ℤ) ∣ (𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ sup(({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}), ℝ*, < ) ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ sup(({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}), ℝ*, < ))} (𝑐𝑏) = 0} → (∃𝑎 ∈ ℕ0 𝑓 = {𝑏 ∈ ℂ ∣ ∃𝑐 ∈ {𝑑 ∈ (Poly‘ℤ) ∣ (𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ 𝑎 ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ 𝑎)} (𝑐𝑏) = 0} ↔ ∃𝑎 ∈ ℕ0 {𝑏 ∈ ℂ ∣ ∃𝑐 ∈ {𝑑 ∈ (Poly‘ℤ) ∣ (𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ sup(({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}), ℝ*, < ) ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ sup(({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}), ℝ*, < ))} (𝑐𝑏) = 0} = {𝑏 ∈ ℂ ∣ ∃𝑐 ∈ {𝑑 ∈ (Poly‘ℤ) ∣ (𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ 𝑎 ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ 𝑎)} (𝑐𝑏) = 0}))
116113, 115anbi12d 631 . . . . . . . . . 10 (𝑓 = {𝑏 ∈ ℂ ∣ ∃𝑐 ∈ {𝑑 ∈ (Poly‘ℤ) ∣ (𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ sup(({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}), ℝ*, < ) ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ sup(({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}), ℝ*, < ))} (𝑐𝑏) = 0} → ((𝑔𝑓 ∧ ∃𝑎 ∈ ℕ0 𝑓 = {𝑏 ∈ ℂ ∣ ∃𝑐 ∈ {𝑑 ∈ (Poly‘ℤ) ∣ (𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ 𝑎 ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ 𝑎)} (𝑐𝑏) = 0}) ↔ (𝑔 ∈ {𝑏 ∈ ℂ ∣ ∃𝑐 ∈ {𝑑 ∈ (Poly‘ℤ) ∣ (𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ sup(({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}), ℝ*, < ) ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ sup(({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}), ℝ*, < ))} (𝑐𝑏) = 0} ∧ ∃𝑎 ∈ ℕ0 {𝑏 ∈ ℂ ∣ ∃𝑐 ∈ {𝑑 ∈ (Poly‘ℤ) ∣ (𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ sup(({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}), ℝ*, < ) ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ sup(({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}), ℝ*, < ))} (𝑐𝑏) = 0} = {𝑏 ∈ ℂ ∣ ∃𝑐 ∈ {𝑑 ∈ (Poly‘ℤ) ∣ (𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ 𝑎 ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ 𝑎)} (𝑐𝑏) = 0})))
117112, 116spcev 3619 . . . . . . . . 9 ((𝑔 ∈ {𝑏 ∈ ℂ ∣ ∃𝑐 ∈ {𝑑 ∈ (Poly‘ℤ) ∣ (𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ sup(({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}), ℝ*, < ) ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ sup(({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}), ℝ*, < ))} (𝑐𝑏) = 0} ∧ ∃𝑎 ∈ ℕ0 {𝑏 ∈ ℂ ∣ ∃𝑐 ∈ {𝑑 ∈ (Poly‘ℤ) ∣ (𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ sup(({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}), ℝ*, < ) ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ sup(({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}), ℝ*, < ))} (𝑐𝑏) = 0} = {𝑏 ∈ ℂ ∣ ∃𝑐 ∈ {𝑑 ∈ (Poly‘ℤ) ∣ (𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ 𝑎 ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ 𝑎)} (𝑐𝑏) = 0}) → ∃𝑓(𝑔𝑓 ∧ ∃𝑎 ∈ ℕ0 𝑓 = {𝑏 ∈ ℂ ∣ ∃𝑐 ∈ {𝑑 ∈ (Poly‘ℤ) ∣ (𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ 𝑎 ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ 𝑎)} (𝑐𝑏) = 0}))
11884, 110, 117syl2anc 583 . . . . . . . 8 (( ∈ ((Poly‘ℤ) ∖ {0𝑝}) ∧ (𝑔) = 0 ∧ 𝑔 ∈ ℂ) → ∃𝑓(𝑔𝑓 ∧ ∃𝑎 ∈ ℕ0 𝑓 = {𝑏 ∈ ℂ ∣ ∃𝑐 ∈ {𝑑 ∈ (Poly‘ℤ) ∣ (𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ 𝑎 ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ 𝑎)} (𝑐𝑏) = 0}))
1191183exp 1119 . . . . . . 7 ( ∈ ((Poly‘ℤ) ∖ {0𝑝}) → ((𝑔) = 0 → (𝑔 ∈ ℂ → ∃𝑓(𝑔𝑓 ∧ ∃𝑎 ∈ ℕ0 𝑓 = {𝑏 ∈ ℂ ∣ ∃𝑐 ∈ {𝑑 ∈ (Poly‘ℤ) ∣ (𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ 𝑎 ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ 𝑎)} (𝑐𝑏) = 0}))))
120119rexlimiv 3154 . . . . . 6 (∃ ∈ ((Poly‘ℤ) ∖ {0𝑝})(𝑔) = 0 → (𝑔 ∈ ℂ → ∃𝑓(𝑔𝑓 ∧ ∃𝑎 ∈ ℕ0 𝑓 = {𝑏 ∈ ℂ ∣ ∃𝑐 ∈ {𝑑 ∈ (Poly‘ℤ) ∣ (𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ 𝑎 ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ 𝑎)} (𝑐𝑏) = 0})))
121120impcom 407 . . . . 5 ((𝑔 ∈ ℂ ∧ ∃ ∈ ((Poly‘ℤ) ∖ {0𝑝})(𝑔) = 0) → ∃𝑓(𝑔𝑓 ∧ ∃𝑎 ∈ ℕ0 𝑓 = {𝑏 ∈ ℂ ∣ ∃𝑐 ∈ {𝑑 ∈ (Poly‘ℤ) ∣ (𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ 𝑎 ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ 𝑎)} (𝑐𝑏) = 0}))
122 eleq2 2833 . . . . . . . . 9 (𝑓 = {𝑏 ∈ ℂ ∣ ∃𝑐 ∈ {𝑑 ∈ (Poly‘ℤ) ∣ (𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ 𝑎 ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ 𝑎)} (𝑐𝑏) = 0} → (𝑔𝑓𝑔 ∈ {𝑏 ∈ ℂ ∣ ∃𝑐 ∈ {𝑑 ∈ (Poly‘ℤ) ∣ (𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ 𝑎 ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ 𝑎)} (𝑐𝑏) = 0}))
1231rexbidv 3185 . . . . . . . . . . 11 (𝑏 = 𝑔 → (∃𝑐 ∈ {𝑑 ∈ (Poly‘ℤ) ∣ (𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ 𝑎 ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ 𝑎)} (𝑐𝑏) = 0 ↔ ∃𝑐 ∈ {𝑑 ∈ (Poly‘ℤ) ∣ (𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ 𝑎 ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ 𝑎)} (𝑐𝑔) = 0))
124123elrab 3708 . . . . . . . . . 10 (𝑔 ∈ {𝑏 ∈ ℂ ∣ ∃𝑐 ∈ {𝑑 ∈ (Poly‘ℤ) ∣ (𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ 𝑎 ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ 𝑎)} (𝑐𝑏) = 0} ↔ (𝑔 ∈ ℂ ∧ ∃𝑐 ∈ {𝑑 ∈ (Poly‘ℤ) ∣ (𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ 𝑎 ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ 𝑎)} (𝑐𝑔) = 0))
125 simp1 1136 . . . . . . . . . . . . . . 15 (( ≠ 0𝑝 ∧ (deg‘) ≤ 𝑎 ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘)‘𝑒)) ≤ 𝑎) → ≠ 0𝑝)
126125anim2i 616 . . . . . . . . . . . . . 14 (( ∈ (Poly‘ℤ) ∧ ( ≠ 0𝑝 ∧ (deg‘) ≤ 𝑎 ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘)‘𝑒)) ≤ 𝑎)) → ( ∈ (Poly‘ℤ) ∧ ≠ 0𝑝))
1275breq1d 5176 . . . . . . . . . . . . . . . 16 (𝑑 = → ((deg‘𝑑) ≤ 𝑎 ↔ (deg‘) ≤ 𝑎))
1289breq1d 5176 . . . . . . . . . . . . . . . . 17 (𝑑 = → ((abs‘((coeff‘𝑑)‘𝑒)) ≤ 𝑎 ↔ (abs‘((coeff‘)‘𝑒)) ≤ 𝑎))
129128ralbidv 3184 . . . . . . . . . . . . . . . 16 (𝑑 = → (∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ 𝑎 ↔ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘)‘𝑒)) ≤ 𝑎))
1304, 127, 1293anbi123d 1436 . . . . . . . . . . . . . . 15 (𝑑 = → ((𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ 𝑎 ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ 𝑎) ↔ ( ≠ 0𝑝 ∧ (deg‘) ≤ 𝑎 ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘)‘𝑒)) ≤ 𝑎)))
131130elrab 3708 . . . . . . . . . . . . . 14 ( ∈ {𝑑 ∈ (Poly‘ℤ) ∣ (𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ 𝑎 ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ 𝑎)} ↔ ( ∈ (Poly‘ℤ) ∧ ( ≠ 0𝑝 ∧ (deg‘) ≤ 𝑎 ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘)‘𝑒)) ≤ 𝑎)))
132 eldifsn 4811 . . . . . . . . . . . . . 14 ( ∈ ((Poly‘ℤ) ∖ {0𝑝}) ↔ ( ∈ (Poly‘ℤ) ∧ ≠ 0𝑝))
133126, 131, 1323imtr4i 292 . . . . . . . . . . . . 13 ( ∈ {𝑑 ∈ (Poly‘ℤ) ∣ (𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ 𝑎 ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ 𝑎)} → ∈ ((Poly‘ℤ) ∖ {0𝑝}))
134133ssriv 4012 . . . . . . . . . . . 12 {𝑑 ∈ (Poly‘ℤ) ∣ (𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ 𝑎 ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ 𝑎)} ⊆ ((Poly‘ℤ) ∖ {0𝑝})
135 ssrexv 4078 . . . . . . . . . . . . 13 ({𝑑 ∈ (Poly‘ℤ) ∣ (𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ 𝑎 ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ 𝑎)} ⊆ ((Poly‘ℤ) ∖ {0𝑝}) → (∃𝑐 ∈ {𝑑 ∈ (Poly‘ℤ) ∣ (𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ 𝑎 ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ 𝑎)} (𝑐𝑔) = 0 → ∃𝑐 ∈ ((Poly‘ℤ) ∖ {0𝑝})(𝑐𝑔) = 0))
13681cbvrexvw 3244 . . . . . . . . . . . . 13 (∃𝑐 ∈ ((Poly‘ℤ) ∖ {0𝑝})(𝑐𝑔) = 0 ↔ ∃ ∈ ((Poly‘ℤ) ∖ {0𝑝})(𝑔) = 0)
137135, 136imbitrdi 251 . . . . . . . . . . . 12 ({𝑑 ∈ (Poly‘ℤ) ∣ (𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ 𝑎 ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ 𝑎)} ⊆ ((Poly‘ℤ) ∖ {0𝑝}) → (∃𝑐 ∈ {𝑑 ∈ (Poly‘ℤ) ∣ (𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ 𝑎 ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ 𝑎)} (𝑐𝑔) = 0 → ∃ ∈ ((Poly‘ℤ) ∖ {0𝑝})(𝑔) = 0))
138134, 137ax-mp 5 . . . . . . . . . . 11 (∃𝑐 ∈ {𝑑 ∈ (Poly‘ℤ) ∣ (𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ 𝑎 ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ 𝑎)} (𝑐𝑔) = 0 → ∃ ∈ ((Poly‘ℤ) ∖ {0𝑝})(𝑔) = 0)
139138anim2i 616 . . . . . . . . . 10 ((𝑔 ∈ ℂ ∧ ∃𝑐 ∈ {𝑑 ∈ (Poly‘ℤ) ∣ (𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ 𝑎 ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ 𝑎)} (𝑐𝑔) = 0) → (𝑔 ∈ ℂ ∧ ∃ ∈ ((Poly‘ℤ) ∖ {0𝑝})(𝑔) = 0))
140124, 139sylbi 217 . . . . . . . . 9 (𝑔 ∈ {𝑏 ∈ ℂ ∣ ∃𝑐 ∈ {𝑑 ∈ (Poly‘ℤ) ∣ (𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ 𝑎 ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ 𝑎)} (𝑐𝑏) = 0} → (𝑔 ∈ ℂ ∧ ∃ ∈ ((Poly‘ℤ) ∖ {0𝑝})(𝑔) = 0))
141122, 140biimtrdi 253 . . . . . . . 8 (𝑓 = {𝑏 ∈ ℂ ∣ ∃𝑐 ∈ {𝑑 ∈ (Poly‘ℤ) ∣ (𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ 𝑎 ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ 𝑎)} (𝑐𝑏) = 0} → (𝑔𝑓 → (𝑔 ∈ ℂ ∧ ∃ ∈ ((Poly‘ℤ) ∖ {0𝑝})(𝑔) = 0)))
142141rexlimivw 3157 . . . . . . 7 (∃𝑎 ∈ ℕ0 𝑓 = {𝑏 ∈ ℂ ∣ ∃𝑐 ∈ {𝑑 ∈ (Poly‘ℤ) ∣ (𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ 𝑎 ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ 𝑎)} (𝑐𝑏) = 0} → (𝑔𝑓 → (𝑔 ∈ ℂ ∧ ∃ ∈ ((Poly‘ℤ) ∖ {0𝑝})(𝑔) = 0)))
143142impcom 407 . . . . . 6 ((𝑔𝑓 ∧ ∃𝑎 ∈ ℕ0 𝑓 = {𝑏 ∈ ℂ ∣ ∃𝑐 ∈ {𝑑 ∈ (Poly‘ℤ) ∣ (𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ 𝑎 ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ 𝑎)} (𝑐𝑏) = 0}) → (𝑔 ∈ ℂ ∧ ∃ ∈ ((Poly‘ℤ) ∖ {0𝑝})(𝑔) = 0))
144143exlimiv 1929 . . . . 5 (∃𝑓(𝑔𝑓 ∧ ∃𝑎 ∈ ℕ0 𝑓 = {𝑏 ∈ ℂ ∣ ∃𝑐 ∈ {𝑑 ∈ (Poly‘ℤ) ∣ (𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ 𝑎 ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ 𝑎)} (𝑐𝑏) = 0}) → (𝑔 ∈ ℂ ∧ ∃ ∈ ((Poly‘ℤ) ∖ {0𝑝})(𝑔) = 0))
145121, 144impbii 209 . . . 4 ((𝑔 ∈ ℂ ∧ ∃ ∈ ((Poly‘ℤ) ∖ {0𝑝})(𝑔) = 0) ↔ ∃𝑓(𝑔𝑓 ∧ ∃𝑎 ∈ ℕ0 𝑓 = {𝑏 ∈ ℂ ∣ ∃𝑐 ∈ {𝑑 ∈ (Poly‘ℤ) ∣ (𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ 𝑎 ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ 𝑎)} (𝑐𝑏) = 0}))
146 elaa 26376 . . . 4 (𝑔 ∈ 𝔸 ↔ (𝑔 ∈ ℂ ∧ ∃ ∈ ((Poly‘ℤ) ∖ {0𝑝})(𝑔) = 0))
147 eluniab 4945 . . . 4 (𝑔 {𝑓 ∣ ∃𝑎 ∈ ℕ0 𝑓 = {𝑏 ∈ ℂ ∣ ∃𝑐 ∈ {𝑑 ∈ (Poly‘ℤ) ∣ (𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ 𝑎 ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ 𝑎)} (𝑐𝑏) = 0}} ↔ ∃𝑓(𝑔𝑓 ∧ ∃𝑎 ∈ ℕ0 𝑓 = {𝑏 ∈ ℂ ∣ ∃𝑐 ∈ {𝑑 ∈ (Poly‘ℤ) ∣ (𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ 𝑎 ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ 𝑎)} (𝑐𝑏) = 0}))
148145, 146, 1473bitr4i 303 . . 3 (𝑔 ∈ 𝔸 ↔ 𝑔 {𝑓 ∣ ∃𝑎 ∈ ℕ0 𝑓 = {𝑏 ∈ ℂ ∣ ∃𝑐 ∈ {𝑑 ∈ (Poly‘ℤ) ∣ (𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ 𝑎 ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ 𝑎)} (𝑐𝑏) = 0}})
149148eqriv 2737 . 2 𝔸 = {𝑓 ∣ ∃𝑎 ∈ ℕ0 𝑓 = {𝑏 ∈ ℂ ∣ ∃𝑐 ∈ {𝑑 ∈ (Poly‘ℤ) ∣ (𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ 𝑎 ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ 𝑎)} (𝑐𝑏) = 0}}
150 aannenlem.a . . . 4 𝐻 = (𝑎 ∈ ℕ0 ↦ {𝑏 ∈ ℂ ∣ ∃𝑐 ∈ {𝑑 ∈ (Poly‘ℤ) ∣ (𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ 𝑎 ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ 𝑎)} (𝑐𝑏) = 0})
151150rnmpt 5980 . . 3 ran 𝐻 = {𝑓 ∣ ∃𝑎 ∈ ℕ0 𝑓 = {𝑏 ∈ ℂ ∣ ∃𝑐 ∈ {𝑑 ∈ (Poly‘ℤ) ∣ (𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ 𝑎 ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ 𝑎)} (𝑐𝑏) = 0}}
152151unieqi 4943 . 2 ran 𝐻 = {𝑓 ∣ ∃𝑎 ∈ ℕ0 𝑓 = {𝑏 ∈ ℂ ∣ ∃𝑐 ∈ {𝑑 ∈ (Poly‘ℤ) ∣ (𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ 𝑎 ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ 𝑎)} (𝑐𝑏) = 0}}
153149, 152eqtr4i 2771 1 𝔸 = ran 𝐻
Colors of variables: wff setvar class
Syntax hints:  wi 4  wa 395  w3a 1087   = wceq 1537  wex 1777  wcel 2108  {cab 2717  wne 2946  wral 3067  wrex 3076  {crab 3443  cdif 3973  cun 3974  wss 3976  c0 4352  {csn 4648  {cpr 4650   cuni 4931   class class class wbr 5166  cmpt 5249   Or wor 5606  ran crn 5701  wf 6569  cfv 6573  (class class class)co 7448  Fincfn 9003  supcsup 9509  cc 11182  cr 11183  0cc0 11184  *cxr 11323   < clt 11324  cle 11325  0cn0 12553  cz 12639  ...cfz 13567  abscabs 15283  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-2o 8523  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-rp 13058  df-fz 13568  df-fzo 13712  df-fl 13843  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:  aannenlem3  26390
  Copyright terms: Public domain W3C validator