Step | Hyp | Ref
| Expression |
1 | | aasscn 25823 |
. . . 4
β’ πΈ
β β |
2 | | eldifi 4126 |
. . . 4
β’ (π΄ β (πΈ β {0})
β π΄ β
πΈ) |
3 | 1, 2 | sselid 3980 |
. . 3
β’ (π΄ β (πΈ β {0})
β π΄ β
β) |
4 | | elaa 25821 |
. . . . . 6
β’ (π΄ β πΈ β (π΄ β β β§
βπ β
((Polyββ€) β {0π})(πβπ΄) = 0)) |
5 | 2, 4 | sylib 217 |
. . . . 5
β’ (π΄ β (πΈ β {0})
β (π΄ β β
β§ βπ β
((Polyββ€) β {0π})(πβπ΄) = 0)) |
6 | 5 | simprd 497 |
. . . 4
β’ (π΄ β (πΈ β {0})
β βπ β
((Polyββ€) β {0π})(πβπ΄) = 0) |
7 | 2 | 3ad2ant1 1134 |
. . . . . 6
β’ ((π΄ β (πΈ β {0})
β§ π β
((Polyββ€) β {0π}) β§ (πβπ΄) = 0) β π΄ β πΈ) |
8 | | eldifsni 4793 |
. . . . . . 7
β’ (π΄ β (πΈ β {0})
β π΄ β
0) |
9 | 8 | 3ad2ant1 1134 |
. . . . . 6
β’ ((π΄ β (πΈ β {0})
β§ π β
((Polyββ€) β {0π}) β§ (πβπ΄) = 0) β π΄ β 0) |
10 | | eldifi 4126 |
. . . . . . 7
β’ (π β ((Polyββ€)
β {0π}) β π β
(Polyββ€)) |
11 | 10 | 3ad2ant2 1135 |
. . . . . 6
β’ ((π΄ β (πΈ β {0})
β§ π β
((Polyββ€) β {0π}) β§ (πβπ΄) = 0) β π β
(Polyββ€)) |
12 | | eldifsni 4793 |
. . . . . . 7
β’ (π β ((Polyββ€)
β {0π}) β π β 0π) |
13 | 12 | 3ad2ant2 1135 |
. . . . . 6
β’ ((π΄ β (πΈ β {0})
β§ π β
((Polyββ€) β {0π}) β§ (πβπ΄) = 0) β π β 0π) |
14 | | simp3 1139 |
. . . . . 6
β’ ((π΄ β (πΈ β {0})
β§ π β
((Polyββ€) β {0π}) β§ (πβπ΄) = 0) β (πβπ΄) = 0) |
15 | | fveq2 6889 |
. . . . . . . . 9
β’ (π = π β ((coeffβπ)βπ) = ((coeffβπ)βπ)) |
16 | 15 | neeq1d 3001 |
. . . . . . . 8
β’ (π = π β (((coeffβπ)βπ) β 0 β ((coeffβπ)βπ) β 0)) |
17 | 16 | cbvrabv 3443 |
. . . . . . 7
β’ {π β β0
β£ ((coeffβπ)βπ) β 0} = {π β β0 β£
((coeffβπ)βπ) β 0} |
18 | 17 | infeq1i 9470 |
. . . . . 6
β’
inf({π β
β0 β£ ((coeffβπ)βπ) β 0}, β, < ) = inf({π β β0
β£ ((coeffβπ)βπ) β 0}, β, < ) |
19 | | fvoveq1 7429 |
. . . . . . 7
β’ (π = π β ((coeffβπ)β(π + inf({π β β0 β£
((coeffβπ)βπ) β 0}, β, < ))) =
((coeffβπ)β(π + inf({π β β0 β£
((coeffβπ)βπ) β 0}, β, <
)))) |
20 | 19 | cbvmptv 5261 |
. . . . . 6
β’ (π β β0
β¦ ((coeffβπ)β(π + inf({π β β0 β£
((coeffβπ)βπ) β 0}, β, < )))) = (π β β0
β¦ ((coeffβπ)β(π + inf({π β β0 β£
((coeffβπ)βπ) β 0}, β, <
)))) |
21 | | eqid 2733 |
. . . . . 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 44936 |
. . . . 5
β’ ((π΄ β (πΈ β {0})
β§ π β
((Polyββ€) β {0π}) β§ (πβπ΄) = 0) β βπ β
(Polyββ€)(((coeffβπ)β0) β 0 β§ (πβπ΄) = 0)) |
23 | 22 | rexlimdv3a 3160 |
. . . 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 513 |
. 2
β’ (π΄ β (πΈ β {0})
β (π΄ β β
β§ βπ β
(Polyββ€)(((coeffβπ)β0) β 0 β§ (πβπ΄) = 0))) |
26 | | simpl 484 |
. . . . . . . . 9
β’ ((π β (Polyββ€)
β§ ((coeffβπ)β0) β 0) β π β
(Polyββ€)) |
27 | | fveq2 6889 |
. . . . . . . . . . . . . . 15
β’ (π = 0π β
(coeffβπ) =
(coeffβ0π)) |
28 | | coe0 25762 |
. . . . . . . . . . . . . . 15
β’
(coeffβ0π) = (β0 Γ
{0}) |
29 | 27, 28 | eqtrdi 2789 |
. . . . . . . . . . . . . 14
β’ (π = 0π β
(coeffβπ) =
(β0 Γ {0})) |
30 | 29 | fveq1d 6891 |
. . . . . . . . . . . . 13
β’ (π = 0π β
((coeffβπ)β0) =
((β0 Γ {0})β0)) |
31 | | 0nn0 12484 |
. . . . . . . . . . . . . 14
β’ 0 β
β0 |
32 | | fvconst2g 7200 |
. . . . . . . . . . . . . 14
β’ ((0
β β0 β§ 0 β β0) β
((β0 Γ {0})β0) = 0) |
33 | 31, 31, 32 | mp2an 691 |
. . . . . . . . . . . . 13
β’
((β0 Γ {0})β0) = 0 |
34 | 30, 33 | eqtrdi 2789 |
. . . . . . . . . . . 12
β’ (π = 0π β
((coeffβπ)β0) =
0) |
35 | 34 | adantl 483 |
. . . . . . . . . . 11
β’ (((π β (Polyββ€)
β§ ((coeffβπ)β0) β 0) β§ π = 0π) β
((coeffβπ)β0) =
0) |
36 | | neneq 2947 |
. . . . . . . . . . . 12
β’
(((coeffβπ)β0) β 0 β Β¬
((coeffβπ)β0) =
0) |
37 | 36 | ad2antlr 726 |
. . . . . . . . . . 11
β’ (((π β (Polyββ€)
β§ ((coeffβπ)β0) β 0) β§ π = 0π) β Β¬
((coeffβπ)β0) =
0) |
38 | 35, 37 | pm2.65da 816 |
. . . . . . . . . 10
β’ ((π β (Polyββ€)
β§ ((coeffβπ)β0) β 0) β Β¬ π =
0π) |
39 | | velsn 4644 |
. . . . . . . . . 10
β’ (π β {0π}
β π =
0π) |
40 | 38, 39 | sylnibr 329 |
. . . . . . . . 9
β’ ((π β (Polyββ€)
β§ ((coeffβπ)β0) β 0) β Β¬ π β
{0π}) |
41 | 26, 40 | eldifd 3959 |
. . . . . . . 8
β’ ((π β (Polyββ€)
β§ ((coeffβπ)β0) β 0) β π β ((Polyββ€) β
{0π})) |
42 | 41 | adantrr 716 |
. . . . . . 7
β’ ((π β (Polyββ€)
β§ (((coeffβπ)β0) β 0 β§ (πβπ΄) = 0)) β π β ((Polyββ€) β
{0π})) |
43 | | simprr 772 |
. . . . . . 7
β’ ((π β (Polyββ€)
β§ (((coeffβπ)β0) β 0 β§ (πβπ΄) = 0)) β (πβπ΄) = 0) |
44 | 42, 43 | jca 513 |
. . . . . 6
β’ ((π β (Polyββ€)
β§ (((coeffβπ)β0) β 0 β§ (πβπ΄) = 0)) β (π β ((Polyββ€) β
{0π}) β§ (πβπ΄) = 0)) |
45 | 44 | reximi2 3080 |
. . . . 5
β’
(βπ β
(Polyββ€)(((coeffβπ)β0) β 0 β§ (πβπ΄) = 0) β βπ β ((Polyββ€) β
{0π})(πβπ΄) = 0) |
46 | 45 | anim2i 618 |
. . . 4
β’ ((π΄ β β β§
βπ β
(Polyββ€)(((coeffβπ)β0) β 0 β§ (πβπ΄) = 0)) β (π΄ β β β§ βπ β ((Polyββ€)
β {0π})(πβπ΄) = 0)) |
47 | | elaa 25821 |
. . . 4
β’ (π΄ β πΈ β (π΄ β β β§
βπ β
((Polyββ€) β {0π})(πβπ΄) = 0)) |
48 | 46, 47 | sylibr 233 |
. . 3
β’ ((π΄ β β β§
βπ β
(Polyββ€)(((coeffβπ)β0) β 0 β§ (πβπ΄) = 0)) β π΄ β πΈ) |
49 | | simpr 486 |
. . . 4
β’ ((π΄ β β β§
βπ β
(Polyββ€)(((coeffβπ)β0) β 0 β§ (πβπ΄) = 0)) β βπ β
(Polyββ€)(((coeffβπ)β0) β 0 β§ (πβπ΄) = 0)) |
50 | | nfv 1918 |
. . . . . 6
β’
β²π π΄ β β |
51 | | nfre1 3283 |
. . . . . 6
β’
β²πβπ β
(Polyββ€)(((coeffβπ)β0) β 0 β§ (πβπ΄) = 0) |
52 | 50, 51 | nfan 1903 |
. . . . 5
β’
β²π(π΄ β β β§
βπ β
(Polyββ€)(((coeffβπ)β0) β 0 β§ (πβπ΄) = 0)) |
53 | | nfv 1918 |
. . . . 5
β’
β²π Β¬ π΄ β {0} |
54 | | simpl3r 1230 |
. . . . . . . . 9
β’ (((π΄ β β β§ π β (Polyββ€)
β§ (((coeffβπ)β0) β 0 β§ (πβπ΄) = 0)) β§ π΄ = 0) β (πβπ΄) = 0) |
55 | | fveq2 6889 |
. . . . . . . . . . . . . . 15
β’ (π΄ = 0 β (πβπ΄) = (πβ0)) |
56 | | eqid 2733 |
. . . . . . . . . . . . . . . 16
β’
(coeffβπ) =
(coeffβπ) |
57 | 56 | coefv0 25754 |
. . . . . . . . . . . . . . 15
β’ (π β (Polyββ€)
β (πβ0) =
((coeffβπ)β0)) |
58 | 55, 57 | sylan9eqr 2795 |
. . . . . . . . . . . . . 14
β’ ((π β (Polyββ€)
β§ π΄ = 0) β (πβπ΄) = ((coeffβπ)β0)) |
59 | 58 | adantlr 714 |
. . . . . . . . . . . . 13
β’ (((π β (Polyββ€)
β§ ((coeffβπ)β0) β 0) β§ π΄ = 0) β (πβπ΄) = ((coeffβπ)β0)) |
60 | | simplr 768 |
. . . . . . . . . . . . 13
β’ (((π β (Polyββ€)
β§ ((coeffβπ)β0) β 0) β§ π΄ = 0) β ((coeffβπ)β0) β
0) |
61 | 59, 60 | eqnetrd 3009 |
. . . . . . . . . . . 12
β’ (((π β (Polyββ€)
β§ ((coeffβπ)β0) β 0) β§ π΄ = 0) β (πβπ΄) β 0) |
62 | 61 | neneqd 2946 |
. . . . . . . . . . 11
β’ (((π β (Polyββ€)
β§ ((coeffβπ)β0) β 0) β§ π΄ = 0) β Β¬ (πβπ΄) = 0) |
63 | 62 | adantlrr 720 |
. . . . . . . . . 10
β’ (((π β (Polyββ€)
β§ (((coeffβπ)β0) β 0 β§ (πβπ΄) = 0)) β§ π΄ = 0) β Β¬ (πβπ΄) = 0) |
64 | 63 | 3adantl1 1167 |
. . . . . . . . 9
β’ (((π΄ β β β§ π β (Polyββ€)
β§ (((coeffβπ)β0) β 0 β§ (πβπ΄) = 0)) β§ π΄ = 0) β Β¬ (πβπ΄) = 0) |
65 | 54, 64 | pm2.65da 816 |
. . . . . . . 8
β’ ((π΄ β β β§ π β (Polyββ€)
β§ (((coeffβπ)β0) β 0 β§ (πβπ΄) = 0)) β Β¬ π΄ = 0) |
66 | | elsng 4642 |
. . . . . . . . . 10
β’ (π΄ β β β (π΄ β {0} β π΄ = 0)) |
67 | 66 | biimpa 478 |
. . . . . . . . 9
β’ ((π΄ β β β§ π΄ β {0}) β π΄ = 0) |
68 | 67 | 3ad2antl1 1186 |
. . . . . . . 8
β’ (((π΄ β β β§ π β (Polyββ€)
β§ (((coeffβπ)β0) β 0 β§ (πβπ΄) = 0)) β§ π΄ β {0}) β π΄ = 0) |
69 | 65, 68 | mtand 815 |
. . . . . . 7
β’ ((π΄ β β β§ π β (Polyββ€)
β§ (((coeffβπ)β0) β 0 β§ (πβπ΄) = 0)) β Β¬ π΄ β {0}) |
70 | 69 | 3exp 1120 |
. . . . . 6
β’ (π΄ β β β (π β (Polyββ€)
β ((((coeffβπ)β0) β 0 β§ (πβπ΄) = 0) β Β¬ π΄ β {0}))) |
71 | 70 | adantr 482 |
. . . . 5
β’ ((π΄ β β β§
βπ β
(Polyββ€)(((coeffβπ)β0) β 0 β§ (πβπ΄) = 0)) β (π β (Polyββ€) β
((((coeffβπ)β0)
β 0 β§ (πβπ΄) = 0) β Β¬ π΄ β {0}))) |
72 | 52, 53, 71 | rexlimd 3264 |
. . . 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 3959 |
. 2
β’ ((π΄ β β β§
βπ β
(Polyββ€)(((coeffβπ)β0) β 0 β§ (πβπ΄) = 0)) β π΄ β (πΈ β
{0})) |
75 | 25, 74 | impbii 208 |
1
β’ (π΄ β (πΈ β {0})
β (π΄ β β
β§ βπ β
(Polyββ€)(((coeffβπ)β0) β 0 β§ (πβπ΄) = 0))) |