Step | Hyp | Ref
| Expression |
1 | | ftalem.1 |
. . 3
β’ π΄ = (coeffβπΉ) |
2 | | ftalem.2 |
. . 3
β’ π = (degβπΉ) |
3 | | ftalem.3 |
. . 3
β’ (π β πΉ β (Polyβπ)) |
4 | | ftalem.4 |
. . 3
β’ (π β π β β) |
5 | 1 | coef3 25737 |
. . . . . . 7
β’ (πΉ β (Polyβπ) β π΄:β0βΆβ) |
6 | 3, 5 | syl 17 |
. . . . . 6
β’ (π β π΄:β0βΆβ) |
7 | 4 | nnnn0d 12528 |
. . . . . 6
β’ (π β π β
β0) |
8 | 6, 7 | ffvelcdmd 7084 |
. . . . 5
β’ (π β (π΄βπ) β β) |
9 | 4 | nnne0d 12258 |
. . . . . 6
β’ (π β π β 0) |
10 | 2, 1 | dgreq0 25770 |
. . . . . . . . 9
β’ (πΉ β (Polyβπ) β (πΉ = 0π β (π΄βπ) = 0)) |
11 | | fveq2 6888 |
. . . . . . . . . . 11
β’ (πΉ = 0π β
(degβπΉ) =
(degβ0π)) |
12 | | dgr0 25767 |
. . . . . . . . . . 11
β’
(degβ0π) = 0 |
13 | 11, 12 | eqtrdi 2788 |
. . . . . . . . . 10
β’ (πΉ = 0π β
(degβπΉ) =
0) |
14 | 2, 13 | eqtrid 2784 |
. . . . . . . . 9
β’ (πΉ = 0π β
π = 0) |
15 | 10, 14 | syl6bir 253 |
. . . . . . . 8
β’ (πΉ β (Polyβπ) β ((π΄βπ) = 0 β π = 0)) |
16 | 3, 15 | syl 17 |
. . . . . . 7
β’ (π β ((π΄βπ) = 0 β π = 0)) |
17 | 16 | necon3d 2961 |
. . . . . 6
β’ (π β (π β 0 β (π΄βπ) β 0)) |
18 | 9, 17 | mpd 15 |
. . . . 5
β’ (π β (π΄βπ) β 0) |
19 | 8, 18 | absrpcld 15391 |
. . . 4
β’ (π β (absβ(π΄βπ)) β
β+) |
20 | 19 | rphalfcld 13024 |
. . 3
β’ (π β ((absβ(π΄βπ)) / 2) β
β+) |
21 | | 2fveq3 6893 |
. . . . 5
β’ (π = π β (absβ(π΄βπ)) = (absβ(π΄βπ))) |
22 | 21 | cbvsumv 15638 |
. . . 4
β’
Ξ£π β
(0...(π β
1))(absβ(π΄βπ)) = Ξ£π β (0...(π β 1))(absβ(π΄βπ)) |
23 | 22 | oveq1i 7415 |
. . 3
β’
(Ξ£π β
(0...(π β
1))(absβ(π΄βπ)) / ((absβ(π΄βπ)) / 2)) = (Ξ£π β (0...(π β 1))(absβ(π΄βπ)) / ((absβ(π΄βπ)) / 2)) |
24 | 1, 2, 3, 4, 20, 23 | ftalem1 26566 |
. 2
β’ (π β βπ β β βπ₯ β β (π < (absβπ₯) β (absβ((πΉβπ₯) β ((π΄βπ) Β· (π₯βπ)))) < (((absβ(π΄βπ)) / 2) Β· ((absβπ₯)βπ)))) |
25 | | ftalem2.5 |
. . . . . 6
β’ π = if(if(1 β€ π , π , 1) β€ π, π, if(1 β€ π , π , 1)) |
26 | | ftalem2.6 |
. . . . . . . . 9
β’ π = ((absβ(πΉβ0)) / ((absβ(π΄βπ)) / 2)) |
27 | | plyf 25703 |
. . . . . . . . . . . . 13
β’ (πΉ β (Polyβπ) β πΉ:ββΆβ) |
28 | 3, 27 | syl 17 |
. . . . . . . . . . . 12
β’ (π β πΉ:ββΆβ) |
29 | | 0cn 11202 |
. . . . . . . . . . . 12
β’ 0 β
β |
30 | | ffvelcdm 7080 |
. . . . . . . . . . . 12
β’ ((πΉ:ββΆβ β§ 0
β β) β (πΉβ0) β β) |
31 | 28, 29, 30 | sylancl 586 |
. . . . . . . . . . 11
β’ (π β (πΉβ0) β β) |
32 | 31 | abscld 15379 |
. . . . . . . . . 10
β’ (π β (absβ(πΉβ0)) β
β) |
33 | 32, 20 | rerpdivcld 13043 |
. . . . . . . . 9
β’ (π β ((absβ(πΉβ0)) / ((absβ(π΄βπ)) / 2)) β β) |
34 | 26, 33 | eqeltrid 2837 |
. . . . . . . 8
β’ (π β π β β) |
35 | 34 | adantr 481 |
. . . . . . 7
β’ ((π β§ π β β) β π β β) |
36 | | simpr 485 |
. . . . . . . 8
β’ ((π β§ π β β) β π β β) |
37 | | 1re 11210 |
. . . . . . . 8
β’ 1 β
β |
38 | | ifcl 4572 |
. . . . . . . 8
β’ ((π β β β§ 1 β
β) β if(1 β€ π , π , 1) β β) |
39 | 36, 37, 38 | sylancl 586 |
. . . . . . 7
β’ ((π β§ π β β) β if(1 β€ π , π , 1) β β) |
40 | 35, 39 | ifcld 4573 |
. . . . . 6
β’ ((π β§ π β β) β if(if(1 β€ π , π , 1) β€ π, π, if(1 β€ π , π , 1)) β β) |
41 | 25, 40 | eqeltrid 2837 |
. . . . 5
β’ ((π β§ π β β) β π β β) |
42 | | 0red 11213 |
. . . . . 6
β’ ((π β§ π β β) β 0 β
β) |
43 | | 1red 11211 |
. . . . . 6
β’ ((π β§ π β β) β 1 β
β) |
44 | | 0lt1 11732 |
. . . . . . 7
β’ 0 <
1 |
45 | 44 | a1i 11 |
. . . . . 6
β’ ((π β§ π β β) β 0 <
1) |
46 | | max1 13160 |
. . . . . . . 8
β’ ((1
β β β§ π
β β) β 1 β€ if(1 β€ π , π , 1)) |
47 | 37, 36, 46 | sylancr 587 |
. . . . . . 7
β’ ((π β§ π β β) β 1 β€ if(1 β€
π , π , 1)) |
48 | | max1 13160 |
. . . . . . . . 9
β’ ((if(1
β€ π , π , 1) β β β§ π β β) β if(1 β€ π , π , 1) β€ if(if(1 β€ π , π , 1) β€ π, π, if(1 β€ π , π , 1))) |
49 | 39, 35, 48 | syl2anc 584 |
. . . . . . . 8
β’ ((π β§ π β β) β if(1 β€ π , π , 1) β€ if(if(1 β€ π , π , 1) β€ π, π, if(1 β€ π , π , 1))) |
50 | 49, 25 | breqtrrdi 5189 |
. . . . . . 7
β’ ((π β§ π β β) β if(1 β€ π , π , 1) β€ π) |
51 | 43, 39, 41, 47, 50 | letrd 11367 |
. . . . . 6
β’ ((π β§ π β β) β 1 β€ π) |
52 | 42, 43, 41, 45, 51 | ltletrd 11370 |
. . . . 5
β’ ((π β§ π β β) β 0 < π) |
53 | 41, 52 | elrpd 13009 |
. . . 4
β’ ((π β§ π β β) β π β
β+) |
54 | | max2 13162 |
. . . . . . . . . . 11
β’ ((1
β β β§ π
β β) β π
β€ if(1 β€ π , π , 1)) |
55 | 37, 36, 54 | sylancr 587 |
. . . . . . . . . 10
β’ ((π β§ π β β) β π β€ if(1 β€ π , π , 1)) |
56 | 36, 39, 41, 55, 50 | letrd 11367 |
. . . . . . . . 9
β’ ((π β§ π β β) β π β€ π) |
57 | 56 | adantr 481 |
. . . . . . . 8
β’ (((π β§ π β β) β§ π₯ β β) β π β€ π) |
58 | | abscl 15221 |
. . . . . . . . 9
β’ (π₯ β β β
(absβπ₯) β
β) |
59 | | lelttr 11300 |
. . . . . . . . 9
β’ ((π β β β§ π β β β§
(absβπ₯) β
β) β ((π β€
π β§ π < (absβπ₯)) β π < (absβπ₯))) |
60 | 36, 41, 58, 59 | syl2an3an 1422 |
. . . . . . . 8
β’ (((π β§ π β β) β§ π₯ β β) β ((π β€ π β§ π < (absβπ₯)) β π < (absβπ₯))) |
61 | 57, 60 | mpand 693 |
. . . . . . 7
β’ (((π β§ π β β) β§ π₯ β β) β (π < (absβπ₯) β π < (absβπ₯))) |
62 | 61 | imim1d 82 |
. . . . . 6
β’ (((π β§ π β β) β§ π₯ β β) β ((π < (absβπ₯) β (absβ((πΉβπ₯) β ((π΄βπ) Β· (π₯βπ)))) < (((absβ(π΄βπ)) / 2) Β· ((absβπ₯)βπ))) β (π < (absβπ₯) β (absβ((πΉβπ₯) β ((π΄βπ) Β· (π₯βπ)))) < (((absβ(π΄βπ)) / 2) Β· ((absβπ₯)βπ))))) |
63 | 28 | ad2antrr 724 |
. . . . . . . . . . . . . . 15
β’ (((π β§ π β β) β§ (π₯ β β β§ π < (absβπ₯))) β πΉ:ββΆβ) |
64 | | simprl 769 |
. . . . . . . . . . . . . . 15
β’ (((π β§ π β β) β§ (π₯ β β β§ π < (absβπ₯))) β π₯ β β) |
65 | 63, 64 | ffvelcdmd 7084 |
. . . . . . . . . . . . . 14
β’ (((π β§ π β β) β§ (π₯ β β β§ π < (absβπ₯))) β (πΉβπ₯) β β) |
66 | 8 | ad2antrr 724 |
. . . . . . . . . . . . . . 15
β’ (((π β§ π β β) β§ (π₯ β β β§ π < (absβπ₯))) β (π΄βπ) β β) |
67 | 7 | ad2antrr 724 |
. . . . . . . . . . . . . . . 16
β’ (((π β§ π β β) β§ (π₯ β β β§ π < (absβπ₯))) β π β
β0) |
68 | 64, 67 | expcld 14107 |
. . . . . . . . . . . . . . 15
β’ (((π β§ π β β) β§ (π₯ β β β§ π < (absβπ₯))) β (π₯βπ) β β) |
69 | 66, 68 | mulcld 11230 |
. . . . . . . . . . . . . 14
β’ (((π β§ π β β) β§ (π₯ β β β§ π < (absβπ₯))) β ((π΄βπ) Β· (π₯βπ)) β β) |
70 | 65, 69 | subcld 11567 |
. . . . . . . . . . . . 13
β’ (((π β§ π β β) β§ (π₯ β β β§ π < (absβπ₯))) β ((πΉβπ₯) β ((π΄βπ) Β· (π₯βπ))) β β) |
71 | 70 | abscld 15379 |
. . . . . . . . . . . 12
β’ (((π β§ π β β) β§ (π₯ β β β§ π < (absβπ₯))) β (absβ((πΉβπ₯) β ((π΄βπ) Β· (π₯βπ)))) β β) |
72 | 69 | abscld 15379 |
. . . . . . . . . . . . 13
β’ (((π β§ π β β) β§ (π₯ β β β§ π < (absβπ₯))) β (absβ((π΄βπ) Β· (π₯βπ))) β β) |
73 | 72 | rehalfcld 12455 |
. . . . . . . . . . . 12
β’ (((π β§ π β β) β§ (π₯ β β β§ π < (absβπ₯))) β ((absβ((π΄βπ) Β· (π₯βπ))) / 2) β β) |
74 | 71, 73, 72 | ltsub2d 11820 |
. . . . . . . . . . 11
β’ (((π β§ π β β) β§ (π₯ β β β§ π < (absβπ₯))) β ((absβ((πΉβπ₯) β ((π΄βπ) Β· (π₯βπ)))) < ((absβ((π΄βπ) Β· (π₯βπ))) / 2) β ((absβ((π΄βπ) Β· (π₯βπ))) β ((absβ((π΄βπ) Β· (π₯βπ))) / 2)) < ((absβ((π΄βπ) Β· (π₯βπ))) β (absβ((πΉβπ₯) β ((π΄βπ) Β· (π₯βπ))))))) |
75 | 66, 68 | absmuld 15397 |
. . . . . . . . . . . . . . 15
β’ (((π β§ π β β) β§ (π₯ β β β§ π < (absβπ₯))) β (absβ((π΄βπ) Β· (π₯βπ))) = ((absβ(π΄βπ)) Β· (absβ(π₯βπ)))) |
76 | 64, 67 | absexpd 15395 |
. . . . . . . . . . . . . . . 16
β’ (((π β§ π β β) β§ (π₯ β β β§ π < (absβπ₯))) β (absβ(π₯βπ)) = ((absβπ₯)βπ)) |
77 | 76 | oveq2d 7421 |
. . . . . . . . . . . . . . 15
β’ (((π β§ π β β) β§ (π₯ β β β§ π < (absβπ₯))) β ((absβ(π΄βπ)) Β· (absβ(π₯βπ))) = ((absβ(π΄βπ)) Β· ((absβπ₯)βπ))) |
78 | 75, 77 | eqtrd 2772 |
. . . . . . . . . . . . . 14
β’ (((π β§ π β β) β§ (π₯ β β β§ π < (absβπ₯))) β (absβ((π΄βπ) Β· (π₯βπ))) = ((absβ(π΄βπ)) Β· ((absβπ₯)βπ))) |
79 | 78 | oveq1d 7420 |
. . . . . . . . . . . . 13
β’ (((π β§ π β β) β§ (π₯ β β β§ π < (absβπ₯))) β ((absβ((π΄βπ) Β· (π₯βπ))) / 2) = (((absβ(π΄βπ)) Β· ((absβπ₯)βπ)) / 2)) |
80 | 66 | abscld 15379 |
. . . . . . . . . . . . . . 15
β’ (((π β§ π β β) β§ (π₯ β β β§ π < (absβπ₯))) β (absβ(π΄βπ)) β β) |
81 | 80 | recnd 11238 |
. . . . . . . . . . . . . 14
β’ (((π β§ π β β) β§ (π₯ β β β§ π < (absβπ₯))) β (absβ(π΄βπ)) β β) |
82 | 58 | ad2antrl 726 |
. . . . . . . . . . . . . . . 16
β’ (((π β§ π β β) β§ (π₯ β β β§ π < (absβπ₯))) β (absβπ₯) β β) |
83 | 82, 67 | reexpcld 14124 |
. . . . . . . . . . . . . . 15
β’ (((π β§ π β β) β§ (π₯ β β β§ π < (absβπ₯))) β ((absβπ₯)βπ) β β) |
84 | 83 | recnd 11238 |
. . . . . . . . . . . . . 14
β’ (((π β§ π β β) β§ (π₯ β β β§ π < (absβπ₯))) β ((absβπ₯)βπ) β β) |
85 | | 2cnd 12286 |
. . . . . . . . . . . . . 14
β’ (((π β§ π β β) β§ (π₯ β β β§ π < (absβπ₯))) β 2 β β) |
86 | | 2ne0 12312 |
. . . . . . . . . . . . . . 15
β’ 2 β
0 |
87 | 86 | a1i 11 |
. . . . . . . . . . . . . 14
β’ (((π β§ π β β) β§ (π₯ β β β§ π < (absβπ₯))) β 2 β 0) |
88 | 81, 84, 85, 87 | div23d 12023 |
. . . . . . . . . . . . 13
β’ (((π β§ π β β) β§ (π₯ β β β§ π < (absβπ₯))) β (((absβ(π΄βπ)) Β· ((absβπ₯)βπ)) / 2) = (((absβ(π΄βπ)) / 2) Β· ((absβπ₯)βπ))) |
89 | 79, 88 | eqtrd 2772 |
. . . . . . . . . . . 12
β’ (((π β§ π β β) β§ (π₯ β β β§ π < (absβπ₯))) β ((absβ((π΄βπ) Β· (π₯βπ))) / 2) = (((absβ(π΄βπ)) / 2) Β· ((absβπ₯)βπ))) |
90 | 89 | breq2d 5159 |
. . . . . . . . . . 11
β’ (((π β§ π β β) β§ (π₯ β β β§ π < (absβπ₯))) β ((absβ((πΉβπ₯) β ((π΄βπ) Β· (π₯βπ)))) < ((absβ((π΄βπ) Β· (π₯βπ))) / 2) β (absβ((πΉβπ₯) β ((π΄βπ) Β· (π₯βπ)))) < (((absβ(π΄βπ)) / 2) Β· ((absβπ₯)βπ)))) |
91 | 72 | recnd 11238 |
. . . . . . . . . . . . . . 15
β’ (((π β§ π β β) β§ (π₯ β β β§ π < (absβπ₯))) β (absβ((π΄βπ) Β· (π₯βπ))) β β) |
92 | 91 | 2halvesd 12454 |
. . . . . . . . . . . . . 14
β’ (((π β§ π β β) β§ (π₯ β β β§ π < (absβπ₯))) β (((absβ((π΄βπ) Β· (π₯βπ))) / 2) + ((absβ((π΄βπ) Β· (π₯βπ))) / 2)) = (absβ((π΄βπ) Β· (π₯βπ)))) |
93 | 92 | oveq1d 7420 |
. . . . . . . . . . . . 13
β’ (((π β§ π β β) β§ (π₯ β β β§ π < (absβπ₯))) β ((((absβ((π΄βπ) Β· (π₯βπ))) / 2) + ((absβ((π΄βπ) Β· (π₯βπ))) / 2)) β ((absβ((π΄βπ) Β· (π₯βπ))) / 2)) = ((absβ((π΄βπ) Β· (π₯βπ))) β ((absβ((π΄βπ) Β· (π₯βπ))) / 2))) |
94 | 73 | recnd 11238 |
. . . . . . . . . . . . . 14
β’ (((π β§ π β β) β§ (π₯ β β β§ π < (absβπ₯))) β ((absβ((π΄βπ) Β· (π₯βπ))) / 2) β β) |
95 | 94, 94 | pncand 11568 |
. . . . . . . . . . . . 13
β’ (((π β§ π β β) β§ (π₯ β β β§ π < (absβπ₯))) β ((((absβ((π΄βπ) Β· (π₯βπ))) / 2) + ((absβ((π΄βπ) Β· (π₯βπ))) / 2)) β ((absβ((π΄βπ) Β· (π₯βπ))) / 2)) = ((absβ((π΄βπ) Β· (π₯βπ))) / 2)) |
96 | 93, 95 | eqtr3d 2774 |
. . . . . . . . . . . 12
β’ (((π β§ π β β) β§ (π₯ β β β§ π < (absβπ₯))) β ((absβ((π΄βπ) Β· (π₯βπ))) β ((absβ((π΄βπ) Β· (π₯βπ))) / 2)) = ((absβ((π΄βπ) Β· (π₯βπ))) / 2)) |
97 | 96 | breq1d 5157 |
. . . . . . . . . . 11
β’ (((π β§ π β β) β§ (π₯ β β β§ π < (absβπ₯))) β (((absβ((π΄βπ) Β· (π₯βπ))) β ((absβ((π΄βπ) Β· (π₯βπ))) / 2)) < ((absβ((π΄βπ) Β· (π₯βπ))) β (absβ((πΉβπ₯) β ((π΄βπ) Β· (π₯βπ))))) β ((absβ((π΄βπ) Β· (π₯βπ))) / 2) < ((absβ((π΄βπ) Β· (π₯βπ))) β (absβ((πΉβπ₯) β ((π΄βπ) Β· (π₯βπ))))))) |
98 | 74, 90, 97 | 3bitr3d 308 |
. . . . . . . . . 10
β’ (((π β§ π β β) β§ (π₯ β β β§ π < (absβπ₯))) β ((absβ((πΉβπ₯) β ((π΄βπ) Β· (π₯βπ)))) < (((absβ(π΄βπ)) / 2) Β· ((absβπ₯)βπ)) β ((absβ((π΄βπ) Β· (π₯βπ))) / 2) < ((absβ((π΄βπ) Β· (π₯βπ))) β (absβ((πΉβπ₯) β ((π΄βπ) Β· (π₯βπ))))))) |
99 | 69, 65 | subcld 11567 |
. . . . . . . . . . . . 13
β’ (((π β§ π β β) β§ (π₯ β β β§ π < (absβπ₯))) β (((π΄βπ) Β· (π₯βπ)) β (πΉβπ₯)) β β) |
100 | 69, 99 | abs2difd 15400 |
. . . . . . . . . . . 12
β’ (((π β§ π β β) β§ (π₯ β β β§ π < (absβπ₯))) β ((absβ((π΄βπ) Β· (π₯βπ))) β (absβ(((π΄βπ) Β· (π₯βπ)) β (πΉβπ₯)))) β€ (absβ(((π΄βπ) Β· (π₯βπ)) β (((π΄βπ) Β· (π₯βπ)) β (πΉβπ₯))))) |
101 | 69, 65 | abssubd 15396 |
. . . . . . . . . . . . 13
β’ (((π β§ π β β) β§ (π₯ β β β§ π < (absβπ₯))) β (absβ(((π΄βπ) Β· (π₯βπ)) β (πΉβπ₯))) = (absβ((πΉβπ₯) β ((π΄βπ) Β· (π₯βπ))))) |
102 | 101 | oveq2d 7421 |
. . . . . . . . . . . 12
β’ (((π β§ π β β) β§ (π₯ β β β§ π < (absβπ₯))) β ((absβ((π΄βπ) Β· (π₯βπ))) β (absβ(((π΄βπ) Β· (π₯βπ)) β (πΉβπ₯)))) = ((absβ((π΄βπ) Β· (π₯βπ))) β (absβ((πΉβπ₯) β ((π΄βπ) Β· (π₯βπ)))))) |
103 | 69, 65 | nncand 11572 |
. . . . . . . . . . . . 13
β’ (((π β§ π β β) β§ (π₯ β β β§ π < (absβπ₯))) β (((π΄βπ) Β· (π₯βπ)) β (((π΄βπ) Β· (π₯βπ)) β (πΉβπ₯))) = (πΉβπ₯)) |
104 | 103 | fveq2d 6892 |
. . . . . . . . . . . 12
β’ (((π β§ π β β) β§ (π₯ β β β§ π < (absβπ₯))) β (absβ(((π΄βπ) Β· (π₯βπ)) β (((π΄βπ) Β· (π₯βπ)) β (πΉβπ₯)))) = (absβ(πΉβπ₯))) |
105 | 100, 102,
104 | 3brtr3d 5178 |
. . . . . . . . . . 11
β’ (((π β§ π β β) β§ (π₯ β β β§ π < (absβπ₯))) β ((absβ((π΄βπ) Β· (π₯βπ))) β (absβ((πΉβπ₯) β ((π΄βπ) Β· (π₯βπ))))) β€ (absβ(πΉβπ₯))) |
106 | 72, 71 | resubcld 11638 |
. . . . . . . . . . . 12
β’ (((π β§ π β β) β§ (π₯ β β β§ π < (absβπ₯))) β ((absβ((π΄βπ) Β· (π₯βπ))) β (absβ((πΉβπ₯) β ((π΄βπ) Β· (π₯βπ))))) β β) |
107 | 65 | abscld 15379 |
. . . . . . . . . . . 12
β’ (((π β§ π β β) β§ (π₯ β β β§ π < (absβπ₯))) β (absβ(πΉβπ₯)) β β) |
108 | | ltletr 11302 |
. . . . . . . . . . . 12
β’
((((absβ((π΄βπ) Β· (π₯βπ))) / 2) β β β§
((absβ((π΄βπ) Β· (π₯βπ))) β (absβ((πΉβπ₯) β ((π΄βπ) Β· (π₯βπ))))) β β β§ (absβ(πΉβπ₯)) β β) β
((((absβ((π΄βπ) Β· (π₯βπ))) / 2) < ((absβ((π΄βπ) Β· (π₯βπ))) β (absβ((πΉβπ₯) β ((π΄βπ) Β· (π₯βπ))))) β§ ((absβ((π΄βπ) Β· (π₯βπ))) β (absβ((πΉβπ₯) β ((π΄βπ) Β· (π₯βπ))))) β€ (absβ(πΉβπ₯))) β ((absβ((π΄βπ) Β· (π₯βπ))) / 2) < (absβ(πΉβπ₯)))) |
109 | 73, 106, 107, 108 | syl3anc 1371 |
. . . . . . . . . . 11
β’ (((π β§ π β β) β§ (π₯ β β β§ π < (absβπ₯))) β ((((absβ((π΄βπ) Β· (π₯βπ))) / 2) < ((absβ((π΄βπ) Β· (π₯βπ))) β (absβ((πΉβπ₯) β ((π΄βπ) Β· (π₯βπ))))) β§ ((absβ((π΄βπ) Β· (π₯βπ))) β (absβ((πΉβπ₯) β ((π΄βπ) Β· (π₯βπ))))) β€ (absβ(πΉβπ₯))) β ((absβ((π΄βπ) Β· (π₯βπ))) / 2) < (absβ(πΉβπ₯)))) |
110 | 105, 109 | mpan2d 692 |
. . . . . . . . . 10
β’ (((π β§ π β β) β§ (π₯ β β β§ π < (absβπ₯))) β (((absβ((π΄βπ) Β· (π₯βπ))) / 2) < ((absβ((π΄βπ) Β· (π₯βπ))) β (absβ((πΉβπ₯) β ((π΄βπ) Β· (π₯βπ))))) β ((absβ((π΄βπ) Β· (π₯βπ))) / 2) < (absβ(πΉβπ₯)))) |
111 | 98, 110 | sylbid 239 |
. . . . . . . . 9
β’ (((π β§ π β β) β§ (π₯ β β β§ π < (absβπ₯))) β ((absβ((πΉβπ₯) β ((π΄βπ) Β· (π₯βπ)))) < (((absβ(π΄βπ)) / 2) Β· ((absβπ₯)βπ)) β ((absβ((π΄βπ) Β· (π₯βπ))) / 2) < (absβ(πΉβπ₯)))) |
112 | 32 | ad2antrr 724 |
. . . . . . . . . . . 12
β’ (((π β§ π β β) β§ (π₯ β β β§ π < (absβπ₯))) β (absβ(πΉβ0)) β β) |
113 | 20 | ad2antrr 724 |
. . . . . . . . . . . . . 14
β’ (((π β§ π β β) β§ (π₯ β β β§ π < (absβπ₯))) β ((absβ(π΄βπ)) / 2) β
β+) |
114 | 113 | rpred 13012 |
. . . . . . . . . . . . 13
β’ (((π β§ π β β) β§ (π₯ β β β§ π < (absβπ₯))) β ((absβ(π΄βπ)) / 2) β β) |
115 | 114, 82 | remulcld 11240 |
. . . . . . . . . . . 12
β’ (((π β§ π β β) β§ (π₯ β β β§ π < (absβπ₯))) β (((absβ(π΄βπ)) / 2) Β· (absβπ₯)) β
β) |
116 | 89, 73 | eqeltrrd 2834 |
. . . . . . . . . . . 12
β’ (((π β§ π β β) β§ (π₯ β β β§ π < (absβπ₯))) β (((absβ(π΄βπ)) / 2) Β· ((absβπ₯)βπ)) β β) |
117 | 35 | adantr 481 |
. . . . . . . . . . . . . . 15
β’ (((π β§ π β β) β§ (π₯ β β β§ π < (absβπ₯))) β π β β) |
118 | 41 | adantr 481 |
. . . . . . . . . . . . . . 15
β’ (((π β§ π β β) β§ (π₯ β β β§ π < (absβπ₯))) β π β β) |
119 | | max2 13162 |
. . . . . . . . . . . . . . . . . 18
β’ ((if(1
β€ π , π , 1) β β β§ π β β) β π β€ if(if(1 β€ π , π , 1) β€ π, π, if(1 β€ π , π , 1))) |
120 | 39, 35, 119 | syl2anc 584 |
. . . . . . . . . . . . . . . . 17
β’ ((π β§ π β β) β π β€ if(if(1 β€ π , π , 1) β€ π, π, if(1 β€ π , π , 1))) |
121 | 120, 25 | breqtrrdi 5189 |
. . . . . . . . . . . . . . . 16
β’ ((π β§ π β β) β π β€ π) |
122 | 121 | adantr 481 |
. . . . . . . . . . . . . . 15
β’ (((π β§ π β β) β§ (π₯ β β β§ π < (absβπ₯))) β π β€ π) |
123 | | simprr 771 |
. . . . . . . . . . . . . . 15
β’ (((π β§ π β β) β§ (π₯ β β β§ π < (absβπ₯))) β π < (absβπ₯)) |
124 | 117, 118,
82, 122, 123 | lelttrd 11368 |
. . . . . . . . . . . . . 14
β’ (((π β§ π β β) β§ (π₯ β β β§ π < (absβπ₯))) β π < (absβπ₯)) |
125 | 26, 124 | eqbrtrrid 5183 |
. . . . . . . . . . . . 13
β’ (((π β§ π β β) β§ (π₯ β β β§ π < (absβπ₯))) β ((absβ(πΉβ0)) / ((absβ(π΄βπ)) / 2)) < (absβπ₯)) |
126 | 112, 82, 113 | ltdivmuld 13063 |
. . . . . . . . . . . . 13
β’ (((π β§ π β β) β§ (π₯ β β β§ π < (absβπ₯))) β (((absβ(πΉβ0)) / ((absβ(π΄βπ)) / 2)) < (absβπ₯) β (absβ(πΉβ0)) < (((absβ(π΄βπ)) / 2) Β· (absβπ₯)))) |
127 | 125, 126 | mpbid 231 |
. . . . . . . . . . . 12
β’ (((π β§ π β β) β§ (π₯ β β β§ π < (absβπ₯))) β (absβ(πΉβ0)) < (((absβ(π΄βπ)) / 2) Β· (absβπ₯))) |
128 | 82 | recnd 11238 |
. . . . . . . . . . . . . . 15
β’ (((π β§ π β β) β§ (π₯ β β β§ π < (absβπ₯))) β (absβπ₯) β β) |
129 | 128 | exp1d 14102 |
. . . . . . . . . . . . . 14
β’ (((π β§ π β β) β§ (π₯ β β β§ π < (absβπ₯))) β ((absβπ₯)β1) = (absβπ₯)) |
130 | | 1red 11211 |
. . . . . . . . . . . . . . . 16
β’ (((π β§ π β β) β§ (π₯ β β β§ π < (absβπ₯))) β 1 β β) |
131 | 51 | adantr 481 |
. . . . . . . . . . . . . . . . 17
β’ (((π β§ π β β) β§ (π₯ β β β§ π < (absβπ₯))) β 1 β€ π) |
132 | 130, 118,
82, 131, 123 | lelttrd 11368 |
. . . . . . . . . . . . . . . 16
β’ (((π β§ π β β) β§ (π₯ β β β§ π < (absβπ₯))) β 1 < (absβπ₯)) |
133 | 130, 82, 132 | ltled 11358 |
. . . . . . . . . . . . . . 15
β’ (((π β§ π β β) β§ (π₯ β β β§ π < (absβπ₯))) β 1 β€ (absβπ₯)) |
134 | 4 | ad2antrr 724 |
. . . . . . . . . . . . . . . 16
β’ (((π β§ π β β) β§ (π₯ β β β§ π < (absβπ₯))) β π β β) |
135 | | nnuz 12861 |
. . . . . . . . . . . . . . . 16
β’ β =
(β€β₯β1) |
136 | 134, 135 | eleqtrdi 2843 |
. . . . . . . . . . . . . . 15
β’ (((π β§ π β β) β§ (π₯ β β β§ π < (absβπ₯))) β π β
(β€β₯β1)) |
137 | 82, 133, 136 | leexp2ad 14213 |
. . . . . . . . . . . . . 14
β’ (((π β§ π β β) β§ (π₯ β β β§ π < (absβπ₯))) β ((absβπ₯)β1) β€ ((absβπ₯)βπ)) |
138 | 129, 137 | eqbrtrrd 5171 |
. . . . . . . . . . . . 13
β’ (((π β§ π β β) β§ (π₯ β β β§ π < (absβπ₯))) β (absβπ₯) β€ ((absβπ₯)βπ)) |
139 | 82, 83, 113 | lemul2d 13056 |
. . . . . . . . . . . . 13
β’ (((π β§ π β β) β§ (π₯ β β β§ π < (absβπ₯))) β ((absβπ₯) β€ ((absβπ₯)βπ) β (((absβ(π΄βπ)) / 2) Β· (absβπ₯)) β€ (((absβ(π΄βπ)) / 2) Β· ((absβπ₯)βπ)))) |
140 | 138, 139 | mpbid 231 |
. . . . . . . . . . . 12
β’ (((π β§ π β β) β§ (π₯ β β β§ π < (absβπ₯))) β (((absβ(π΄βπ)) / 2) Β· (absβπ₯)) β€ (((absβ(π΄βπ)) / 2) Β· ((absβπ₯)βπ))) |
141 | 112, 115,
116, 127, 140 | ltletrd 11370 |
. . . . . . . . . . 11
β’ (((π β§ π β β) β§ (π₯ β β β§ π < (absβπ₯))) β (absβ(πΉβ0)) < (((absβ(π΄βπ)) / 2) Β· ((absβπ₯)βπ))) |
142 | 141, 89 | breqtrrd 5175 |
. . . . . . . . . 10
β’ (((π β§ π β β) β§ (π₯ β β β§ π < (absβπ₯))) β (absβ(πΉβ0)) < ((absβ((π΄βπ) Β· (π₯βπ))) / 2)) |
143 | | lttr 11286 |
. . . . . . . . . . 11
β’
(((absβ(πΉβ0)) β β β§
((absβ((π΄βπ) Β· (π₯βπ))) / 2) β β β§
(absβ(πΉβπ₯)) β β) β
(((absβ(πΉβ0))
< ((absβ((π΄βπ) Β· (π₯βπ))) / 2) β§ ((absβ((π΄βπ) Β· (π₯βπ))) / 2) < (absβ(πΉβπ₯))) β (absβ(πΉβ0)) < (absβ(πΉβπ₯)))) |
144 | 112, 73, 107, 143 | syl3anc 1371 |
. . . . . . . . . 10
β’ (((π β§ π β β) β§ (π₯ β β β§ π < (absβπ₯))) β (((absβ(πΉβ0)) < ((absβ((π΄βπ) Β· (π₯βπ))) / 2) β§ ((absβ((π΄βπ) Β· (π₯βπ))) / 2) < (absβ(πΉβπ₯))) β (absβ(πΉβ0)) < (absβ(πΉβπ₯)))) |
145 | 142, 144 | mpand 693 |
. . . . . . . . 9
β’ (((π β§ π β β) β§ (π₯ β β β§ π < (absβπ₯))) β (((absβ((π΄βπ) Β· (π₯βπ))) / 2) < (absβ(πΉβπ₯)) β (absβ(πΉβ0)) < (absβ(πΉβπ₯)))) |
146 | 111, 145 | syld 47 |
. . . . . . . 8
β’ (((π β§ π β β) β§ (π₯ β β β§ π < (absβπ₯))) β ((absβ((πΉβπ₯) β ((π΄βπ) Β· (π₯βπ)))) < (((absβ(π΄βπ)) / 2) Β· ((absβπ₯)βπ)) β (absβ(πΉβ0)) < (absβ(πΉβπ₯)))) |
147 | 146 | expr 457 |
. . . . . . 7
β’ (((π β§ π β β) β§ π₯ β β) β (π < (absβπ₯) β ((absβ((πΉβπ₯) β ((π΄βπ) Β· (π₯βπ)))) < (((absβ(π΄βπ)) / 2) Β· ((absβπ₯)βπ)) β (absβ(πΉβ0)) < (absβ(πΉβπ₯))))) |
148 | 147 | a2d 29 |
. . . . . 6
β’ (((π β§ π β β) β§ π₯ β β) β ((π < (absβπ₯) β (absβ((πΉβπ₯) β ((π΄βπ) Β· (π₯βπ)))) < (((absβ(π΄βπ)) / 2) Β· ((absβπ₯)βπ))) β (π < (absβπ₯) β (absβ(πΉβ0)) < (absβ(πΉβπ₯))))) |
149 | 62, 148 | syld 47 |
. . . . 5
β’ (((π β§ π β β) β§ π₯ β β) β ((π < (absβπ₯) β (absβ((πΉβπ₯) β ((π΄βπ) Β· (π₯βπ)))) < (((absβ(π΄βπ)) / 2) Β· ((absβπ₯)βπ))) β (π < (absβπ₯) β (absβ(πΉβ0)) < (absβ(πΉβπ₯))))) |
150 | 149 | ralimdva 3167 |
. . . 4
β’ ((π β§ π β β) β (βπ₯ β β (π < (absβπ₯) β (absβ((πΉβπ₯) β ((π΄βπ) Β· (π₯βπ)))) < (((absβ(π΄βπ)) / 2) Β· ((absβπ₯)βπ))) β βπ₯ β β (π < (absβπ₯) β (absβ(πΉβ0)) < (absβ(πΉβπ₯))))) |
151 | | breq1 5150 |
. . . . 5
β’ (π = π β (π < (absβπ₯) β π < (absβπ₯))) |
152 | 151 | rspceaimv 3616 |
. . . 4
β’ ((π β β+
β§ βπ₯ β
β (π <
(absβπ₯) β
(absβ(πΉβ0))
< (absβ(πΉβπ₯)))) β βπ β β+ βπ₯ β β (π < (absβπ₯) β (absβ(πΉβ0)) <
(absβ(πΉβπ₯)))) |
153 | 53, 150, 152 | syl6an 682 |
. . 3
β’ ((π β§ π β β) β (βπ₯ β β (π < (absβπ₯) β (absβ((πΉβπ₯) β ((π΄βπ) Β· (π₯βπ)))) < (((absβ(π΄βπ)) / 2) Β· ((absβπ₯)βπ))) β βπ β β+ βπ₯ β β (π < (absβπ₯) β (absβ(πΉβ0)) <
(absβ(πΉβπ₯))))) |
154 | 153 | rexlimdva 3155 |
. 2
β’ (π β (βπ β β βπ₯ β β (π < (absβπ₯) β (absβ((πΉβπ₯) β ((π΄βπ) Β· (π₯βπ)))) < (((absβ(π΄βπ)) / 2) Β· ((absβπ₯)βπ))) β βπ β β+ βπ₯ β β (π < (absβπ₯) β (absβ(πΉβ0)) <
(absβ(πΉβπ₯))))) |
155 | 24, 154 | mpd 15 |
1
β’ (π β βπ β β+ βπ₯ β β (π < (absβπ₯) β (absβ(πΉβ0)) <
(absβ(πΉβπ₯)))) |