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

Theorem aannenlem2 26291
Description: Lemma for aannen 26293. (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 6841 . . . . . . . . . . 11 (𝑏 = 𝑔 → ((𝑐𝑏) = 0 ↔ (𝑐𝑔) = 0))
21rexbidv 3158 . . . . . . . . . 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 2992 . . . . . . . . . . . . 13 (𝑑 = → (𝑑 ≠ 0𝑝 ≠ 0𝑝))
5 fveq2 6832 . . . . . . . . . . . . . 14 (𝑑 = → (deg‘𝑑) = (deg‘))
65breq1d 5106 . . . . . . . . . . . . 13 (𝑑 = → ((deg‘𝑑) ≤ sup(({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}), ℝ*, < ) ↔ (deg‘) ≤ sup(({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}), ℝ*, < )))
7 fveq2 6832 . . . . . . . . . . . . . . . . 17 (𝑑 = → (coeff‘𝑑) = (coeff‘))
87fveq1d 6834 . . . . . . . . . . . . . . . 16 (𝑑 = → ((coeff‘𝑑)‘𝑒) = ((coeff‘)‘𝑒))
98fveq2d 6836 . . . . . . . . . . . . . . 15 (𝑑 = → (abs‘((coeff‘𝑑)‘𝑒)) = (abs‘((coeff‘)‘𝑒)))
109breq1d 5106 . . . . . . . . . . . . . 14 (𝑑 = → ((abs‘((coeff‘𝑑)‘𝑒)) ≤ sup(({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}), ℝ*, < ) ↔ (abs‘((coeff‘)‘𝑒)) ≤ sup(({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}), ℝ*, < )))
1110ralbidv 3157 . . . . . . . . . . . . 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 1438 . . . . . . . . . . . 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 4081 . . . . . . . . . . . . . 14 ( ∈ ((Poly‘ℤ) ∖ {0𝑝}) → ∈ (Poly‘ℤ))
1413adantr 480 . . . . . . . . . . . . 13 (( ∈ ((Poly‘ℤ) ∖ {0𝑝}) ∧ 𝑔 ∈ ℂ) → ∈ (Poly‘ℤ))
15143adant2 1131 . . . . . . . . . . . 12 (( ∈ ((Poly‘ℤ) ∖ {0𝑝}) ∧ (𝑔) = 0 ∧ 𝑔 ∈ ℂ) → ∈ (Poly‘ℤ))
16 eldifsni 4744 . . . . . . . . . . . . . . 15 ( ∈ ((Poly‘ℤ) ∖ {0𝑝}) → ≠ 0𝑝)
1716adantr 480 . . . . . . . . . . . . . 14 (( ∈ ((Poly‘ℤ) ∖ {0𝑝}) ∧ 𝑔 ∈ ℂ) → ≠ 0𝑝)
18 0nn0 12414 . . . . . . . . . . . . . . . . . 18 0 ∈ ℕ0
19 dgrcl 26192 . . . . . . . . . . . . . . . . . . 19 ( ∈ (Poly‘ℤ) → (deg‘) ∈ ℕ0)
2014, 19syl 17 . . . . . . . . . . . . . . . . . 18 (( ∈ ((Poly‘ℤ) ∖ {0𝑝}) ∧ 𝑔 ∈ ℂ) → (deg‘) ∈ ℕ0)
21 prssi 4775 . . . . . . . . . . . . . . . . . 18 ((0 ∈ ℕ0 ∧ (deg‘) ∈ ℕ0) → {0, (deg‘)} ⊆ ℕ0)
2218, 20, 21sylancr 587 . . . . . . . . . . . . . . . . 17 (( ∈ ((Poly‘ℤ) ∖ {0𝑝}) ∧ 𝑔 ∈ ℂ) → {0, (deg‘)} ⊆ ℕ0)
23 ssrab2 4030 . . . . . . . . . . . . . . . . . 18 {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))} ⊆ ℕ0
2423a1i 11 . . . . . . . . . . . . . . . . 17 (( ∈ ((Poly‘ℤ) ∖ {0𝑝}) ∧ 𝑔 ∈ ℂ) → {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))} ⊆ ℕ0)
2522, 24unssd 4142 . . . . . . . . . . . . . . . 16 (( ∈ ((Poly‘ℤ) ∖ {0𝑝}) ∧ 𝑔 ∈ ℂ) → ({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}) ⊆ ℕ0)
26 nn0ssre 12403 . . . . . . . . . . . . . . . . 17 0 ⊆ ℝ
27 ressxr 11174 . . . . . . . . . . . . . . . . 17 ℝ ⊆ ℝ*
2826, 27sstri 3941 . . . . . . . . . . . . . . . 16 0 ⊆ ℝ*
2925, 28sstrdi 3944 . . . . . . . . . . . . . . 15 (( ∈ ((Poly‘ℤ) ∖ {0𝑝}) ∧ 𝑔 ∈ ℂ) → ({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}) ⊆ ℝ*)
30 fvex 6845 . . . . . . . . . . . . . . . . 17 (deg‘) ∈ V
3130prid2 4718 . . . . . . . . . . . . . . . 16 (deg‘) ∈ {0, (deg‘)}
32 elun1 4132 . . . . . . . . . . . . . . . 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 13237 . . . . . . . . . . . . . . 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 586 . . . . . . . . . . . . . 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 6832 . . . . . . . . . . . . . . . . . . . 20 (((coeff‘)‘𝑒) = 0 → (abs‘((coeff‘)‘𝑒)) = (abs‘0))
38 abs0 15206 . . . . . . . . . . . . . . . . . . . 20 (abs‘0) = 0
3937, 38eqtrdi 2785 . . . . . . . . . . . . . . . . . . 19 (((coeff‘)‘𝑒) = 0 → (abs‘((coeff‘)‘𝑒)) = 0)
40 c0ex 11124 . . . . . . . . . . . . . . . . . . . . 21 0 ∈ V
4140prid1 4717 . . . . . . . . . . . . . . . . . . . 20 0 ∈ {0, (deg‘)}
42 elun1 4132 . . . . . . . . . . . . . . . . . . . 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 2842 . . . . . . . . . . . . . . . . . 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 2738 . . . . . . . . . . . . . . . . . . . 20 (𝑔 = (abs‘((coeff‘)‘𝑒)) → (𝑔 = (abs‘((coeff‘)‘𝑖)) ↔ (abs‘((coeff‘)‘𝑒)) = (abs‘((coeff‘)‘𝑖))))
4746rexbidv 3158 . . . . . . . . . . . . . . . . . . 19 (𝑔 = (abs‘((coeff‘)‘𝑒)) → (∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖)) ↔ ∃𝑖 ∈ (0...(deg‘))(abs‘((coeff‘)‘𝑒)) = (abs‘((coeff‘)‘𝑖))))
48 0z 12497 . . . . . . . . . . . . . . . . . . . . . . 23 0 ∈ ℤ
49 eqid 2734 . . . . . . . . . . . . . . . . . . . . . . . 24 (coeff‘) = (coeff‘)
5049coef2 26190 . . . . . . . . . . . . . . . . . . . . . . 23 (( ∈ (Poly‘ℤ) ∧ 0 ∈ ℤ) → (coeff‘):ℕ0⟶ℤ)
5114, 48, 50sylancl 586 . . . . . . . . . . . . . . . . . . . . . 22 (( ∈ ((Poly‘ℤ) ∖ {0𝑝}) ∧ 𝑔 ∈ ℂ) → (coeff‘):ℕ0⟶ℤ)
5251ffvelcdmda 7027 . . . . . . . . . . . . . . . . . . . . 21 ((( ∈ ((Poly‘ℤ) ∖ {0𝑝}) ∧ 𝑔 ∈ ℂ) ∧ 𝑒 ∈ ℕ0) → ((coeff‘)‘𝑒) ∈ ℤ)
53 nn0abscl 15233 . . . . . . . . . . . . . . . . . . . . 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 726 . . . . . . . . . . . . . . . . . . . . 21 (((( ∈ ((Poly‘ℤ) ∖ {0𝑝}) ∧ 𝑔 ∈ ℂ) ∧ 𝑒 ∈ ℕ0) ∧ ((coeff‘)‘𝑒) ≠ 0) → (deg‘) ∈ ℕ0)
5814ad2antrr 726 . . . . . . . . . . . . . . . . . . . . . 22 (((( ∈ ((Poly‘ℤ) ∖ {0𝑝}) ∧ 𝑔 ∈ ℂ) ∧ 𝑒 ∈ ℕ0) ∧ ((coeff‘)‘𝑒) ≠ 0) → ∈ (Poly‘ℤ))
59 simpr 484 . . . . . . . . . . . . . . . . . . . . . 22 (((( ∈ ((Poly‘ℤ) ∖ {0𝑝}) ∧ 𝑔 ∈ ℂ) ∧ 𝑒 ∈ ℕ0) ∧ ((coeff‘)‘𝑒) ≠ 0) → ((coeff‘)‘𝑒) ≠ 0)
60 eqid 2734 . . . . . . . . . . . . . . . . . . . . . . 23 (deg‘) = (deg‘)
6149, 60dgrub 26193 . . . . . . . . . . . . . . . . . . . . . 22 (( ∈ (Poly‘ℤ) ∧ 𝑒 ∈ ℕ0 ∧ ((coeff‘)‘𝑒) ≠ 0) → 𝑒 ≤ (deg‘))
6258, 56, 59, 61syl3anc 1373 . . . . . . . . . . . . . . . . . . . . 21 (((( ∈ ((Poly‘ℤ) ∖ {0𝑝}) ∧ 𝑔 ∈ ℂ) ∧ 𝑒 ∈ ℕ0) ∧ ((coeff‘)‘𝑒) ≠ 0) → 𝑒 ≤ (deg‘))
63 elfz2nn0 13532 . . . . . . . . . . . . . . . . . . . . 21 (𝑒 ∈ (0...(deg‘)) ↔ (𝑒 ∈ ℕ0 ∧ (deg‘) ∈ ℕ0𝑒 ≤ (deg‘)))
6456, 57, 62, 63syl3anbrc 1344 . . . . . . . . . . . . . . . . . . . 20 (((( ∈ ((Poly‘ℤ) ∖ {0𝑝}) ∧ 𝑔 ∈ ℂ) ∧ 𝑒 ∈ ℕ0) ∧ ((coeff‘)‘𝑒) ≠ 0) → 𝑒 ∈ (0...(deg‘)))
65 eqid 2734 . . . . . . . . . . . . . . . . . . . 20 (abs‘((coeff‘)‘𝑒)) = (abs‘((coeff‘)‘𝑒))
66 2fveq3 6837 . . . . . . . . . . . . . . . . . . . . 21 (𝑖 = 𝑒 → (abs‘((coeff‘)‘𝑖)) = (abs‘((coeff‘)‘𝑒)))
6766rspceeqv 3597 . . . . . . . . . . . . . . . . . . . 20 ((𝑒 ∈ (0...(deg‘)) ∧ (abs‘((coeff‘)‘𝑒)) = (abs‘((coeff‘)‘𝑒))) → ∃𝑖 ∈ (0...(deg‘))(abs‘((coeff‘)‘𝑒)) = (abs‘((coeff‘)‘𝑖)))
6864, 65, 67sylancl 586 . . . . . . . . . . . . . . . . . . 19 (((( ∈ ((Poly‘ℤ) ∖ {0𝑝}) ∧ 𝑔 ∈ ℂ) ∧ 𝑒 ∈ ℕ0) ∧ ((coeff‘)‘𝑒) ≠ 0) → ∃𝑖 ∈ (0...(deg‘))(abs‘((coeff‘)‘𝑒)) = (abs‘((coeff‘)‘𝑖)))
6947, 55, 68elrabd 3646 . . . . . . . . . . . . . . . . . 18 (((( ∈ ((Poly‘ℤ) ∖ {0𝑝}) ∧ 𝑔 ∈ ℂ) ∧ 𝑒 ∈ ℕ0) ∧ ((coeff‘)‘𝑒) ≠ 0) → (abs‘((coeff‘)‘𝑒)) ∈ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))})
70 elun2 4133 . . . . . . . . . . . . . . . . . 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 3017 . . . . . . . . . . . . . . . 16 ((( ∈ ((Poly‘ℤ) ∖ {0𝑝}) ∧ 𝑔 ∈ ℂ) ∧ 𝑒 ∈ ℕ0) → (abs‘((coeff‘)‘𝑒)) ∈ ({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}))
73 supxrub 13237 . . . . . . . . . . . . . . . 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 584 . . . . . . . . . . . . . . 15 ((( ∈ ((Poly‘ℤ) ∖ {0𝑝}) ∧ 𝑔 ∈ ℂ) ∧ 𝑒 ∈ ℕ0) → (abs‘((coeff‘)‘𝑒)) ≤ sup(({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}), ℝ*, < ))
7574ralrimiva 3126 . . . . . . . . . . . . . 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 3646 . . . . . . . . . . 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 6831 . . . . . . . . . . . . 13 (𝑐 = → (𝑐𝑔) = (𝑔))
8180eqeq1d 2736 . . . . . . . . . . . 12 (𝑐 = → ((𝑐𝑔) = 0 ↔ (𝑔) = 0))
8281rspcev 3574 . . . . . . . . . . 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 584 . . . . . . . . . 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 3646 . . . . . . . . 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 9222 . . . . . . . . . . . . . 14 {0, (deg‘)} ∈ Fin
86 fzfi 13893 . . . . . . . . . . . . . . . 16 (0...(deg‘)) ∈ Fin
87 abrexfi 9250 . . . . . . . . . . . . . . . 16 ((0...(deg‘)) ∈ Fin → {𝑔 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))} ∈ Fin)
8886, 87ax-mp 5 . . . . . . . . . . . . . . 15 {𝑔 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))} ∈ Fin
89 rabssab 4035 . . . . . . . . . . . . . . 15 {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))} ⊆ {𝑔 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}
90 ssfi 9095 . . . . . . . . . . . . . . 15 (({𝑔 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))} ∈ Fin ∧ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))} ⊆ {𝑔 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}) → {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))} ∈ Fin)
9188, 89, 90mp2an 692 . . . . . . . . . . . . . 14 {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))} ∈ Fin
92 unfi 9093 . . . . . . . . . . . . . 14 (({0, (deg‘)} ∈ Fin ∧ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))} ∈ Fin) → ({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}) ∈ Fin)
9385, 91, 92mp2an 692 . . . . . . . . . . . . 13 ({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}) ∈ Fin
9433ne0ii 4294 . . . . . . . . . . . . 13 ({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}) ≠ ∅
95 xrltso 13053 . . . . . . . . . . . . . 14 < Or ℝ*
96 fisupcl 9371 . . . . . . . . . . . . . 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 690 . . . . . . . . . . . . 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 1467 . . . . . . . . . . . 12 (( ∈ ((Poly‘ℤ) ∖ {0𝑝}) ∧ 𝑔 ∈ ℂ) → sup(({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}), ℝ*, < ) ∈ ({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}))
9925, 98sseldd 3932 . . . . . . . . . . 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 2735 . . . . . . . . . 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 5100 . . . . . . . . . . . . . . 15 (𝑎 = sup(({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}), ℝ*, < ) → ((deg‘𝑑) ≤ 𝑎 ↔ (deg‘𝑑) ≤ sup(({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}), ℝ*, < )))
103 breq2 5100 . . . . . . . . . . . . . . . 16 (𝑎 = sup(({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}), ℝ*, < ) → ((abs‘((coeff‘𝑑)‘𝑒)) ≤ 𝑎 ↔ (abs‘((coeff‘𝑑)‘𝑒)) ≤ sup(({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}), ℝ*, < )))
104103ralbidv 3157 . . . . . . . . . . . . . . 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 1441 . . . . . . . . . . . . . 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 3404 . . . . . . . . . . . . 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 3295 . . . . . . . . . . . 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 3404 . . . . . . . . . . 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 3597 . . . . . . . . . 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 584 . . . . . . . . 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 11105 . . . . . . . . . . 11 ℂ ∈ V
112111rabex 5282 . . . . . . . . . 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 2823 . . . . . . . . . . 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 2738 . . . . . . . . . . . 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 3158 . . . . . . . . . . 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 632 . . . . . . . . . 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 3558 . . . . . . . . 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 584 . . . . . . . 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 3128 . . . . . 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 2823 . . . . . . . . 9 (𝑓 = {𝑏 ∈ ℂ ∣ ∃𝑐 ∈ {𝑑 ∈ (Poly‘ℤ) ∣ (𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ 𝑎 ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ 𝑎)} (𝑐𝑏) = 0} → (𝑔𝑓𝑔 ∈ {𝑏 ∈ ℂ ∣ ∃𝑐 ∈ {𝑑 ∈ (Poly‘ℤ) ∣ (𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ 𝑎 ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ 𝑎)} (𝑐𝑏) = 0}))
1231rexbidv 3158 . . . . . . . . . . 11 (𝑏 = 𝑔 → (∃𝑐 ∈ {𝑑 ∈ (Poly‘ℤ) ∣ (𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ 𝑎 ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ 𝑎)} (𝑐𝑏) = 0 ↔ ∃𝑐 ∈ {𝑑 ∈ (Poly‘ℤ) ∣ (𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ 𝑎 ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ 𝑎)} (𝑐𝑔) = 0))
124123elrab 3644 . . . . . . . . . 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 617 . . . . . . . . . . . . . 14 (( ∈ (Poly‘ℤ) ∧ ( ≠ 0𝑝 ∧ (deg‘) ≤ 𝑎 ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘)‘𝑒)) ≤ 𝑎)) → ( ∈ (Poly‘ℤ) ∧ ≠ 0𝑝))
1275breq1d 5106 . . . . . . . . . . . . . . . 16 (𝑑 = → ((deg‘𝑑) ≤ 𝑎 ↔ (deg‘) ≤ 𝑎))
1289breq1d 5106 . . . . . . . . . . . . . . . . 17 (𝑑 = → ((abs‘((coeff‘𝑑)‘𝑒)) ≤ 𝑎 ↔ (abs‘((coeff‘)‘𝑒)) ≤ 𝑎))
129128ralbidv 3157 . . . . . . . . . . . . . . . 16 (𝑑 = → (∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ 𝑎 ↔ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘)‘𝑒)) ≤ 𝑎))
1304, 127, 1293anbi123d 1438 . . . . . . . . . . . . . . 15 (𝑑 = → ((𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ 𝑎 ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ 𝑎) ↔ ( ≠ 0𝑝 ∧ (deg‘) ≤ 𝑎 ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘)‘𝑒)) ≤ 𝑎)))
131130elrab 3644 . . . . . . . . . . . . . 14 ( ∈ {𝑑 ∈ (Poly‘ℤ) ∣ (𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ 𝑎 ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ 𝑎)} ↔ ( ∈ (Poly‘ℤ) ∧ ( ≠ 0𝑝 ∧ (deg‘) ≤ 𝑎 ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘)‘𝑒)) ≤ 𝑎)))
132 eldifsn 4740 . . . . . . . . . . . . . 14 ( ∈ ((Poly‘ℤ) ∖ {0𝑝}) ↔ ( ∈ (Poly‘ℤ) ∧ ≠ 0𝑝))
133126, 131, 1323imtr4i 292 . . . . . . . . . . . . 13 ( ∈ {𝑑 ∈ (Poly‘ℤ) ∣ (𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ 𝑎 ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ 𝑎)} → ∈ ((Poly‘ℤ) ∖ {0𝑝}))
134133ssriv 3935 . . . . . . . . . . . 12 {𝑑 ∈ (Poly‘ℤ) ∣ (𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ 𝑎 ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ 𝑎)} ⊆ ((Poly‘ℤ) ∖ {0𝑝})
135 ssrexv 4001 . . . . . . . . . . . . 13 ({𝑑 ∈ (Poly‘ℤ) ∣ (𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ 𝑎 ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ 𝑎)} ⊆ ((Poly‘ℤ) ∖ {0𝑝}) → (∃𝑐 ∈ {𝑑 ∈ (Poly‘ℤ) ∣ (𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ 𝑎 ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ 𝑎)} (𝑐𝑔) = 0 → ∃𝑐 ∈ ((Poly‘ℤ) ∖ {0𝑝})(𝑐𝑔) = 0))
13681cbvrexvw 3213 . . . . . . . . . . . . 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 617 . . . . . . . . . 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 3131 . . . . . . 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 1931 . . . . 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 26278 . . . 4 (𝑔 ∈ 𝔸 ↔ (𝑔 ∈ ℂ ∧ ∃ ∈ ((Poly‘ℤ) ∖ {0𝑝})(𝑔) = 0))
147 eluniab 4875 . . . 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 2731 . 2 𝔸 = {𝑓 ∣ ∃𝑎 ∈ ℕ0 𝑓 = {𝑏 ∈ ℂ ∣ ∃𝑐 ∈ {𝑑 ∈ (Poly‘ℤ) ∣ (𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ 𝑎 ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ 𝑎)} (𝑐𝑏) = 0}}
150 aannenlem.a . . . 4 𝐻 = (𝑎 ∈ ℕ0 ↦ {𝑏 ∈ ℂ ∣ ∃𝑐 ∈ {𝑑 ∈ (Poly‘ℤ) ∣ (𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ 𝑎 ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ 𝑎)} (𝑐𝑏) = 0})
151150rnmpt 5904 . . 3 ran 𝐻 = {𝑓 ∣ ∃𝑎 ∈ ℕ0 𝑓 = {𝑏 ∈ ℂ ∣ ∃𝑐 ∈ {𝑑 ∈ (Poly‘ℤ) ∣ (𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ 𝑎 ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ 𝑎)} (𝑐𝑏) = 0}}
152151unieqi 4873 . 2 ran 𝐻 = {𝑓 ∣ ∃𝑎 ∈ ℕ0 𝑓 = {𝑏 ∈ ℂ ∣ ∃𝑐 ∈ {𝑑 ∈ (Poly‘ℤ) ∣ (𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ 𝑎 ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ 𝑎)} (𝑐𝑏) = 0}}
153149, 152eqtr4i 2760 1 𝔸 = ran 𝐻
Colors of variables: wff setvar class
Syntax hints:  wi 4  wa 395  w3a 1086   = wceq 1541  wex 1780  wcel 2113  {cab 2712  wne 2930  wral 3049  wrex 3058  {crab 3397  cdif 3896  cun 3897  wss 3899  c0 4283  {csn 4578  {cpr 4580   cuni 4861   class class class wbr 5096  cmpt 5177   Or wor 5529  ran crn 5623  wf 6486  cfv 6490  (class class class)co 7356  Fincfn 8881  supcsup 9341  cc 11022  cr 11023  0cc0 11024  *cxr 11163   < clt 11164  cle 11165  0cn0 12399  cz 12486  ...cfz 13421  abscabs 15155  0𝑝c0p 25624  Polycply 26143  coeffccoe 26145  degcdgr 26146  𝔸caa 26276
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1796  ax-4 1810  ax-5 1911  ax-6 1968  ax-7 2009  ax-8 2115  ax-9 2123  ax-10 2146  ax-11 2162  ax-12 2182  ax-ext 2706  ax-rep 5222  ax-sep 5239  ax-nul 5249  ax-pow 5308  ax-pr 5375  ax-un 7678  ax-inf2 9548  ax-cnex 11080  ax-resscn 11081  ax-1cn 11082  ax-icn 11083  ax-addcl 11084  ax-addrcl 11085  ax-mulcl 11086  ax-mulrcl 11087  ax-mulcom 11088  ax-addass 11089  ax-mulass 11090  ax-distr 11091  ax-i2m1 11092  ax-1ne0 11093  ax-1rid 11094  ax-rnegex 11095  ax-rrecex 11096  ax-cnre 11097  ax-pre-lttri 11098  ax-pre-lttrn 11099  ax-pre-ltadd 11100  ax-pre-mulgt0 11101  ax-pre-sup 11102
This theorem depends on definitions:  df-bi 207  df-an 396  df-or 848  df-3or 1087  df-3an 1088  df-tru 1544  df-fal 1554  df-ex 1781  df-nf 1785  df-sb 2068  df-mo 2537  df-eu 2567  df-clab 2713  df-cleq 2726  df-clel 2809  df-nfc 2883  df-ne 2931  df-nel 3035  df-ral 3050  df-rex 3059  df-rmo 3348  df-reu 3349  df-rab 3398  df-v 3440  df-sbc 3739  df-csb 3848  df-dif 3902  df-un 3904  df-in 3906  df-ss 3916  df-pss 3919  df-nul 4284  df-if 4478  df-pw 4554  df-sn 4579  df-pr 4581  df-op 4585  df-uni 4862  df-int 4901  df-iun 4946  df-br 5097  df-opab 5159  df-mpt 5178  df-tr 5204  df-id 5517  df-eprel 5522  df-po 5530  df-so 5531  df-fr 5575  df-se 5576  df-we 5577  df-xp 5628  df-rel 5629  df-cnv 5630  df-co 5631  df-dm 5632  df-rn 5633  df-res 5634  df-ima 5635  df-pred 6257  df-ord 6318  df-on 6319  df-lim 6320  df-suc 6321  df-iota 6446  df-fun 6492  df-fn 6493  df-f 6494  df-f1 6495  df-fo 6496  df-f1o 6497  df-fv 6498  df-isom 6499  df-riota 7313  df-ov 7359  df-oprab 7360  df-mpo 7361  df-of 7620  df-om 7807  df-1st 7931  df-2nd 7932  df-frecs 8221  df-wrecs 8252  df-recs 8301  df-rdg 8339  df-1o 8395  df-2o 8396  df-er 8633  df-map 8763  df-pm 8764  df-en 8882  df-dom 8883  df-sdom 8884  df-fin 8885  df-sup 9343  df-inf 9344  df-oi 9413  df-card 9849  df-pnf 11166  df-mnf 11167  df-xr 11168  df-ltxr 11169  df-le 11170  df-sub 11364  df-neg 11365  df-div 11793  df-nn 12144  df-2 12206  df-3 12207  df-n0 12400  df-z 12487  df-uz 12750  df-rp 12904  df-fz 13422  df-fzo 13569  df-fl 13710  df-seq 13923  df-exp 13983  df-hash 14252  df-cj 15020  df-re 15021  df-im 15022  df-sqrt 15156  df-abs 15157  df-clim 15409  df-rlim 15410  df-sum 15608  df-0p 25625  df-ply 26147  df-coe 26149  df-dgr 26150  df-aa 26277
This theorem is referenced by:  aannenlem3  26292
  Copyright terms: Public domain W3C validator