Step | Hyp | Ref
| Expression |
1 | | aasscn 24292 |
. . . 4
⊢ 𝔸
⊆ ℂ |
2 | | eldifi 3875 |
. . . 4
⊢ (𝐴 ∈ (𝔸 ∖ {0})
→ 𝐴 ∈
𝔸) |
3 | 1, 2 | sseldi 3742 |
. . 3
⊢ (𝐴 ∈ (𝔸 ∖ {0})
→ 𝐴 ∈
ℂ) |
4 | | elaa 24290 |
. . . . . 6
⊢ (𝐴 ∈ 𝔸 ↔ (𝐴 ∈ ℂ ∧
∃𝑔 ∈
((Poly‘ℤ) ∖ {0𝑝})(𝑔‘𝐴) = 0)) |
5 | 2, 4 | sylib 208 |
. . . . 5
⊢ (𝐴 ∈ (𝔸 ∖ {0})
→ (𝐴 ∈ ℂ
∧ ∃𝑔 ∈
((Poly‘ℤ) ∖ {0𝑝})(𝑔‘𝐴) = 0)) |
6 | 5 | simprd 482 |
. . . 4
⊢ (𝐴 ∈ (𝔸 ∖ {0})
→ ∃𝑔 ∈
((Poly‘ℤ) ∖ {0𝑝})(𝑔‘𝐴) = 0) |
7 | 2 | 3ad2ant1 1128 |
. . . . . 6
⊢ ((𝐴 ∈ (𝔸 ∖ {0})
∧ 𝑔 ∈
((Poly‘ℤ) ∖ {0𝑝}) ∧ (𝑔‘𝐴) = 0) → 𝐴 ∈ 𝔸) |
8 | | eldifsni 4466 |
. . . . . . 7
⊢ (𝐴 ∈ (𝔸 ∖ {0})
→ 𝐴 ≠
0) |
9 | 8 | 3ad2ant1 1128 |
. . . . . 6
⊢ ((𝐴 ∈ (𝔸 ∖ {0})
∧ 𝑔 ∈
((Poly‘ℤ) ∖ {0𝑝}) ∧ (𝑔‘𝐴) = 0) → 𝐴 ≠ 0) |
10 | | eldifi 3875 |
. . . . . . 7
⊢ (𝑔 ∈ ((Poly‘ℤ)
∖ {0𝑝}) → 𝑔 ∈
(Poly‘ℤ)) |
11 | 10 | 3ad2ant2 1129 |
. . . . . 6
⊢ ((𝐴 ∈ (𝔸 ∖ {0})
∧ 𝑔 ∈
((Poly‘ℤ) ∖ {0𝑝}) ∧ (𝑔‘𝐴) = 0) → 𝑔 ∈
(Poly‘ℤ)) |
12 | | eldifsni 4466 |
. . . . . . 7
⊢ (𝑔 ∈ ((Poly‘ℤ)
∖ {0𝑝}) → 𝑔 ≠ 0𝑝) |
13 | 12 | 3ad2ant2 1129 |
. . . . . 6
⊢ ((𝐴 ∈ (𝔸 ∖ {0})
∧ 𝑔 ∈
((Poly‘ℤ) ∖ {0𝑝}) ∧ (𝑔‘𝐴) = 0) → 𝑔 ≠ 0𝑝) |
14 | | simp3 1133 |
. . . . . 6
⊢ ((𝐴 ∈ (𝔸 ∖ {0})
∧ 𝑔 ∈
((Poly‘ℤ) ∖ {0𝑝}) ∧ (𝑔‘𝐴) = 0) → (𝑔‘𝐴) = 0) |
15 | | fveq2 6353 |
. . . . . . . . 9
⊢ (𝑚 = 𝑛 → ((coeff‘𝑔)‘𝑚) = ((coeff‘𝑔)‘𝑛)) |
16 | 15 | neeq1d 2991 |
. . . . . . . 8
⊢ (𝑚 = 𝑛 → (((coeff‘𝑔)‘𝑚) ≠ 0 ↔ ((coeff‘𝑔)‘𝑛) ≠ 0)) |
17 | 16 | cbvrabv 3339 |
. . . . . . 7
⊢ {𝑚 ∈ ℕ0
∣ ((coeff‘𝑔)‘𝑚) ≠ 0} = {𝑛 ∈ ℕ0 ∣
((coeff‘𝑔)‘𝑛) ≠ 0} |
18 | 17 | infeq1i 8551 |
. . . . . 6
⊢
inf({𝑚 ∈
ℕ0 ∣ ((coeff‘𝑔)‘𝑚) ≠ 0}, ℝ, < ) = inf({𝑛 ∈ ℕ0
∣ ((coeff‘𝑔)‘𝑛) ≠ 0}, ℝ, < ) |
19 | | oveq1 6821 |
. . . . . . . 8
⊢ (𝑗 = 𝑘 → (𝑗 + inf({𝑚 ∈ ℕ0 ∣
((coeff‘𝑔)‘𝑚) ≠ 0}, ℝ, < )) = (𝑘 + inf({𝑚 ∈ ℕ0 ∣
((coeff‘𝑔)‘𝑚) ≠ 0}, ℝ, < ))) |
20 | 19 | fveq2d 6357 |
. . . . . . 7
⊢ (𝑗 = 𝑘 → ((coeff‘𝑔)‘(𝑗 + inf({𝑚 ∈ ℕ0 ∣
((coeff‘𝑔)‘𝑚) ≠ 0}, ℝ, < ))) =
((coeff‘𝑔)‘(𝑘 + inf({𝑚 ∈ ℕ0 ∣
((coeff‘𝑔)‘𝑚) ≠ 0}, ℝ, <
)))) |
21 | 20 | cbvmptv 4902 |
. . . . . 6
⊢ (𝑗 ∈ ℕ0
↦ ((coeff‘𝑔)‘(𝑗 + inf({𝑚 ∈ ℕ0 ∣
((coeff‘𝑔)‘𝑚) ≠ 0}, ℝ, < )))) = (𝑘 ∈ ℕ0
↦ ((coeff‘𝑔)‘(𝑘 + inf({𝑚 ∈ ℕ0 ∣
((coeff‘𝑔)‘𝑚) ≠ 0}, ℝ, <
)))) |
22 | | eqid 2760 |
. . . . . 6
⊢ (𝑧 ∈ ℂ ↦
Σ𝑘 ∈
(0...((deg‘𝑔) −
inf({𝑚 ∈
ℕ0 ∣ ((coeff‘𝑔)‘𝑚) ≠ 0}, ℝ, < )))(((𝑗 ∈ ℕ0
↦ ((coeff‘𝑔)‘(𝑗 + inf({𝑚 ∈ ℕ0 ∣
((coeff‘𝑔)‘𝑚) ≠ 0}, ℝ, < ))))‘𝑘) · (𝑧↑𝑘))) = (𝑧 ∈ ℂ ↦ Σ𝑘 ∈ (0...((deg‘𝑔) − inf({𝑚 ∈ ℕ0
∣ ((coeff‘𝑔)‘𝑚) ≠ 0}, ℝ, < )))(((𝑗 ∈ ℕ0
↦ ((coeff‘𝑔)‘(𝑗 + inf({𝑚 ∈ ℕ0 ∣
((coeff‘𝑔)‘𝑚) ≠ 0}, ℝ, < ))))‘𝑘) · (𝑧↑𝑘))) |
23 | 7, 9, 11, 13, 14, 18, 21, 22 | elaa2lem 40971 |
. . . . 5
⊢ ((𝐴 ∈ (𝔸 ∖ {0})
∧ 𝑔 ∈
((Poly‘ℤ) ∖ {0𝑝}) ∧ (𝑔‘𝐴) = 0) → ∃𝑓 ∈
(Poly‘ℤ)(((coeff‘𝑓)‘0) ≠ 0 ∧ (𝑓‘𝐴) = 0)) |
24 | 23 | rexlimdv3a 3171 |
. . . 4
⊢ (𝐴 ∈ (𝔸 ∖ {0})
→ (∃𝑔 ∈
((Poly‘ℤ) ∖ {0𝑝})(𝑔‘𝐴) = 0 → ∃𝑓 ∈
(Poly‘ℤ)(((coeff‘𝑓)‘0) ≠ 0 ∧ (𝑓‘𝐴) = 0))) |
25 | 6, 24 | mpd 15 |
. . 3
⊢ (𝐴 ∈ (𝔸 ∖ {0})
→ ∃𝑓 ∈
(Poly‘ℤ)(((coeff‘𝑓)‘0) ≠ 0 ∧ (𝑓‘𝐴) = 0)) |
26 | 3, 25 | jca 555 |
. 2
⊢ (𝐴 ∈ (𝔸 ∖ {0})
→ (𝐴 ∈ ℂ
∧ ∃𝑓 ∈
(Poly‘ℤ)(((coeff‘𝑓)‘0) ≠ 0 ∧ (𝑓‘𝐴) = 0))) |
27 | | simpl 474 |
. . . . . . . . 9
⊢ ((𝑓 ∈ (Poly‘ℤ)
∧ ((coeff‘𝑓)‘0) ≠ 0) → 𝑓 ∈
(Poly‘ℤ)) |
28 | | fveq2 6353 |
. . . . . . . . . . . . . . 15
⊢ (𝑓 = 0𝑝 →
(coeff‘𝑓) =
(coeff‘0𝑝)) |
29 | | coe0 24231 |
. . . . . . . . . . . . . . 15
⊢
(coeff‘0𝑝) = (ℕ0 ×
{0}) |
30 | 28, 29 | syl6eq 2810 |
. . . . . . . . . . . . . 14
⊢ (𝑓 = 0𝑝 →
(coeff‘𝑓) =
(ℕ0 × {0})) |
31 | 30 | fveq1d 6355 |
. . . . . . . . . . . . 13
⊢ (𝑓 = 0𝑝 →
((coeff‘𝑓)‘0) =
((ℕ0 × {0})‘0)) |
32 | | 0nn0 11519 |
. . . . . . . . . . . . . 14
⊢ 0 ∈
ℕ0 |
33 | | fvconst2g 6632 |
. . . . . . . . . . . . . 14
⊢ ((0
∈ ℕ0 ∧ 0 ∈ ℕ0) →
((ℕ0 × {0})‘0) = 0) |
34 | 32, 32, 33 | mp2an 710 |
. . . . . . . . . . . . 13
⊢
((ℕ0 × {0})‘0) = 0 |
35 | 31, 34 | syl6eq 2810 |
. . . . . . . . . . . 12
⊢ (𝑓 = 0𝑝 →
((coeff‘𝑓)‘0) =
0) |
36 | 35 | adantl 473 |
. . . . . . . . . . 11
⊢ (((𝑓 ∈ (Poly‘ℤ)
∧ ((coeff‘𝑓)‘0) ≠ 0) ∧ 𝑓 = 0𝑝) →
((coeff‘𝑓)‘0) =
0) |
37 | | neneq 2938 |
. . . . . . . . . . . 12
⊢
(((coeff‘𝑓)‘0) ≠ 0 → ¬
((coeff‘𝑓)‘0) =
0) |
38 | 37 | ad2antlr 765 |
. . . . . . . . . . 11
⊢ (((𝑓 ∈ (Poly‘ℤ)
∧ ((coeff‘𝑓)‘0) ≠ 0) ∧ 𝑓 = 0𝑝) → ¬
((coeff‘𝑓)‘0) =
0) |
39 | 36, 38 | pm2.65da 601 |
. . . . . . . . . 10
⊢ ((𝑓 ∈ (Poly‘ℤ)
∧ ((coeff‘𝑓)‘0) ≠ 0) → ¬ 𝑓 =
0𝑝) |
40 | | velsn 4337 |
. . . . . . . . . 10
⊢ (𝑓 ∈ {0𝑝}
↔ 𝑓 =
0𝑝) |
41 | 39, 40 | sylnibr 318 |
. . . . . . . . 9
⊢ ((𝑓 ∈ (Poly‘ℤ)
∧ ((coeff‘𝑓)‘0) ≠ 0) → ¬ 𝑓 ∈
{0𝑝}) |
42 | 27, 41 | eldifd 3726 |
. . . . . . . 8
⊢ ((𝑓 ∈ (Poly‘ℤ)
∧ ((coeff‘𝑓)‘0) ≠ 0) → 𝑓 ∈ ((Poly‘ℤ) ∖
{0𝑝})) |
43 | 42 | adantrr 755 |
. . . . . . 7
⊢ ((𝑓 ∈ (Poly‘ℤ)
∧ (((coeff‘𝑓)‘0) ≠ 0 ∧ (𝑓‘𝐴) = 0)) → 𝑓 ∈ ((Poly‘ℤ) ∖
{0𝑝})) |
44 | | simprr 813 |
. . . . . . 7
⊢ ((𝑓 ∈ (Poly‘ℤ)
∧ (((coeff‘𝑓)‘0) ≠ 0 ∧ (𝑓‘𝐴) = 0)) → (𝑓‘𝐴) = 0) |
45 | 43, 44 | jca 555 |
. . . . . 6
⊢ ((𝑓 ∈ (Poly‘ℤ)
∧ (((coeff‘𝑓)‘0) ≠ 0 ∧ (𝑓‘𝐴) = 0)) → (𝑓 ∈ ((Poly‘ℤ) ∖
{0𝑝}) ∧ (𝑓‘𝐴) = 0)) |
46 | 45 | reximi2 3148 |
. . . . 5
⊢
(∃𝑓 ∈
(Poly‘ℤ)(((coeff‘𝑓)‘0) ≠ 0 ∧ (𝑓‘𝐴) = 0) → ∃𝑓 ∈ ((Poly‘ℤ) ∖
{0𝑝})(𝑓‘𝐴) = 0) |
47 | 46 | anim2i 594 |
. . . 4
⊢ ((𝐴 ∈ ℂ ∧
∃𝑓 ∈
(Poly‘ℤ)(((coeff‘𝑓)‘0) ≠ 0 ∧ (𝑓‘𝐴) = 0)) → (𝐴 ∈ ℂ ∧ ∃𝑓 ∈ ((Poly‘ℤ)
∖ {0𝑝})(𝑓‘𝐴) = 0)) |
48 | | elaa 24290 |
. . . 4
⊢ (𝐴 ∈ 𝔸 ↔ (𝐴 ∈ ℂ ∧
∃𝑓 ∈
((Poly‘ℤ) ∖ {0𝑝})(𝑓‘𝐴) = 0)) |
49 | 47, 48 | sylibr 224 |
. . 3
⊢ ((𝐴 ∈ ℂ ∧
∃𝑓 ∈
(Poly‘ℤ)(((coeff‘𝑓)‘0) ≠ 0 ∧ (𝑓‘𝐴) = 0)) → 𝐴 ∈ 𝔸) |
50 | | simpr 479 |
. . . 4
⊢ ((𝐴 ∈ ℂ ∧
∃𝑓 ∈
(Poly‘ℤ)(((coeff‘𝑓)‘0) ≠ 0 ∧ (𝑓‘𝐴) = 0)) → ∃𝑓 ∈
(Poly‘ℤ)(((coeff‘𝑓)‘0) ≠ 0 ∧ (𝑓‘𝐴) = 0)) |
51 | | nfv 1992 |
. . . . . 6
⊢
Ⅎ𝑓 𝐴 ∈ ℂ |
52 | | nfre1 3143 |
. . . . . 6
⊢
Ⅎ𝑓∃𝑓 ∈
(Poly‘ℤ)(((coeff‘𝑓)‘0) ≠ 0 ∧ (𝑓‘𝐴) = 0) |
53 | 51, 52 | nfan 1977 |
. . . . 5
⊢
Ⅎ𝑓(𝐴 ∈ ℂ ∧
∃𝑓 ∈
(Poly‘ℤ)(((coeff‘𝑓)‘0) ≠ 0 ∧ (𝑓‘𝐴) = 0)) |
54 | | nfv 1992 |
. . . . 5
⊢
Ⅎ𝑓 ¬ 𝐴 ∈ {0} |
55 | | simpl3r 1289 |
. . . . . . . . 9
⊢ (((𝐴 ∈ ℂ ∧ 𝑓 ∈ (Poly‘ℤ)
∧ (((coeff‘𝑓)‘0) ≠ 0 ∧ (𝑓‘𝐴) = 0)) ∧ 𝐴 = 0) → (𝑓‘𝐴) = 0) |
56 | | fveq2 6353 |
. . . . . . . . . . . . . . 15
⊢ (𝐴 = 0 → (𝑓‘𝐴) = (𝑓‘0)) |
57 | | eqid 2760 |
. . . . . . . . . . . . . . . 16
⊢
(coeff‘𝑓) =
(coeff‘𝑓) |
58 | 57 | coefv0 24223 |
. . . . . . . . . . . . . . 15
⊢ (𝑓 ∈ (Poly‘ℤ)
→ (𝑓‘0) =
((coeff‘𝑓)‘0)) |
59 | 56, 58 | sylan9eqr 2816 |
. . . . . . . . . . . . . 14
⊢ ((𝑓 ∈ (Poly‘ℤ)
∧ 𝐴 = 0) → (𝑓‘𝐴) = ((coeff‘𝑓)‘0)) |
60 | 59 | adantlr 753 |
. . . . . . . . . . . . 13
⊢ (((𝑓 ∈ (Poly‘ℤ)
∧ ((coeff‘𝑓)‘0) ≠ 0) ∧ 𝐴 = 0) → (𝑓‘𝐴) = ((coeff‘𝑓)‘0)) |
61 | | simplr 809 |
. . . . . . . . . . . . 13
⊢ (((𝑓 ∈ (Poly‘ℤ)
∧ ((coeff‘𝑓)‘0) ≠ 0) ∧ 𝐴 = 0) → ((coeff‘𝑓)‘0) ≠
0) |
62 | 60, 61 | eqnetrd 2999 |
. . . . . . . . . . . 12
⊢ (((𝑓 ∈ (Poly‘ℤ)
∧ ((coeff‘𝑓)‘0) ≠ 0) ∧ 𝐴 = 0) → (𝑓‘𝐴) ≠ 0) |
63 | 62 | neneqd 2937 |
. . . . . . . . . . 11
⊢ (((𝑓 ∈ (Poly‘ℤ)
∧ ((coeff‘𝑓)‘0) ≠ 0) ∧ 𝐴 = 0) → ¬ (𝑓‘𝐴) = 0) |
64 | 63 | adantlrr 759 |
. . . . . . . . . 10
⊢ (((𝑓 ∈ (Poly‘ℤ)
∧ (((coeff‘𝑓)‘0) ≠ 0 ∧ (𝑓‘𝐴) = 0)) ∧ 𝐴 = 0) → ¬ (𝑓‘𝐴) = 0) |
65 | 64 | 3adantl1 1172 |
. . . . . . . . 9
⊢ (((𝐴 ∈ ℂ ∧ 𝑓 ∈ (Poly‘ℤ)
∧ (((coeff‘𝑓)‘0) ≠ 0 ∧ (𝑓‘𝐴) = 0)) ∧ 𝐴 = 0) → ¬ (𝑓‘𝐴) = 0) |
66 | 55, 65 | pm2.65da 601 |
. . . . . . . 8
⊢ ((𝐴 ∈ ℂ ∧ 𝑓 ∈ (Poly‘ℤ)
∧ (((coeff‘𝑓)‘0) ≠ 0 ∧ (𝑓‘𝐴) = 0)) → ¬ 𝐴 = 0) |
67 | | elsng 4335 |
. . . . . . . . . 10
⊢ (𝐴 ∈ ℂ → (𝐴 ∈ {0} ↔ 𝐴 = 0)) |
68 | 67 | biimpa 502 |
. . . . . . . . 9
⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ∈ {0}) → 𝐴 = 0) |
69 | 68 | 3ad2antl1 1201 |
. . . . . . . 8
⊢ (((𝐴 ∈ ℂ ∧ 𝑓 ∈ (Poly‘ℤ)
∧ (((coeff‘𝑓)‘0) ≠ 0 ∧ (𝑓‘𝐴) = 0)) ∧ 𝐴 ∈ {0}) → 𝐴 = 0) |
70 | 66, 69 | mtand 694 |
. . . . . . 7
⊢ ((𝐴 ∈ ℂ ∧ 𝑓 ∈ (Poly‘ℤ)
∧ (((coeff‘𝑓)‘0) ≠ 0 ∧ (𝑓‘𝐴) = 0)) → ¬ 𝐴 ∈ {0}) |
71 | 70 | 3exp 1113 |
. . . . . 6
⊢ (𝐴 ∈ ℂ → (𝑓 ∈ (Poly‘ℤ)
→ ((((coeff‘𝑓)‘0) ≠ 0 ∧ (𝑓‘𝐴) = 0) → ¬ 𝐴 ∈ {0}))) |
72 | 71 | adantr 472 |
. . . . 5
⊢ ((𝐴 ∈ ℂ ∧
∃𝑓 ∈
(Poly‘ℤ)(((coeff‘𝑓)‘0) ≠ 0 ∧ (𝑓‘𝐴) = 0)) → (𝑓 ∈ (Poly‘ℤ) →
((((coeff‘𝑓)‘0)
≠ 0 ∧ (𝑓‘𝐴) = 0) → ¬ 𝐴 ∈ {0}))) |
73 | 53, 54, 72 | rexlimd 3164 |
. . . 4
⊢ ((𝐴 ∈ ℂ ∧
∃𝑓 ∈
(Poly‘ℤ)(((coeff‘𝑓)‘0) ≠ 0 ∧ (𝑓‘𝐴) = 0)) → (∃𝑓 ∈
(Poly‘ℤ)(((coeff‘𝑓)‘0) ≠ 0 ∧ (𝑓‘𝐴) = 0) → ¬ 𝐴 ∈ {0})) |
74 | 50, 73 | mpd 15 |
. . 3
⊢ ((𝐴 ∈ ℂ ∧
∃𝑓 ∈
(Poly‘ℤ)(((coeff‘𝑓)‘0) ≠ 0 ∧ (𝑓‘𝐴) = 0)) → ¬ 𝐴 ∈ {0}) |
75 | 49, 74 | eldifd 3726 |
. 2
⊢ ((𝐴 ∈ ℂ ∧
∃𝑓 ∈
(Poly‘ℤ)(((coeff‘𝑓)‘0) ≠ 0 ∧ (𝑓‘𝐴) = 0)) → 𝐴 ∈ (𝔸 ∖
{0})) |
76 | 26, 75 | impbii 199 |
1
⊢ (𝐴 ∈ (𝔸 ∖ {0})
↔ (𝐴 ∈ ℂ
∧ ∃𝑓 ∈
(Poly‘ℤ)(((coeff‘𝑓)‘0) ≠ 0 ∧ (𝑓‘𝐴) = 0))) |