Step | Hyp | Ref
| Expression |
1 | | aasscn 25478 |
. . . 4
⊢ 𝔸
⊆ ℂ |
2 | | eldifi 4061 |
. . . 4
⊢ (𝐴 ∈ (𝔸 ∖ {0})
→ 𝐴 ∈
𝔸) |
3 | 1, 2 | sselid 3919 |
. . 3
⊢ (𝐴 ∈ (𝔸 ∖ {0})
→ 𝐴 ∈
ℂ) |
4 | | elaa 25476 |
. . . . . 6
⊢ (𝐴 ∈ 𝔸 ↔ (𝐴 ∈ ℂ ∧
∃𝑔 ∈
((Poly‘ℤ) ∖ {0𝑝})(𝑔‘𝐴) = 0)) |
5 | 2, 4 | sylib 217 |
. . . . 5
⊢ (𝐴 ∈ (𝔸 ∖ {0})
→ (𝐴 ∈ ℂ
∧ ∃𝑔 ∈
((Poly‘ℤ) ∖ {0𝑝})(𝑔‘𝐴) = 0)) |
6 | 5 | simprd 496 |
. . . 4
⊢ (𝐴 ∈ (𝔸 ∖ {0})
→ ∃𝑔 ∈
((Poly‘ℤ) ∖ {0𝑝})(𝑔‘𝐴) = 0) |
7 | 2 | 3ad2ant1 1132 |
. . . . . 6
⊢ ((𝐴 ∈ (𝔸 ∖ {0})
∧ 𝑔 ∈
((Poly‘ℤ) ∖ {0𝑝}) ∧ (𝑔‘𝐴) = 0) → 𝐴 ∈ 𝔸) |
8 | | eldifsni 4723 |
. . . . . . 7
⊢ (𝐴 ∈ (𝔸 ∖ {0})
→ 𝐴 ≠
0) |
9 | 8 | 3ad2ant1 1132 |
. . . . . 6
⊢ ((𝐴 ∈ (𝔸 ∖ {0})
∧ 𝑔 ∈
((Poly‘ℤ) ∖ {0𝑝}) ∧ (𝑔‘𝐴) = 0) → 𝐴 ≠ 0) |
10 | | eldifi 4061 |
. . . . . . 7
⊢ (𝑔 ∈ ((Poly‘ℤ)
∖ {0𝑝}) → 𝑔 ∈
(Poly‘ℤ)) |
11 | 10 | 3ad2ant2 1133 |
. . . . . 6
⊢ ((𝐴 ∈ (𝔸 ∖ {0})
∧ 𝑔 ∈
((Poly‘ℤ) ∖ {0𝑝}) ∧ (𝑔‘𝐴) = 0) → 𝑔 ∈
(Poly‘ℤ)) |
12 | | eldifsni 4723 |
. . . . . . 7
⊢ (𝑔 ∈ ((Poly‘ℤ)
∖ {0𝑝}) → 𝑔 ≠ 0𝑝) |
13 | 12 | 3ad2ant2 1133 |
. . . . . 6
⊢ ((𝐴 ∈ (𝔸 ∖ {0})
∧ 𝑔 ∈
((Poly‘ℤ) ∖ {0𝑝}) ∧ (𝑔‘𝐴) = 0) → 𝑔 ≠ 0𝑝) |
14 | | simp3 1137 |
. . . . . 6
⊢ ((𝐴 ∈ (𝔸 ∖ {0})
∧ 𝑔 ∈
((Poly‘ℤ) ∖ {0𝑝}) ∧ (𝑔‘𝐴) = 0) → (𝑔‘𝐴) = 0) |
15 | | fveq2 6774 |
. . . . . . . . 9
⊢ (𝑚 = 𝑛 → ((coeff‘𝑔)‘𝑚) = ((coeff‘𝑔)‘𝑛)) |
16 | 15 | neeq1d 3003 |
. . . . . . . 8
⊢ (𝑚 = 𝑛 → (((coeff‘𝑔)‘𝑚) ≠ 0 ↔ ((coeff‘𝑔)‘𝑛) ≠ 0)) |
17 | 16 | cbvrabv 3426 |
. . . . . . 7
⊢ {𝑚 ∈ ℕ0
∣ ((coeff‘𝑔)‘𝑚) ≠ 0} = {𝑛 ∈ ℕ0 ∣
((coeff‘𝑔)‘𝑛) ≠ 0} |
18 | 17 | infeq1i 9237 |
. . . . . 6
⊢
inf({𝑚 ∈
ℕ0 ∣ ((coeff‘𝑔)‘𝑚) ≠ 0}, ℝ, < ) = inf({𝑛 ∈ ℕ0
∣ ((coeff‘𝑔)‘𝑛) ≠ 0}, ℝ, < ) |
19 | | fvoveq1 7298 |
. . . . . . 7
⊢ (𝑗 = 𝑘 → ((coeff‘𝑔)‘(𝑗 + inf({𝑚 ∈ ℕ0 ∣
((coeff‘𝑔)‘𝑚) ≠ 0}, ℝ, < ))) =
((coeff‘𝑔)‘(𝑘 + inf({𝑚 ∈ ℕ0 ∣
((coeff‘𝑔)‘𝑚) ≠ 0}, ℝ, <
)))) |
20 | 19 | cbvmptv 5187 |
. . . . . 6
⊢ (𝑗 ∈ ℕ0
↦ ((coeff‘𝑔)‘(𝑗 + inf({𝑚 ∈ ℕ0 ∣
((coeff‘𝑔)‘𝑚) ≠ 0}, ℝ, < )))) = (𝑘 ∈ ℕ0
↦ ((coeff‘𝑔)‘(𝑘 + inf({𝑚 ∈ ℕ0 ∣
((coeff‘𝑔)‘𝑚) ≠ 0}, ℝ, <
)))) |
21 | | eqid 2738 |
. . . . . 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}, ℝ, < ))))‘𝑘) · (𝑧↑𝑘))) |
22 | 7, 9, 11, 13, 14, 18, 20, 21 | elaa2lem 43774 |
. . . . 5
⊢ ((𝐴 ∈ (𝔸 ∖ {0})
∧ 𝑔 ∈
((Poly‘ℤ) ∖ {0𝑝}) ∧ (𝑔‘𝐴) = 0) → ∃𝑓 ∈
(Poly‘ℤ)(((coeff‘𝑓)‘0) ≠ 0 ∧ (𝑓‘𝐴) = 0)) |
23 | 22 | rexlimdv3a 3215 |
. . . 4
⊢ (𝐴 ∈ (𝔸 ∖ {0})
→ (∃𝑔 ∈
((Poly‘ℤ) ∖ {0𝑝})(𝑔‘𝐴) = 0 → ∃𝑓 ∈
(Poly‘ℤ)(((coeff‘𝑓)‘0) ≠ 0 ∧ (𝑓‘𝐴) = 0))) |
24 | 6, 23 | mpd 15 |
. . 3
⊢ (𝐴 ∈ (𝔸 ∖ {0})
→ ∃𝑓 ∈
(Poly‘ℤ)(((coeff‘𝑓)‘0) ≠ 0 ∧ (𝑓‘𝐴) = 0)) |
25 | 3, 24 | jca 512 |
. 2
⊢ (𝐴 ∈ (𝔸 ∖ {0})
→ (𝐴 ∈ ℂ
∧ ∃𝑓 ∈
(Poly‘ℤ)(((coeff‘𝑓)‘0) ≠ 0 ∧ (𝑓‘𝐴) = 0))) |
26 | | simpl 483 |
. . . . . . . . 9
⊢ ((𝑓 ∈ (Poly‘ℤ)
∧ ((coeff‘𝑓)‘0) ≠ 0) → 𝑓 ∈
(Poly‘ℤ)) |
27 | | fveq2 6774 |
. . . . . . . . . . . . . . 15
⊢ (𝑓 = 0𝑝 →
(coeff‘𝑓) =
(coeff‘0𝑝)) |
28 | | coe0 25417 |
. . . . . . . . . . . . . . 15
⊢
(coeff‘0𝑝) = (ℕ0 ×
{0}) |
29 | 27, 28 | eqtrdi 2794 |
. . . . . . . . . . . . . 14
⊢ (𝑓 = 0𝑝 →
(coeff‘𝑓) =
(ℕ0 × {0})) |
30 | 29 | fveq1d 6776 |
. . . . . . . . . . . . 13
⊢ (𝑓 = 0𝑝 →
((coeff‘𝑓)‘0) =
((ℕ0 × {0})‘0)) |
31 | | 0nn0 12248 |
. . . . . . . . . . . . . 14
⊢ 0 ∈
ℕ0 |
32 | | fvconst2g 7077 |
. . . . . . . . . . . . . 14
⊢ ((0
∈ ℕ0 ∧ 0 ∈ ℕ0) →
((ℕ0 × {0})‘0) = 0) |
33 | 31, 31, 32 | mp2an 689 |
. . . . . . . . . . . . 13
⊢
((ℕ0 × {0})‘0) = 0 |
34 | 30, 33 | eqtrdi 2794 |
. . . . . . . . . . . 12
⊢ (𝑓 = 0𝑝 →
((coeff‘𝑓)‘0) =
0) |
35 | 34 | adantl 482 |
. . . . . . . . . . 11
⊢ (((𝑓 ∈ (Poly‘ℤ)
∧ ((coeff‘𝑓)‘0) ≠ 0) ∧ 𝑓 = 0𝑝) →
((coeff‘𝑓)‘0) =
0) |
36 | | neneq 2949 |
. . . . . . . . . . . 12
⊢
(((coeff‘𝑓)‘0) ≠ 0 → ¬
((coeff‘𝑓)‘0) =
0) |
37 | 36 | ad2antlr 724 |
. . . . . . . . . . 11
⊢ (((𝑓 ∈ (Poly‘ℤ)
∧ ((coeff‘𝑓)‘0) ≠ 0) ∧ 𝑓 = 0𝑝) → ¬
((coeff‘𝑓)‘0) =
0) |
38 | 35, 37 | pm2.65da 814 |
. . . . . . . . . 10
⊢ ((𝑓 ∈ (Poly‘ℤ)
∧ ((coeff‘𝑓)‘0) ≠ 0) → ¬ 𝑓 =
0𝑝) |
39 | | velsn 4577 |
. . . . . . . . . 10
⊢ (𝑓 ∈ {0𝑝}
↔ 𝑓 =
0𝑝) |
40 | 38, 39 | sylnibr 329 |
. . . . . . . . 9
⊢ ((𝑓 ∈ (Poly‘ℤ)
∧ ((coeff‘𝑓)‘0) ≠ 0) → ¬ 𝑓 ∈
{0𝑝}) |
41 | 26, 40 | eldifd 3898 |
. . . . . . . 8
⊢ ((𝑓 ∈ (Poly‘ℤ)
∧ ((coeff‘𝑓)‘0) ≠ 0) → 𝑓 ∈ ((Poly‘ℤ) ∖
{0𝑝})) |
42 | 41 | adantrr 714 |
. . . . . . 7
⊢ ((𝑓 ∈ (Poly‘ℤ)
∧ (((coeff‘𝑓)‘0) ≠ 0 ∧ (𝑓‘𝐴) = 0)) → 𝑓 ∈ ((Poly‘ℤ) ∖
{0𝑝})) |
43 | | simprr 770 |
. . . . . . 7
⊢ ((𝑓 ∈ (Poly‘ℤ)
∧ (((coeff‘𝑓)‘0) ≠ 0 ∧ (𝑓‘𝐴) = 0)) → (𝑓‘𝐴) = 0) |
44 | 42, 43 | jca 512 |
. . . . . 6
⊢ ((𝑓 ∈ (Poly‘ℤ)
∧ (((coeff‘𝑓)‘0) ≠ 0 ∧ (𝑓‘𝐴) = 0)) → (𝑓 ∈ ((Poly‘ℤ) ∖
{0𝑝}) ∧ (𝑓‘𝐴) = 0)) |
45 | 44 | reximi2 3175 |
. . . . 5
⊢
(∃𝑓 ∈
(Poly‘ℤ)(((coeff‘𝑓)‘0) ≠ 0 ∧ (𝑓‘𝐴) = 0) → ∃𝑓 ∈ ((Poly‘ℤ) ∖
{0𝑝})(𝑓‘𝐴) = 0) |
46 | 45 | anim2i 617 |
. . . 4
⊢ ((𝐴 ∈ ℂ ∧
∃𝑓 ∈
(Poly‘ℤ)(((coeff‘𝑓)‘0) ≠ 0 ∧ (𝑓‘𝐴) = 0)) → (𝐴 ∈ ℂ ∧ ∃𝑓 ∈ ((Poly‘ℤ)
∖ {0𝑝})(𝑓‘𝐴) = 0)) |
47 | | elaa 25476 |
. . . 4
⊢ (𝐴 ∈ 𝔸 ↔ (𝐴 ∈ ℂ ∧
∃𝑓 ∈
((Poly‘ℤ) ∖ {0𝑝})(𝑓‘𝐴) = 0)) |
48 | 46, 47 | sylibr 233 |
. . 3
⊢ ((𝐴 ∈ ℂ ∧
∃𝑓 ∈
(Poly‘ℤ)(((coeff‘𝑓)‘0) ≠ 0 ∧ (𝑓‘𝐴) = 0)) → 𝐴 ∈ 𝔸) |
49 | | simpr 485 |
. . . 4
⊢ ((𝐴 ∈ ℂ ∧
∃𝑓 ∈
(Poly‘ℤ)(((coeff‘𝑓)‘0) ≠ 0 ∧ (𝑓‘𝐴) = 0)) → ∃𝑓 ∈
(Poly‘ℤ)(((coeff‘𝑓)‘0) ≠ 0 ∧ (𝑓‘𝐴) = 0)) |
50 | | nfv 1917 |
. . . . . 6
⊢
Ⅎ𝑓 𝐴 ∈ ℂ |
51 | | nfre1 3239 |
. . . . . 6
⊢
Ⅎ𝑓∃𝑓 ∈
(Poly‘ℤ)(((coeff‘𝑓)‘0) ≠ 0 ∧ (𝑓‘𝐴) = 0) |
52 | 50, 51 | nfan 1902 |
. . . . 5
⊢
Ⅎ𝑓(𝐴 ∈ ℂ ∧
∃𝑓 ∈
(Poly‘ℤ)(((coeff‘𝑓)‘0) ≠ 0 ∧ (𝑓‘𝐴) = 0)) |
53 | | nfv 1917 |
. . . . 5
⊢
Ⅎ𝑓 ¬ 𝐴 ∈ {0} |
54 | | simpl3r 1228 |
. . . . . . . . 9
⊢ (((𝐴 ∈ ℂ ∧ 𝑓 ∈ (Poly‘ℤ)
∧ (((coeff‘𝑓)‘0) ≠ 0 ∧ (𝑓‘𝐴) = 0)) ∧ 𝐴 = 0) → (𝑓‘𝐴) = 0) |
55 | | fveq2 6774 |
. . . . . . . . . . . . . . 15
⊢ (𝐴 = 0 → (𝑓‘𝐴) = (𝑓‘0)) |
56 | | eqid 2738 |
. . . . . . . . . . . . . . . 16
⊢
(coeff‘𝑓) =
(coeff‘𝑓) |
57 | 56 | coefv0 25409 |
. . . . . . . . . . . . . . 15
⊢ (𝑓 ∈ (Poly‘ℤ)
→ (𝑓‘0) =
((coeff‘𝑓)‘0)) |
58 | 55, 57 | sylan9eqr 2800 |
. . . . . . . . . . . . . 14
⊢ ((𝑓 ∈ (Poly‘ℤ)
∧ 𝐴 = 0) → (𝑓‘𝐴) = ((coeff‘𝑓)‘0)) |
59 | 58 | adantlr 712 |
. . . . . . . . . . . . 13
⊢ (((𝑓 ∈ (Poly‘ℤ)
∧ ((coeff‘𝑓)‘0) ≠ 0) ∧ 𝐴 = 0) → (𝑓‘𝐴) = ((coeff‘𝑓)‘0)) |
60 | | simplr 766 |
. . . . . . . . . . . . 13
⊢ (((𝑓 ∈ (Poly‘ℤ)
∧ ((coeff‘𝑓)‘0) ≠ 0) ∧ 𝐴 = 0) → ((coeff‘𝑓)‘0) ≠
0) |
61 | 59, 60 | eqnetrd 3011 |
. . . . . . . . . . . 12
⊢ (((𝑓 ∈ (Poly‘ℤ)
∧ ((coeff‘𝑓)‘0) ≠ 0) ∧ 𝐴 = 0) → (𝑓‘𝐴) ≠ 0) |
62 | 61 | neneqd 2948 |
. . . . . . . . . . 11
⊢ (((𝑓 ∈ (Poly‘ℤ)
∧ ((coeff‘𝑓)‘0) ≠ 0) ∧ 𝐴 = 0) → ¬ (𝑓‘𝐴) = 0) |
63 | 62 | adantlrr 718 |
. . . . . . . . . 10
⊢ (((𝑓 ∈ (Poly‘ℤ)
∧ (((coeff‘𝑓)‘0) ≠ 0 ∧ (𝑓‘𝐴) = 0)) ∧ 𝐴 = 0) → ¬ (𝑓‘𝐴) = 0) |
64 | 63 | 3adantl1 1165 |
. . . . . . . . 9
⊢ (((𝐴 ∈ ℂ ∧ 𝑓 ∈ (Poly‘ℤ)
∧ (((coeff‘𝑓)‘0) ≠ 0 ∧ (𝑓‘𝐴) = 0)) ∧ 𝐴 = 0) → ¬ (𝑓‘𝐴) = 0) |
65 | 54, 64 | pm2.65da 814 |
. . . . . . . 8
⊢ ((𝐴 ∈ ℂ ∧ 𝑓 ∈ (Poly‘ℤ)
∧ (((coeff‘𝑓)‘0) ≠ 0 ∧ (𝑓‘𝐴) = 0)) → ¬ 𝐴 = 0) |
66 | | elsng 4575 |
. . . . . . . . . 10
⊢ (𝐴 ∈ ℂ → (𝐴 ∈ {0} ↔ 𝐴 = 0)) |
67 | 66 | biimpa 477 |
. . . . . . . . 9
⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ∈ {0}) → 𝐴 = 0) |
68 | 67 | 3ad2antl1 1184 |
. . . . . . . 8
⊢ (((𝐴 ∈ ℂ ∧ 𝑓 ∈ (Poly‘ℤ)
∧ (((coeff‘𝑓)‘0) ≠ 0 ∧ (𝑓‘𝐴) = 0)) ∧ 𝐴 ∈ {0}) → 𝐴 = 0) |
69 | 65, 68 | mtand 813 |
. . . . . . 7
⊢ ((𝐴 ∈ ℂ ∧ 𝑓 ∈ (Poly‘ℤ)
∧ (((coeff‘𝑓)‘0) ≠ 0 ∧ (𝑓‘𝐴) = 0)) → ¬ 𝐴 ∈ {0}) |
70 | 69 | 3exp 1118 |
. . . . . 6
⊢ (𝐴 ∈ ℂ → (𝑓 ∈ (Poly‘ℤ)
→ ((((coeff‘𝑓)‘0) ≠ 0 ∧ (𝑓‘𝐴) = 0) → ¬ 𝐴 ∈ {0}))) |
71 | 70 | adantr 481 |
. . . . 5
⊢ ((𝐴 ∈ ℂ ∧
∃𝑓 ∈
(Poly‘ℤ)(((coeff‘𝑓)‘0) ≠ 0 ∧ (𝑓‘𝐴) = 0)) → (𝑓 ∈ (Poly‘ℤ) →
((((coeff‘𝑓)‘0)
≠ 0 ∧ (𝑓‘𝐴) = 0) → ¬ 𝐴 ∈ {0}))) |
72 | 52, 53, 71 | rexlimd 3250 |
. . . 4
⊢ ((𝐴 ∈ ℂ ∧
∃𝑓 ∈
(Poly‘ℤ)(((coeff‘𝑓)‘0) ≠ 0 ∧ (𝑓‘𝐴) = 0)) → (∃𝑓 ∈
(Poly‘ℤ)(((coeff‘𝑓)‘0) ≠ 0 ∧ (𝑓‘𝐴) = 0) → ¬ 𝐴 ∈ {0})) |
73 | 49, 72 | mpd 15 |
. . 3
⊢ ((𝐴 ∈ ℂ ∧
∃𝑓 ∈
(Poly‘ℤ)(((coeff‘𝑓)‘0) ≠ 0 ∧ (𝑓‘𝐴) = 0)) → ¬ 𝐴 ∈ {0}) |
74 | 48, 73 | eldifd 3898 |
. 2
⊢ ((𝐴 ∈ ℂ ∧
∃𝑓 ∈
(Poly‘ℤ)(((coeff‘𝑓)‘0) ≠ 0 ∧ (𝑓‘𝐴) = 0)) → 𝐴 ∈ (𝔸 ∖
{0})) |
75 | 25, 74 | impbii 208 |
1
⊢ (𝐴 ∈ (𝔸 ∖ {0})
↔ (𝐴 ∈ ℂ
∧ ∃𝑓 ∈
(Poly‘ℤ)(((coeff‘𝑓)‘0) ≠ 0 ∧ (𝑓‘𝐴) = 0))) |