Step | Hyp | Ref
| Expression |
1 | | 4nn 12292 |
. . . . 5
β’ 4 β
β |
2 | | 5nn 12295 |
. . . . . . 7
β’ 5 β
β |
3 | | bpos.1 |
. . . . . . 7
β’ (π β π β
(β€β₯β5)) |
4 | | eluznn 12899 |
. . . . . . 7
β’ ((5
β β β§ π
β (β€β₯β5)) β π β β) |
5 | 2, 3, 4 | sylancr 588 |
. . . . . 6
β’ (π β π β β) |
6 | 5 | nnnn0d 12529 |
. . . . 5
β’ (π β π β
β0) |
7 | | nnexpcl 14037 |
. . . . 5
β’ ((4
β β β§ π
β β0) β (4βπ) β β) |
8 | 1, 6, 7 | sylancr 588 |
. . . 4
β’ (π β (4βπ) β β) |
9 | 8 | nnred 12224 |
. . 3
β’ (π β (4βπ) β β) |
10 | 9, 5 | nndivred 12263 |
. 2
β’ (π β ((4βπ) / π) β β) |
11 | | fzctr 13610 |
. . . . 5
β’ (π β β0
β π β (0...(2
Β· π))) |
12 | 6, 11 | syl 17 |
. . . 4
β’ (π β π β (0...(2 Β· π))) |
13 | | bccl2 14280 |
. . . 4
β’ (π β (0...(2 Β· π)) β ((2 Β· π)Cπ) β β) |
14 | 12, 13 | syl 17 |
. . 3
β’ (π β ((2 Β· π)Cπ) β β) |
15 | 14 | nnred 12224 |
. 2
β’ (π β ((2 Β· π)Cπ) β β) |
16 | | 2nn 12282 |
. . . . . . 7
β’ 2 β
β |
17 | | nnmulcl 12233 |
. . . . . . 7
β’ ((2
β β β§ π
β β) β (2 Β· π) β β) |
18 | 16, 5, 17 | sylancr 588 |
. . . . . 6
β’ (π β (2 Β· π) β
β) |
19 | 18 | nnrpd 13011 |
. . . . 5
β’ (π β (2 Β· π) β
β+) |
20 | 18 | nnred 12224 |
. . . . . . . 8
β’ (π β (2 Β· π) β
β) |
21 | 19 | rpge0d 13017 |
. . . . . . . 8
β’ (π β 0 β€ (2 Β· π)) |
22 | 20, 21 | resqrtcld 15361 |
. . . . . . 7
β’ (π β (ββ(2 Β·
π)) β
β) |
23 | | 3nn 12288 |
. . . . . . 7
β’ 3 β
β |
24 | | nndivre 12250 |
. . . . . . 7
β’
(((ββ(2 Β· π)) β β β§ 3 β β)
β ((ββ(2 Β· π)) / 3) β β) |
25 | 22, 23, 24 | sylancl 587 |
. . . . . 6
β’ (π β ((ββ(2
Β· π)) / 3) β
β) |
26 | | 2re 12283 |
. . . . . 6
β’ 2 β
β |
27 | | readdcl 11190 |
. . . . . 6
β’
((((ββ(2 Β· π)) / 3) β β β§ 2 β
β) β (((ββ(2 Β· π)) / 3) + 2) β
β) |
28 | 25, 26, 27 | sylancl 587 |
. . . . 5
β’ (π β (((ββ(2
Β· π)) / 3) + 2)
β β) |
29 | 19, 28 | rpcxpcld 26232 |
. . . 4
β’ (π β ((2 Β· π)βπ(((ββ(2
Β· π)) / 3) + 2))
β β+) |
30 | 29 | rpred 13013 |
. . 3
β’ (π β ((2 Β· π)βπ(((ββ(2
Β· π)) / 3) + 2))
β β) |
31 | | 2rp 12976 |
. . . . 5
β’ 2 β
β+ |
32 | | nnmulcl 12233 |
. . . . . . . . 9
β’ ((4
β β β§ π
β β) β (4 Β· π) β β) |
33 | 1, 5, 32 | sylancr 588 |
. . . . . . . 8
β’ (π β (4 Β· π) β
β) |
34 | 33 | nnred 12224 |
. . . . . . 7
β’ (π β (4 Β· π) β
β) |
35 | | nndivre 12250 |
. . . . . . 7
β’ (((4
Β· π) β β
β§ 3 β β) β ((4 Β· π) / 3) β β) |
36 | 34, 23, 35 | sylancl 587 |
. . . . . 6
β’ (π β ((4 Β· π) / 3) β
β) |
37 | | 5re 12296 |
. . . . . 6
β’ 5 β
β |
38 | | resubcl 11521 |
. . . . . 6
β’ ((((4
Β· π) / 3) β
β β§ 5 β β) β (((4 Β· π) / 3) β 5) β
β) |
39 | 36, 37, 38 | sylancl 587 |
. . . . 5
β’ (π β (((4 Β· π) / 3) β 5) β
β) |
40 | | rpcxpcl 26176 |
. . . . 5
β’ ((2
β β+ β§ (((4 Β· π) / 3) β 5) β β) β
(2βπ(((4 Β· π) / 3) β 5)) β
β+) |
41 | 31, 39, 40 | sylancr 588 |
. . . 4
β’ (π β
(2βπ(((4 Β· π) / 3) β 5)) β
β+) |
42 | 41 | rpred 13013 |
. . 3
β’ (π β
(2βπ(((4 Β· π) / 3) β 5)) β
β) |
43 | 30, 42 | remulcld 11241 |
. 2
β’ (π β (((2 Β· π)βπ(((ββ(2
Β· π)) / 3) + 2))
Β· (2βπ(((4 Β· π) / 3) β 5))) β
β) |
44 | | df-5 12275 |
. . . . 5
β’ 5 = (4 +
1) |
45 | | 4z 12593 |
. . . . . 6
β’ 4 β
β€ |
46 | | uzid 12834 |
. . . . . 6
β’ (4 β
β€ β 4 β (β€β₯β4)) |
47 | | peano2uz 12882 |
. . . . . 6
β’ (4 β
(β€β₯β4) β (4 + 1) β
(β€β₯β4)) |
48 | 45, 46, 47 | mp2b 10 |
. . . . 5
β’ (4 + 1)
β (β€β₯β4) |
49 | 44, 48 | eqeltri 2830 |
. . . 4
β’ 5 β
(β€β₯β4) |
50 | | eqid 2733 |
. . . . 5
β’
(β€β₯β4) =
(β€β₯β4) |
51 | 50 | uztrn2 12838 |
. . . 4
β’ ((5
β (β€β₯β4) β§ π β (β€β₯β5))
β π β
(β€β₯β4)) |
52 | 49, 3, 51 | sylancr 588 |
. . 3
β’ (π β π β
(β€β₯β4)) |
53 | | bclbnd 26773 |
. . 3
β’ (π β
(β€β₯β4) β ((4βπ) / π) < ((2 Β· π)Cπ)) |
54 | 52, 53 | syl 17 |
. 2
β’ (π β ((4βπ) / π) < ((2 Β· π)Cπ)) |
55 | | bpos.3 |
. . . . . . . 8
β’ πΉ = (π β β β¦ if(π β β, (πβ(π pCnt ((2 Β· π)Cπ))), 1)) |
56 | | id 22 |
. . . . . . . . . 10
β’ (π β β β π β
β) |
57 | | pccl 16779 |
. . . . . . . . . 10
β’ ((π β β β§ ((2
Β· π)Cπ) β β) β (π pCnt ((2 Β· π)Cπ)) β
β0) |
58 | 56, 14, 57 | syl2anr 598 |
. . . . . . . . 9
β’ ((π β§ π β β) β (π pCnt ((2 Β· π)Cπ)) β
β0) |
59 | 58 | ralrimiva 3147 |
. . . . . . . 8
β’ (π β βπ β β (π pCnt ((2 Β· π)Cπ)) β
β0) |
60 | 55, 59 | pcmptcl 16821 |
. . . . . . 7
β’ (π β (πΉ:ββΆβ β§ seq1( Β·
, πΉ):ββΆβ)) |
61 | 60 | simprd 497 |
. . . . . 6
β’ (π β seq1( Β· , πΉ):ββΆβ) |
62 | | bpos.2 |
. . . . . . . . 9
β’ (π β Β¬ βπ β β (π < π β§ π β€ (2 Β· π))) |
63 | | bpos.4 |
. . . . . . . . 9
β’ πΎ = (ββ((2 Β·
π) / 3)) |
64 | | bpos.5 |
. . . . . . . . 9
β’ π =
(ββ(ββ(2 Β· π))) |
65 | 3, 62, 55, 63, 64 | bposlem4 26780 |
. . . . . . . 8
β’ (π β π β (3...πΎ)) |
66 | | elfzuz 13494 |
. . . . . . . 8
β’ (π β (3...πΎ) β π β
(β€β₯β3)) |
67 | 65, 66 | syl 17 |
. . . . . . 7
β’ (π β π β
(β€β₯β3)) |
68 | | eluznn 12899 |
. . . . . . 7
β’ ((3
β β β§ π
β (β€β₯β3)) β π β β) |
69 | 23, 67, 68 | sylancr 588 |
. . . . . 6
β’ (π β π β β) |
70 | 61, 69 | ffvelcdmd 7085 |
. . . . 5
β’ (π β (seq1( Β· , πΉ)βπ) β β) |
71 | 70 | nnred 12224 |
. . . 4
β’ (π β (seq1( Β· , πΉ)βπ) β β) |
72 | | 2z 12591 |
. . . . . . . . 9
β’ 2 β
β€ |
73 | | nndivre 12250 |
. . . . . . . . . . . 12
β’ (((2
Β· π) β β
β§ 3 β β) β ((2 Β· π) / 3) β β) |
74 | 20, 23, 73 | sylancl 587 |
. . . . . . . . . . 11
β’ (π β ((2 Β· π) / 3) β
β) |
75 | 74 | flcld 13760 |
. . . . . . . . . 10
β’ (π β (ββ((2
Β· π) / 3)) β
β€) |
76 | 63, 75 | eqeltrid 2838 |
. . . . . . . . 9
β’ (π β πΎ β β€) |
77 | | zmulcl 12608 |
. . . . . . . . 9
β’ ((2
β β€ β§ πΎ
β β€) β (2 Β· πΎ) β β€) |
78 | 72, 76, 77 | sylancr 588 |
. . . . . . . 8
β’ (π β (2 Β· πΎ) β
β€) |
79 | 2 | nnzi 12583 |
. . . . . . . 8
β’ 5 β
β€ |
80 | | zsubcl 12601 |
. . . . . . . 8
β’ (((2
Β· πΎ) β β€
β§ 5 β β€) β ((2 Β· πΎ) β 5) β
β€) |
81 | 78, 79, 80 | sylancl 587 |
. . . . . . 7
β’ (π β ((2 Β· πΎ) β 5) β
β€) |
82 | 81 | zred 12663 |
. . . . . 6
β’ (π β ((2 Β· πΎ) β 5) β
β) |
83 | | rpcxpcl 26176 |
. . . . . 6
β’ ((2
β β+ β§ ((2 Β· πΎ) β 5) β β) β
(2βπ((2 Β· πΎ) β 5)) β
β+) |
84 | 31, 82, 83 | sylancr 588 |
. . . . 5
β’ (π β
(2βπ((2 Β· πΎ) β 5)) β
β+) |
85 | 84 | rpred 13013 |
. . . 4
β’ (π β
(2βπ((2 Β· πΎ) β 5)) β
β) |
86 | 71, 85 | remulcld 11241 |
. . 3
β’ (π β ((seq1( Β· , πΉ)βπ) Β· (2βπ((2
Β· πΎ) β 5)))
β β) |
87 | 3, 62, 55, 63 | bposlem3 26779 |
. . . 4
β’ (π β (seq1( Β· , πΉ)βπΎ) = ((2 Β· π)Cπ)) |
88 | | elfzuz3 13495 |
. . . . . . . . . 10
β’ (π β (3...πΎ) β πΎ β (β€β₯βπ)) |
89 | 65, 88 | syl 17 |
. . . . . . . . 9
β’ (π β πΎ β (β€β₯βπ)) |
90 | 55, 59, 69, 89 | pcmptdvds 16824 |
. . . . . . . 8
β’ (π β (seq1( Β· , πΉ)βπ) β₯ (seq1( Β· , πΉ)βπΎ)) |
91 | 70 | nnzd 12582 |
. . . . . . . . 9
β’ (π β (seq1( Β· , πΉ)βπ) β β€) |
92 | 70 | nnne0d 12259 |
. . . . . . . . 9
β’ (π β (seq1( Β· , πΉ)βπ) β 0) |
93 | | uztrn 12837 |
. . . . . . . . . . . . 13
β’ ((πΎ β
(β€β₯βπ) β§ π β (β€β₯β3))
β πΎ β
(β€β₯β3)) |
94 | 89, 67, 93 | syl2anc 585 |
. . . . . . . . . . . 12
β’ (π β πΎ β
(β€β₯β3)) |
95 | | eluznn 12899 |
. . . . . . . . . . . 12
β’ ((3
β β β§ πΎ
β (β€β₯β3)) β πΎ β β) |
96 | 23, 94, 95 | sylancr 588 |
. . . . . . . . . . 11
β’ (π β πΎ β β) |
97 | 61, 96 | ffvelcdmd 7085 |
. . . . . . . . . 10
β’ (π β (seq1( Β· , πΉ)βπΎ) β β) |
98 | 97 | nnzd 12582 |
. . . . . . . . 9
β’ (π β (seq1( Β· , πΉ)βπΎ) β β€) |
99 | | dvdsval2 16197 |
. . . . . . . . 9
β’ (((seq1(
Β· , πΉ)βπ) β β€ β§ (seq1(
Β· , πΉ)βπ) β 0 β§ (seq1( Β· ,
πΉ)βπΎ) β β€) β ((seq1( Β· ,
πΉ)βπ) β₯ (seq1( Β· , πΉ)βπΎ) β ((seq1( Β· , πΉ)βπΎ) / (seq1( Β· , πΉ)βπ)) β β€)) |
100 | 91, 92, 98, 99 | syl3anc 1372 |
. . . . . . . 8
β’ (π β ((seq1( Β· , πΉ)βπ) β₯ (seq1( Β· , πΉ)βπΎ) β ((seq1( Β· , πΉ)βπΎ) / (seq1( Β· , πΉ)βπ)) β β€)) |
101 | 90, 100 | mpbid 231 |
. . . . . . 7
β’ (π β ((seq1( Β· , πΉ)βπΎ) / (seq1( Β· , πΉ)βπ)) β β€) |
102 | 101 | zred 12663 |
. . . . . 6
β’ (π β ((seq1( Β· , πΉ)βπΎ) / (seq1( Β· , πΉ)βπ)) β β) |
103 | 69 | nnred 12224 |
. . . . . . . . 9
β’ (π β π β β) |
104 | 76 | zred 12663 |
. . . . . . . . 9
β’ (π β πΎ β β) |
105 | | eluzle 12832 |
. . . . . . . . . 10
β’ (πΎ β
(β€β₯βπ) β π β€ πΎ) |
106 | 89, 105 | syl 17 |
. . . . . . . . 9
β’ (π β π β€ πΎ) |
107 | | efchtdvds 26653 |
. . . . . . . . 9
β’ ((π β β β§ πΎ β β β§ π β€ πΎ) β (expβ(ΞΈβπ)) β₯
(expβ(ΞΈβπΎ))) |
108 | 103, 104,
106, 107 | syl3anc 1372 |
. . . . . . . 8
β’ (π β
(expβ(ΞΈβπ)) β₯ (expβ(ΞΈβπΎ))) |
109 | | efchtcl 26605 |
. . . . . . . . . . 11
β’ (π β β β
(expβ(ΞΈβπ)) β β) |
110 | 103, 109 | syl 17 |
. . . . . . . . . 10
β’ (π β
(expβ(ΞΈβπ)) β β) |
111 | 110 | nnzd 12582 |
. . . . . . . . 9
β’ (π β
(expβ(ΞΈβπ)) β β€) |
112 | 110 | nnne0d 12259 |
. . . . . . . . 9
β’ (π β
(expβ(ΞΈβπ)) β 0) |
113 | | efchtcl 26605 |
. . . . . . . . . . 11
β’ (πΎ β β β
(expβ(ΞΈβπΎ)) β β) |
114 | 104, 113 | syl 17 |
. . . . . . . . . 10
β’ (π β
(expβ(ΞΈβπΎ)) β β) |
115 | 114 | nnzd 12582 |
. . . . . . . . 9
β’ (π β
(expβ(ΞΈβπΎ)) β β€) |
116 | | dvdsval2 16197 |
. . . . . . . . 9
β’
(((expβ(ΞΈβπ)) β β€ β§
(expβ(ΞΈβπ)) β 0 β§
(expβ(ΞΈβπΎ)) β β€) β
((expβ(ΞΈβπ)) β₯ (expβ(ΞΈβπΎ)) β
((expβ(ΞΈβπΎ)) / (expβ(ΞΈβπ))) β
β€)) |
117 | 111, 112,
115, 116 | syl3anc 1372 |
. . . . . . . 8
β’ (π β
((expβ(ΞΈβπ)) β₯ (expβ(ΞΈβπΎ)) β
((expβ(ΞΈβπΎ)) / (expβ(ΞΈβπ))) β
β€)) |
118 | 108, 117 | mpbid 231 |
. . . . . . 7
β’ (π β
((expβ(ΞΈβπΎ)) / (expβ(ΞΈβπ))) β
β€) |
119 | 118 | zred 12663 |
. . . . . 6
β’ (π β
((expβ(ΞΈβπΎ)) / (expβ(ΞΈβπ))) β
β) |
120 | | prmz 16609 |
. . . . . . . . . . . . . . . . . 18
β’ (π β β β π β
β€) |
121 | | fllt 13768 |
. . . . . . . . . . . . . . . . . 18
β’
(((ββ(2 Β· π)) β β β§ π β β€) β ((ββ(2
Β· π)) < π β
(ββ(ββ(2 Β· π))) < π)) |
122 | 22, 120, 121 | syl2an 597 |
. . . . . . . . . . . . . . . . 17
β’ ((π β§ π β β) β ((ββ(2
Β· π)) < π β
(ββ(ββ(2 Β· π))) < π)) |
123 | 64 | breq1i 5155 |
. . . . . . . . . . . . . . . . 17
β’ (π < π β (ββ(ββ(2
Β· π))) < π) |
124 | 122, 123 | bitr4di 289 |
. . . . . . . . . . . . . . . 16
β’ ((π β§ π β β) β ((ββ(2
Β· π)) < π β π < π)) |
125 | 120 | zred 12663 |
. . . . . . . . . . . . . . . . 17
β’ (π β β β π β
β) |
126 | | ltnle 11290 |
. . . . . . . . . . . . . . . . 17
β’ ((π β β β§ π β β) β (π < π β Β¬ π β€ π)) |
127 | 103, 125,
126 | syl2an 597 |
. . . . . . . . . . . . . . . 16
β’ ((π β§ π β β) β (π < π β Β¬ π β€ π)) |
128 | 124, 127 | bitrd 279 |
. . . . . . . . . . . . . . 15
β’ ((π β§ π β β) β ((ββ(2
Β· π)) < π β Β¬ π β€ π)) |
129 | | bposlem1 26777 |
. . . . . . . . . . . . . . . . . . . 20
β’ ((π β β β§ π β β) β (πβ(π pCnt ((2 Β· π)Cπ))) β€ (2 Β· π)) |
130 | 5, 129 | sylan 581 |
. . . . . . . . . . . . . . . . . . 19
β’ ((π β§ π β β) β (πβ(π pCnt ((2 Β· π)Cπ))) β€ (2 Β· π)) |
131 | 125 | adantl 483 |
. . . . . . . . . . . . . . . . . . . . 21
β’ ((π β§ π β β) β π β β) |
132 | | id 22 |
. . . . . . . . . . . . . . . . . . . . . 22
β’ (π β β β π β
β) |
133 | | pccl 16779 |
. . . . . . . . . . . . . . . . . . . . . 22
β’ ((π β β β§ ((2
Β· π)Cπ) β β) β (π pCnt ((2 Β· π)Cπ)) β
β0) |
134 | 132, 14, 133 | syl2anr 598 |
. . . . . . . . . . . . . . . . . . . . 21
β’ ((π β§ π β β) β (π pCnt ((2 Β· π)Cπ)) β
β0) |
135 | 131, 134 | reexpcld 14125 |
. . . . . . . . . . . . . . . . . . . 20
β’ ((π β§ π β β) β (πβ(π pCnt ((2 Β· π)Cπ))) β β) |
136 | 20 | adantr 482 |
. . . . . . . . . . . . . . . . . . . 20
β’ ((π β§ π β β) β (2 Β· π) β
β) |
137 | 131 | resqcld 14087 |
. . . . . . . . . . . . . . . . . . . 20
β’ ((π β§ π β β) β (πβ2) β β) |
138 | | lelttr 11301 |
. . . . . . . . . . . . . . . . . . . 20
β’ (((πβ(π pCnt ((2 Β· π)Cπ))) β β β§ (2 Β· π) β β β§ (πβ2) β β) β
(((πβ(π pCnt ((2 Β· π)Cπ))) β€ (2 Β· π) β§ (2 Β· π) < (πβ2)) β (πβ(π pCnt ((2 Β· π)Cπ))) < (πβ2))) |
139 | 135, 136,
137, 138 | syl3anc 1372 |
. . . . . . . . . . . . . . . . . . 19
β’ ((π β§ π β β) β (((πβ(π pCnt ((2 Β· π)Cπ))) β€ (2 Β· π) β§ (2 Β· π) < (πβ2)) β (πβ(π pCnt ((2 Β· π)Cπ))) < (πβ2))) |
140 | 130, 139 | mpand 694 |
. . . . . . . . . . . . . . . . . 18
β’ ((π β§ π β β) β ((2 Β· π) < (πβ2) β (πβ(π pCnt ((2 Β· π)Cπ))) < (πβ2))) |
141 | | resqrtth 15199 |
. . . . . . . . . . . . . . . . . . . . 21
β’ (((2
Β· π) β β
β§ 0 β€ (2 Β· π)) β ((ββ(2 Β· π))β2) = (2 Β· π)) |
142 | 20, 21, 141 | syl2anc 585 |
. . . . . . . . . . . . . . . . . . . 20
β’ (π β ((ββ(2
Β· π))β2) = (2
Β· π)) |
143 | 142 | breq1d 5158 |
. . . . . . . . . . . . . . . . . . 19
β’ (π β (((ββ(2
Β· π))β2) <
(πβ2) β (2
Β· π) < (πβ2))) |
144 | 143 | adantr 482 |
. . . . . . . . . . . . . . . . . 18
β’ ((π β§ π β β) β (((ββ(2
Β· π))β2) <
(πβ2) β (2
Β· π) < (πβ2))) |
145 | 134 | nn0zd 12581 |
. . . . . . . . . . . . . . . . . . 19
β’ ((π β§ π β β) β (π pCnt ((2 Β· π)Cπ)) β β€) |
146 | 72 | a1i 11 |
. . . . . . . . . . . . . . . . . . 19
β’ ((π β§ π β β) β 2 β
β€) |
147 | | prmgt1 16631 |
. . . . . . . . . . . . . . . . . . . 20
β’ (π β β β 1 <
π) |
148 | 147 | adantl 483 |
. . . . . . . . . . . . . . . . . . 19
β’ ((π β§ π β β) β 1 < π) |
149 | 131, 145,
146, 148 | ltexp2d 14211 |
. . . . . . . . . . . . . . . . . 18
β’ ((π β§ π β β) β ((π pCnt ((2 Β· π)Cπ)) < 2 β (πβ(π pCnt ((2 Β· π)Cπ))) < (πβ2))) |
150 | 140, 144,
149 | 3imtr4d 294 |
. . . . . . . . . . . . . . . . 17
β’ ((π β§ π β β) β (((ββ(2
Β· π))β2) <
(πβ2) β (π pCnt ((2 Β· π)Cπ)) < 2)) |
151 | | df-2 12272 |
. . . . . . . . . . . . . . . . . 18
β’ 2 = (1 +
1) |
152 | 151 | breq2i 5156 |
. . . . . . . . . . . . . . . . 17
β’ ((π pCnt ((2 Β· π)Cπ)) < 2 β (π pCnt ((2 Β· π)Cπ)) < (1 + 1)) |
153 | 150, 152 | imbitrdi 250 |
. . . . . . . . . . . . . . . 16
β’ ((π β§ π β β) β (((ββ(2
Β· π))β2) <
(πβ2) β (π pCnt ((2 Β· π)Cπ)) < (1 + 1))) |
154 | 22 | adantr 482 |
. . . . . . . . . . . . . . . . 17
β’ ((π β§ π β β) β (ββ(2
Β· π)) β
β) |
155 | 20, 21 | sqrtge0d 15364 |
. . . . . . . . . . . . . . . . . 18
β’ (π β 0 β€ (ββ(2
Β· π))) |
156 | 155 | adantr 482 |
. . . . . . . . . . . . . . . . 17
β’ ((π β§ π β β) β 0 β€
(ββ(2 Β· π))) |
157 | | prmnn 16608 |
. . . . . . . . . . . . . . . . . . . 20
β’ (π β β β π β
β) |
158 | 157 | nnrpd 13011 |
. . . . . . . . . . . . . . . . . . 19
β’ (π β β β π β
β+) |
159 | 158 | rpge0d 13017 |
. . . . . . . . . . . . . . . . . 18
β’ (π β β β 0 β€
π) |
160 | 159 | adantl 483 |
. . . . . . . . . . . . . . . . 17
β’ ((π β§ π β β) β 0 β€ π) |
161 | 154, 131,
156, 160 | lt2sqd 14216 |
. . . . . . . . . . . . . . . 16
β’ ((π β§ π β β) β ((ββ(2
Β· π)) < π β ((ββ(2
Β· π))β2) <
(πβ2))) |
162 | | 1z 12589 |
. . . . . . . . . . . . . . . . 17
β’ 1 β
β€ |
163 | | zleltp1 12610 |
. . . . . . . . . . . . . . . . 17
β’ (((π pCnt ((2 Β· π)Cπ)) β β€ β§ 1 β β€)
β ((π pCnt ((2
Β· π)Cπ)) β€ 1 β (π pCnt ((2 Β· π)Cπ)) < (1 + 1))) |
164 | 145, 162,
163 | sylancl 587 |
. . . . . . . . . . . . . . . 16
β’ ((π β§ π β β) β ((π pCnt ((2 Β· π)Cπ)) β€ 1 β (π pCnt ((2 Β· π)Cπ)) < (1 + 1))) |
165 | 153, 161,
164 | 3imtr4d 294 |
. . . . . . . . . . . . . . 15
β’ ((π β§ π β β) β ((ββ(2
Β· π)) < π β (π pCnt ((2 Β· π)Cπ)) β€ 1)) |
166 | 128, 165 | sylbird 260 |
. . . . . . . . . . . . . 14
β’ ((π β§ π β β) β (Β¬ π β€ π β (π pCnt ((2 Β· π)Cπ)) β€ 1)) |
167 | 166 | imp 408 |
. . . . . . . . . . . . 13
β’ (((π β§ π β β) β§ Β¬ π β€ π) β (π pCnt ((2 Β· π)Cπ)) β€ 1) |
168 | 167 | adantrl 715 |
. . . . . . . . . . . 12
β’ (((π β§ π β β) β§ (π β€ πΎ β§ Β¬ π β€ π)) β (π pCnt ((2 Β· π)Cπ)) β€ 1) |
169 | | iftrue 4534 |
. . . . . . . . . . . . 13
β’ ((π β€ πΎ β§ Β¬ π β€ π) β if((π β€ πΎ β§ Β¬ π β€ π), (π pCnt ((2 Β· π)Cπ)), 0) = (π pCnt ((2 Β· π)Cπ))) |
170 | 169 | adantl 483 |
. . . . . . . . . . . 12
β’ (((π β§ π β β) β§ (π β€ πΎ β§ Β¬ π β€ π)) β if((π β€ πΎ β§ Β¬ π β€ π), (π pCnt ((2 Β· π)Cπ)), 0) = (π pCnt ((2 Β· π)Cπ))) |
171 | | iftrue 4534 |
. . . . . . . . . . . . 13
β’ ((π β€ πΎ β§ Β¬ π β€ π) β if((π β€ πΎ β§ Β¬ π β€ π), 1, 0) = 1) |
172 | 171 | adantl 483 |
. . . . . . . . . . . 12
β’ (((π β§ π β β) β§ (π β€ πΎ β§ Β¬ π β€ π)) β if((π β€ πΎ β§ Β¬ π β€ π), 1, 0) = 1) |
173 | 168, 170,
172 | 3brtr4d 5180 |
. . . . . . . . . . 11
β’ (((π β§ π β β) β§ (π β€ πΎ β§ Β¬ π β€ π)) β if((π β€ πΎ β§ Β¬ π β€ π), (π pCnt ((2 Β· π)Cπ)), 0) β€ if((π β€ πΎ β§ Β¬ π β€ π), 1, 0)) |
174 | | 0le0 12310 |
. . . . . . . . . . . . 13
β’ 0 β€
0 |
175 | | iffalse 4537 |
. . . . . . . . . . . . . 14
β’ (Β¬
(π β€ πΎ β§ Β¬ π β€ π) β if((π β€ πΎ β§ Β¬ π β€ π), (π pCnt ((2 Β· π)Cπ)), 0) = 0) |
176 | | iffalse 4537 |
. . . . . . . . . . . . . 14
β’ (Β¬
(π β€ πΎ β§ Β¬ π β€ π) β if((π β€ πΎ β§ Β¬ π β€ π), 1, 0) = 0) |
177 | 175, 176 | breq12d 5161 |
. . . . . . . . . . . . 13
β’ (Β¬
(π β€ πΎ β§ Β¬ π β€ π) β (if((π β€ πΎ β§ Β¬ π β€ π), (π pCnt ((2 Β· π)Cπ)), 0) β€ if((π β€ πΎ β§ Β¬ π β€ π), 1, 0) β 0 β€ 0)) |
178 | 174, 177 | mpbiri 258 |
. . . . . . . . . . . 12
β’ (Β¬
(π β€ πΎ β§ Β¬ π β€ π) β if((π β€ πΎ β§ Β¬ π β€ π), (π pCnt ((2 Β· π)Cπ)), 0) β€ if((π β€ πΎ β§ Β¬ π β€ π), 1, 0)) |
179 | 178 | adantl 483 |
. . . . . . . . . . 11
β’ (((π β§ π β β) β§ Β¬ (π β€ πΎ β§ Β¬ π β€ π)) β if((π β€ πΎ β§ Β¬ π β€ π), (π pCnt ((2 Β· π)Cπ)), 0) β€ if((π β€ πΎ β§ Β¬ π β€ π), 1, 0)) |
180 | 173, 179 | pm2.61dan 812 |
. . . . . . . . . 10
β’ ((π β§ π β β) β if((π β€ πΎ β§ Β¬ π β€ π), (π pCnt ((2 Β· π)Cπ)), 0) β€ if((π β€ πΎ β§ Β¬ π β€ π), 1, 0)) |
181 | 59 | adantr 482 |
. . . . . . . . . . 11
β’ ((π β§ π β β) β βπ β β (π pCnt ((2 Β· π)Cπ)) β
β0) |
182 | 69 | adantr 482 |
. . . . . . . . . . 11
β’ ((π β§ π β β) β π β β) |
183 | | simpr 486 |
. . . . . . . . . . 11
β’ ((π β§ π β β) β π β β) |
184 | | oveq1 7413 |
. . . . . . . . . . 11
β’ (π = π β (π pCnt ((2 Β· π)Cπ)) = (π pCnt ((2 Β· π)Cπ))) |
185 | 89 | adantr 482 |
. . . . . . . . . . 11
β’ ((π β§ π β β) β πΎ β (β€β₯βπ)) |
186 | 55, 181, 182, 183, 184, 185 | pcmpt2 16823 |
. . . . . . . . . 10
β’ ((π β§ π β β) β (π pCnt ((seq1( Β· , πΉ)βπΎ) / (seq1( Β· , πΉ)βπ))) = if((π β€ πΎ β§ Β¬ π β€ π), (π pCnt ((2 Β· π)Cπ)), 0)) |
187 | | eqid 2733 |
. . . . . . . . . . . . . . . 16
β’ (π β β β¦ if(π β β, π, 1)) = (π β β β¦ if(π β β, π, 1)) |
188 | 187 | prmorcht 26672 |
. . . . . . . . . . . . . . 15
β’ (πΎ β β β
(expβ(ΞΈβπΎ)) = (seq1( Β· , (π β β β¦ if(π β β, π, 1)))βπΎ)) |
189 | 96, 188 | syl 17 |
. . . . . . . . . . . . . 14
β’ (π β
(expβ(ΞΈβπΎ)) = (seq1( Β· , (π β β β¦ if(π β β, π, 1)))βπΎ)) |
190 | 187 | prmorcht 26672 |
. . . . . . . . . . . . . . 15
β’ (π β β β
(expβ(ΞΈβπ)) = (seq1( Β· , (π β β β¦ if(π β β, π, 1)))βπ)) |
191 | 69, 190 | syl 17 |
. . . . . . . . . . . . . 14
β’ (π β
(expβ(ΞΈβπ)) = (seq1( Β· , (π β β β¦ if(π β β, π, 1)))βπ)) |
192 | 189, 191 | oveq12d 7424 |
. . . . . . . . . . . . 13
β’ (π β
((expβ(ΞΈβπΎ)) / (expβ(ΞΈβπ))) = ((seq1( Β· , (π β β β¦ if(π β β, π, 1)))βπΎ) / (seq1( Β· , (π β β β¦ if(π β β, π, 1)))βπ))) |
193 | 192 | adantr 482 |
. . . . . . . . . . . 12
β’ ((π β§ π β β) β
((expβ(ΞΈβπΎ)) / (expβ(ΞΈβπ))) = ((seq1( Β· , (π β β β¦ if(π β β, π, 1)))βπΎ) / (seq1( Β· , (π β β β¦ if(π β β, π, 1)))βπ))) |
194 | 193 | oveq2d 7422 |
. . . . . . . . . . 11
β’ ((π β§ π β β) β (π pCnt ((expβ(ΞΈβπΎ)) /
(expβ(ΞΈβπ)))) = (π pCnt ((seq1( Β· , (π β β β¦ if(π β β, π, 1)))βπΎ) / (seq1( Β· , (π β β β¦ if(π β β, π, 1)))βπ)))) |
195 | | nncn 12217 |
. . . . . . . . . . . . . . . 16
β’ (π β β β π β
β) |
196 | 195 | exp1d 14103 |
. . . . . . . . . . . . . . 15
β’ (π β β β (πβ1) = π) |
197 | 196 | ifeq1d 4547 |
. . . . . . . . . . . . . 14
β’ (π β β β if(π β β, (πβ1), 1) = if(π β β, π, 1)) |
198 | 197 | mpteq2ia 5251 |
. . . . . . . . . . . . 13
β’ (π β β β¦ if(π β β, (πβ1), 1)) = (π β β β¦ if(π β β, π, 1)) |
199 | 198 | eqcomi 2742 |
. . . . . . . . . . . 12
β’ (π β β β¦ if(π β β, π, 1)) = (π β β β¦ if(π β β, (πβ1), 1)) |
200 | | 1nn0 12485 |
. . . . . . . . . . . . . . 15
β’ 1 β
β0 |
201 | 200 | a1i 11 |
. . . . . . . . . . . . . 14
β’ ((π β§ π β β) β 1 β
β0) |
202 | 201 | ralrimiva 3147 |
. . . . . . . . . . . . 13
β’ (π β βπ β β 1 β
β0) |
203 | 202 | adantr 482 |
. . . . . . . . . . . 12
β’ ((π β§ π β β) β βπ β β 1 β
β0) |
204 | | eqidd 2734 |
. . . . . . . . . . . 12
β’ (π = π β 1 = 1) |
205 | 199, 203,
182, 183, 204, 185 | pcmpt2 16823 |
. . . . . . . . . . 11
β’ ((π β§ π β β) β (π pCnt ((seq1( Β· , (π β β β¦ if(π β β, π, 1)))βπΎ) / (seq1( Β· , (π β β β¦ if(π β β, π, 1)))βπ))) = if((π β€ πΎ β§ Β¬ π β€ π), 1, 0)) |
206 | 194, 205 | eqtrd 2773 |
. . . . . . . . . 10
β’ ((π β§ π β β) β (π pCnt ((expβ(ΞΈβπΎ)) /
(expβ(ΞΈβπ)))) = if((π β€ πΎ β§ Β¬ π β€ π), 1, 0)) |
207 | 180, 186,
206 | 3brtr4d 5180 |
. . . . . . . . 9
β’ ((π β§ π β β) β (π pCnt ((seq1( Β· , πΉ)βπΎ) / (seq1( Β· , πΉ)βπ))) β€ (π pCnt ((expβ(ΞΈβπΎ)) /
(expβ(ΞΈβπ))))) |
208 | 207 | ralrimiva 3147 |
. . . . . . . 8
β’ (π β βπ β β (π pCnt ((seq1( Β· , πΉ)βπΎ) / (seq1( Β· , πΉ)βπ))) β€ (π pCnt ((expβ(ΞΈβπΎ)) /
(expβ(ΞΈβπ))))) |
209 | | pc2dvds 16809 |
. . . . . . . . 9
β’ ((((seq1(
Β· , πΉ)βπΎ) / (seq1( Β· , πΉ)βπ)) β β€ β§
((expβ(ΞΈβπΎ)) / (expβ(ΞΈβπ))) β β€) β
(((seq1( Β· , πΉ)βπΎ) / (seq1( Β· , πΉ)βπ)) β₯ ((expβ(ΞΈβπΎ)) /
(expβ(ΞΈβπ))) β βπ β β (π pCnt ((seq1( Β· , πΉ)βπΎ) / (seq1( Β· , πΉ)βπ))) β€ (π pCnt ((expβ(ΞΈβπΎ)) /
(expβ(ΞΈβπ)))))) |
210 | 101, 118,
209 | syl2anc 585 |
. . . . . . . 8
β’ (π β (((seq1( Β· , πΉ)βπΎ) / (seq1( Β· , πΉ)βπ)) β₯ ((expβ(ΞΈβπΎ)) /
(expβ(ΞΈβπ))) β βπ β β (π pCnt ((seq1( Β· , πΉ)βπΎ) / (seq1( Β· , πΉ)βπ))) β€ (π pCnt ((expβ(ΞΈβπΎ)) /
(expβ(ΞΈβπ)))))) |
211 | 208, 210 | mpbird 257 |
. . . . . . 7
β’ (π β ((seq1( Β· , πΉ)βπΎ) / (seq1( Β· , πΉ)βπ)) β₯ ((expβ(ΞΈβπΎ)) /
(expβ(ΞΈβπ)))) |
212 | 114 | nnred 12224 |
. . . . . . . . . 10
β’ (π β
(expβ(ΞΈβπΎ)) β β) |
213 | 110 | nnred 12224 |
. . . . . . . . . 10
β’ (π β
(expβ(ΞΈβπ)) β β) |
214 | 114 | nngt0d 12258 |
. . . . . . . . . 10
β’ (π β 0 <
(expβ(ΞΈβπΎ))) |
215 | 110 | nngt0d 12258 |
. . . . . . . . . 10
β’ (π β 0 <
(expβ(ΞΈβπ))) |
216 | 212, 213,
214, 215 | divgt0d 12146 |
. . . . . . . . 9
β’ (π β 0 <
((expβ(ΞΈβπΎ)) / (expβ(ΞΈβπ)))) |
217 | | elnnz 12565 |
. . . . . . . . 9
β’
(((expβ(ΞΈβπΎ)) / (expβ(ΞΈβπ))) β β β
(((expβ(ΞΈβπΎ)) / (expβ(ΞΈβπ))) β β€ β§ 0 <
((expβ(ΞΈβπΎ)) / (expβ(ΞΈβπ))))) |
218 | 118, 216,
217 | sylanbrc 584 |
. . . . . . . 8
β’ (π β
((expβ(ΞΈβπΎ)) / (expβ(ΞΈβπ))) β
β) |
219 | | dvdsle 16250 |
. . . . . . . 8
β’ ((((seq1(
Β· , πΉ)βπΎ) / (seq1( Β· , πΉ)βπ)) β β€ β§
((expβ(ΞΈβπΎ)) / (expβ(ΞΈβπ))) β β) β
(((seq1( Β· , πΉ)βπΎ) / (seq1( Β· , πΉ)βπ)) β₯ ((expβ(ΞΈβπΎ)) /
(expβ(ΞΈβπ))) β ((seq1( Β· , πΉ)βπΎ) / (seq1( Β· , πΉ)βπ)) β€ ((expβ(ΞΈβπΎ)) /
(expβ(ΞΈβπ))))) |
220 | 101, 218,
219 | syl2anc 585 |
. . . . . . 7
β’ (π β (((seq1( Β· , πΉ)βπΎ) / (seq1( Β· , πΉ)βπ)) β₯ ((expβ(ΞΈβπΎ)) /
(expβ(ΞΈβπ))) β ((seq1( Β· , πΉ)βπΎ) / (seq1( Β· , πΉ)βπ)) β€ ((expβ(ΞΈβπΎ)) /
(expβ(ΞΈβπ))))) |
221 | 211, 220 | mpd 15 |
. . . . . 6
β’ (π β ((seq1( Β· , πΉ)βπΎ) / (seq1( Β· , πΉ)βπ)) β€ ((expβ(ΞΈβπΎ)) /
(expβ(ΞΈβπ)))) |
222 | | nndivre 12250 |
. . . . . . . 8
β’
(((expβ(ΞΈβπΎ)) β β β§ 4 β β)
β ((expβ(ΞΈβπΎ)) / 4) β β) |
223 | 212, 1, 222 | sylancl 587 |
. . . . . . 7
β’ (π β
((expβ(ΞΈβπΎ)) / 4) β β) |
224 | | 4re 12293 |
. . . . . . . . . 10
β’ 4 β
β |
225 | 224 | a1i 11 |
. . . . . . . . 9
β’ (π β 4 β
β) |
226 | | 6re 12299 |
. . . . . . . . . 10
β’ 6 β
β |
227 | 226 | a1i 11 |
. . . . . . . . 9
β’ (π β 6 β
β) |
228 | | 4lt6 12391 |
. . . . . . . . . 10
β’ 4 <
6 |
229 | 228 | a1i 11 |
. . . . . . . . 9
β’ (π β 4 < 6) |
230 | | cht3 26667 |
. . . . . . . . . . . 12
β’
(ΞΈβ3) = (logβ6) |
231 | 230 | fveq2i 6892 |
. . . . . . . . . . 11
β’
(expβ(ΞΈβ3)) =
(expβ(logβ6)) |
232 | | 6pos 12319 |
. . . . . . . . . . . . 13
β’ 0 <
6 |
233 | 226, 232 | elrpii 12974 |
. . . . . . . . . . . 12
β’ 6 β
β+ |
234 | | reeflog 26081 |
. . . . . . . . . . . 12
β’ (6 β
β+ β (expβ(logβ6)) = 6) |
235 | 233, 234 | ax-mp 5 |
. . . . . . . . . . 11
β’
(expβ(logβ6)) = 6 |
236 | 231, 235 | eqtri 2761 |
. . . . . . . . . 10
β’
(expβ(ΞΈβ3)) = 6 |
237 | | 3re 12289 |
. . . . . . . . . . . . 13
β’ 3 β
β |
238 | 237 | a1i 11 |
. . . . . . . . . . . 12
β’ (π β 3 β
β) |
239 | | eluzle 12832 |
. . . . . . . . . . . . 13
β’ (π β
(β€β₯β3) β 3 β€ π) |
240 | 67, 239 | syl 17 |
. . . . . . . . . . . 12
β’ (π β 3 β€ π) |
241 | | chtwordi 26650 |
. . . . . . . . . . . 12
β’ ((3
β β β§ π
β β β§ 3 β€ π) β (ΞΈβ3) β€
(ΞΈβπ)) |
242 | 238, 103,
240, 241 | syl3anc 1372 |
. . . . . . . . . . 11
β’ (π β (ΞΈβ3) β€
(ΞΈβπ)) |
243 | | chtcl 26603 |
. . . . . . . . . . . . 13
β’ (3 β
β β (ΞΈβ3) β β) |
244 | 237, 243 | ax-mp 5 |
. . . . . . . . . . . 12
β’
(ΞΈβ3) β β |
245 | | chtcl 26603 |
. . . . . . . . . . . . 13
β’ (π β β β
(ΞΈβπ) β
β) |
246 | 103, 245 | syl 17 |
. . . . . . . . . . . 12
β’ (π β (ΞΈβπ) β
β) |
247 | | efle 16058 |
. . . . . . . . . . . 12
β’
(((ΞΈβ3) β β β§ (ΞΈβπ) β β) β
((ΞΈβ3) β€ (ΞΈβπ) β (expβ(ΞΈβ3)) β€
(expβ(ΞΈβπ)))) |
248 | 244, 246,
247 | sylancr 588 |
. . . . . . . . . . 11
β’ (π β ((ΞΈβ3) β€
(ΞΈβπ) β
(expβ(ΞΈβ3)) β€ (expβ(ΞΈβπ)))) |
249 | 242, 248 | mpbid 231 |
. . . . . . . . . 10
β’ (π β
(expβ(ΞΈβ3)) β€ (expβ(ΞΈβπ))) |
250 | 236, 249 | eqbrtrrid 5184 |
. . . . . . . . 9
β’ (π β 6 β€
(expβ(ΞΈβπ))) |
251 | 225, 227,
213, 229, 250 | ltletrd 11371 |
. . . . . . . 8
β’ (π β 4 <
(expβ(ΞΈβπ))) |
252 | | 4pos 12316 |
. . . . . . . . . 10
β’ 0 <
4 |
253 | 252 | a1i 11 |
. . . . . . . . 9
β’ (π β 0 < 4) |
254 | | ltdiv2 12097 |
. . . . . . . . 9
β’ (((4
β β β§ 0 < 4) β§ ((expβ(ΞΈβπ)) β β β§ 0 <
(expβ(ΞΈβπ))) β§ ((expβ(ΞΈβπΎ)) β β β§ 0 <
(expβ(ΞΈβπΎ)))) β (4 <
(expβ(ΞΈβπ)) β ((expβ(ΞΈβπΎ)) /
(expβ(ΞΈβπ))) < ((expβ(ΞΈβπΎ)) / 4))) |
255 | 225, 253,
213, 215, 212, 214, 254 | syl222anc 1387 |
. . . . . . . 8
β’ (π β (4 <
(expβ(ΞΈβπ)) β ((expβ(ΞΈβπΎ)) /
(expβ(ΞΈβπ))) < ((expβ(ΞΈβπΎ)) / 4))) |
256 | 251, 255 | mpbid 231 |
. . . . . . 7
β’ (π β
((expβ(ΞΈβπΎ)) / (expβ(ΞΈβπ))) <
((expβ(ΞΈβπΎ)) / 4)) |
257 | 26 | a1i 11 |
. . . . . . . . . . . . 13
β’ (π β 2 β
β) |
258 | | 2lt3 12381 |
. . . . . . . . . . . . . 14
β’ 2 <
3 |
259 | 258 | a1i 11 |
. . . . . . . . . . . . 13
β’ (π β 2 < 3) |
260 | 238, 103,
104, 240, 106 | letrd 11368 |
. . . . . . . . . . . . 13
β’ (π β 3 β€ πΎ) |
261 | 257, 238,
104, 259, 260 | ltletrd 11371 |
. . . . . . . . . . . 12
β’ (π β 2 < πΎ) |
262 | | chtub 26705 |
. . . . . . . . . . . 12
β’ ((πΎ β β β§ 2 <
πΎ) β
(ΞΈβπΎ) <
((logβ2) Β· ((2 Β· πΎ) β 3))) |
263 | 104, 261,
262 | syl2anc 585 |
. . . . . . . . . . 11
β’ (π β (ΞΈβπΎ) < ((logβ2) Β·
((2 Β· πΎ) β
3))) |
264 | | chtcl 26603 |
. . . . . . . . . . . . 13
β’ (πΎ β β β
(ΞΈβπΎ) β
β) |
265 | 104, 264 | syl 17 |
. . . . . . . . . . . 12
β’ (π β (ΞΈβπΎ) β
β) |
266 | | relogcl 26076 |
. . . . . . . . . . . . . 14
β’ (2 β
β+ β (logβ2) β β) |
267 | 31, 266 | ax-mp 5 |
. . . . . . . . . . . . 13
β’
(logβ2) β β |
268 | | 3z 12592 |
. . . . . . . . . . . . . . 15
β’ 3 β
β€ |
269 | | zsubcl 12601 |
. . . . . . . . . . . . . . 15
β’ (((2
Β· πΎ) β β€
β§ 3 β β€) β ((2 Β· πΎ) β 3) β
β€) |
270 | 78, 268, 269 | sylancl 587 |
. . . . . . . . . . . . . 14
β’ (π β ((2 Β· πΎ) β 3) β
β€) |
271 | 270 | zred 12663 |
. . . . . . . . . . . . 13
β’ (π β ((2 Β· πΎ) β 3) β
β) |
272 | | remulcl 11192 |
. . . . . . . . . . . . 13
β’
(((logβ2) β β β§ ((2 Β· πΎ) β 3) β β) β
((logβ2) Β· ((2 Β· πΎ) β 3)) β
β) |
273 | 267, 271,
272 | sylancr 588 |
. . . . . . . . . . . 12
β’ (π β ((logβ2) Β·
((2 Β· πΎ) β 3))
β β) |
274 | | eflt 16057 |
. . . . . . . . . . . 12
β’
(((ΞΈβπΎ)
β β β§ ((logβ2) Β· ((2 Β· πΎ) β 3)) β β) β
((ΞΈβπΎ) <
((logβ2) Β· ((2 Β· πΎ) β 3)) β
(expβ(ΞΈβπΎ)) < (expβ((logβ2) Β·
((2 Β· πΎ) β
3))))) |
275 | 265, 273,
274 | syl2anc 585 |
. . . . . . . . . . 11
β’ (π β ((ΞΈβπΎ) < ((logβ2) Β·
((2 Β· πΎ) β 3))
β (expβ(ΞΈβπΎ)) < (expβ((logβ2) Β·
((2 Β· πΎ) β
3))))) |
276 | 263, 275 | mpbid 231 |
. . . . . . . . . 10
β’ (π β
(expβ(ΞΈβπΎ)) < (expβ((logβ2) Β·
((2 Β· πΎ) β
3)))) |
277 | | reexplog 26095 |
. . . . . . . . . . . 12
β’ ((2
β β+ β§ ((2 Β· πΎ) β 3) β β€) β
(2β((2 Β· πΎ)
β 3)) = (expβ(((2 Β· πΎ) β 3) Β·
(logβ2)))) |
278 | 31, 270, 277 | sylancr 588 |
. . . . . . . . . . 11
β’ (π β (2β((2 Β· πΎ) β 3)) = (expβ(((2
Β· πΎ) β 3)
Β· (logβ2)))) |
279 | 270 | zcnd 12664 |
. . . . . . . . . . . . 13
β’ (π β ((2 Β· πΎ) β 3) β
β) |
280 | 267 | recni 11225 |
. . . . . . . . . . . . 13
β’
(logβ2) β β |
281 | | mulcom 11193 |
. . . . . . . . . . . . 13
β’ ((((2
Β· πΎ) β 3)
β β β§ (logβ2) β β) β (((2 Β· πΎ) β 3) Β·
(logβ2)) = ((logβ2) Β· ((2 Β· πΎ) β 3))) |
282 | 279, 280,
281 | sylancl 587 |
. . . . . . . . . . . 12
β’ (π β (((2 Β· πΎ) β 3) Β·
(logβ2)) = ((logβ2) Β· ((2 Β· πΎ) β 3))) |
283 | 282 | fveq2d 6893 |
. . . . . . . . . . 11
β’ (π β (expβ(((2 Β·
πΎ) β 3) Β·
(logβ2))) = (expβ((logβ2) Β· ((2 Β· πΎ) β 3)))) |
284 | 278, 283 | eqtrd 2773 |
. . . . . . . . . 10
β’ (π β (2β((2 Β· πΎ) β 3)) =
(expβ((logβ2) Β· ((2 Β· πΎ) β 3)))) |
285 | 276, 284 | breqtrrd 5176 |
. . . . . . . . 9
β’ (π β
(expβ(ΞΈβπΎ)) < (2β((2 Β· πΎ) β 3))) |
286 | | 3p2e5 12360 |
. . . . . . . . . . . . . . . 16
β’ (3 + 2) =
5 |
287 | 286 | oveq1i 7416 |
. . . . . . . . . . . . . . 15
β’ ((3 + 2)
β 2) = (5 β 2) |
288 | | 3cn 12290 |
. . . . . . . . . . . . . . . 16
β’ 3 β
β |
289 | | 2cn 12284 |
. . . . . . . . . . . . . . . 16
β’ 2 β
β |
290 | 288, 289 | pncan3oi 11473 |
. . . . . . . . . . . . . . 15
β’ ((3 + 2)
β 2) = 3 |
291 | 287, 290 | eqtr3i 2763 |
. . . . . . . . . . . . . 14
β’ (5
β 2) = 3 |
292 | 291 | oveq2i 7417 |
. . . . . . . . . . . . 13
β’ ((2
Β· πΎ) β (5
β 2)) = ((2 Β· πΎ) β 3) |
293 | 78 | zcnd 12664 |
. . . . . . . . . . . . . 14
β’ (π β (2 Β· πΎ) β
β) |
294 | | 5cn 12297 |
. . . . . . . . . . . . . . 15
β’ 5 β
β |
295 | | subsub 11487 |
. . . . . . . . . . . . . . 15
β’ (((2
Β· πΎ) β β
β§ 5 β β β§ 2 β β) β ((2 Β· πΎ) β (5 β 2)) = (((2
Β· πΎ) β 5) +
2)) |
296 | 294, 289,
295 | mp3an23 1454 |
. . . . . . . . . . . . . 14
β’ ((2
Β· πΎ) β β
β ((2 Β· πΎ)
β (5 β 2)) = (((2 Β· πΎ) β 5) + 2)) |
297 | 293, 296 | syl 17 |
. . . . . . . . . . . . 13
β’ (π β ((2 Β· πΎ) β (5 β 2)) = (((2
Β· πΎ) β 5) +
2)) |
298 | 292, 297 | eqtr3id 2787 |
. . . . . . . . . . . 12
β’ (π β ((2 Β· πΎ) β 3) = (((2 Β·
πΎ) β 5) +
2)) |
299 | 298 | oveq2d 7422 |
. . . . . . . . . . 11
β’ (π β
(2βπ((2 Β· πΎ) β 3)) =
(2βπ(((2 Β· πΎ) β 5) + 2))) |
300 | | 2ne0 12313 |
. . . . . . . . . . . 12
β’ 2 β
0 |
301 | | cxpexpz 26167 |
. . . . . . . . . . . 12
β’ ((2
β β β§ 2 β 0 β§ ((2 Β· πΎ) β 3) β β€) β
(2βπ((2 Β· πΎ) β 3)) = (2β((2 Β· πΎ) β 3))) |
302 | 289, 300,
270, 301 | mp3an12i 1466 |
. . . . . . . . . . 11
β’ (π β
(2βπ((2 Β· πΎ) β 3)) = (2β((2 Β· πΎ) β 3))) |
303 | 81 | zcnd 12664 |
. . . . . . . . . . . 12
β’ (π β ((2 Β· πΎ) β 5) β
β) |
304 | | 2cnne0 12419 |
. . . . . . . . . . . . 13
β’ (2 β
β β§ 2 β 0) |
305 | | cxpadd 26179 |
. . . . . . . . . . . . 13
β’ (((2
β β β§ 2 β 0) β§ ((2 Β· πΎ) β 5) β β β§ 2 β
β) β (2βπ(((2 Β· πΎ) β 5) + 2)) =
((2βπ((2 Β· πΎ) β 5)) Β·
(2βπ2))) |
306 | 304, 289,
305 | mp3an13 1453 |
. . . . . . . . . . . 12
β’ (((2
Β· πΎ) β 5)
β β β (2βπ(((2 Β· πΎ) β 5) + 2)) =
((2βπ((2 Β· πΎ) β 5)) Β·
(2βπ2))) |
307 | 303, 306 | syl 17 |
. . . . . . . . . . 11
β’ (π β
(2βπ(((2 Β· πΎ) β 5) + 2)) =
((2βπ((2 Β· πΎ) β 5)) Β·
(2βπ2))) |
308 | 299, 302,
307 | 3eqtr3d 2781 |
. . . . . . . . . 10
β’ (π β (2β((2 Β· πΎ) β 3)) =
((2βπ((2 Β· πΎ) β 5)) Β·
(2βπ2))) |
309 | | 2nn0 12486 |
. . . . . . . . . . . . 13
β’ 2 β
β0 |
310 | | cxpexp 26168 |
. . . . . . . . . . . . 13
β’ ((2
β β β§ 2 β β0) β
(2βπ2) = (2β2)) |
311 | 289, 309,
310 | mp2an 691 |
. . . . . . . . . . . 12
β’
(2βπ2) = (2β2) |
312 | | sq2 14158 |
. . . . . . . . . . . 12
β’
(2β2) = 4 |
313 | 311, 312 | eqtri 2761 |
. . . . . . . . . . 11
β’
(2βπ2) = 4 |
314 | 313 | oveq2i 7417 |
. . . . . . . . . 10
β’
((2βπ((2 Β· πΎ) β 5)) Β·
(2βπ2)) = ((2βπ((2 Β·
πΎ) β 5)) Β·
4) |
315 | 308, 314 | eqtrdi 2789 |
. . . . . . . . 9
β’ (π β (2β((2 Β· πΎ) β 3)) =
((2βπ((2 Β· πΎ) β 5)) Β· 4)) |
316 | 285, 315 | breqtrd 5174 |
. . . . . . . 8
β’ (π β
(expβ(ΞΈβπΎ)) < ((2βπ((2
Β· πΎ) β 5))
Β· 4)) |
317 | 224, 252 | pm3.2i 472 |
. . . . . . . . . 10
β’ (4 β
β β§ 0 < 4) |
318 | 317 | a1i 11 |
. . . . . . . . 9
β’ (π β (4 β β β§ 0
< 4)) |
319 | | ltdivmul2 12088 |
. . . . . . . . 9
β’
(((expβ(ΞΈβπΎ)) β β β§
(2βπ((2 Β· πΎ) β 5)) β β β§ (4 β
β β§ 0 < 4)) β (((expβ(ΞΈβπΎ)) / 4) < (2βπ((2
Β· πΎ) β 5))
β (expβ(ΞΈβπΎ)) < ((2βπ((2
Β· πΎ) β 5))
Β· 4))) |
320 | 212, 85, 318, 319 | syl3anc 1372 |
. . . . . . . 8
β’ (π β
(((expβ(ΞΈβπΎ)) / 4) < (2βπ((2
Β· πΎ) β 5))
β (expβ(ΞΈβπΎ)) < ((2βπ((2
Β· πΎ) β 5))
Β· 4))) |
321 | 316, 320 | mpbird 257 |
. . . . . . 7
β’ (π β
((expβ(ΞΈβπΎ)) / 4) < (2βπ((2
Β· πΎ) β
5))) |
322 | 119, 223,
85, 256, 321 | lttrd 11372 |
. . . . . 6
β’ (π β
((expβ(ΞΈβπΎ)) / (expβ(ΞΈβπ))) <
(2βπ((2 Β· πΎ) β 5))) |
323 | 102, 119,
85, 221, 322 | lelttrd 11369 |
. . . . 5
β’ (π β ((seq1( Β· , πΉ)βπΎ) / (seq1( Β· , πΉ)βπ)) < (2βπ((2
Β· πΎ) β
5))) |
324 | 97 | nnred 12224 |
. . . . . 6
β’ (π β (seq1( Β· , πΉ)βπΎ) β β) |
325 | | nnre 12216 |
. . . . . . . 8
β’ ((seq1(
Β· , πΉ)βπ) β β β (seq1(
Β· , πΉ)βπ) β
β) |
326 | | nngt0 12240 |
. . . . . . . 8
β’ ((seq1(
Β· , πΉ)βπ) β β β 0 <
(seq1( Β· , πΉ)βπ)) |
327 | 325, 326 | jca 513 |
. . . . . . 7
β’ ((seq1(
Β· , πΉ)βπ) β β β ((seq1(
Β· , πΉ)βπ) β β β§ 0 <
(seq1( Β· , πΉ)βπ))) |
328 | 70, 327 | syl 17 |
. . . . . 6
β’ (π β ((seq1( Β· , πΉ)βπ) β β β§ 0 < (seq1(
Β· , πΉ)βπ))) |
329 | | ltdivmul 12086 |
. . . . . 6
β’ (((seq1(
Β· , πΉ)βπΎ) β β β§
(2βπ((2 Β· πΎ) β 5)) β β β§ ((seq1(
Β· , πΉ)βπ) β β β§ 0 <
(seq1( Β· , πΉ)βπ))) β (((seq1( Β· , πΉ)βπΎ) / (seq1( Β· , πΉ)βπ)) < (2βπ((2
Β· πΎ) β 5))
β (seq1( Β· , πΉ)βπΎ) < ((seq1( Β· , πΉ)βπ) Β· (2βπ((2
Β· πΎ) β
5))))) |
330 | 324, 85, 328, 329 | syl3anc 1372 |
. . . . 5
β’ (π β (((seq1( Β· , πΉ)βπΎ) / (seq1( Β· , πΉ)βπ)) < (2βπ((2
Β· πΎ) β 5))
β (seq1( Β· , πΉ)βπΎ) < ((seq1( Β· , πΉ)βπ) Β· (2βπ((2
Β· πΎ) β
5))))) |
331 | 323, 330 | mpbid 231 |
. . . 4
β’ (π β (seq1( Β· , πΉ)βπΎ) < ((seq1( Β· , πΉ)βπ) Β· (2βπ((2
Β· πΎ) β
5)))) |
332 | 87, 331 | eqbrtrrd 5172 |
. . 3
β’ (π β ((2 Β· π)Cπ) < ((seq1( Β· , πΉ)βπ) Β· (2βπ((2
Β· πΎ) β
5)))) |
333 | 30, 85 | remulcld 11241 |
. . . 4
β’ (π β (((2 Β· π)βπ(((ββ(2
Β· π)) / 3) + 2))
Β· (2βπ((2 Β· πΎ) β 5))) β
β) |
334 | 3, 62, 55, 63, 64 | bposlem5 26781 |
. . . . 5
β’ (π β (seq1( Β· , πΉ)βπ) β€ ((2 Β· π)βπ(((ββ(2
Β· π)) / 3) +
2))) |
335 | 71, 30, 84 | lemul1d 13056 |
. . . . 5
β’ (π β ((seq1( Β· , πΉ)βπ) β€ ((2 Β· π)βπ(((ββ(2
Β· π)) / 3) + 2))
β ((seq1( Β· , πΉ)βπ) Β· (2βπ((2
Β· πΎ) β 5))) β€
(((2 Β· π)βπ(((ββ(2
Β· π)) / 3) + 2))
Β· (2βπ((2 Β· πΎ) β 5))))) |
336 | 334, 335 | mpbid 231 |
. . . 4
β’ (π β ((seq1( Β· , πΉ)βπ) Β· (2βπ((2
Β· πΎ) β 5)))
β€ (((2 Β· π)βπ(((ββ(2
Β· π)) / 3) + 2))
Β· (2βπ((2 Β· πΎ) β 5)))) |
337 | 78 | zred 12663 |
. . . . . . 7
β’ (π β (2 Β· πΎ) β
β) |
338 | 37 | a1i 11 |
. . . . . . 7
β’ (π β 5 β
β) |
339 | | flle 13761 |
. . . . . . . . . . 11
β’ (((2
Β· π) / 3) β
β β (ββ((2 Β· π) / 3)) β€ ((2 Β· π) / 3)) |
340 | 74, 339 | syl 17 |
. . . . . . . . . 10
β’ (π β (ββ((2
Β· π) / 3)) β€ ((2
Β· π) /
3)) |
341 | 63, 340 | eqbrtrid 5183 |
. . . . . . . . 9
β’ (π β πΎ β€ ((2 Β· π) / 3)) |
342 | | 2pos 12312 |
. . . . . . . . . . . 12
β’ 0 <
2 |
343 | 26, 342 | pm3.2i 472 |
. . . . . . . . . . 11
β’ (2 β
β β§ 0 < 2) |
344 | 343 | a1i 11 |
. . . . . . . . . 10
β’ (π β (2 β β β§ 0
< 2)) |
345 | | lemul2 12064 |
. . . . . . . . . 10
β’ ((πΎ β β β§ ((2
Β· π) / 3) β
β β§ (2 β β β§ 0 < 2)) β (πΎ β€ ((2 Β· π) / 3) β (2 Β· πΎ) β€ (2 Β· ((2 Β· π) / 3)))) |
346 | 104, 74, 344, 345 | syl3anc 1372 |
. . . . . . . . 9
β’ (π β (πΎ β€ ((2 Β· π) / 3) β (2 Β· πΎ) β€ (2 Β· ((2 Β· π) / 3)))) |
347 | 341, 346 | mpbid 231 |
. . . . . . . 8
β’ (π β (2 Β· πΎ) β€ (2 Β· ((2 Β·
π) / 3))) |
348 | 18 | nncnd 12225 |
. . . . . . . . . 10
β’ (π β (2 Β· π) β
β) |
349 | | 3ne0 12315 |
. . . . . . . . . . . 12
β’ 3 β
0 |
350 | 288, 349 | pm3.2i 472 |
. . . . . . . . . . 11
β’ (3 β
β β§ 3 β 0) |
351 | | divass 11887 |
. . . . . . . . . . 11
β’ ((2
β β β§ (2 Β· π) β β β§ (3 β β
β§ 3 β 0)) β ((2 Β· (2 Β· π)) / 3) = (2 Β· ((2 Β· π) / 3))) |
352 | 289, 350,
351 | mp3an13 1453 |
. . . . . . . . . 10
β’ ((2
Β· π) β β
β ((2 Β· (2 Β· π)) / 3) = (2 Β· ((2 Β· π) / 3))) |
353 | 348, 352 | syl 17 |
. . . . . . . . 9
β’ (π β ((2 Β· (2 Β·
π)) / 3) = (2 Β· ((2
Β· π) /
3))) |
354 | 5 | nncnd 12225 |
. . . . . . . . . . . 12
β’ (π β π β β) |
355 | | mulass 11195 |
. . . . . . . . . . . 12
β’ ((2
β β β§ 2 β β β§ π β β) β ((2 Β· 2)
Β· π) = (2 Β·
(2 Β· π))) |
356 | 289, 289,
354, 355 | mp3an12i 1466 |
. . . . . . . . . . 11
β’ (π β ((2 Β· 2) Β·
π) = (2 Β· (2
Β· π))) |
357 | | 2t2e4 12373 |
. . . . . . . . . . . 12
β’ (2
Β· 2) = 4 |
358 | 357 | oveq1i 7416 |
. . . . . . . . . . 11
β’ ((2
Β· 2) Β· π) =
(4 Β· π) |
359 | 356, 358 | eqtr3di 2788 |
. . . . . . . . . 10
β’ (π β (2 Β· (2 Β·
π)) = (4 Β· π)) |
360 | 359 | oveq1d 7421 |
. . . . . . . . 9
β’ (π β ((2 Β· (2 Β·
π)) / 3) = ((4 Β·
π) / 3)) |
361 | 353, 360 | eqtr3d 2775 |
. . . . . . . 8
β’ (π β (2 Β· ((2 Β·
π) / 3)) = ((4 Β·
π) / 3)) |
362 | 347, 361 | breqtrd 5174 |
. . . . . . 7
β’ (π β (2 Β· πΎ) β€ ((4 Β· π) / 3)) |
363 | 337, 36, 338, 362 | lesub1dd 11827 |
. . . . . 6
β’ (π β ((2 Β· πΎ) β 5) β€ (((4 Β·
π) / 3) β
5)) |
364 | | 1lt2 12380 |
. . . . . . . 8
β’ 1 <
2 |
365 | 364 | a1i 11 |
. . . . . . 7
β’ (π β 1 < 2) |
366 | 257, 365,
82, 39 | cxpled 26220 |
. . . . . 6
β’ (π β (((2 Β· πΎ) β 5) β€ (((4 Β·
π) / 3) β 5) β
(2βπ((2 Β· πΎ) β 5)) β€
(2βπ(((4 Β· π) / 3) β 5)))) |
367 | 363, 366 | mpbid 231 |
. . . . 5
β’ (π β
(2βπ((2 Β· πΎ) β 5)) β€
(2βπ(((4 Β· π) / 3) β 5))) |
368 | 85, 42, 29 | lemul2d 13057 |
. . . . 5
β’ (π β
((2βπ((2 Β· πΎ) β 5)) β€
(2βπ(((4 Β· π) / 3) β 5)) β (((2 Β·
π)βπ(((ββ(2
Β· π)) / 3) + 2))
Β· (2βπ((2 Β· πΎ) β 5))) β€ (((2 Β· π)βπ(((ββ(2
Β· π)) / 3) + 2))
Β· (2βπ(((4 Β· π) / 3) β 5))))) |
369 | 367, 368 | mpbid 231 |
. . . 4
β’ (π β (((2 Β· π)βπ(((ββ(2
Β· π)) / 3) + 2))
Β· (2βπ((2 Β· πΎ) β 5))) β€ (((2 Β· π)βπ(((ββ(2
Β· π)) / 3) + 2))
Β· (2βπ(((4 Β· π) / 3) β 5)))) |
370 | 86, 333, 43, 336, 369 | letrd 11368 |
. . 3
β’ (π β ((seq1( Β· , πΉ)βπ) Β· (2βπ((2
Β· πΎ) β 5)))
β€ (((2 Β· π)βπ(((ββ(2
Β· π)) / 3) + 2))
Β· (2βπ(((4 Β· π) / 3) β 5)))) |
371 | 15, 86, 43, 332, 370 | ltletrd 11371 |
. 2
β’ (π β ((2 Β· π)Cπ) < (((2 Β· π)βπ(((ββ(2
Β· π)) / 3) + 2))
Β· (2βπ(((4 Β· π) / 3) β 5)))) |
372 | 10, 15, 43, 54, 371 | lttrd 11372 |
1
β’ (π β ((4βπ) / π) < (((2 Β· π)βπ(((ββ(2
Β· π)) / 3) + 2))
Β· (2βπ(((4 Β· π) / 3) β 5)))) |