Step | Hyp | Ref
| Expression |
1 | | 1red 11212 |
. 2
β’ (π β 1 β
β) |
2 | | pntrlog2bndlem3.1 |
. . . . 5
β’ (π β π΄ β
β+) |
3 | 2 | rpred 13013 |
. . . 4
β’ (π β π΄ β β) |
4 | 3 | adantr 482 |
. . 3
β’ ((π β§ π₯ β (1(,)+β)) β π΄ β
β) |
5 | | fzfid 13935 |
. . . . 5
β’ ((π β§ π₯ β (1(,)+β)) β
(1...(ββπ₯))
β Fin) |
6 | | elfznn 13527 |
. . . . . . . 8
β’ (π β
(1...(ββπ₯))
β π β
β) |
7 | 6 | adantl 483 |
. . . . . . 7
β’ (((π β§ π₯ β (1(,)+β)) β§ π β
(1...(ββπ₯)))
β π β
β) |
8 | 7 | nnred 12224 |
. . . . . 6
β’ (((π β§ π₯ β (1(,)+β)) β§ π β
(1...(ββπ₯)))
β π β
β) |
9 | | elioore 13351 |
. . . . . . . . . . . . . 14
β’ (π₯ β (1(,)+β) β
π₯ β
β) |
10 | 9 | adantl 483 |
. . . . . . . . . . . . 13
β’ ((π β§ π₯ β (1(,)+β)) β π₯ β
β) |
11 | | 1rp 12975 |
. . . . . . . . . . . . . 14
β’ 1 β
β+ |
12 | 11 | a1i 11 |
. . . . . . . . . . . . 13
β’ ((π β§ π₯ β (1(,)+β)) β 1 β
β+) |
13 | | 1red 11212 |
. . . . . . . . . . . . . 14
β’ ((π β§ π₯ β (1(,)+β)) β 1 β
β) |
14 | | eliooord 13380 |
. . . . . . . . . . . . . . . 16
β’ (π₯ β (1(,)+β) β (1
< π₯ β§ π₯ <
+β)) |
15 | 14 | adantl 483 |
. . . . . . . . . . . . . . 15
β’ ((π β§ π₯ β (1(,)+β)) β (1 < π₯ β§ π₯ < +β)) |
16 | 15 | simpld 496 |
. . . . . . . . . . . . . 14
β’ ((π β§ π₯ β (1(,)+β)) β 1 < π₯) |
17 | 13, 10, 16 | ltled 11359 |
. . . . . . . . . . . . 13
β’ ((π β§ π₯ β (1(,)+β)) β 1 β€ π₯) |
18 | 10, 12, 17 | rpgecld 13052 |
. . . . . . . . . . . 12
β’ ((π β§ π₯ β (1(,)+β)) β π₯ β
β+) |
19 | 18 | adantr 482 |
. . . . . . . . . . 11
β’ (((π β§ π₯ β (1(,)+β)) β§ π β
(1...(ββπ₯)))
β π₯ β
β+) |
20 | 7 | nnrpd 13011 |
. . . . . . . . . . . 12
β’ (((π β§ π₯ β (1(,)+β)) β§ π β
(1...(ββπ₯)))
β π β
β+) |
21 | 11 | a1i 11 |
. . . . . . . . . . . 12
β’ (((π β§ π₯ β (1(,)+β)) β§ π β
(1...(ββπ₯)))
β 1 β β+) |
22 | 20, 21 | rpaddcld 13028 |
. . . . . . . . . . 11
β’ (((π β§ π₯ β (1(,)+β)) β§ π β
(1...(ββπ₯)))
β (π + 1) β
β+) |
23 | 19, 22 | rpdivcld 13030 |
. . . . . . . . . 10
β’ (((π β§ π₯ β (1(,)+β)) β§ π β
(1...(ββπ₯)))
β (π₯ / (π + 1)) β
β+) |
24 | | pntrlog2bnd.r |
. . . . . . . . . . . 12
β’ π
= (π β β+ β¦
((Οβπ) β
π)) |
25 | 24 | pntrf 27056 |
. . . . . . . . . . 11
β’ π
:β+βΆβ |
26 | 25 | ffvelcdmi 7083 |
. . . . . . . . . 10
β’ ((π₯ / (π + 1)) β β+ β
(π
β(π₯ / (π + 1))) β β) |
27 | 23, 26 | syl 17 |
. . . . . . . . 9
β’ (((π β§ π₯ β (1(,)+β)) β§ π β
(1...(ββπ₯)))
β (π
β(π₯ / (π + 1))) β β) |
28 | 27 | recnd 11239 |
. . . . . . . 8
β’ (((π β§ π₯ β (1(,)+β)) β§ π β
(1...(ββπ₯)))
β (π
β(π₯ / (π + 1))) β β) |
29 | 19, 20 | rpdivcld 13030 |
. . . . . . . . . 10
β’ (((π β§ π₯ β (1(,)+β)) β§ π β
(1...(ββπ₯)))
β (π₯ / π) β
β+) |
30 | 25 | ffvelcdmi 7083 |
. . . . . . . . . 10
β’ ((π₯ / π) β β+ β (π
β(π₯ / π)) β β) |
31 | 29, 30 | syl 17 |
. . . . . . . . 9
β’ (((π β§ π₯ β (1(,)+β)) β§ π β
(1...(ββπ₯)))
β (π
β(π₯ / π)) β β) |
32 | 31 | recnd 11239 |
. . . . . . . 8
β’ (((π β§ π₯ β (1(,)+β)) β§ π β
(1...(ββπ₯)))
β (π
β(π₯ / π)) β β) |
33 | 28, 32 | subcld 11568 |
. . . . . . 7
β’ (((π β§ π₯ β (1(,)+β)) β§ π β
(1...(ββπ₯)))
β ((π
β(π₯ / (π + 1))) β (π
β(π₯ / π))) β β) |
34 | 33 | abscld 15380 |
. . . . . 6
β’ (((π β§ π₯ β (1(,)+β)) β§ π β
(1...(ββπ₯)))
β (absβ((π
β(π₯ / (π + 1))) β (π
β(π₯ / π)))) β β) |
35 | 8, 34 | remulcld 11241 |
. . . . 5
β’ (((π β§ π₯ β (1(,)+β)) β§ π β
(1...(ββπ₯)))
β (π Β·
(absβ((π
β(π₯ / (π + 1))) β (π
β(π₯ / π))))) β β) |
36 | 5, 35 | fsumrecl 15677 |
. . . 4
β’ ((π β§ π₯ β (1(,)+β)) β Ξ£π β
(1...(ββπ₯))(π Β· (absβ((π
β(π₯ / (π + 1))) β (π
β(π₯ / π))))) β β) |
37 | 10, 16 | rplogcld 26129 |
. . . . 5
β’ ((π β§ π₯ β (1(,)+β)) β
(logβπ₯) β
β+) |
38 | 18, 37 | rpmulcld 13029 |
. . . 4
β’ ((π β§ π₯ β (1(,)+β)) β (π₯ Β· (logβπ₯)) β
β+) |
39 | 36, 38 | rerpdivcld 13044 |
. . 3
β’ ((π β§ π₯ β (1(,)+β)) β (Ξ£π β
(1...(ββπ₯))(π Β· (absβ((π
β(π₯ / (π + 1))) β (π
β(π₯ / π))))) / (π₯ Β· (logβπ₯))) β β) |
40 | | ioossre 13382 |
. . . 4
β’
(1(,)+β) β β |
41 | 2 | rpcnd 13015 |
. . . 4
β’ (π β π΄ β β) |
42 | | o1const 15561 |
. . . 4
β’
(((1(,)+β) β β β§ π΄ β β) β (π₯ β (1(,)+β) β¦ π΄) β
π(1)) |
43 | 40, 41, 42 | sylancr 588 |
. . 3
β’ (π β (π₯ β (1(,)+β) β¦ π΄) β
π(1)) |
44 | | chpo1ubb 26974 |
. . . 4
β’
βπ β
β+ βπ¦ β β+
(Οβπ¦) β€ (π Β· π¦) |
45 | | pntsval.1 |
. . . . . 6
β’ π = (π β β β¦ Ξ£π β
(1...(ββπ))((Ξβπ) Β· ((logβπ) + (Οβ(π / π))))) |
46 | | simpl 484 |
. . . . . 6
β’ ((π β β+
β§ βπ¦ β
β+ (Οβπ¦) β€ (π Β· π¦)) β π β β+) |
47 | | simpr 486 |
. . . . . 6
β’ ((π β β+
β§ βπ¦ β
β+ (Οβπ¦) β€ (π Β· π¦)) β βπ¦ β β+
(Οβπ¦) β€ (π Β· π¦)) |
48 | 45, 24, 46, 47 | pntrlog2bndlem2 27071 |
. . . . 5
β’ ((π β β+
β§ βπ¦ β
β+ (Οβπ¦) β€ (π Β· π¦)) β (π₯ β (1(,)+β) β¦ (Ξ£π β
(1...(ββπ₯))(π Β· (absβ((π
β(π₯ / (π + 1))) β (π
β(π₯ / π))))) / (π₯ Β· (logβπ₯)))) β π(1)) |
49 | 48 | rexlimiva 3148 |
. . . 4
β’
(βπ β
β+ βπ¦ β β+
(Οβπ¦) β€ (π Β· π¦) β (π₯ β (1(,)+β) β¦ (Ξ£π β
(1...(ββπ₯))(π Β· (absβ((π
β(π₯ / (π + 1))) β (π
β(π₯ / π))))) / (π₯ Β· (logβπ₯)))) β π(1)) |
50 | 44, 49 | mp1i 13 |
. . 3
β’ (π β (π₯ β (1(,)+β) β¦ (Ξ£π β
(1...(ββπ₯))(π Β· (absβ((π
β(π₯ / (π + 1))) β (π
β(π₯ / π))))) / (π₯ Β· (logβπ₯)))) β π(1)) |
51 | 4, 39, 43, 50 | o1mul2 15566 |
. 2
β’ (π β (π₯ β (1(,)+β) β¦ (π΄ Β· (Ξ£π β
(1...(ββπ₯))(π Β· (absβ((π
β(π₯ / (π + 1))) β (π
β(π₯ / π))))) / (π₯ Β· (logβπ₯))))) β π(1)) |
52 | 4, 39 | remulcld 11241 |
. 2
β’ ((π β§ π₯ β (1(,)+β)) β (π΄ Β· (Ξ£π β
(1...(ββπ₯))(π Β· (absβ((π
β(π₯ / (π + 1))) β (π
β(π₯ / π))))) / (π₯ Β· (logβπ₯)))) β β) |
53 | 32 | abscld 15380 |
. . . . . . 7
β’ (((π β§ π₯ β (1(,)+β)) β§ π β
(1...(ββπ₯)))
β (absβ(π
β(π₯ / π))) β β) |
54 | 28 | abscld 15380 |
. . . . . . 7
β’ (((π β§ π₯ β (1(,)+β)) β§ π β
(1...(ββπ₯)))
β (absβ(π
β(π₯ / (π + 1)))) β β) |
55 | 53, 54 | resubcld 11639 |
. . . . . 6
β’ (((π β§ π₯ β (1(,)+β)) β§ π β
(1...(ββπ₯)))
β ((absβ(π
β(π₯ / π))) β (absβ(π
β(π₯ / (π + 1))))) β β) |
56 | 45 | pntsf 27066 |
. . . . . . . . 9
β’ π:ββΆβ |
57 | 56 | ffvelcdmi 7083 |
. . . . . . . 8
β’ (π β β β (πβπ) β β) |
58 | 8, 57 | syl 17 |
. . . . . . 7
β’ (((π β§ π₯ β (1(,)+β)) β§ π β
(1...(ββπ₯)))
β (πβπ) β
β) |
59 | | 2re 12283 |
. . . . . . . . 9
β’ 2 β
β |
60 | 59 | a1i 11 |
. . . . . . . 8
β’ (((π β§ π₯ β (1(,)+β)) β§ π β
(1...(ββπ₯)))
β 2 β β) |
61 | 20 | relogcld 26123 |
. . . . . . . . 9
β’ (((π β§ π₯ β (1(,)+β)) β§ π β
(1...(ββπ₯)))
β (logβπ) β
β) |
62 | 8, 61 | remulcld 11241 |
. . . . . . . 8
β’ (((π β§ π₯ β (1(,)+β)) β§ π β
(1...(ββπ₯)))
β (π Β·
(logβπ)) β
β) |
63 | 60, 62 | remulcld 11241 |
. . . . . . 7
β’ (((π β§ π₯ β (1(,)+β)) β§ π β
(1...(ββπ₯)))
β (2 Β· (π
Β· (logβπ)))
β β) |
64 | 58, 63 | resubcld 11639 |
. . . . . 6
β’ (((π β§ π₯ β (1(,)+β)) β§ π β
(1...(ββπ₯)))
β ((πβπ) β (2 Β· (π Β· (logβπ)))) β
β) |
65 | 55, 64 | remulcld 11241 |
. . . . 5
β’ (((π β§ π₯ β (1(,)+β)) β§ π β
(1...(ββπ₯)))
β (((absβ(π
β(π₯ / π))) β (absβ(π
β(π₯ / (π + 1))))) Β· ((πβπ) β (2 Β· (π Β· (logβπ))))) β β) |
66 | 5, 65 | fsumrecl 15677 |
. . . 4
β’ ((π β§ π₯ β (1(,)+β)) β Ξ£π β
(1...(ββπ₯))(((absβ(π
β(π₯ / π))) β (absβ(π
β(π₯ / (π + 1))))) Β· ((πβπ) β (2 Β· (π Β· (logβπ))))) β β) |
67 | 66, 38 | rerpdivcld 13044 |
. . 3
β’ ((π β§ π₯ β (1(,)+β)) β (Ξ£π β
(1...(ββπ₯))(((absβ(π
β(π₯ / π))) β (absβ(π
β(π₯ / (π + 1))))) Β· ((πβπ) β (2 Β· (π Β· (logβπ))))) / (π₯ Β· (logβπ₯))) β β) |
68 | 67 | recnd 11239 |
. 2
β’ ((π β§ π₯ β (1(,)+β)) β (Ξ£π β
(1...(ββπ₯))(((absβ(π
β(π₯ / π))) β (absβ(π
β(π₯ / (π + 1))))) Β· ((πβπ) β (2 Β· (π Β· (logβπ))))) / (π₯ Β· (logβπ₯))) β β) |
69 | 68 | abscld 15380 |
. . . 4
β’ ((π β§ π₯ β (1(,)+β)) β
(absβ(Ξ£π β
(1...(ββπ₯))(((absβ(π
β(π₯ / π))) β (absβ(π
β(π₯ / (π + 1))))) Β· ((πβπ) β (2 Β· (π Β· (logβπ))))) / (π₯ Β· (logβπ₯)))) β β) |
70 | 52 | recnd 11239 |
. . . . 5
β’ ((π β§ π₯ β (1(,)+β)) β (π΄ Β· (Ξ£π β
(1...(ββπ₯))(π Β· (absβ((π
β(π₯ / (π + 1))) β (π
β(π₯ / π))))) / (π₯ Β· (logβπ₯)))) β β) |
71 | 70 | abscld 15380 |
. . . 4
β’ ((π β§ π₯ β (1(,)+β)) β
(absβ(π΄ Β·
(Ξ£π β
(1...(ββπ₯))(π Β· (absβ((π
β(π₯ / (π + 1))) β (π
β(π₯ / π))))) / (π₯ Β· (logβπ₯))))) β β) |
72 | 66 | recnd 11239 |
. . . . . . 7
β’ ((π β§ π₯ β (1(,)+β)) β Ξ£π β
(1...(ββπ₯))(((absβ(π
β(π₯ / π))) β (absβ(π
β(π₯ / (π + 1))))) Β· ((πβπ) β (2 Β· (π Β· (logβπ))))) β β) |
73 | 72 | abscld 15380 |
. . . . . 6
β’ ((π β§ π₯ β (1(,)+β)) β
(absβΞ£π β
(1...(ββπ₯))(((absβ(π
β(π₯ / π))) β (absβ(π
β(π₯ / (π + 1))))) Β· ((πβπ) β (2 Β· (π Β· (logβπ)))))) β β) |
74 | 4, 36 | remulcld 11241 |
. . . . . 6
β’ ((π β§ π₯ β (1(,)+β)) β (π΄ Β· Ξ£π β
(1...(ββπ₯))(π Β· (absβ((π
β(π₯ / (π + 1))) β (π
β(π₯ / π)))))) β β) |
75 | 65 | recnd 11239 |
. . . . . . . . 9
β’ (((π β§ π₯ β (1(,)+β)) β§ π β
(1...(ββπ₯)))
β (((absβ(π
β(π₯ / π))) β (absβ(π
β(π₯ / (π + 1))))) Β· ((πβπ) β (2 Β· (π Β· (logβπ))))) β β) |
76 | 75 | abscld 15380 |
. . . . . . . 8
β’ (((π β§ π₯ β (1(,)+β)) β§ π β
(1...(ββπ₯)))
β (absβ(((absβ(π
β(π₯ / π))) β (absβ(π
β(π₯ / (π + 1))))) Β· ((πβπ) β (2 Β· (π Β· (logβπ)))))) β β) |
77 | 5, 76 | fsumrecl 15677 |
. . . . . . 7
β’ ((π β§ π₯ β (1(,)+β)) β Ξ£π β
(1...(ββπ₯))(absβ(((absβ(π
β(π₯ / π))) β (absβ(π
β(π₯ / (π + 1))))) Β· ((πβπ) β (2 Β· (π Β· (logβπ)))))) β β) |
78 | 5, 75 | fsumabs 15744 |
. . . . . . 7
β’ ((π β§ π₯ β (1(,)+β)) β
(absβΞ£π β
(1...(ββπ₯))(((absβ(π
β(π₯ / π))) β (absβ(π
β(π₯ / (π + 1))))) Β· ((πβπ) β (2 Β· (π Β· (logβπ)))))) β€ Ξ£π β (1...(ββπ₯))(absβ(((absβ(π
β(π₯ / π))) β (absβ(π
β(π₯ / (π + 1))))) Β· ((πβπ) β (2 Β· (π Β· (logβπ))))))) |
79 | 4 | adantr 482 |
. . . . . . . . . 10
β’ (((π β§ π₯ β (1(,)+β)) β§ π β
(1...(ββπ₯)))
β π΄ β
β) |
80 | 79, 35 | remulcld 11241 |
. . . . . . . . 9
β’ (((π β§ π₯ β (1(,)+β)) β§ π β
(1...(ββπ₯)))
β (π΄ Β· (π Β· (absβ((π
β(π₯ / (π + 1))) β (π
β(π₯ / π)))))) β β) |
81 | 55 | recnd 11239 |
. . . . . . . . . . . 12
β’ (((π β§ π₯ β (1(,)+β)) β§ π β
(1...(ββπ₯)))
β ((absβ(π
β(π₯ / π))) β (absβ(π
β(π₯ / (π + 1))))) β β) |
82 | 81 | abscld 15380 |
. . . . . . . . . . 11
β’ (((π β§ π₯ β (1(,)+β)) β§ π β
(1...(ββπ₯)))
β (absβ((absβ(π
β(π₯ / π))) β (absβ(π
β(π₯ / (π + 1)))))) β β) |
83 | 64 | recnd 11239 |
. . . . . . . . . . . 12
β’ (((π β§ π₯ β (1(,)+β)) β§ π β
(1...(ββπ₯)))
β ((πβπ) β (2 Β· (π Β· (logβπ)))) β
β) |
84 | 83 | abscld 15380 |
. . . . . . . . . . 11
β’ (((π β§ π₯ β (1(,)+β)) β§ π β
(1...(ββπ₯)))
β (absβ((πβπ) β (2 Β· (π Β· (logβπ))))) β β) |
85 | 79, 8 | remulcld 11241 |
. . . . . . . . . . 11
β’ (((π β§ π₯ β (1(,)+β)) β§ π β
(1...(ββπ₯)))
β (π΄ Β· π) β
β) |
86 | 81 | absge0d 15388 |
. . . . . . . . . . 11
β’ (((π β§ π₯ β (1(,)+β)) β§ π β
(1...(ββπ₯)))
β 0 β€ (absβ((absβ(π
β(π₯ / π))) β (absβ(π
β(π₯ / (π + 1))))))) |
87 | 83 | absge0d 15388 |
. . . . . . . . . . 11
β’ (((π β§ π₯ β (1(,)+β)) β§ π β
(1...(ββπ₯)))
β 0 β€ (absβ((πβπ) β (2 Β· (π Β· (logβπ)))))) |
88 | 32, 28 | abs2difabsd 15403 |
. . . . . . . . . . . 12
β’ (((π β§ π₯ β (1(,)+β)) β§ π β
(1...(ββπ₯)))
β (absβ((absβ(π
β(π₯ / π))) β (absβ(π
β(π₯ / (π + 1)))))) β€ (absβ((π
β(π₯ / π)) β (π
β(π₯ / (π + 1)))))) |
89 | 32, 28 | abssubd 15397 |
. . . . . . . . . . . 12
β’ (((π β§ π₯ β (1(,)+β)) β§ π β
(1...(ββπ₯)))
β (absβ((π
β(π₯ / π)) β (π
β(π₯ / (π + 1))))) = (absβ((π
β(π₯ / (π + 1))) β (π
β(π₯ / π))))) |
90 | 88, 89 | breqtrd 5174 |
. . . . . . . . . . 11
β’ (((π β§ π₯ β (1(,)+β)) β§ π β
(1...(ββπ₯)))
β (absβ((absβ(π
β(π₯ / π))) β (absβ(π
β(π₯ / (π + 1)))))) β€ (absβ((π
β(π₯ / (π + 1))) β (π
β(π₯ / π))))) |
91 | 58 | recnd 11239 |
. . . . . . . . . . . . . . . 16
β’ (((π β§ π₯ β (1(,)+β)) β§ π β
(1...(ββπ₯)))
β (πβπ) β
β) |
92 | 8 | recnd 11239 |
. . . . . . . . . . . . . . . 16
β’ (((π β§ π₯ β (1(,)+β)) β§ π β
(1...(ββπ₯)))
β π β
β) |
93 | 7 | nnne0d 12259 |
. . . . . . . . . . . . . . . 16
β’ (((π β§ π₯ β (1(,)+β)) β§ π β
(1...(ββπ₯)))
β π β
0) |
94 | 91, 92, 93 | divcld 11987 |
. . . . . . . . . . . . . . 15
β’ (((π β§ π₯ β (1(,)+β)) β§ π β
(1...(ββπ₯)))
β ((πβπ) / π) β β) |
95 | | 2cnd 12287 |
. . . . . . . . . . . . . . . 16
β’ (((π β§ π₯ β (1(,)+β)) β§ π β
(1...(ββπ₯)))
β 2 β β) |
96 | 61 | recnd 11239 |
. . . . . . . . . . . . . . . 16
β’ (((π β§ π₯ β (1(,)+β)) β§ π β
(1...(ββπ₯)))
β (logβπ) β
β) |
97 | 95, 96 | mulcld 11231 |
. . . . . . . . . . . . . . 15
β’ (((π β§ π₯ β (1(,)+β)) β§ π β
(1...(ββπ₯)))
β (2 Β· (logβπ)) β β) |
98 | 94, 97 | subcld 11568 |
. . . . . . . . . . . . . 14
β’ (((π β§ π₯ β (1(,)+β)) β§ π β
(1...(ββπ₯)))
β (((πβπ) / π) β (2 Β· (logβπ))) β
β) |
99 | 98, 92 | absmuld 15398 |
. . . . . . . . . . . . 13
β’ (((π β§ π₯ β (1(,)+β)) β§ π β
(1...(ββπ₯)))
β (absβ((((πβπ) / π) β (2 Β· (logβπ))) Β· π)) = ((absβ(((πβπ) / π) β (2 Β· (logβπ)))) Β· (absβπ))) |
100 | 94, 97, 92 | subdird 11668 |
. . . . . . . . . . . . . . 15
β’ (((π β§ π₯ β (1(,)+β)) β§ π β
(1...(ββπ₯)))
β ((((πβπ) / π) β (2 Β· (logβπ))) Β· π) = ((((πβπ) / π) Β· π) β ((2 Β· (logβπ)) Β· π))) |
101 | 91, 92, 93 | divcan1d 11988 |
. . . . . . . . . . . . . . . 16
β’ (((π β§ π₯ β (1(,)+β)) β§ π β
(1...(ββπ₯)))
β (((πβπ) / π) Β· π) = (πβπ)) |
102 | 95, 92, 96 | mul32d 11421 |
. . . . . . . . . . . . . . . . 17
β’ (((π β§ π₯ β (1(,)+β)) β§ π β
(1...(ββπ₯)))
β ((2 Β· π)
Β· (logβπ)) =
((2 Β· (logβπ))
Β· π)) |
103 | 95, 92, 96 | mulassd 11234 |
. . . . . . . . . . . . . . . . 17
β’ (((π β§ π₯ β (1(,)+β)) β§ π β
(1...(ββπ₯)))
β ((2 Β· π)
Β· (logβπ)) =
(2 Β· (π Β·
(logβπ)))) |
104 | 102, 103 | eqtr3d 2775 |
. . . . . . . . . . . . . . . 16
β’ (((π β§ π₯ β (1(,)+β)) β§ π β
(1...(ββπ₯)))
β ((2 Β· (logβπ)) Β· π) = (2 Β· (π Β· (logβπ)))) |
105 | 101, 104 | oveq12d 7424 |
. . . . . . . . . . . . . . 15
β’ (((π β§ π₯ β (1(,)+β)) β§ π β
(1...(ββπ₯)))
β ((((πβπ) / π) Β· π) β ((2 Β· (logβπ)) Β· π)) = ((πβπ) β (2 Β· (π Β· (logβπ))))) |
106 | 100, 105 | eqtrd 2773 |
. . . . . . . . . . . . . 14
β’ (((π β§ π₯ β (1(,)+β)) β§ π β
(1...(ββπ₯)))
β ((((πβπ) / π) β (2 Β· (logβπ))) Β· π) = ((πβπ) β (2 Β· (π Β· (logβπ))))) |
107 | 106 | fveq2d 6893 |
. . . . . . . . . . . . 13
β’ (((π β§ π₯ β (1(,)+β)) β§ π β
(1...(ββπ₯)))
β (absβ((((πβπ) / π) β (2 Β· (logβπ))) Β· π)) = (absβ((πβπ) β (2 Β· (π Β· (logβπ)))))) |
108 | 20 | rpge0d 13017 |
. . . . . . . . . . . . . . 15
β’ (((π β§ π₯ β (1(,)+β)) β§ π β
(1...(ββπ₯)))
β 0 β€ π) |
109 | 8, 108 | absidd 15366 |
. . . . . . . . . . . . . 14
β’ (((π β§ π₯ β (1(,)+β)) β§ π β
(1...(ββπ₯)))
β (absβπ) =
π) |
110 | 109 | oveq2d 7422 |
. . . . . . . . . . . . 13
β’ (((π β§ π₯ β (1(,)+β)) β§ π β
(1...(ββπ₯)))
β ((absβ(((πβπ) / π) β (2 Β· (logβπ)))) Β· (absβπ)) = ((absβ(((πβπ) / π) β (2 Β· (logβπ)))) Β· π)) |
111 | 99, 107, 110 | 3eqtr3d 2781 |
. . . . . . . . . . . 12
β’ (((π β§ π₯ β (1(,)+β)) β§ π β
(1...(ββπ₯)))
β (absβ((πβπ) β (2 Β· (π Β· (logβπ))))) = ((absβ(((πβπ) / π) β (2 Β· (logβπ)))) Β· π)) |
112 | 98 | abscld 15380 |
. . . . . . . . . . . . 13
β’ (((π β§ π₯ β (1(,)+β)) β§ π β
(1...(ββπ₯)))
β (absβ(((πβπ) / π) β (2 Β· (logβπ)))) β
β) |
113 | | fveq2 6889 |
. . . . . . . . . . . . . . . . . 18
β’ (π¦ = π β (πβπ¦) = (πβπ)) |
114 | | id 22 |
. . . . . . . . . . . . . . . . . 18
β’ (π¦ = π β π¦ = π) |
115 | 113, 114 | oveq12d 7424 |
. . . . . . . . . . . . . . . . 17
β’ (π¦ = π β ((πβπ¦) / π¦) = ((πβπ) / π)) |
116 | | fveq2 6889 |
. . . . . . . . . . . . . . . . . 18
β’ (π¦ = π β (logβπ¦) = (logβπ)) |
117 | 116 | oveq2d 7422 |
. . . . . . . . . . . . . . . . 17
β’ (π¦ = π β (2 Β· (logβπ¦)) = (2 Β·
(logβπ))) |
118 | 115, 117 | oveq12d 7424 |
. . . . . . . . . . . . . . . 16
β’ (π¦ = π β (((πβπ¦) / π¦) β (2 Β· (logβπ¦))) = (((πβπ) / π) β (2 Β· (logβπ)))) |
119 | 118 | fveq2d 6893 |
. . . . . . . . . . . . . . 15
β’ (π¦ = π β (absβ(((πβπ¦) / π¦) β (2 Β· (logβπ¦)))) = (absβ(((πβπ) / π) β (2 Β· (logβπ))))) |
120 | 119 | breq1d 5158 |
. . . . . . . . . . . . . 14
β’ (π¦ = π β ((absβ(((πβπ¦) / π¦) β (2 Β· (logβπ¦)))) β€ π΄ β (absβ(((πβπ) / π) β (2 Β· (logβπ)))) β€ π΄)) |
121 | | pntrlog2bndlem3.2 |
. . . . . . . . . . . . . . 15
β’ (π β βπ¦ β (1[,)+β)(absβ(((πβπ¦) / π¦) β (2 Β· (logβπ¦)))) β€ π΄) |
122 | 121 | ad2antrr 725 |
. . . . . . . . . . . . . 14
β’ (((π β§ π₯ β (1(,)+β)) β§ π β
(1...(ββπ₯)))
β βπ¦ β
(1[,)+β)(absβ(((πβπ¦) / π¦) β (2 Β· (logβπ¦)))) β€ π΄) |
123 | 7 | nnge1d 12257 |
. . . . . . . . . . . . . . 15
β’ (((π β§ π₯ β (1(,)+β)) β§ π β
(1...(ββπ₯)))
β 1 β€ π) |
124 | | 1re 11211 |
. . . . . . . . . . . . . . . 16
β’ 1 β
β |
125 | | elicopnf 13419 |
. . . . . . . . . . . . . . . 16
β’ (1 β
β β (π β
(1[,)+β) β (π
β β β§ 1 β€ π))) |
126 | 124, 125 | ax-mp 5 |
. . . . . . . . . . . . . . 15
β’ (π β (1[,)+β) β
(π β β β§ 1
β€ π)) |
127 | 8, 123, 126 | sylanbrc 584 |
. . . . . . . . . . . . . 14
β’ (((π β§ π₯ β (1(,)+β)) β§ π β
(1...(ββπ₯)))
β π β
(1[,)+β)) |
128 | 120, 122,
127 | rspcdva 3614 |
. . . . . . . . . . . . 13
β’ (((π β§ π₯ β (1(,)+β)) β§ π β
(1...(ββπ₯)))
β (absβ(((πβπ) / π) β (2 Β· (logβπ)))) β€ π΄) |
129 | 112, 79, 8, 108, 128 | lemul1ad 12150 |
. . . . . . . . . . . 12
β’ (((π β§ π₯ β (1(,)+β)) β§ π β
(1...(ββπ₯)))
β ((absβ(((πβπ) / π) β (2 Β· (logβπ)))) Β· π) β€ (π΄ Β· π)) |
130 | 111, 129 | eqbrtrd 5170 |
. . . . . . . . . . 11
β’ (((π β§ π₯ β (1(,)+β)) β§ π β
(1...(ββπ₯)))
β (absβ((πβπ) β (2 Β· (π Β· (logβπ))))) β€ (π΄ Β· π)) |
131 | 82, 34, 84, 85, 86, 87, 90, 130 | lemul12ad 12153 |
. . . . . . . . . 10
β’ (((π β§ π₯ β (1(,)+β)) β§ π β
(1...(ββπ₯)))
β ((absβ((absβ(π
β(π₯ / π))) β (absβ(π
β(π₯ / (π + 1)))))) Β· (absβ((πβπ) β (2 Β· (π Β· (logβπ)))))) β€ ((absβ((π
β(π₯ / (π + 1))) β (π
β(π₯ / π)))) Β· (π΄ Β· π))) |
132 | 81, 83 | absmuld 15398 |
. . . . . . . . . 10
β’ (((π β§ π₯ β (1(,)+β)) β§ π β
(1...(ββπ₯)))
β (absβ(((absβ(π
β(π₯ / π))) β (absβ(π
β(π₯ / (π + 1))))) Β· ((πβπ) β (2 Β· (π Β· (logβπ)))))) = ((absβ((absβ(π
β(π₯ / π))) β (absβ(π
β(π₯ / (π + 1)))))) Β· (absβ((πβπ) β (2 Β· (π Β· (logβπ))))))) |
133 | 41 | ad2antrr 725 |
. . . . . . . . . . . 12
β’ (((π β§ π₯ β (1(,)+β)) β§ π β
(1...(ββπ₯)))
β π΄ β
β) |
134 | 34 | recnd 11239 |
. . . . . . . . . . . 12
β’ (((π β§ π₯ β (1(,)+β)) β§ π β
(1...(ββπ₯)))
β (absβ((π
β(π₯ / (π + 1))) β (π
β(π₯ / π)))) β β) |
135 | 133, 92, 134 | mulassd 11234 |
. . . . . . . . . . 11
β’ (((π β§ π₯ β (1(,)+β)) β§ π β
(1...(ββπ₯)))
β ((π΄ Β· π) Β· (absβ((π
β(π₯ / (π + 1))) β (π
β(π₯ / π))))) = (π΄ Β· (π Β· (absβ((π
β(π₯ / (π + 1))) β (π
β(π₯ / π))))))) |
136 | 133, 92 | mulcld 11231 |
. . . . . . . . . . . 12
β’ (((π β§ π₯ β (1(,)+β)) β§ π β
(1...(ββπ₯)))
β (π΄ Β· π) β
β) |
137 | 136, 134 | mulcomd 11232 |
. . . . . . . . . . 11
β’ (((π β§ π₯ β (1(,)+β)) β§ π β
(1...(ββπ₯)))
β ((π΄ Β· π) Β· (absβ((π
β(π₯ / (π + 1))) β (π
β(π₯ / π))))) = ((absβ((π
β(π₯ / (π + 1))) β (π
β(π₯ / π)))) Β· (π΄ Β· π))) |
138 | 135, 137 | eqtr3d 2775 |
. . . . . . . . . 10
β’ (((π β§ π₯ β (1(,)+β)) β§ π β
(1...(ββπ₯)))
β (π΄ Β· (π Β· (absβ((π
β(π₯ / (π + 1))) β (π
β(π₯ / π)))))) = ((absβ((π
β(π₯ / (π + 1))) β (π
β(π₯ / π)))) Β· (π΄ Β· π))) |
139 | 131, 132,
138 | 3brtr4d 5180 |
. . . . . . . . 9
β’ (((π β§ π₯ β (1(,)+β)) β§ π β
(1...(ββπ₯)))
β (absβ(((absβ(π
β(π₯ / π))) β (absβ(π
β(π₯ / (π + 1))))) Β· ((πβπ) β (2 Β· (π Β· (logβπ)))))) β€ (π΄ Β· (π Β· (absβ((π
β(π₯ / (π + 1))) β (π
β(π₯ / π))))))) |
140 | 5, 76, 80, 139 | fsumle 15742 |
. . . . . . . 8
β’ ((π β§ π₯ β (1(,)+β)) β Ξ£π β
(1...(ββπ₯))(absβ(((absβ(π
β(π₯ / π))) β (absβ(π
β(π₯ / (π + 1))))) Β· ((πβπ) β (2 Β· (π Β· (logβπ)))))) β€ Ξ£π β (1...(ββπ₯))(π΄ Β· (π Β· (absβ((π
β(π₯ / (π + 1))) β (π
β(π₯ / π))))))) |
141 | 41 | adantr 482 |
. . . . . . . . 9
β’ ((π β§ π₯ β (1(,)+β)) β π΄ β
β) |
142 | 35 | recnd 11239 |
. . . . . . . . 9
β’ (((π β§ π₯ β (1(,)+β)) β§ π β
(1...(ββπ₯)))
β (π Β·
(absβ((π
β(π₯ / (π + 1))) β (π
β(π₯ / π))))) β β) |
143 | 5, 141, 142 | fsummulc2 15727 |
. . . . . . . 8
β’ ((π β§ π₯ β (1(,)+β)) β (π΄ Β· Ξ£π β
(1...(ββπ₯))(π Β· (absβ((π
β(π₯ / (π + 1))) β (π
β(π₯ / π)))))) = Ξ£π β (1...(ββπ₯))(π΄ Β· (π Β· (absβ((π
β(π₯ / (π + 1))) β (π
β(π₯ / π))))))) |
144 | 140, 143 | breqtrrd 5176 |
. . . . . . 7
β’ ((π β§ π₯ β (1(,)+β)) β Ξ£π β
(1...(ββπ₯))(absβ(((absβ(π
β(π₯ / π))) β (absβ(π
β(π₯ / (π + 1))))) Β· ((πβπ) β (2 Β· (π Β· (logβπ)))))) β€ (π΄ Β· Ξ£π β (1...(ββπ₯))(π Β· (absβ((π
β(π₯ / (π + 1))) β (π
β(π₯ / π))))))) |
145 | 73, 77, 74, 78, 144 | letrd 11368 |
. . . . . 6
β’ ((π β§ π₯ β (1(,)+β)) β
(absβΞ£π β
(1...(ββπ₯))(((absβ(π
β(π₯ / π))) β (absβ(π
β(π₯ / (π + 1))))) Β· ((πβπ) β (2 Β· (π Β· (logβπ)))))) β€ (π΄ Β· Ξ£π β (1...(ββπ₯))(π Β· (absβ((π
β(π₯ / (π + 1))) β (π
β(π₯ / π))))))) |
146 | 73, 74, 38, 145 | lediv1dd 13071 |
. . . . 5
β’ ((π β§ π₯ β (1(,)+β)) β
((absβΞ£π β
(1...(ββπ₯))(((absβ(π
β(π₯ / π))) β (absβ(π
β(π₯ / (π + 1))))) Β· ((πβπ) β (2 Β· (π Β· (logβπ)))))) / (π₯ Β· (logβπ₯))) β€ ((π΄ Β· Ξ£π β (1...(ββπ₯))(π Β· (absβ((π
β(π₯ / (π + 1))) β (π
β(π₯ / π)))))) / (π₯ Β· (logβπ₯)))) |
147 | 38 | rpcnd 13015 |
. . . . . . 7
β’ ((π β§ π₯ β (1(,)+β)) β (π₯ Β· (logβπ₯)) β
β) |
148 | 38 | rpne0d 13018 |
. . . . . . 7
β’ ((π β§ π₯ β (1(,)+β)) β (π₯ Β· (logβπ₯)) β 0) |
149 | 72, 147, 148 | absdivd 15399 |
. . . . . 6
β’ ((π β§ π₯ β (1(,)+β)) β
(absβ(Ξ£π β
(1...(ββπ₯))(((absβ(π
β(π₯ / π))) β (absβ(π
β(π₯ / (π + 1))))) Β· ((πβπ) β (2 Β· (π Β· (logβπ))))) / (π₯ Β· (logβπ₯)))) = ((absβΞ£π β (1...(ββπ₯))(((absβ(π
β(π₯ / π))) β (absβ(π
β(π₯ / (π + 1))))) Β· ((πβπ) β (2 Β· (π Β· (logβπ)))))) / (absβ(π₯ Β· (logβπ₯))))) |
150 | 38 | rpred 13013 |
. . . . . . . 8
β’ ((π β§ π₯ β (1(,)+β)) β (π₯ Β· (logβπ₯)) β
β) |
151 | 38 | rpge0d 13017 |
. . . . . . . 8
β’ ((π β§ π₯ β (1(,)+β)) β 0 β€ (π₯ Β· (logβπ₯))) |
152 | 150, 151 | absidd 15366 |
. . . . . . 7
β’ ((π β§ π₯ β (1(,)+β)) β
(absβ(π₯ Β·
(logβπ₯))) = (π₯ Β· (logβπ₯))) |
153 | 152 | oveq2d 7422 |
. . . . . 6
β’ ((π β§ π₯ β (1(,)+β)) β
((absβΞ£π β
(1...(ββπ₯))(((absβ(π
β(π₯ / π))) β (absβ(π
β(π₯ / (π + 1))))) Β· ((πβπ) β (2 Β· (π Β· (logβπ)))))) / (absβ(π₯ Β· (logβπ₯)))) = ((absβΞ£π β (1...(ββπ₯))(((absβ(π
β(π₯ / π))) β (absβ(π
β(π₯ / (π + 1))))) Β· ((πβπ) β (2 Β· (π Β· (logβπ)))))) / (π₯ Β· (logβπ₯)))) |
154 | 149, 153 | eqtr2d 2774 |
. . . . 5
β’ ((π β§ π₯ β (1(,)+β)) β
((absβΞ£π β
(1...(ββπ₯))(((absβ(π
β(π₯ / π))) β (absβ(π
β(π₯ / (π + 1))))) Β· ((πβπ) β (2 Β· (π Β· (logβπ)))))) / (π₯ Β· (logβπ₯))) = (absβ(Ξ£π β (1...(ββπ₯))(((absβ(π
β(π₯ / π))) β (absβ(π
β(π₯ / (π + 1))))) Β· ((πβπ) β (2 Β· (π Β· (logβπ))))) / (π₯ Β· (logβπ₯))))) |
155 | 36 | recnd 11239 |
. . . . . 6
β’ ((π β§ π₯ β (1(,)+β)) β Ξ£π β
(1...(ββπ₯))(π Β· (absβ((π
β(π₯ / (π + 1))) β (π
β(π₯ / π))))) β β) |
156 | 141, 155,
147, 148 | divassd 12022 |
. . . . 5
β’ ((π β§ π₯ β (1(,)+β)) β ((π΄ Β· Ξ£π β
(1...(ββπ₯))(π Β· (absβ((π
β(π₯ / (π + 1))) β (π
β(π₯ / π)))))) / (π₯ Β· (logβπ₯))) = (π΄ Β· (Ξ£π β (1...(ββπ₯))(π Β· (absβ((π
β(π₯ / (π + 1))) β (π
β(π₯ / π))))) / (π₯ Β· (logβπ₯))))) |
157 | 146, 154,
156 | 3brtr3d 5179 |
. . . 4
β’ ((π β§ π₯ β (1(,)+β)) β
(absβ(Ξ£π β
(1...(ββπ₯))(((absβ(π
β(π₯ / π))) β (absβ(π
β(π₯ / (π + 1))))) Β· ((πβπ) β (2 Β· (π Β· (logβπ))))) / (π₯ Β· (logβπ₯)))) β€ (π΄ Β· (Ξ£π β (1...(ββπ₯))(π Β· (absβ((π
β(π₯ / (π + 1))) β (π
β(π₯ / π))))) / (π₯ Β· (logβπ₯))))) |
158 | 52 | leabsd 15358 |
. . . 4
β’ ((π β§ π₯ β (1(,)+β)) β (π΄ Β· (Ξ£π β
(1...(ββπ₯))(π Β· (absβ((π
β(π₯ / (π + 1))) β (π
β(π₯ / π))))) / (π₯ Β· (logβπ₯)))) β€ (absβ(π΄ Β· (Ξ£π β (1...(ββπ₯))(π Β· (absβ((π
β(π₯ / (π + 1))) β (π
β(π₯ / π))))) / (π₯ Β· (logβπ₯)))))) |
159 | 69, 52, 71, 157, 158 | letrd 11368 |
. . 3
β’ ((π β§ π₯ β (1(,)+β)) β
(absβ(Ξ£π β
(1...(ββπ₯))(((absβ(π
β(π₯ / π))) β (absβ(π
β(π₯ / (π + 1))))) Β· ((πβπ) β (2 Β· (π Β· (logβπ))))) / (π₯ Β· (logβπ₯)))) β€ (absβ(π΄ Β· (Ξ£π β (1...(ββπ₯))(π Β· (absβ((π
β(π₯ / (π + 1))) β (π
β(π₯ / π))))) / (π₯ Β· (logβπ₯)))))) |
160 | 159 | adantrr 716 |
. 2
β’ ((π β§ (π₯ β (1(,)+β) β§ 1 β€ π₯)) β
(absβ(Ξ£π β
(1...(ββπ₯))(((absβ(π
β(π₯ / π))) β (absβ(π
β(π₯ / (π + 1))))) Β· ((πβπ) β (2 Β· (π Β· (logβπ))))) / (π₯ Β· (logβπ₯)))) β€ (absβ(π΄ Β· (Ξ£π β (1...(ββπ₯))(π Β· (absβ((π
β(π₯ / (π + 1))) β (π
β(π₯ / π))))) / (π₯ Β· (logβπ₯)))))) |
161 | 1, 51, 52, 68, 160 | o1le 15596 |
1
β’ (π β (π₯ β (1(,)+β) β¦ (Ξ£π β
(1...(ββπ₯))(((absβ(π
β(π₯ / π))) β (absβ(π
β(π₯ / (π + 1))))) Β· ((πβπ) β (2 Β· (π Β· (logβπ))))) / (π₯ Β· (logβπ₯)))) β π(1)) |