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

Theorem aannenlem2 26566
Description: Lemma for aannen 26568. (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 6888 . . . . . . . . . . 11 (𝑏 = 𝑔 → ((𝑐𝑏) = 0 ↔ (𝑐𝑔) = 0))
21rexbidv 3186 . . . . . . . . . 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 1156 . . . . . . . . . 10 (( ∈ ((Poly‘ℤ) ∖ {0𝑝}) ∧ (𝑔) = 0 ∧ 𝑔 ∈ ℂ) → 𝑔 ∈ ℂ)
4 neeq1 3017 . . . . . . . . . . . . 13 (𝑑 = → (𝑑 ≠ 0𝑝 ≠ 0𝑝))
5 fveq2 6879 . . . . . . . . . . . . . 14 (𝑑 = → (deg‘𝑑) = (deg‘))
65breq1d 5113 . . . . . . . . . . . . 13 (𝑑 = → ((deg‘𝑑) ≤ sup(({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}), ℝ*, < ) ↔ (deg‘) ≤ sup(({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}), ℝ*, < )))
7 fveq2 6879 . . . . . . . . . . . . . . . . 17 (𝑑 = → (coeff‘𝑑) = (coeff‘))
87fveq1d 6881 . . . . . . . . . . . . . . . 16 (𝑑 = → ((coeff‘𝑑)‘𝑒) = ((coeff‘)‘𝑒))
98fveq2d 6883 . . . . . . . . . . . . . . 15 (𝑑 = → (abs‘((coeff‘𝑑)‘𝑒)) = (abs‘((coeff‘)‘𝑒)))
109breq1d 5113 . . . . . . . . . . . . . 14 (𝑑 = → ((abs‘((coeff‘𝑑)‘𝑒)) ≤ sup(({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}), ℝ*, < ) ↔ (abs‘((coeff‘)‘𝑒)) ≤ sup(({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}), ℝ*, < )))
1110ralbidv 3185 . . . . . . . . . . . . 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 1464 . . . . . . . . . . . 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 4078 . . . . . . . . . . . . . 14 ( ∈ ((Poly‘ℤ) ∖ {0𝑝}) → ∈ (Poly‘ℤ))
1413adantr 486 . . . . . . . . . . . . 13 (( ∈ ((Poly‘ℤ) ∖ {0𝑝}) ∧ 𝑔 ∈ ℂ) → ∈ (Poly‘ℤ))
15143adant2 1149 . . . . . . . . . . . 12 (( ∈ ((Poly‘ℤ) ∖ {0𝑝}) ∧ (𝑔) = 0 ∧ 𝑔 ∈ ℂ) → ∈ (Poly‘ℤ))
16 eldifsni 4753 . . . . . . . . . . . . . . 15 ( ∈ ((Poly‘ℤ) ∖ {0𝑝}) → ≠ 0𝑝)
1716adantr 486 . . . . . . . . . . . . . 14 (( ∈ ((Poly‘ℤ) ∖ {0𝑝}) ∧ 𝑔 ∈ ℂ) → ≠ 0𝑝)
18 0nn0 12544 . . . . . . . . . . . . . . . . . 18 0 ∈ ℕ0
19 dgrcl 26460 . . . . . . . . . . . . . . . . . . 19 ( ∈ (Poly‘ℤ) → (deg‘) ∈ ℕ0)
2014, 19syl 18 . . . . . . . . . . . . . . . . . 18 (( ∈ ((Poly‘ℤ) ∖ {0𝑝}) ∧ 𝑔 ∈ ℂ) → (deg‘) ∈ ℕ0)
21 prssi 4782 . . . . . . . . . . . . . . . . . 18 ((0 ∈ ℕ0 ∧ (deg‘) ∈ ℕ0) → {0, (deg‘)} ⊆ ℕ0)
2218, 20, 21sylancr 599 . . . . . . . . . . . . . . . . 17 (( ∈ ((Poly‘ℤ) ∖ {0𝑝}) ∧ 𝑔 ∈ ℂ) → {0, (deg‘)} ⊆ ℕ0)
23 ssrab2 4028 . . . . . . . . . . . . . . . . . 18 {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))} ⊆ ℕ0
2423a1i 11 . . . . . . . . . . . . . . . . 17 (( ∈ ((Poly‘ℤ) ∖ {0𝑝}) ∧ 𝑔 ∈ ℂ) → {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))} ⊆ ℕ0)
2522, 24unssd 4138 . . . . . . . . . . . . . . . 16 (( ∈ ((Poly‘ℤ) ∖ {0𝑝}) ∧ 𝑔 ∈ ℂ) → ({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}) ⊆ ℕ0)
26 nn0ssre 12533 . . . . . . . . . . . . . . . . 17 0 ⊆ ℝ
27 ressxr 11278 . . . . . . . . . . . . . . . . 17 ℝ ⊆ ℝ*
2826, 27sstri 3940 . . . . . . . . . . . . . . . 16 0 ⊆ ℝ*
2925, 28sstrdi 3943 . . . . . . . . . . . . . . 15 (( ∈ ((Poly‘ℤ) ∖ {0𝑝}) ∧ 𝑔 ∈ ℂ) → ({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}) ⊆ ℝ*)
30 fvex 6892 . . . . . . . . . . . . . . . . 17 (deg‘) ∈ V
3130prid2 4724 . . . . . . . . . . . . . . . 16 (deg‘) ∈ {0, (deg‘)}
32 elun1 4128 . . . . . . . . . . . . . . . 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 13377 . . . . . . . . . . . . . . 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 598 . . . . . . . . . . . . . 14 (( ∈ ((Poly‘ℤ) ∖ {0𝑝}) ∧ 𝑔 ∈ ℂ) → (deg‘) ≤ sup(({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}), ℝ*, < ))
3629adantr 486 . . . . . . . . . . . . . . . 16 ((( ∈ ((Poly‘ℤ) ∖ {0𝑝}) ∧ 𝑔 ∈ ℂ) ∧ 𝑒 ∈ ℕ0) → ({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}) ⊆ ℝ*)
37 fveq2 6879 . . . . . . . . . . . . . . . . . . . 20 (((coeff‘)‘𝑒) = 0 → (abs‘((coeff‘)‘𝑒)) = (abs‘0))
38 abs0 15373 . . . . . . . . . . . . . . . . . . . 20 (abs‘0) = 0
3937, 38eqtrdi 2811 . . . . . . . . . . . . . . . . . . 19 (((coeff‘)‘𝑒) = 0 → (abs‘((coeff‘)‘𝑒)) = 0)
40 c0ex 11225 . . . . . . . . . . . . . . . . . . . . 21 0 ∈ V
4140prid1 4723 . . . . . . . . . . . . . . . . . . . 20 0 ∈ {0, (deg‘)}
42 elun1 4128 . . . . . . . . . . . . . . . . . . . 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 2868 . . . . . . . . . . . . . . . . . 18 (((coeff‘)‘𝑒) = 0 → (abs‘((coeff‘)‘𝑒)) ∈ ({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}))
4544adantl 487 . . . . . . . . . . . . . . . . 17 (((( ∈ ((Poly‘ℤ) ∖ {0𝑝}) ∧ 𝑔 ∈ ℂ) ∧ 𝑒 ∈ ℕ0) ∧ ((coeff‘)‘𝑒) = 0) → (abs‘((coeff‘)‘𝑒)) ∈ ({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}))
46 eqeq1 2764 . . . . . . . . . . . . . . . . . . . 20 (𝑔 = (abs‘((coeff‘)‘𝑒)) → (𝑔 = (abs‘((coeff‘)‘𝑖)) ↔ (abs‘((coeff‘)‘𝑒)) = (abs‘((coeff‘)‘𝑖))))
4746rexbidv 3186 . . . . . . . . . . . . . . . . . . 19 (𝑔 = (abs‘((coeff‘)‘𝑒)) → (∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖)) ↔ ∃𝑖 ∈ (0...(deg‘))(abs‘((coeff‘)‘𝑒)) = (abs‘((coeff‘)‘𝑖))))
48 0z 12627 . . . . . . . . . . . . . . . . . . . . . . 23 0 ∈ ℤ
49 eqid 2760 . . . . . . . . . . . . . . . . . . . . . . . 24 (coeff‘) = (coeff‘)
5049coef2 26458 . . . . . . . . . . . . . . . . . . . . . . 23 (( ∈ (Poly‘ℤ) ∧ 0 ∈ ℤ) → (coeff‘):ℕ0⟶ℤ)
5114, 48, 50sylancl 598 . . . . . . . . . . . . . . . . . . . . . 22 (( ∈ ((Poly‘ℤ) ∖ {0𝑝}) ∧ 𝑔 ∈ ℂ) → (coeff‘):ℕ0⟶ℤ)
5251ffvelcdmda 7078 . . . . . . . . . . . . . . . . . . . . 21 ((( ∈ ((Poly‘ℤ) ∖ {0𝑝}) ∧ 𝑔 ∈ ℂ) ∧ 𝑒 ∈ ℕ0) → ((coeff‘)‘𝑒) ∈ ℤ)
53 nn0abscl 15400 . . . . . . . . . . . . . . . . . . . . 21 (((coeff‘)‘𝑒) ∈ ℤ → (abs‘((coeff‘)‘𝑒)) ∈ ℕ0)
5452, 53syl 18 . . . . . . . . . . . . . . . . . . . 20 ((( ∈ ((Poly‘ℤ) ∖ {0𝑝}) ∧ 𝑔 ∈ ℂ) ∧ 𝑒 ∈ ℕ0) → (abs‘((coeff‘)‘𝑒)) ∈ ℕ0)
5554adantr 486 . . . . . . . . . . . . . . . . . . 19 (((( ∈ ((Poly‘ℤ) ∖ {0𝑝}) ∧ 𝑔 ∈ ℂ) ∧ 𝑒 ∈ ℕ0) ∧ ((coeff‘)‘𝑒) ≠ 0) → (abs‘((coeff‘)‘𝑒)) ∈ ℕ0)
56 simplr 781 . . . . . . . . . . . . . . . . . . . . 21 (((( ∈ ((Poly‘ℤ) ∖ {0𝑝}) ∧ 𝑔 ∈ ℂ) ∧ 𝑒 ∈ ℕ0) ∧ ((coeff‘)‘𝑒) ≠ 0) → 𝑒 ∈ ℕ0)
5720ad2antrr 739 . . . . . . . . . . . . . . . . . . . . 21 (((( ∈ ((Poly‘ℤ) ∖ {0𝑝}) ∧ 𝑔 ∈ ℂ) ∧ 𝑒 ∈ ℕ0) ∧ ((coeff‘)‘𝑒) ≠ 0) → (deg‘) ∈ ℕ0)
5814ad2antrr 739 . . . . . . . . . . . . . . . . . . . . . 22 (((( ∈ ((Poly‘ℤ) ∖ {0𝑝}) ∧ 𝑔 ∈ ℂ) ∧ 𝑒 ∈ ℕ0) ∧ ((coeff‘)‘𝑒) ≠ 0) → ∈ (Poly‘ℤ))
59 simpr 490 . . . . . . . . . . . . . . . . . . . . . 22 (((( ∈ ((Poly‘ℤ) ∖ {0𝑝}) ∧ 𝑔 ∈ ℂ) ∧ 𝑒 ∈ ℕ0) ∧ ((coeff‘)‘𝑒) ≠ 0) → ((coeff‘)‘𝑒) ≠ 0)
60 eqid 2760 . . . . . . . . . . . . . . . . . . . . . . 23 (deg‘) = (deg‘)
6149, 60dgrub 26461 . . . . . . . . . . . . . . . . . . . . . 22 (( ∈ (Poly‘ℤ) ∧ 𝑒 ∈ ℕ0 ∧ ((coeff‘)‘𝑒) ≠ 0) → 𝑒 ≤ (deg‘))
6258, 56, 59, 61syl3anc 1398 . . . . . . . . . . . . . . . . . . . . 21 (((( ∈ ((Poly‘ℤ) ∖ {0𝑝}) ∧ 𝑔 ∈ ℂ) ∧ 𝑒 ∈ ℕ0) ∧ ((coeff‘)‘𝑒) ≠ 0) → 𝑒 ≤ (deg‘))
63 elfz2nn0 13674 . . . . . . . . . . . . . . . . . . . . 21 (𝑒 ∈ (0...(deg‘)) ↔ (𝑒 ∈ ℕ0 ∧ (deg‘) ∈ ℕ0𝑒 ≤ (deg‘)))
6456, 57, 62, 63syl3anbrc 1362 . . . . . . . . . . . . . . . . . . . 20 (((( ∈ ((Poly‘ℤ) ∖ {0𝑝}) ∧ 𝑔 ∈ ℂ) ∧ 𝑒 ∈ ℕ0) ∧ ((coeff‘)‘𝑒) ≠ 0) → 𝑒 ∈ (0...(deg‘)))
65 eqid 2760 . . . . . . . . . . . . . . . . . . . 20 (abs‘((coeff‘)‘𝑒)) = (abs‘((coeff‘)‘𝑒))
66 2fveq3 6884 . . . . . . . . . . . . . . . . . . . . 21 (𝑖 = 𝑒 → (abs‘((coeff‘)‘𝑖)) = (abs‘((coeff‘)‘𝑒)))
6766rspceeqv 3599 . . . . . . . . . . . . . . . . . . . 20 ((𝑒 ∈ (0...(deg‘)) ∧ (abs‘((coeff‘)‘𝑒)) = (abs‘((coeff‘)‘𝑒))) → ∃𝑖 ∈ (0...(deg‘))(abs‘((coeff‘)‘𝑒)) = (abs‘((coeff‘)‘𝑖)))
6864, 65, 67sylancl 598 . . . . . . . . . . . . . . . . . . 19 (((( ∈ ((Poly‘ℤ) ∖ {0𝑝}) ∧ 𝑔 ∈ ℂ) ∧ 𝑒 ∈ ℕ0) ∧ ((coeff‘)‘𝑒) ≠ 0) → ∃𝑖 ∈ (0...(deg‘))(abs‘((coeff‘)‘𝑒)) = (abs‘((coeff‘)‘𝑖)))
6947, 55, 68elrabd 3647 . . . . . . . . . . . . . . . . . 18 (((( ∈ ((Poly‘ℤ) ∖ {0𝑝}) ∧ 𝑔 ∈ ℂ) ∧ 𝑒 ∈ ℕ0) ∧ ((coeff‘)‘𝑒) ≠ 0) → (abs‘((coeff‘)‘𝑒)) ∈ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))})
70 elun2 4129 . . . . . . . . . . . . . . . . . 18 ((abs‘((coeff‘)‘𝑒)) ∈ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))} → (abs‘((coeff‘)‘𝑒)) ∈ ({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}))
7169, 70syl 18 . . . . . . . . . . . . . . . . 17 (((( ∈ ((Poly‘ℤ) ∖ {0𝑝}) ∧ 𝑔 ∈ ℂ) ∧ 𝑒 ∈ ℕ0) ∧ ((coeff‘)‘𝑒) ≠ 0) → (abs‘((coeff‘)‘𝑒)) ∈ ({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}))
7245, 71pm2.61dane 3042 . . . . . . . . . . . . . . . 16 ((( ∈ ((Poly‘ℤ) ∖ {0𝑝}) ∧ 𝑔 ∈ ℂ) ∧ 𝑒 ∈ ℕ0) → (abs‘((coeff‘)‘𝑒)) ∈ ({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}))
73 supxrub 13377 . . . . . . . . . . . . . . . 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 596 . . . . . . . . . . . . . . 15 ((( ∈ ((Poly‘ℤ) ∖ {0𝑝}) ∧ 𝑔 ∈ ℂ) ∧ 𝑒 ∈ ℕ0) → (abs‘((coeff‘)‘𝑒)) ≤ sup(({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}), ℝ*, < ))
7574ralrimiva 3154 . . . . . . . . . . . . . 14 (( ∈ ((Poly‘ℤ) ∖ {0𝑝}) ∧ 𝑔 ∈ ℂ) → ∀𝑒 ∈ ℕ0 (abs‘((coeff‘)‘𝑒)) ≤ sup(({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}), ℝ*, < ))
7617, 35, 753jca 1146 . . . . . . . . . . . . 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 1149 . . . . . . . . . . . 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 3647 . . . . . . . . . . 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 1155 . . . . . . . . . . 11 (( ∈ ((Poly‘ℤ) ∖ {0𝑝}) ∧ (𝑔) = 0 ∧ 𝑔 ∈ ℂ) → (𝑔) = 0)
80 fveq1 6878 . . . . . . . . . . . . 13 (𝑐 = → (𝑐𝑔) = (𝑔))
8180eqeq1d 2762 . . . . . . . . . . . 12 (𝑐 = → ((𝑐𝑔) = 0 ↔ (𝑔) = 0))
8281rspcev 3576 . . . . . . . . . . 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 596 . . . . . . . . . 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 3647 . . . . . . . . 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 9294 . . . . . . . . . . . . . 14 {0, (deg‘)} ∈ Fin
86 fzfi 14037 . . . . . . . . . . . . . . . 16 (0...(deg‘)) ∈ Fin
87 abrexfi 9320 . . . . . . . . . . . . . . . 16 ((0...(deg‘)) ∈ Fin → {𝑔 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))} ∈ Fin)
8886, 87ax-mp 5 . . . . . . . . . . . . . . 15 {𝑔 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))} ∈ Fin
89 rabssab 4033 . . . . . . . . . . . . . . 15 {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))} ⊆ {𝑔 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}
90 ssfi 9168 . . . . . . . . . . . . . . 15 (({𝑔 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))} ∈ Fin ∧ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))} ⊆ {𝑔 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}) → {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))} ∈ Fin)
9188, 89, 90mp2an 705 . . . . . . . . . . . . . 14 {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))} ∈ Fin
92 unfi 9166 . . . . . . . . . . . . . 14 (({0, (deg‘)} ∈ Fin ∧ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))} ∈ Fin) → ({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}) ∈ Fin)
9385, 91, 92mp2an 705 . . . . . . . . . . . . 13 ({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}) ∈ Fin
9433ne0ii 4290 . . . . . . . . . . . . 13 ({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}) ≠ ∅
95 xrltso 13193 . . . . . . . . . . . . . 14 < Or ℝ*
96 fisupcl 9441 . . . . . . . . . . . . . 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 703 . . . . . . . . . . . . 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 1494 . . . . . . . . . . . 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 1149 . . . . . . . . . 10 (( ∈ ((Poly‘ℤ) ∖ {0𝑝}) ∧ (𝑔) = 0 ∧ 𝑔 ∈ ℂ) → sup(({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}), ℝ*, < ) ∈ ℕ0)
101 eqidd 2761 . . . . . . . . . 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 5107 . . . . . . . . . . . . . . 15 (𝑎 = sup(({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}), ℝ*, < ) → ((deg‘𝑑) ≤ 𝑎 ↔ (deg‘𝑑) ≤ sup(({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}), ℝ*, < )))
103 breq2 5107 . . . . . . . . . . . . . . . 16 (𝑎 = sup(({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}), ℝ*, < ) → ((abs‘((coeff‘𝑑)‘𝑒)) ≤ 𝑎 ↔ (abs‘((coeff‘𝑑)‘𝑒)) ≤ sup(({0, (deg‘)} ∪ {𝑔 ∈ ℕ0 ∣ ∃𝑖 ∈ (0...(deg‘))𝑔 = (abs‘((coeff‘)‘𝑖))}), ℝ*, < )))
104103ralbidv 3185 . . . . . . . . . . . . . . 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 1467 . . . . . . . . . . . . . 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 3419 . . . . . . . . . . . . 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 3320 . . . . . . . . . . . 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 3419 . . . . . . . . . . 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 3599 . . . . . . . . . 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 596 . . . . . . . . 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 11206 . . . . . . . . . . 11 ℂ ∈ V
112111rabex 5303 . . . . . . . . . 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 2849 . . . . . . . . . . 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 2764 . . . . . . . . . . . 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 3186 . . . . . . . . . . 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 644 . . . . . . . . . 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 3560 . . . . . . . . 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 596 . . . . . . . 8 (( ∈ ((Poly‘ℤ) ∖ {0𝑝}) ∧ (𝑔) = 0 ∧ 𝑔 ∈ ℂ) → ∃𝑓(𝑔𝑓 ∧ ∃𝑎 ∈ ℕ0 𝑓 = {𝑏 ∈ ℂ ∣ ∃𝑐 ∈ {𝑑 ∈ (Poly‘ℤ) ∣ (𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ 𝑎 ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ 𝑎)} (𝑐𝑏) = 0}))
1191183exp 1137 . . . . . . 7 ( ∈ ((Poly‘ℤ) ∖ {0𝑝}) → ((𝑔) = 0 → (𝑔 ∈ ℂ → ∃𝑓(𝑔𝑓 ∧ ∃𝑎 ∈ ℕ0 𝑓 = {𝑏 ∈ ℂ ∣ ∃𝑐 ∈ {𝑑 ∈ (Poly‘ℤ) ∣ (𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ 𝑎 ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ 𝑎)} (𝑐𝑏) = 0}))))
120119rexlimiv 3156 . . . . . 6 (∃ ∈ ((Poly‘ℤ) ∖ {0𝑝})(𝑔) = 0 → (𝑔 ∈ ℂ → ∃𝑓(𝑔𝑓 ∧ ∃𝑎 ∈ ℕ0 𝑓 = {𝑏 ∈ ℂ ∣ ∃𝑐 ∈ {𝑑 ∈ (Poly‘ℤ) ∣ (𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ 𝑎 ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ 𝑎)} (𝑐𝑏) = 0})))
121120impcom 413 . . . . 5 ((𝑔 ∈ ℂ ∧ ∃ ∈ ((Poly‘ℤ) ∖ {0𝑝})(𝑔) = 0) → ∃𝑓(𝑔𝑓 ∧ ∃𝑎 ∈ ℕ0 𝑓 = {𝑏 ∈ ℂ ∣ ∃𝑐 ∈ {𝑑 ∈ (Poly‘ℤ) ∣ (𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ 𝑎 ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ 𝑎)} (𝑐𝑏) = 0}))
122 eleq2 2849 . . . . . . . . 9 (𝑓 = {𝑏 ∈ ℂ ∣ ∃𝑐 ∈ {𝑑 ∈ (Poly‘ℤ) ∣ (𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ 𝑎 ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ 𝑎)} (𝑐𝑏) = 0} → (𝑔𝑓𝑔 ∈ {𝑏 ∈ ℂ ∣ ∃𝑐 ∈ {𝑑 ∈ (Poly‘ℤ) ∣ (𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ 𝑎 ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ 𝑎)} (𝑐𝑏) = 0}))
1231rexbidv 3186 . . . . . . . . . . 11 (𝑏 = 𝑔 → (∃𝑐 ∈ {𝑑 ∈ (Poly‘ℤ) ∣ (𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ 𝑎 ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ 𝑎)} (𝑐𝑏) = 0 ↔ ∃𝑐 ∈ {𝑑 ∈ (Poly‘ℤ) ∣ (𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ 𝑎 ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ 𝑎)} (𝑐𝑔) = 0))
124123elrab 3645 . . . . . . . . . 10 (𝑔 ∈ {𝑏 ∈ ℂ ∣ ∃𝑐 ∈ {𝑑 ∈ (Poly‘ℤ) ∣ (𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ 𝑎 ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ 𝑎)} (𝑐𝑏) = 0} ↔ (𝑔 ∈ ℂ ∧ ∃𝑐 ∈ {𝑑 ∈ (Poly‘ℤ) ∣ (𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ 𝑎 ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ 𝑎)} (𝑐𝑔) = 0))
125 simp1 1154 . . . . . . . . . . . . . . 15 (( ≠ 0𝑝 ∧ (deg‘) ≤ 𝑎 ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘)‘𝑒)) ≤ 𝑎) → ≠ 0𝑝)
126125anim2i 629 . . . . . . . . . . . . . 14 (( ∈ (Poly‘ℤ) ∧ ( ≠ 0𝑝 ∧ (deg‘) ≤ 𝑎 ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘)‘𝑒)) ≤ 𝑎)) → ( ∈ (Poly‘ℤ) ∧ ≠ 0𝑝))
1275breq1d 5113 . . . . . . . . . . . . . . . 16 (𝑑 = → ((deg‘𝑑) ≤ 𝑎 ↔ (deg‘) ≤ 𝑎))
1289breq1d 5113 . . . . . . . . . . . . . . . . 17 (𝑑 = → ((abs‘((coeff‘𝑑)‘𝑒)) ≤ 𝑎 ↔ (abs‘((coeff‘)‘𝑒)) ≤ 𝑎))
129128ralbidv 3185 . . . . . . . . . . . . . . . 16 (𝑑 = → (∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ 𝑎 ↔ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘)‘𝑒)) ≤ 𝑎))
1304, 127, 1293anbi123d 1464 . . . . . . . . . . . . . . 15 (𝑑 = → ((𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ 𝑎 ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ 𝑎) ↔ ( ≠ 0𝑝 ∧ (deg‘) ≤ 𝑎 ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘)‘𝑒)) ≤ 𝑎)))
131130elrab 3645 . . . . . . . . . . . . . 14 ( ∈ {𝑑 ∈ (Poly‘ℤ) ∣ (𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ 𝑎 ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ 𝑎)} ↔ ( ∈ (Poly‘ℤ) ∧ ( ≠ 0𝑝 ∧ (deg‘) ≤ 𝑎 ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘)‘𝑒)) ≤ 𝑎)))
132 eldifsn 4748 . . . . . . . . . . . . . 14 ( ∈ ((Poly‘ℤ) ∖ {0𝑝}) ↔ ( ∈ (Poly‘ℤ) ∧ ≠ 0𝑝))
133126, 131, 1323imtr4i 295 . . . . . . . . . . . . 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 3241 . . . . . . . . . . . . 13 (∃𝑐 ∈ ((Poly‘ℤ) ∖ {0𝑝})(𝑐𝑔) = 0 ↔ ∃ ∈ ((Poly‘ℤ) ∖ {0𝑝})(𝑔) = 0)
137135, 136imbitrdi 254 . . . . . . . . . . . 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 629 . . . . . . . . . 10 ((𝑔 ∈ ℂ ∧ ∃𝑐 ∈ {𝑑 ∈ (Poly‘ℤ) ∣ (𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ 𝑎 ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ 𝑎)} (𝑐𝑔) = 0) → (𝑔 ∈ ℂ ∧ ∃ ∈ ((Poly‘ℤ) ∖ {0𝑝})(𝑔) = 0))
140124, 139sylbi 220 . . . . . . . . 9 (𝑔 ∈ {𝑏 ∈ ℂ ∣ ∃𝑐 ∈ {𝑑 ∈ (Poly‘ℤ) ∣ (𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ 𝑎 ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ 𝑎)} (𝑐𝑏) = 0} → (𝑔 ∈ ℂ ∧ ∃ ∈ ((Poly‘ℤ) ∖ {0𝑝})(𝑔) = 0))
141122, 140biimtrdi 256 . . . . . . . 8 (𝑓 = {𝑏 ∈ ℂ ∣ ∃𝑐 ∈ {𝑑 ∈ (Poly‘ℤ) ∣ (𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ 𝑎 ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ 𝑎)} (𝑐𝑏) = 0} → (𝑔𝑓 → (𝑔 ∈ ℂ ∧ ∃ ∈ ((Poly‘ℤ) ∖ {0𝑝})(𝑔) = 0)))
142141rexlimivw 3159 . . . . . . 7 (∃𝑎 ∈ ℕ0 𝑓 = {𝑏 ∈ ℂ ∣ ∃𝑐 ∈ {𝑑 ∈ (Poly‘ℤ) ∣ (𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ 𝑎 ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ 𝑎)} (𝑐𝑏) = 0} → (𝑔𝑓 → (𝑔 ∈ ℂ ∧ ∃ ∈ ((Poly‘ℤ) ∖ {0𝑝})(𝑔) = 0)))
143142impcom 413 . . . . . 6 ((𝑔𝑓 ∧ ∃𝑎 ∈ ℕ0 𝑓 = {𝑏 ∈ ℂ ∣ ∃𝑐 ∈ {𝑑 ∈ (Poly‘ℤ) ∣ (𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ 𝑎 ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ 𝑎)} (𝑐𝑏) = 0}) → (𝑔 ∈ ℂ ∧ ∃ ∈ ((Poly‘ℤ) ∖ {0𝑝})(𝑔) = 0))
144143exlimiv 1963 . . . . 5 (∃𝑓(𝑔𝑓 ∧ ∃𝑎 ∈ ℕ0 𝑓 = {𝑏 ∈ ℂ ∣ ∃𝑐 ∈ {𝑑 ∈ (Poly‘ℤ) ∣ (𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ 𝑎 ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ 𝑎)} (𝑐𝑏) = 0}) → (𝑔 ∈ ℂ ∧ ∃ ∈ ((Poly‘ℤ) ∖ {0𝑝})(𝑔) = 0))
145121, 144impbii 212 . . . 4 ((𝑔 ∈ ℂ ∧ ∃ ∈ ((Poly‘ℤ) ∖ {0𝑝})(𝑔) = 0) ↔ ∃𝑓(𝑔𝑓 ∧ ∃𝑎 ∈ ℕ0 𝑓 = {𝑏 ∈ ℂ ∣ ∃𝑐 ∈ {𝑑 ∈ (Poly‘ℤ) ∣ (𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ 𝑎 ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ 𝑎)} (𝑐𝑏) = 0}))
146 elaa 26549 . . . 4 (𝑔 ∈ 𝔸 ↔ (𝑔 ∈ ℂ ∧ ∃ ∈ ((Poly‘ℤ) ∖ {0𝑝})(𝑔) = 0))
147 eluniab 4881 . . . 4 (𝑔 {𝑓 ∣ ∃𝑎 ∈ ℕ0 𝑓 = {𝑏 ∈ ℂ ∣ ∃𝑐 ∈ {𝑑 ∈ (Poly‘ℤ) ∣ (𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ 𝑎 ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ 𝑎)} (𝑐𝑏) = 0}} ↔ ∃𝑓(𝑔𝑓 ∧ ∃𝑎 ∈ ℕ0 𝑓 = {𝑏 ∈ ℂ ∣ ∃𝑐 ∈ {𝑑 ∈ (Poly‘ℤ) ∣ (𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ 𝑎 ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ 𝑎)} (𝑐𝑏) = 0}))
148145, 146, 1473bitr4i 306 . . 3 (𝑔 ∈ 𝔸 ↔ 𝑔 {𝑓 ∣ ∃𝑎 ∈ ℕ0 𝑓 = {𝑏 ∈ ℂ ∣ ∃𝑐 ∈ {𝑑 ∈ (Poly‘ℤ) ∣ (𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ 𝑎 ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ 𝑎)} (𝑐𝑏) = 0}})
149148eqriv 2757 . 2 𝔸 = {𝑓 ∣ ∃𝑎 ∈ ℕ0 𝑓 = {𝑏 ∈ ℂ ∣ ∃𝑐 ∈ {𝑑 ∈ (Poly‘ℤ) ∣ (𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ 𝑎 ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ 𝑎)} (𝑐𝑏) = 0}}
150 aannenlem.a . . . 4 𝐻 = (𝑎 ∈ ℕ0 ↦ {𝑏 ∈ ℂ ∣ ∃𝑐 ∈ {𝑑 ∈ (Poly‘ℤ) ∣ (𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ 𝑎 ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ 𝑎)} (𝑐𝑏) = 0})
151150rnmpt 5941 . . 3 ran 𝐻 = {𝑓 ∣ ∃𝑎 ∈ ℕ0 𝑓 = {𝑏 ∈ ℂ ∣ ∃𝑐 ∈ {𝑑 ∈ (Poly‘ℤ) ∣ (𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ 𝑎 ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ 𝑎)} (𝑐𝑏) = 0}}
152151unieqi 4879 . 2 ran 𝐻 = {𝑓 ∣ ∃𝑎 ∈ ℕ0 𝑓 = {𝑏 ∈ ℂ ∣ ∃𝑐 ∈ {𝑑 ∈ (Poly‘ℤ) ∣ (𝑑 ≠ 0𝑝 ∧ (deg‘𝑑) ≤ 𝑎 ∧ ∀𝑒 ∈ ℕ0 (abs‘((coeff‘𝑑)‘𝑒)) ≤ 𝑎)} (𝑐𝑏) = 0}}
153149, 152eqtr4i 2786 1 𝔸 = ran 𝐻
Colors of variables:    wff setvar class
This proof depends on syntax axioms:  wi 4  wa 401  w3a 1103   = wceq 1570  wex 1812  wcel 2145  {cab 2738  wne 2955  wral 3076  wrex 3086  {crab 3412  cdif 3896  cun 3897  wss 3899  c0 4279  {csn 4584  {cpr 4586   cuni 4867   class class class wbr 5103  cmpt 5186   Or wor 5562  ran crn 5656  wf 6529  cfv 6533  (class class class)co 7414  Fincfn 8953  supcsup 9411  cc 11123  cr 11124  0cc0 11125  *cxr 11267   < clt 11268  cle 11269  0cn0 12529  cz 12616  ...cfz 13562  abscabs 15322  0𝑝c0p 25898  Polycply 26410  coeffccoe 26412  degcdgr 26413  𝔸caa 26547
This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1828  ax-4 1842  ax-5 1943  ax-6 2000  ax-7 2041  ax-8 2147  ax-9 2155  ax-10 2178  ax-11 2194  ax-12 2213  ax-ext 2732  ax-rep 5232  ax-sep 5251  ax-nul 5263  ax-pow 5330  ax-pr 5398  ax-un 7737  ax-inf2 9621  ax-cnex 11181  ax-resscn 11182  ax-1cn 11183  ax-icn 11184  ax-addcl 11185  ax-addrcl 11186  ax-mulcl 11187  ax-mulrcl 11188  ax-mulcom 11189  ax-addass 11190  ax-mulass 11191  ax-distr 11192  ax-i2m1 11193  ax-1ne0 11194  ax-1rid 11195  ax-rnegex 11196  ax-rrecex 11197  ax-cnre 11198  ax-pre-lttri 11199  ax-pre-lttrn 11200  ax-pre-ltadd 11201  ax-pre-mulgt0 11202  ax-pre-sup 11203
This proof depends on definitions:  df-bi 210  df-an 402  df-or 862  df-3or 1104  df-3an 1105  df-tru 1573  df-fal 1583  df-ex 1813  df-nf 1817  df-sb 2100  df-mo 2564  df-eu 2594  df-clab 2739  df-cleq 2752  df-clel 2835  df-nfc 2909  df-ne 2956  df-nel 3062  df-ral 3077  df-rex 3087  df-rmo 3365  df-reu 3366  df-rab 3413  df-v 3452  df-sbc 3740  df-csb 3848  df-dif 3902  df-un 3904  df-in 3906  df-ss 3916  df-pss 3919  df-nul 4280  df-if 4483  df-pw 4559  df-sn 4585  df-pr 4587  df-op 4591  df-uni 4868  df-int 4908  df-iun 4953  df-br 5104  df-opab 5168  df-mpt 5187  df-tr 5213  df-id 5550  df-eprel 5555  df-po 5563  df-so 5564  df-fr 5608  df-se 5609  df-we 5610  df-xp 5661  df-rel 5662  df-cnv 5663  df-co 5664  df-dm 5665  df-rn 5666  df-res 5667  df-ima 5668  df-pred 6299  df-ord 6360  df-on 6361  df-lim 6362  df-suc 6363  df-iota 6489  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 7371  df-ov 7417  df-oprab 7418  df-mpo 7419  df-of 7679  df-om 7864  df-1st 7987  df-2nd 7988  df-frecs 8281  df-wrecs 8312  df-recs 8361  df-rdg 8400  df-1o 8456  df-2o 8457  df-er 8697  df-map 8829  df-pm 8830  df-en 8954  df-dom 8955  df-sdom 8956  df-fin 8957  df-sup 9413  df-inf 9414  df-oi 9483  df-card 9945  df-pnf 11270  df-mnf 11271  df-xr 11272  df-ltxr 11273  df-le 11274  df-sub 11468  df-neg 11469  df-div 11897  df-nn 12259  df-2 12328  df-3 12329  df-n0 12530  df-z 12617  df-uz 12889  df-rp 13044  df-fz 13563  df-fzo 13711  df-fl 13854  df-seq 14067  df-exp 14127  df-hash 14396  df-cj 15187  df-re 15188  df-im 15189  df-sqrt 15323  df-abs 15324  df-clim 15576  df-rlim 15577  df-sum 15775  df-0p 25899  df-ply 26414  df-coe 26416  df-dgr 26417  df-aa 26548
This theorem is used by:  aannenlem3  26567
  Copyright terms: Public domain W3C validator