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

Theorem aannenlem2 26183
Description: Lemma for aannen 26185. (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 6890 . . . . . . . . . . 11 (𝑏 = 𝑔 → ((𝑐𝑏) = 0 ↔ (𝑐𝑔) = 0))
21rexbidv 3170 . . . . . . . . . 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 1135 . . . . . . . . . 10 (( ∈ ((Poly‘ℤ) ∖ {0𝑝}) ∧ (𝑔) = 0 ∧ 𝑔 ∈ ℂ) → 𝑔 ∈ ℂ)
4 neeq1 2995 . . . . . . . . . . . . 13 (𝑑 = → (𝑑 ≠ 0𝑝 ≠ 0𝑝))
5 fveq2 6881 . . . . . . . . . . . . . 14 (𝑑 = → (deg‘𝑑) = (deg‘))
65breq1d 5148 . . . . . . . . . . . . 13 (𝑑 = → ((deg‘𝑑) ≤ sup(({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}), ℝ*, < ) ↔ (deg‘) ≤ sup(({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}), ℝ*, < )))
7 fveq2 6881 . . . . . . . . . . . . . . . . 17 (𝑑 = → (coeff‘𝑑) = (coeff‘))
87fveq1d 6883 . . . . . . . . . . . . . . . 16 (𝑑 = → ((coeff‘𝑑)‘𝑒) = ((coeff‘)‘𝑒))
98fveq2d 6885 . . . . . . . . . . . . . . 15 (𝑑 = → (abs‘((coeff‘𝑑)‘𝑒)) = (abs‘((coeff‘)‘𝑒)))
109breq1d 5148 . . . . . . . . . . . . . 14 (𝑑 = → ((abs‘((coeff‘𝑑)‘𝑒)) ≤ sup(({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}), ℝ*, < ) ↔ (abs‘((coeff‘)‘𝑒)) ≤ sup(({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}), ℝ*, < )))
1110ralbidv 3169 . . . . . . . . . . . . 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 1432 . . . . . . . . . . . 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 4118 . . . . . . . . . . . . . 14 ( ∈ ((Poly‘ℤ) ∖ {0𝑝}) → ∈ (Poly‘ℤ))
1413adantr 480 . . . . . . . . . . . . 13 (( ∈ ((Poly‘ℤ) ∖ {0𝑝}) ∧ 𝑔 ∈ ℂ) → ∈ (Poly‘ℤ))
15143adant2 1128 . . . . . . . . . . . 12 (( ∈ ((Poly‘ℤ) ∖ {0𝑝}) ∧ (𝑔) = 0 ∧ 𝑔 ∈ ℂ) → ∈ (Poly‘ℤ))
16 eldifsni 4785 . . . . . . . . . . . . . . 15 ( ∈ ((Poly‘ℤ) ∖ {0𝑝}) → ≠ 0𝑝)
1716adantr 480 . . . . . . . . . . . . . 14 (( ∈ ((Poly‘ℤ) ∖ {0𝑝}) ∧ 𝑔 ∈ ℂ) → ≠ 0𝑝)
18 0nn0 12484 . . . . . . . . . . . . . . . . . 18 0 ∈ ℕ0
19 dgrcl 26087 . . . . . . . . . . . . . . . . . . 19 ( ∈ (Poly‘ℤ) → (deg‘) ∈ ℕ0)
2014, 19syl 17 . . . . . . . . . . . . . . . . . 18 (( ∈ ((Poly‘ℤ) ∖ {0𝑝}) ∧ 𝑔 ∈ ℂ) → (deg‘) ∈ ℕ0)
21 prssi 4816 . . . . . . . . . . . . . . . . . 18 ((0 ∈ ℕ0 ∧ (deg‘) ∈ ℕ0) → {0, (deg‘)} ⊆ ℕ0)
2218, 20, 21sylancr 586 . . . . . . . . . . . . . . . . 17 (( ∈ ((Poly‘ℤ) ∖ {0𝑝}) ∧ 𝑔 ∈ ℂ) → {0, (deg‘)} ⊆ ℕ0)
23 ssrab2 4069 . . . . . . . . . . . . . . . . . 18 {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))} ⊆ ℕ0
2423a1i 11 . . . . . . . . . . . . . . . . 17 (( ∈ ((Poly‘ℤ) ∖ {0𝑝}) ∧ 𝑔 ∈ ℂ) → {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))} ⊆ ℕ0)
2522, 24unssd 4178 . . . . . . . . . . . . . . . 16 (( ∈ ((Poly‘ℤ) ∖ {0𝑝}) ∧ 𝑔 ∈ ℂ) → ({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}) ⊆ ℕ0)
26 nn0ssre 12473 . . . . . . . . . . . . . . . . 17 0 ⊆ ℝ
27 ressxr 11255 . . . . . . . . . . . . . . . . 17 ℝ ⊆ ℝ*
2826, 27sstri 3983 . . . . . . . . . . . . . . . 16 0 ⊆ ℝ*
2925, 28sstrdi 3986 . . . . . . . . . . . . . . 15 (( ∈ ((Poly‘ℤ) ∖ {0𝑝}) ∧ 𝑔 ∈ ℂ) → ({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}) ⊆ ℝ*)
30 fvex 6894 . . . . . . . . . . . . . . . . 17 (deg‘) ∈ V
3130prid2 4759 . . . . . . . . . . . . . . . 16 (deg‘) ∈ {0, (deg‘)}
32 elun1 4168 . . . . . . . . . . . . . . . 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 13300 . . . . . . . . . . . . . . 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 6881 . . . . . . . . . . . . . . . . . . . 20 (((coeff‘)‘𝑒) = 0 → (abs‘((coeff‘)‘𝑒)) = (abs‘0))
38 abs0 15229 . . . . . . . . . . . . . . . . . . . 20 (abs‘0) = 0
3937, 38eqtrdi 2780 . . . . . . . . . . . . . . . . . . 19 (((coeff‘)‘𝑒) = 0 → (abs‘((coeff‘)‘𝑒)) = 0)
40 c0ex 11205 . . . . . . . . . . . . . . . . . . . . 21 0 ∈ V
4140prid1 4758 . . . . . . . . . . . . . . . . . . . 20 0 ∈ {0, (deg‘)}
42 elun1 4168 . . . . . . . . . . . . . . . . . . . 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 2833 . . . . . . . . . . . . . . . . . 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 2728 . . . . . . . . . . . . . . . . . . . 20 (𝑔 = (abs‘((coeff‘)‘𝑒)) → (𝑔 = (abs‘((coeff‘)‘𝑖)) ↔ (abs‘((coeff‘)‘𝑒)) = (abs‘((coeff‘)‘𝑖))))
4746rexbidv 3170 . . . . . . . . . . . . . . . . . . 19 (𝑔 = (abs‘((coeff‘)‘𝑒)) → (∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖)) ↔ ∃𝑖 ∈ (0...(deg‘))(abs‘((coeff‘)‘𝑒)) = (abs‘((coeff‘)‘𝑖))))
48 0z 12566 . . . . . . . . . . . . . . . . . . . . . . 23 0 ∈ ℤ
49 eqid 2724 . . . . . . . . . . . . . . . . . . . . . . . 24 (coeff‘) = (coeff‘)
5049coef2 26085 . . . . . . . . . . . . . . . . . . . . . . 23 (( ∈ (Poly‘ℤ) ∧ 0 ∈ ℤ) → (coeff‘):ℕ0⟶ℤ)
5114, 48, 50sylancl 585 . . . . . . . . . . . . . . . . . . . . . 22 (( ∈ ((Poly‘ℤ) ∖ {0𝑝}) ∧ 𝑔 ∈ ℂ) → (coeff‘):ℕ0⟶ℤ)
5251ffvelcdmda 7076 . . . . . . . . . . . . . . . . . . . . 21 ((( ∈ ((Poly‘ℤ) ∖ {0𝑝}) ∧ 𝑔 ∈ ℂ) ∧ 𝑒 ∈ ℕ0) → ((coeff‘)‘𝑒) ∈ ℤ)
53 nn0abscl 15256 . . . . . . . . . . . . . . . . . . . . 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 766 . . . . . . . . . . . . . . . . . . . . 21 (((( ∈ ((Poly‘ℤ) ∖ {0𝑝}) ∧ 𝑔 ∈ ℂ) ∧ 𝑒 ∈ ℕ0) ∧ ((coeff‘)‘𝑒) ≠ 0) → 𝑒 ∈ ℕ0)
5720ad2antrr 723 . . . . . . . . . . . . . . . . . . . . 21 (((( ∈ ((Poly‘ℤ) ∖ {0𝑝}) ∧ 𝑔 ∈ ℂ) ∧ 𝑒 ∈ ℕ0) ∧ ((coeff‘)‘𝑒) ≠ 0) → (deg‘) ∈ ℕ0)
5814ad2antrr 723 . . . . . . . . . . . . . . . . . . . . . 22 (((( ∈ ((Poly‘ℤ) ∖ {0𝑝}) ∧ 𝑔 ∈ ℂ) ∧ 𝑒 ∈ ℕ0) ∧ ((coeff‘)‘𝑒) ≠ 0) → ∈ (Poly‘ℤ))
59 simpr 484 . . . . . . . . . . . . . . . . . . . . . 22 (((( ∈ ((Poly‘ℤ) ∖ {0𝑝}) ∧ 𝑔 ∈ ℂ) ∧ 𝑒 ∈ ℕ0) ∧ ((coeff‘)‘𝑒) ≠ 0) → ((coeff‘)‘𝑒) ≠ 0)
60 eqid 2724 . . . . . . . . . . . . . . . . . . . . . . 23 (deg‘) = (deg‘)
6149, 60dgrub 26088 . . . . . . . . . . . . . . . . . . . . . 22 (( ∈ (Poly‘ℤ) ∧ 𝑒 ∈ ℕ0 ∧ ((coeff‘)‘𝑒) ≠ 0) → 𝑒 ≤ (deg‘))
6258, 56, 59, 61syl3anc 1368 . . . . . . . . . . . . . . . . . . . . 21 (((( ∈ ((Poly‘ℤ) ∖ {0𝑝}) ∧ 𝑔 ∈ ℂ) ∧ 𝑒 ∈ ℕ0) ∧ ((coeff‘)‘𝑒) ≠ 0) → 𝑒 ≤ (deg‘))
63 elfz2nn0 13589 . . . . . . . . . . . . . . . . . . . . 21 (𝑒 ∈ (0...(deg‘)) ↔ (𝑒 ∈ ℕ0 ∧ (deg‘) ∈ ℕ0𝑒 ≤ (deg‘)))
6456, 57, 62, 63syl3anbrc 1340 . . . . . . . . . . . . . . . . . . . 20 (((( ∈ ((Poly‘ℤ) ∖ {0𝑝}) ∧ 𝑔 ∈ ℂ) ∧ 𝑒 ∈ ℕ0) ∧ ((coeff‘)‘𝑒) ≠ 0) → 𝑒 ∈ (0...(deg‘)))
65 eqid 2724 . . . . . . . . . . . . . . . . . . . 20 (abs‘((coeff‘)‘𝑒)) = (abs‘((coeff‘)‘𝑒))
66 2fveq3 6886 . . . . . . . . . . . . . . . . . . . . 21 (𝑖 = 𝑒 → (abs‘((coeff‘)‘𝑖)) = (abs‘((coeff‘)‘𝑒)))
6766rspceeqv 3625 . . . . . . . . . . . . . . . . . . . 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 3677 . . . . . . . . . . . . . . . . . 18 (((( ∈ ((Poly‘ℤ) ∖ {0𝑝}) ∧ 𝑔 ∈ ℂ) ∧ 𝑒 ∈ ℕ0) ∧ ((coeff‘)‘𝑒) ≠ 0) → (abs‘((coeff‘)‘𝑒)) ∈ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))})
70 elun2 4169 . . . . . . . . . . . . . . . . . 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 3021 . . . . . . . . . . . . . . . 16 ((( ∈ ((Poly‘ℤ) ∖ {0𝑝}) ∧ 𝑔 ∈ ℂ) ∧ 𝑒 ∈ ℕ0) → (abs‘((coeff‘)‘𝑒)) ∈ ({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}))
73 supxrub 13300 . . . . . . . . . . . . . . . 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 3138 . . . . . . . . . . . . . 14 (( ∈ ((Poly‘ℤ) ∖ {0𝑝}) ∧ 𝑔 ∈ ℂ) → ∀𝑒 ∈ ℕ0 (abs‘((coeff‘)‘𝑒)) ≤ sup(({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}), ℝ*, < ))
7617, 35, 753jca 1125 . . . . . . . . . . . . 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 1128 . . . . . . . . . . . 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 3677 . . . . . . . . . . 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 1134 . . . . . . . . . . 11 (( ∈ ((Poly‘ℤ) ∖ {0𝑝}) ∧ (𝑔) = 0 ∧ 𝑔 ∈ ℂ) → (𝑔) = 0)
80 fveq1 6880 . . . . . . . . . . . . 13 (𝑐 = → (𝑐𝑔) = (𝑔))
8180eqeq1d 2726 . . . . . . . . . . . 12 (𝑐 = → ((𝑐𝑔) = 0 ↔ (𝑔) = 0))
8281rspcev 3604 . . . . . . . . . . 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 3677 . . . . . . . . 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 9318 . . . . . . . . . . . . . 14 {0, (deg‘)} ∈ Fin
86 fzfi 13934 . . . . . . . . . . . . . . . 16 (0...(deg‘)) ∈ Fin
87 abrexfi 9348 . . . . . . . . . . . . . . . 16 ((0...(deg‘)) ∈ Fin → {𝑔 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))} ∈ Fin)
8886, 87ax-mp 5 . . . . . . . . . . . . . . 15 {𝑔 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))} ∈ Fin
89 rabssab 4075 . . . . . . . . . . . . . . 15 {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))} ⊆ {𝑔 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}
90 ssfi 9169 . . . . . . . . . . . . . . 15 (({𝑔 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))} ∈ Fin ∧ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))} ⊆ {𝑔 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}) → {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))} ∈ Fin)
9188, 89, 90mp2an 689 . . . . . . . . . . . . . 14 {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))} ∈ Fin
92 unfi 9168 . . . . . . . . . . . . . 14 (({0, (deg‘)} ∈ Fin ∧ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))} ∈ Fin) → ({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}) ∈ Fin)
9385, 91, 92mp2an 689 . . . . . . . . . . . . 13 ({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}) ∈ Fin
9433ne0ii 4329 . . . . . . . . . . . . 13 ({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}) ≠ ∅
95 xrltso 13117 . . . . . . . . . . . . . 14 < Or ℝ*
96 fisupcl 9460 . . . . . . . . . . . . . 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 687 . . . . . . . . . . . . 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 1461 . . . . . . . . . . . 12 (( ∈ ((Poly‘ℤ) ∖ {0𝑝}) ∧ 𝑔 ∈ ℂ) → sup(({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}), ℝ*, < ) ∈ ({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}))
9925, 98sseldd 3975 . . . . . . . . . . 11 (( ∈ ((Poly‘ℤ) ∖ {0𝑝}) ∧ 𝑔 ∈ ℂ) → sup(({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}), ℝ*, < ) ∈ ℕ0)
100993adant2 1128 . . . . . . . . . 10 (( ∈ ((Poly‘ℤ) ∖ {0𝑝}) ∧ (𝑔) = 0 ∧ 𝑔 ∈ ℂ) → sup(({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}), ℝ*, < ) ∈ ℕ0)
101 eqidd 2725 . . . . . . . . . 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 5142 . . . . . . . . . . . . . . 15 (𝑎 = sup(({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}), ℝ*, < ) → ((deg‘𝑑) ≤ 𝑎 ↔ (deg‘𝑑) ≤ sup(({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}), ℝ*, < )))
103 breq2 5142 . . . . . . . . . . . . . . . 16 (𝑎 = sup(({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}), ℝ*, < ) → ((abs‘((coeff‘𝑑)‘𝑒)) ≤ 𝑎 ↔ (abs‘((coeff‘𝑑)‘𝑒)) ≤ sup(({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}), ℝ*, < )))
104103ralbidv 3169 . . . . . . . . . . . . . . 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 1435 . . . . . . . . . . . . . 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 3432 . . . . . . . . . . . . 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 3318 . . . . . . . . . . . 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 3432 . . . . . . . . . . 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 3625 . . . . . . . . . 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 11187 . . . . . . . . . . 11 ℂ ∈ V
112111rabex 5322 . . . . . . . . . 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 2814 . . . . . . . . . . 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 2728 . . . . . . . . . . . 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 3170 . . . . . . . . . . 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 630 . . . . . . . . . 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 3588 . . . . . . . . 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 1116 . . . . . . 7 ( ∈ ((Poly‘ℤ) ∖ {0𝑝}) → ((𝑔) = 0 → (𝑔 ∈ ℂ → ∃𝑓(𝑔𝑓 ∧ ∃𝑎 ∈ ℕ0 𝑓 = {𝑏 ∈ ℂ ∣ ∃𝑐 ∈ {𝑑 ∈ (Poly‘ℤ) ∣ (𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ 𝑎 ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ 𝑎)} (𝑐𝑏) = 0}))))
120119rexlimiv 3140 . . . . . 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 2814 . . . . . . . . 9 (𝑓 = {𝑏 ∈ ℂ ∣ ∃𝑐 ∈ {𝑑 ∈ (Poly‘ℤ) ∣ (𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ 𝑎 ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ 𝑎)} (𝑐𝑏) = 0} → (𝑔𝑓𝑔 ∈ {𝑏 ∈ ℂ ∣ ∃𝑐 ∈ {𝑑 ∈ (Poly‘ℤ) ∣ (𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ 𝑎 ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ 𝑎)} (𝑐𝑏) = 0}))
1231rexbidv 3170 . . . . . . . . . . 11 (𝑏 = 𝑔 → (∃𝑐 ∈ {𝑑 ∈ (Poly‘ℤ) ∣ (𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ 𝑎 ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ 𝑎)} (𝑐𝑏) = 0 ↔ ∃𝑐 ∈ {𝑑 ∈ (Poly‘ℤ) ∣ (𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ 𝑎 ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ 𝑎)} (𝑐𝑔) = 0))
124123elrab 3675 . . . . . . . . . 10 (𝑔 ∈ {𝑏 ∈ ℂ ∣ ∃𝑐 ∈ {𝑑 ∈ (Poly‘ℤ) ∣ (𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ 𝑎 ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ 𝑎)} (𝑐𝑏) = 0} ↔ (𝑔 ∈ ℂ ∧ ∃𝑐 ∈ {𝑑 ∈ (Poly‘ℤ) ∣ (𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ 𝑎 ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ 𝑎)} (𝑐𝑔) = 0))
125 simp1 1133 . . . . . . . . . . . . . . 15 (( ≠ 0𝑝 ∧ (deg‘) ≤ 𝑎 ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘)‘𝑒)) ≤ 𝑎) → ≠ 0𝑝)
126125anim2i 616 . . . . . . . . . . . . . 14 (( ∈ (Poly‘ℤ) ∧ ( ≠ 0𝑝 ∧ (deg‘) ≤ 𝑎 ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘)‘𝑒)) ≤ 𝑎)) → ( ∈ (Poly‘ℤ) ∧ ≠ 0𝑝))
1275breq1d 5148 . . . . . . . . . . . . . . . 16 (𝑑 = → ((deg‘𝑑) ≤ 𝑎 ↔ (deg‘) ≤ 𝑎))
1289breq1d 5148 . . . . . . . . . . . . . . . . 17 (𝑑 = → ((abs‘((coeff‘𝑑)‘𝑒)) ≤ 𝑎 ↔ (abs‘((coeff‘)‘𝑒)) ≤ 𝑎))
129128ralbidv 3169 . . . . . . . . . . . . . . . 16 (𝑑 = → (∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ 𝑎 ↔ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘)‘𝑒)) ≤ 𝑎))
1304, 127, 1293anbi123d 1432 . . . . . . . . . . . . . . 15 (𝑑 = → ((𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ 𝑎 ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ 𝑎) ↔ ( ≠ 0𝑝 ∧ (deg‘) ≤ 𝑎 ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘)‘𝑒)) ≤ 𝑎)))
131130elrab 3675 . . . . . . . . . . . . . 14 ( ∈ {𝑑 ∈ (Poly‘ℤ) ∣ (𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ 𝑎 ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ 𝑎)} ↔ ( ∈ (Poly‘ℤ) ∧ ( ≠ 0𝑝 ∧ (deg‘) ≤ 𝑎 ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘)‘𝑒)) ≤ 𝑎)))
132 eldifsn 4782 . . . . . . . . . . . . . 14 ( ∈ ((Poly‘ℤ) ∖ {0𝑝}) ↔ ( ∈ (Poly‘ℤ) ∧ ≠ 0𝑝))
133126, 131, 1323imtr4i 292 . . . . . . . . . . . . 13 ( ∈ {𝑑 ∈ (Poly‘ℤ) ∣ (𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ 𝑎 ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ 𝑎)} → ∈ ((Poly‘ℤ) ∖ {0𝑝}))
134133ssriv 3978 . . . . . . . . . . . 12 {𝑑 ∈ (Poly‘ℤ) ∣ (𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ 𝑎 ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ 𝑎)} ⊆ ((Poly‘ℤ) ∖ {0𝑝})
135 ssrexv 4043 . . . . . . . . . . . . 13 ({𝑑 ∈ (Poly‘ℤ) ∣ (𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ 𝑎 ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ 𝑎)} ⊆ ((Poly‘ℤ) ∖ {0𝑝}) → (∃𝑐 ∈ {𝑑 ∈ (Poly‘ℤ) ∣ (𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ 𝑎 ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ 𝑎)} (𝑐𝑔) = 0 → ∃𝑐 ∈ ((Poly‘ℤ) ∖ {0𝑝})(𝑐𝑔) = 0))
13681cbvrexvw 3227 . . . . . . . . . . . . 13 (∃𝑐 ∈ ((Poly‘ℤ) ∖ {0𝑝})(𝑐𝑔) = 0 ↔ ∃ ∈ ((Poly‘ℤ) ∖ {0𝑝})(𝑔) = 0)
137135, 136imbitrdi 250 . . . . . . . . . . . 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 216 . . . . . . . . 9 (𝑔 ∈ {𝑏 ∈ ℂ ∣ ∃𝑐 ∈ {𝑑 ∈ (Poly‘ℤ) ∣ (𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ 𝑎 ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ 𝑎)} (𝑐𝑏) = 0} → (𝑔 ∈ ℂ ∧ ∃ ∈ ((Poly‘ℤ) ∖ {0𝑝})(𝑔) = 0))
141122, 140syl6bi 253 . . . . . . . 8 (𝑓 = {𝑏 ∈ ℂ ∣ ∃𝑐 ∈ {𝑑 ∈ (Poly‘ℤ) ∣ (𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ 𝑎 ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ 𝑎)} (𝑐𝑏) = 0} → (𝑔𝑓 → (𝑔 ∈ ℂ ∧ ∃ ∈ ((Poly‘ℤ) ∖ {0𝑝})(𝑔) = 0)))
142141rexlimivw 3143 . . . . . . 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 1925 . . . . 5 (∃𝑓(𝑔𝑓 ∧ ∃𝑎 ∈ ℕ0 𝑓 = {𝑏 ∈ ℂ ∣ ∃𝑐 ∈ {𝑑 ∈ (Poly‘ℤ) ∣ (𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ 𝑎 ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ 𝑎)} (𝑐𝑏) = 0}) → (𝑔 ∈ ℂ ∧ ∃ ∈ ((Poly‘ℤ) ∖ {0𝑝})(𝑔) = 0))
145121, 144impbii 208 . . . 4 ((𝑔 ∈ ℂ ∧ ∃ ∈ ((Poly‘ℤ) ∖ {0𝑝})(𝑔) = 0) ↔ ∃𝑓(𝑔𝑓 ∧ ∃𝑎 ∈ ℕ0 𝑓 = {𝑏 ∈ ℂ ∣ ∃𝑐 ∈ {𝑑 ∈ (Poly‘ℤ) ∣ (𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ 𝑎 ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ 𝑎)} (𝑐𝑏) = 0}))
146 elaa 26170 . . . 4 (𝑔 ∈ 𝔸 ↔ (𝑔 ∈ ℂ ∧ ∃ ∈ ((Poly‘ℤ) ∖ {0𝑝})(𝑔) = 0))
147 eluniab 4913 . . . 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 2721 . 2 𝔸 = {𝑓 ∣ ∃𝑎 ∈ ℕ0 𝑓 = {𝑏 ∈ ℂ ∣ ∃𝑐 ∈ {𝑑 ∈ (Poly‘ℤ) ∣ (𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ 𝑎 ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ 𝑎)} (𝑐𝑏) = 0}}
150 aannenlem.a . . . 4 𝐻 = (𝑎 ∈ ℕ0 ↦ {𝑏 ∈ ℂ ∣ ∃𝑐 ∈ {𝑑 ∈ (Poly‘ℤ) ∣ (𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ 𝑎 ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ 𝑎)} (𝑐𝑏) = 0})
151150rnmpt 5944 . . 3 ran 𝐻 = {𝑓 ∣ ∃𝑎 ∈ ℕ0 𝑓 = {𝑏 ∈ ℂ ∣ ∃𝑐 ∈ {𝑑 ∈ (Poly‘ℤ) ∣ (𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ 𝑎 ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ 𝑎)} (𝑐𝑏) = 0}}
152151unieqi 4911 . 2 ran 𝐻 = {𝑓 ∣ ∃𝑎 ∈ ℕ0 𝑓 = {𝑏 ∈ ℂ ∣ ∃𝑐 ∈ {𝑑 ∈ (Poly‘ℤ) ∣ (𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ 𝑎 ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ 𝑎)} (𝑐𝑏) = 0}}
153149, 152eqtr4i 2755 1 𝔸 = ran 𝐻
Colors of variables: wff setvar class
Syntax hints:  wi 4  wa 395  w3a 1084   = wceq 1533  wex 1773  wcel 2098  {cab 2701  wne 2932  wral 3053  wrex 3062  {crab 3424  cdif 3937  cun 3938  wss 3940  c0 4314  {csn 4620  {cpr 4622   cuni 4899   class class class wbr 5138  cmpt 5221   Or wor 5577  ran crn 5667  wf 6529  cfv 6533  (class class class)co 7401  Fincfn 8935  supcsup 9431  cc 11104  cr 11105  0cc0 11106  *cxr 11244   < clt 11245  cle 11246  0cn0 12469  cz 12555  ...cfz 13481  abscabs 15178  0𝑝c0p 25520  Polycply 26038  coeffccoe 26040  degcdgr 26041  𝔸caa 26168
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1789  ax-4 1803  ax-5 1905  ax-6 1963  ax-7 2003  ax-8 2100  ax-9 2108  ax-10 2129  ax-11 2146  ax-12 2163  ax-ext 2695  ax-rep 5275  ax-sep 5289  ax-nul 5296  ax-pow 5353  ax-pr 5417  ax-un 7718  ax-inf2 9632  ax-cnex 11162  ax-resscn 11163  ax-1cn 11164  ax-icn 11165  ax-addcl 11166  ax-addrcl 11167  ax-mulcl 11168  ax-mulrcl 11169  ax-mulcom 11170  ax-addass 11171  ax-mulass 11172  ax-distr 11173  ax-i2m1 11174  ax-1ne0 11175  ax-1rid 11176  ax-rnegex 11177  ax-rrecex 11178  ax-cnre 11179  ax-pre-lttri 11180  ax-pre-lttrn 11181  ax-pre-ltadd 11182  ax-pre-mulgt0 11183  ax-pre-sup 11184
This theorem depends on definitions:  df-bi 206  df-an 396  df-or 845  df-3or 1085  df-3an 1086  df-tru 1536  df-fal 1546  df-ex 1774  df-nf 1778  df-sb 2060  df-mo 2526  df-eu 2555  df-clab 2702  df-cleq 2716  df-clel 2802  df-nfc 2877  df-ne 2933  df-nel 3039  df-ral 3054  df-rex 3063  df-rmo 3368  df-reu 3369  df-rab 3425  df-v 3468  df-sbc 3770  df-csb 3886  df-dif 3943  df-un 3945  df-in 3947  df-ss 3957  df-pss 3959  df-nul 4315  df-if 4521  df-pw 4596  df-sn 4621  df-pr 4623  df-op 4627  df-uni 4900  df-int 4941  df-iun 4989  df-br 5139  df-opab 5201  df-mpt 5222  df-tr 5256  df-id 5564  df-eprel 5570  df-po 5578  df-so 5579  df-fr 5621  df-se 5622  df-we 5623  df-xp 5672  df-rel 5673  df-cnv 5674  df-co 5675  df-dm 5676  df-rn 5677  df-res 5678  df-ima 5679  df-pred 6290  df-ord 6357  df-on 6358  df-lim 6359  df-suc 6360  df-iota 6485  df-fun 6535  df-fn 6536  df-f 6537  df-f1 6538  df-fo 6539  df-f1o 6540  df-fv 6541  df-isom 6542  df-riota 7357  df-ov 7404  df-oprab 7405  df-mpo 7406  df-of 7663  df-om 7849  df-1st 7968  df-2nd 7969  df-frecs 8261  df-wrecs 8292  df-recs 8366  df-rdg 8405  df-1o 8461  df-er 8699  df-map 8818  df-pm 8819  df-en 8936  df-dom 8937  df-sdom 8938  df-fin 8939  df-sup 9433  df-inf 9434  df-oi 9501  df-card 9930  df-pnf 11247  df-mnf 11248  df-xr 11249  df-ltxr 11250  df-le 11251  df-sub 11443  df-neg 11444  df-div 11869  df-nn 12210  df-2 12272  df-3 12273  df-n0 12470  df-z 12556  df-uz 12820  df-rp 12972  df-fz 13482  df-fzo 13625  df-fl 13754  df-seq 13964  df-exp 14025  df-hash 14288  df-cj 15043  df-re 15044  df-im 15045  df-sqrt 15179  df-abs 15180  df-clim 15429  df-rlim 15430  df-sum 15630  df-0p 25521  df-ply 26042  df-coe 26044  df-dgr 26045  df-aa 26169
This theorem is referenced by:  aannenlem3  26184
  Copyright terms: Public domain W3C validator