Step | Hyp | Ref
| Expression |
1 | | simpr 483 |
. . . 4
β’ ((π β§ πΉ = (0gβπ)) β πΉ = (0gβπ)) |
2 | | ply1degltlss.d |
. . . . . . . . . 10
β’ π· = ( deg1
βπ
) |
3 | | ply1degltlss.p |
. . . . . . . . . 10
β’ π = (Poly1βπ
) |
4 | | ply1degltel.1 |
. . . . . . . . . 10
β’ π΅ = (Baseβπ) |
5 | 2, 3, 4 | deg1xrf 25834 |
. . . . . . . . 9
β’ π·:π΅βΆβ* |
6 | 5 | a1i 11 |
. . . . . . . 8
β’ (π β π·:π΅βΆβ*) |
7 | 6 | ffnd 6717 |
. . . . . . 7
β’ (π β π· Fn π΅) |
8 | | ply1degltlss.2 |
. . . . . . . 8
β’ (π β π
β Ring) |
9 | 3 | ply1ring 21990 |
. . . . . . . 8
β’ (π
β Ring β π β Ring) |
10 | | eqid 2730 |
. . . . . . . . 9
β’
(0gβπ) = (0gβπ) |
11 | 4, 10 | ring0cl 20155 |
. . . . . . . 8
β’ (π β Ring β
(0gβπ)
β π΅) |
12 | 8, 9, 11 | 3syl 18 |
. . . . . . 7
β’ (π β (0gβπ) β π΅) |
13 | 2, 3, 10 | deg1z 25840 |
. . . . . . . . 9
β’ (π
β Ring β (π·β(0gβπ)) = -β) |
14 | 8, 13 | syl 17 |
. . . . . . . 8
β’ (π β (π·β(0gβπ)) = -β) |
15 | | mnfxr 11275 |
. . . . . . . . . 10
β’ -β
β β* |
16 | 15 | a1i 11 |
. . . . . . . . 9
β’ (π β -β β
β*) |
17 | | ply1degltlss.3 |
. . . . . . . . . . 11
β’ (π β π β
β0) |
18 | 17 | nn0red 12537 |
. . . . . . . . . 10
β’ (π β π β β) |
19 | 18 | rexrd 11268 |
. . . . . . . . 9
β’ (π β π β
β*) |
20 | 16 | xrleidd 13135 |
. . . . . . . . 9
β’ (π β -β β€
-β) |
21 | 18 | mnfltd 13108 |
. . . . . . . . 9
β’ (π β -β < π) |
22 | 16, 19, 16, 20, 21 | elicod 13378 |
. . . . . . . 8
β’ (π β -β β
(-β[,)π)) |
23 | 14, 22 | eqeltrd 2831 |
. . . . . . 7
β’ (π β (π·β(0gβπ)) β (-β[,)π)) |
24 | 7, 12, 23 | elpreimad 7059 |
. . . . . 6
β’ (π β (0gβπ) β (β‘π· β (-β[,)π))) |
25 | | ply1degltlss.1 |
. . . . . 6
β’ π = (β‘π· β (-β[,)π)) |
26 | 24, 25 | eleqtrrdi 2842 |
. . . . 5
β’ (π β (0gβπ) β π) |
27 | 26 | adantr 479 |
. . . 4
β’ ((π β§ πΉ = (0gβπ)) β (0gβπ) β π) |
28 | 1, 27 | eqeltrd 2831 |
. . 3
β’ ((π β§ πΉ = (0gβπ)) β πΉ β π) |
29 | | cnvimass 6079 |
. . . . . 6
β’ (β‘π· β (-β[,)π)) β dom π· |
30 | 25, 29 | eqsstri 4015 |
. . . . 5
β’ π β dom π· |
31 | 5 | fdmi 6728 |
. . . . 5
β’ dom π· = π΅ |
32 | 30, 31 | sseqtri 4017 |
. . . 4
β’ π β π΅ |
33 | 32, 28 | sselid 3979 |
. . 3
β’ ((π β§ πΉ = (0gβπ)) β πΉ β π΅) |
34 | 1 | fveq2d 6894 |
. . . . 5
β’ ((π β§ πΉ = (0gβπ)) β (π·βπΉ) = (π·β(0gβπ))) |
35 | 14 | adantr 479 |
. . . . 5
β’ ((π β§ πΉ = (0gβπ)) β (π·β(0gβπ)) = -β) |
36 | 34, 35 | eqtrd 2770 |
. . . 4
β’ ((π β§ πΉ = (0gβπ)) β (π·βπΉ) = -β) |
37 | 18 | adantr 479 |
. . . . 5
β’ ((π β§ πΉ = (0gβπ)) β π β β) |
38 | 37 | mnfltd 13108 |
. . . 4
β’ ((π β§ πΉ = (0gβπ)) β -β < π) |
39 | 36, 38 | eqbrtrd 5169 |
. . 3
β’ ((π β§ πΉ = (0gβπ)) β (π·βπΉ) < π) |
40 | | pm5.1 820 |
. . 3
β’ ((πΉ β π β§ (πΉ β π΅ β§ (π·βπΉ) < π)) β (πΉ β π β (πΉ β π΅ β§ (π·βπΉ) < π))) |
41 | 28, 33, 39, 40 | syl12anc 833 |
. 2
β’ ((π β§ πΉ = (0gβπ)) β (πΉ β π β (πΉ β π΅ β§ (π·βπΉ) < π))) |
42 | 25 | eleq2i 2823 |
. . . 4
β’ (πΉ β π β πΉ β (β‘π· β (-β[,)π))) |
43 | 7 | adantr 479 |
. . . . 5
β’ ((π β§ πΉ β (0gβπ)) β π· Fn π΅) |
44 | | elpreima 7058 |
. . . . 5
β’ (π· Fn π΅ β (πΉ β (β‘π· β (-β[,)π)) β (πΉ β π΅ β§ (π·βπΉ) β (-β[,)π)))) |
45 | 43, 44 | syl 17 |
. . . 4
β’ ((π β§ πΉ β (0gβπ)) β (πΉ β (β‘π· β (-β[,)π)) β (πΉ β π΅ β§ (π·βπΉ) β (-β[,)π)))) |
46 | 42, 45 | bitrid 282 |
. . 3
β’ ((π β§ πΉ β (0gβπ)) β (πΉ β π β (πΉ β π΅ β§ (π·βπΉ) β (-β[,)π)))) |
47 | 8 | ad2antrr 722 |
. . . . . . . . 9
β’ (((π β§ πΉ β (0gβπ)) β§ πΉ β π΅) β π
β Ring) |
48 | | simpr 483 |
. . . . . . . . 9
β’ (((π β§ πΉ β (0gβπ)) β§ πΉ β π΅) β πΉ β π΅) |
49 | | simplr 765 |
. . . . . . . . 9
β’ (((π β§ πΉ β (0gβπ)) β§ πΉ β π΅) β πΉ β (0gβπ)) |
50 | 2, 3, 10, 4 | deg1nn0cl 25841 |
. . . . . . . . 9
β’ ((π
β Ring β§ πΉ β π΅ β§ πΉ β (0gβπ)) β (π·βπΉ) β
β0) |
51 | 47, 48, 49, 50 | syl3anc 1369 |
. . . . . . . 8
β’ (((π β§ πΉ β (0gβπ)) β§ πΉ β π΅) β (π·βπΉ) β
β0) |
52 | 51 | nn0red 12537 |
. . . . . . 7
β’ (((π β§ πΉ β (0gβπ)) β§ πΉ β π΅) β (π·βπΉ) β β) |
53 | 52 | rexrd 11268 |
. . . . . 6
β’ (((π β§ πΉ β (0gβπ)) β§ πΉ β π΅) β (π·βπΉ) β
β*) |
54 | 53 | mnfled 13119 |
. . . . . 6
β’ (((π β§ πΉ β (0gβπ)) β§ πΉ β π΅) β -β β€ (π·βπΉ)) |
55 | 53, 54 | jca 510 |
. . . . 5
β’ (((π β§ πΉ β (0gβπ)) β§ πΉ β π΅) β ((π·βπΉ) β β* β§ -β
β€ (π·βπΉ))) |
56 | 19 | ad2antrr 722 |
. . . . . . 7
β’ (((π β§ πΉ β (0gβπ)) β§ πΉ β π΅) β π β
β*) |
57 | | elico1 13371 |
. . . . . . 7
β’
((-β β β* β§ π β β*) β ((π·βπΉ) β (-β[,)π) β ((π·βπΉ) β β* β§ -β
β€ (π·βπΉ) β§ (π·βπΉ) < π))) |
58 | 15, 56, 57 | sylancr 585 |
. . . . . 6
β’ (((π β§ πΉ β (0gβπ)) β§ πΉ β π΅) β ((π·βπΉ) β (-β[,)π) β ((π·βπΉ) β β* β§ -β
β€ (π·βπΉ) β§ (π·βπΉ) < π))) |
59 | | df-3an 1087 |
. . . . . 6
β’ (((π·βπΉ) β β* β§ -β
β€ (π·βπΉ) β§ (π·βπΉ) < π) β (((π·βπΉ) β β* β§ -β
β€ (π·βπΉ)) β§ (π·βπΉ) < π)) |
60 | 58, 59 | bitrdi 286 |
. . . . 5
β’ (((π β§ πΉ β (0gβπ)) β§ πΉ β π΅) β ((π·βπΉ) β (-β[,)π) β (((π·βπΉ) β β* β§ -β
β€ (π·βπΉ)) β§ (π·βπΉ) < π))) |
61 | 55, 60 | mpbirand 703 |
. . . 4
β’ (((π β§ πΉ β (0gβπ)) β§ πΉ β π΅) β ((π·βπΉ) β (-β[,)π) β (π·βπΉ) < π)) |
62 | 61 | pm5.32da 577 |
. . 3
β’ ((π β§ πΉ β (0gβπ)) β ((πΉ β π΅ β§ (π·βπΉ) β (-β[,)π)) β (πΉ β π΅ β§ (π·βπΉ) < π))) |
63 | 46, 62 | bitrd 278 |
. 2
β’ ((π β§ πΉ β (0gβπ)) β (πΉ β π β (πΉ β π΅ β§ (π·βπΉ) < π))) |
64 | 41, 63 | pm2.61dane 3027 |
1
β’ (π β (πΉ β π β (πΉ β π΅ β§ (π·βπΉ) < π))) |