Step | Hyp | Ref
| Expression |
1 | | 0xr 8003 |
. . . . . . . . 9
β’ 0 β
β* |
2 | | 1re 7955 |
. . . . . . . . 9
β’ 1 β
β |
3 | | elioc2 9935 |
. . . . . . . . 9
β’ ((0
β β* β§ 1 β β) β (π΄ β (0(,]1) β (π΄ β β β§ 0 < π΄ β§ π΄ β€ 1))) |
4 | 1, 2, 3 | mp2an 426 |
. . . . . . . 8
β’ (π΄ β (0(,]1) β (π΄ β β β§ 0 <
π΄ β§ π΄ β€ 1)) |
5 | 4 | simp1bi 1012 |
. . . . . . 7
β’ (π΄ β (0(,]1) β π΄ β
β) |
6 | | eqid 2177 |
. . . . . . . 8
β’ (π β β0
β¦ (((i Β· π΄)βπ) / (!βπ))) = (π β β0 β¦ (((i
Β· π΄)βπ) / (!βπ))) |
7 | 6 | resin4p 11725 |
. . . . . . 7
β’ (π΄ β β β
(sinβπ΄) = ((π΄ β ((π΄β3) / 6)) + (ββΞ£π β
(β€β₯β4)((π β β0 β¦ (((i
Β· π΄)βπ) / (!βπ)))βπ)))) |
8 | 5, 7 | syl 14 |
. . . . . 6
β’ (π΄ β (0(,]1) β
(sinβπ΄) = ((π΄ β ((π΄β3) / 6)) + (ββΞ£π β
(β€β₯β4)((π β β0 β¦ (((i
Β· π΄)βπ) / (!βπ)))βπ)))) |
9 | 8 | eqcomd 2183 |
. . . . 5
β’ (π΄ β (0(,]1) β ((π΄ β ((π΄β3) / 6)) + (ββΞ£π β
(β€β₯β4)((π β β0 β¦ (((i
Β· π΄)βπ) / (!βπ)))βπ))) = (sinβπ΄)) |
10 | 5 | resincld 11730 |
. . . . . . 7
β’ (π΄ β (0(,]1) β
(sinβπ΄) β
β) |
11 | 10 | recnd 7985 |
. . . . . 6
β’ (π΄ β (0(,]1) β
(sinβπ΄) β
β) |
12 | | 3nn0 9193 |
. . . . . . . . . 10
β’ 3 β
β0 |
13 | | reexpcl 10536 |
. . . . . . . . . 10
β’ ((π΄ β β β§ 3 β
β0) β (π΄β3) β β) |
14 | 5, 12, 13 | sylancl 413 |
. . . . . . . . 9
β’ (π΄ β (0(,]1) β (π΄β3) β
β) |
15 | | 6nn 9083 |
. . . . . . . . 9
β’ 6 β
β |
16 | | nndivre 8954 |
. . . . . . . . 9
β’ (((π΄β3) β β β§ 6
β β) β ((π΄β3) / 6) β
β) |
17 | 14, 15, 16 | sylancl 413 |
. . . . . . . 8
β’ (π΄ β (0(,]1) β ((π΄β3) / 6) β
β) |
18 | 5, 17 | resubcld 8337 |
. . . . . . 7
β’ (π΄ β (0(,]1) β (π΄ β ((π΄β3) / 6)) β
β) |
19 | 18 | recnd 7985 |
. . . . . 6
β’ (π΄ β (0(,]1) β (π΄ β ((π΄β3) / 6)) β
β) |
20 | | ax-icn 7905 |
. . . . . . . . . 10
β’ i β
β |
21 | 5 | recnd 7985 |
. . . . . . . . . 10
β’ (π΄ β (0(,]1) β π΄ β
β) |
22 | | mulcl 7937 |
. . . . . . . . . 10
β’ ((i
β β β§ π΄
β β) β (i Β· π΄) β β) |
23 | 20, 21, 22 | sylancr 414 |
. . . . . . . . 9
β’ (π΄ β (0(,]1) β (i
Β· π΄) β
β) |
24 | | 4nn0 9194 |
. . . . . . . . 9
β’ 4 β
β0 |
25 | 6 | eftlcl 11695 |
. . . . . . . . 9
β’ (((i
Β· π΄) β β
β§ 4 β β0) β Ξ£π β
(β€β₯β4)((π β β0 β¦ (((i
Β· π΄)βπ) / (!βπ)))βπ) β β) |
26 | 23, 24, 25 | sylancl 413 |
. . . . . . . 8
β’ (π΄ β (0(,]1) β
Ξ£π β
(β€β₯β4)((π β β0 β¦ (((i
Β· π΄)βπ) / (!βπ)))βπ) β β) |
27 | 26 | imcld 10947 |
. . . . . . 7
β’ (π΄ β (0(,]1) β
(ββΞ£π
β (β€β₯β4)((π β β0 β¦ (((i
Β· π΄)βπ) / (!βπ)))βπ)) β β) |
28 | 27 | recnd 7985 |
. . . . . 6
β’ (π΄ β (0(,]1) β
(ββΞ£π
β (β€β₯β4)((π β β0 β¦ (((i
Β· π΄)βπ) / (!βπ)))βπ)) β β) |
29 | 11, 19, 28 | subaddd 8285 |
. . . . 5
β’ (π΄ β (0(,]1) β
(((sinβπ΄) β
(π΄ β ((π΄β3) / 6))) =
(ββΞ£π
β (β€β₯β4)((π β β0 β¦ (((i
Β· π΄)βπ) / (!βπ)))βπ)) β ((π΄ β ((π΄β3) / 6)) + (ββΞ£π β
(β€β₯β4)((π β β0 β¦ (((i
Β· π΄)βπ) / (!βπ)))βπ))) = (sinβπ΄))) |
30 | 9, 29 | mpbird 167 |
. . . 4
β’ (π΄ β (0(,]1) β
((sinβπ΄) β
(π΄ β ((π΄β3) / 6))) =
(ββΞ£π
β (β€β₯β4)((π β β0 β¦ (((i
Β· π΄)βπ) / (!βπ)))βπ))) |
31 | 30 | fveq2d 5519 |
. . 3
β’ (π΄ β (0(,]1) β
(absβ((sinβπ΄)
β (π΄ β ((π΄β3) / 6)))) =
(absβ(ββΞ£π β
(β€β₯β4)((π β β0 β¦ (((i
Β· π΄)βπ) / (!βπ)))βπ)))) |
32 | 28 | abscld 11189 |
. . . 4
β’ (π΄ β (0(,]1) β
(absβ(ββΞ£π β
(β€β₯β4)((π β β0 β¦ (((i
Β· π΄)βπ) / (!βπ)))βπ))) β β) |
33 | 26 | abscld 11189 |
. . . 4
β’ (π΄ β (0(,]1) β
(absβΞ£π β
(β€β₯β4)((π β β0 β¦ (((i
Β· π΄)βπ) / (!βπ)))βπ)) β β) |
34 | | absimle 11092 |
. . . . 5
β’
(Ξ£π β
(β€β₯β4)((π β β0 β¦ (((i
Β· π΄)βπ) / (!βπ)))βπ) β β β
(absβ(ββΞ£π β
(β€β₯β4)((π β β0 β¦ (((i
Β· π΄)βπ) / (!βπ)))βπ))) β€ (absβΞ£π β
(β€β₯β4)((π β β0 β¦ (((i
Β· π΄)βπ) / (!βπ)))βπ))) |
35 | 26, 34 | syl 14 |
. . . 4
β’ (π΄ β (0(,]1) β
(absβ(ββΞ£π β
(β€β₯β4)((π β β0 β¦ (((i
Β· π΄)βπ) / (!βπ)))βπ))) β€ (absβΞ£π β
(β€β₯β4)((π β β0 β¦ (((i
Β· π΄)βπ) / (!βπ)))βπ))) |
36 | | reexpcl 10536 |
. . . . . . 7
β’ ((π΄ β β β§ 4 β
β0) β (π΄β4) β β) |
37 | 5, 24, 36 | sylancl 413 |
. . . . . 6
β’ (π΄ β (0(,]1) β (π΄β4) β
β) |
38 | | nndivre 8954 |
. . . . . 6
β’ (((π΄β4) β β β§ 6
β β) β ((π΄β4) / 6) β
β) |
39 | 37, 15, 38 | sylancl 413 |
. . . . 5
β’ (π΄ β (0(,]1) β ((π΄β4) / 6) β
β) |
40 | 6 | ef01bndlem 11763 |
. . . . 5
β’ (π΄ β (0(,]1) β
(absβΞ£π β
(β€β₯β4)((π β β0 β¦ (((i
Β· π΄)βπ) / (!βπ)))βπ)) < ((π΄β4) / 6)) |
41 | 12 | a1i 9 |
. . . . . . 7
β’ (π΄ β (0(,]1) β 3 β
β0) |
42 | | 4z 9282 |
. . . . . . . . 9
β’ 4 β
β€ |
43 | | 3re 8992 |
. . . . . . . . . 10
β’ 3 β
β |
44 | | 4re 8995 |
. . . . . . . . . 10
β’ 4 β
β |
45 | | 3lt4 9090 |
. . . . . . . . . 10
β’ 3 <
4 |
46 | 43, 44, 45 | ltleii 8059 |
. . . . . . . . 9
β’ 3 β€
4 |
47 | | 3z 9281 |
. . . . . . . . . 10
β’ 3 β
β€ |
48 | 47 | eluz1i 9534 |
. . . . . . . . 9
β’ (4 β
(β€β₯β3) β (4 β β€ β§ 3 β€
4)) |
49 | 42, 46, 48 | mpbir2an 942 |
. . . . . . . 8
β’ 4 β
(β€β₯β3) |
50 | 49 | a1i 9 |
. . . . . . 7
β’ (π΄ β (0(,]1) β 4 β
(β€β₯β3)) |
51 | 4 | simp2bi 1013 |
. . . . . . . 8
β’ (π΄ β (0(,]1) β 0 <
π΄) |
52 | | 0re 7956 |
. . . . . . . . 9
β’ 0 β
β |
53 | | ltle 8044 |
. . . . . . . . 9
β’ ((0
β β β§ π΄
β β) β (0 < π΄ β 0 β€ π΄)) |
54 | 52, 5, 53 | sylancr 414 |
. . . . . . . 8
β’ (π΄ β (0(,]1) β (0 <
π΄ β 0 β€ π΄)) |
55 | 51, 54 | mpd 13 |
. . . . . . 7
β’ (π΄ β (0(,]1) β 0 β€
π΄) |
56 | 4 | simp3bi 1014 |
. . . . . . 7
β’ (π΄ β (0(,]1) β π΄ β€ 1) |
57 | 5, 41, 50, 55, 56 | leexp2rd 10683 |
. . . . . 6
β’ (π΄ β (0(,]1) β (π΄β4) β€ (π΄β3)) |
58 | | 6re 8999 |
. . . . . . . 8
β’ 6 β
β |
59 | 58 | a1i 9 |
. . . . . . 7
β’ (π΄ β (0(,]1) β 6 β
β) |
60 | | 6pos 9019 |
. . . . . . . 8
β’ 0 <
6 |
61 | 60 | a1i 9 |
. . . . . . 7
β’ (π΄ β (0(,]1) β 0 <
6) |
62 | | lediv1 8825 |
. . . . . . 7
β’ (((π΄β4) β β β§
(π΄β3) β β
β§ (6 β β β§ 0 < 6)) β ((π΄β4) β€ (π΄β3) β ((π΄β4) / 6) β€ ((π΄β3) / 6))) |
63 | 37, 14, 59, 61, 62 | syl112anc 1242 |
. . . . . 6
β’ (π΄ β (0(,]1) β ((π΄β4) β€ (π΄β3) β ((π΄β4) / 6) β€ ((π΄β3) / 6))) |
64 | 57, 63 | mpbid 147 |
. . . . 5
β’ (π΄ β (0(,]1) β ((π΄β4) / 6) β€ ((π΄β3) / 6)) |
65 | 33, 39, 17, 40, 64 | ltletrd 8379 |
. . . 4
β’ (π΄ β (0(,]1) β
(absβΞ£π β
(β€β₯β4)((π β β0 β¦ (((i
Β· π΄)βπ) / (!βπ)))βπ)) < ((π΄β3) / 6)) |
66 | 32, 33, 17, 35, 65 | lelttrd 8081 |
. . 3
β’ (π΄ β (0(,]1) β
(absβ(ββΞ£π β
(β€β₯β4)((π β β0 β¦ (((i
Β· π΄)βπ) / (!βπ)))βπ))) < ((π΄β3) / 6)) |
67 | 31, 66 | eqbrtrd 4025 |
. 2
β’ (π΄ β (0(,]1) β
(absβ((sinβπ΄)
β (π΄ β ((π΄β3) / 6)))) < ((π΄β3) / 6)) |
68 | 10, 18, 17 | absdifltd 11186 |
. . 3
β’ (π΄ β (0(,]1) β
((absβ((sinβπ΄)
β (π΄ β ((π΄β3) / 6)))) < ((π΄β3) / 6) β (((π΄ β ((π΄β3) / 6)) β ((π΄β3) / 6)) < (sinβπ΄) β§ (sinβπ΄) < ((π΄ β ((π΄β3) / 6)) + ((π΄β3) / 6))))) |
69 | 17 | recnd 7985 |
. . . . . . 7
β’ (π΄ β (0(,]1) β ((π΄β3) / 6) β
β) |
70 | 21, 69, 69 | subsub4d 8298 |
. . . . . 6
β’ (π΄ β (0(,]1) β ((π΄ β ((π΄β3) / 6)) β ((π΄β3) / 6)) = (π΄ β (((π΄β3) / 6) + ((π΄β3) / 6)))) |
71 | 14 | recnd 7985 |
. . . . . . . . . . 11
β’ (π΄ β (0(,]1) β (π΄β3) β
β) |
72 | | 3cn 8993 |
. . . . . . . . . . . . 13
β’ 3 β
β |
73 | | 3ap0 9014 |
. . . . . . . . . . . . 13
β’ 3 #
0 |
74 | 72, 73 | pm3.2i 272 |
. . . . . . . . . . . 12
β’ (3 β
β β§ 3 # 0) |
75 | | 2cn 8989 |
. . . . . . . . . . . . 13
β’ 2 β
β |
76 | | 2ap0 9011 |
. . . . . . . . . . . . 13
β’ 2 #
0 |
77 | 75, 76 | pm3.2i 272 |
. . . . . . . . . . . 12
β’ (2 β
β β§ 2 # 0) |
78 | | divdivap1 8679 |
. . . . . . . . . . . 12
β’ (((π΄β3) β β β§ (3
β β β§ 3 # 0) β§ (2 β β β§ 2 # 0)) β
(((π΄β3) / 3) / 2) =
((π΄β3) / (3 Β·
2))) |
79 | 74, 77, 78 | mp3an23 1329 |
. . . . . . . . . . 11
β’ ((π΄β3) β β β
(((π΄β3) / 3) / 2) =
((π΄β3) / (3 Β·
2))) |
80 | 71, 79 | syl 14 |
. . . . . . . . . 10
β’ (π΄ β (0(,]1) β (((π΄β3) / 3) / 2) = ((π΄β3) / (3 Β·
2))) |
81 | | 3t2e6 9074 |
. . . . . . . . . . 11
β’ (3
Β· 2) = 6 |
82 | 81 | oveq2i 5885 |
. . . . . . . . . 10
β’ ((π΄β3) / (3 Β· 2)) =
((π΄β3) /
6) |
83 | 80, 82 | eqtr2di 2227 |
. . . . . . . . 9
β’ (π΄ β (0(,]1) β ((π΄β3) / 6) = (((π΄β3) / 3) /
2)) |
84 | 83, 83 | oveq12d 5892 |
. . . . . . . 8
β’ (π΄ β (0(,]1) β (((π΄β3) / 6) + ((π΄β3) / 6)) = ((((π΄β3) / 3) / 2) + (((π΄β3) / 3) /
2))) |
85 | | 3nn 9080 |
. . . . . . . . . . 11
β’ 3 β
β |
86 | | nndivre 8954 |
. . . . . . . . . . 11
β’ (((π΄β3) β β β§ 3
β β) β ((π΄β3) / 3) β
β) |
87 | 14, 85, 86 | sylancl 413 |
. . . . . . . . . 10
β’ (π΄ β (0(,]1) β ((π΄β3) / 3) β
β) |
88 | 87 | recnd 7985 |
. . . . . . . . 9
β’ (π΄ β (0(,]1) β ((π΄β3) / 3) β
β) |
89 | 88 | 2halvesd 9163 |
. . . . . . . 8
β’ (π΄ β (0(,]1) β ((((π΄β3) / 3) / 2) + (((π΄β3) / 3) / 2)) = ((π΄β3) / 3)) |
90 | 84, 89 | eqtrd 2210 |
. . . . . . 7
β’ (π΄ β (0(,]1) β (((π΄β3) / 6) + ((π΄β3) / 6)) = ((π΄β3) / 3)) |
91 | 90 | oveq2d 5890 |
. . . . . 6
β’ (π΄ β (0(,]1) β (π΄ β (((π΄β3) / 6) + ((π΄β3) / 6))) = (π΄ β ((π΄β3) / 3))) |
92 | 70, 91 | eqtrd 2210 |
. . . . 5
β’ (π΄ β (0(,]1) β ((π΄ β ((π΄β3) / 6)) β ((π΄β3) / 6)) = (π΄ β ((π΄β3) / 3))) |
93 | 92 | breq1d 4013 |
. . . 4
β’ (π΄ β (0(,]1) β (((π΄ β ((π΄β3) / 6)) β ((π΄β3) / 6)) < (sinβπ΄) β (π΄ β ((π΄β3) / 3)) < (sinβπ΄))) |
94 | 21, 69 | npcand 8271 |
. . . . 5
β’ (π΄ β (0(,]1) β ((π΄ β ((π΄β3) / 6)) + ((π΄β3) / 6)) = π΄) |
95 | 94 | breq2d 4015 |
. . . 4
β’ (π΄ β (0(,]1) β
((sinβπ΄) < ((π΄ β ((π΄β3) / 6)) + ((π΄β3) / 6)) β (sinβπ΄) < π΄)) |
96 | 93, 95 | anbi12d 473 |
. . 3
β’ (π΄ β (0(,]1) β ((((π΄ β ((π΄β3) / 6)) β ((π΄β3) / 6)) < (sinβπ΄) β§ (sinβπ΄) < ((π΄ β ((π΄β3) / 6)) + ((π΄β3) / 6))) β ((π΄ β ((π΄β3) / 3)) < (sinβπ΄) β§ (sinβπ΄) < π΄))) |
97 | 68, 96 | bitrd 188 |
. 2
β’ (π΄ β (0(,]1) β
((absβ((sinβπ΄)
β (π΄ β ((π΄β3) / 6)))) < ((π΄β3) / 6) β ((π΄ β ((π΄β3) / 3)) < (sinβπ΄) β§ (sinβπ΄) < π΄))) |
98 | 67, 97 | mpbid 147 |
1
β’ (π΄ β (0(,]1) β ((π΄ β ((π΄β3) / 3)) < (sinβπ΄) β§ (sinβπ΄) < π΄)) |