Step | Hyp | Ref
| Expression |
1 | | ssidd 4004 |
. . . 4
β’ (β€
β β β β) |
2 | | 1red 11211 |
. . . 4
β’ (β€
β 1 β β) |
3 | | fzfid 13934 |
. . . . 5
β’
((β€ β§ π
β β) β (1...(ββπ)) β Fin) |
4 | | elfznn 13526 |
. . . . . . 7
β’ (π β
(1...(ββπ))
β π β
β) |
5 | 4 | adantl 483 |
. . . . . 6
β’
(((β€ β§ π
β β) β§ π
β (1...(ββπ))) β π β β) |
6 | | nnrp 12981 |
. . . . . . . . 9
β’ (π β β β π β
β+) |
7 | | pntrval.r |
. . . . . . . . . . 11
β’ π
= (π β β+ β¦
((Οβπ) β
π)) |
8 | 7 | pntrf 27046 |
. . . . . . . . . 10
β’ π
:β+βΆβ |
9 | 8 | ffvelcdmi 7081 |
. . . . . . . . 9
β’ (π β β+
β (π
βπ) β
β) |
10 | 6, 9 | syl 17 |
. . . . . . . 8
β’ (π β β β (π
βπ) β β) |
11 | | peano2nn 12220 |
. . . . . . . . 9
β’ (π β β β (π + 1) β
β) |
12 | | nnmulcl 12232 |
. . . . . . . . 9
β’ ((π β β β§ (π + 1) β β) β
(π Β· (π + 1)) β
β) |
13 | 11, 12 | mpdan 686 |
. . . . . . . 8
β’ (π β β β (π Β· (π + 1)) β β) |
14 | 10, 13 | nndivred 12262 |
. . . . . . 7
β’ (π β β β ((π
βπ) / (π Β· (π + 1))) β β) |
15 | 14 | recnd 11238 |
. . . . . 6
β’ (π β β β ((π
βπ) / (π Β· (π + 1))) β β) |
16 | 5, 15 | syl 17 |
. . . . 5
β’
(((β€ β§ π
β β) β§ π
β (1...(ββπ))) β ((π
βπ) / (π Β· (π + 1))) β β) |
17 | 3, 16 | fsumcl 15675 |
. . . 4
β’
((β€ β§ π
β β) β Ξ£π β (1...(ββπ))((π
βπ) / (π Β· (π + 1))) β β) |
18 | 7 | pntrsumo1 27048 |
. . . . 5
β’ (π β β β¦
Ξ£π β
(1...(ββπ))((π
βπ) / (π Β· (π + 1)))) β π(1) |
19 | 18 | a1i 11 |
. . . 4
β’ (β€
β (π β β
β¦ Ξ£π β
(1...(ββπ))((π
βπ) / (π Β· (π + 1)))) β
π(1)) |
20 | | fzfid 13934 |
. . . . 5
β’
((β€ β§ (π₯
β β β§ 1 β€ π₯)) β (1...(ββπ₯)) β Fin) |
21 | | elfznn 13526 |
. . . . . . . 8
β’ (π β
(1...(ββπ₯))
β π β
β) |
22 | 21 | adantl 483 |
. . . . . . 7
β’
(((β€ β§ (π₯
β β β§ 1 β€ π₯)) β§ π β (1...(ββπ₯))) β π β β) |
23 | 22, 15 | syl 17 |
. . . . . 6
β’
(((β€ β§ (π₯
β β β§ 1 β€ π₯)) β§ π β (1...(ββπ₯))) β ((π
βπ) / (π Β· (π + 1))) β β) |
24 | 23 | abscld 15379 |
. . . . 5
β’
(((β€ β§ (π₯
β β β§ 1 β€ π₯)) β§ π β (1...(ββπ₯))) β (absβ((π
βπ) / (π Β· (π + 1)))) β β) |
25 | 20, 24 | fsumrecl 15676 |
. . . 4
β’
((β€ β§ (π₯
β β β§ 1 β€ π₯)) β Ξ£π β (1...(ββπ₯))(absβ((π
βπ) / (π Β· (π + 1)))) β β) |
26 | 17 | adantr 482 |
. . . . . 6
β’
(((β€ β§ π
β β) β§ ((π₯
β β β§ 1 β€ π₯) β§ π < π₯)) β Ξ£π β (1...(ββπ))((π
βπ) / (π Β· (π + 1))) β β) |
27 | 26 | abscld 15379 |
. . . . 5
β’
(((β€ β§ π
β β) β§ ((π₯
β β β§ 1 β€ π₯) β§ π < π₯)) β (absβΞ£π β
(1...(ββπ))((π
βπ) / (π Β· (π + 1)))) β β) |
28 | | fzfid 13934 |
. . . . . 6
β’
(((β€ β§ π
β β) β§ ((π₯
β β β§ 1 β€ π₯) β§ π < π₯)) β (1...(ββπ)) β Fin) |
29 | 16 | adantlr 714 |
. . . . . . 7
β’
((((β€ β§ π
β β) β§ ((π₯
β β β§ 1 β€ π₯) β§ π < π₯)) β§ π β (1...(ββπ))) β ((π
βπ) / (π Β· (π + 1))) β β) |
30 | 29 | abscld 15379 |
. . . . . 6
β’
((((β€ β§ π
β β) β§ ((π₯
β β β§ 1 β€ π₯) β§ π < π₯)) β§ π β (1...(ββπ))) β (absβ((π
βπ) / (π Β· (π + 1)))) β β) |
31 | 28, 30 | fsumrecl 15676 |
. . . . 5
β’
(((β€ β§ π
β β) β§ ((π₯
β β β§ 1 β€ π₯) β§ π < π₯)) β Ξ£π β (1...(ββπ))(absβ((π
βπ) / (π Β· (π + 1)))) β β) |
32 | 25 | ad2ant2r 746 |
. . . . 5
β’
(((β€ β§ π
β β) β§ ((π₯
β β β§ 1 β€ π₯) β§ π < π₯)) β Ξ£π β (1...(ββπ₯))(absβ((π
βπ) / (π Β· (π + 1)))) β β) |
33 | 28, 29 | fsumabs 15743 |
. . . . 5
β’
(((β€ β§ π
β β) β§ ((π₯
β β β§ 1 β€ π₯) β§ π < π₯)) β (absβΞ£π β
(1...(ββπ))((π
βπ) / (π Β· (π + 1)))) β€ Ξ£π β (1...(ββπ))(absβ((π
βπ) / (π Β· (π + 1))))) |
34 | | fzfid 13934 |
. . . . . 6
β’
(((β€ β§ π
β β) β§ ((π₯
β β β§ 1 β€ π₯) β§ π < π₯)) β (1...(ββπ₯)) β Fin) |
35 | 21 | adantl 483 |
. . . . . . . 8
β’
((((β€ β§ π
β β) β§ ((π₯
β β β§ 1 β€ π₯) β§ π < π₯)) β§ π β (1...(ββπ₯))) β π β β) |
36 | 35, 15 | syl 17 |
. . . . . . 7
β’
((((β€ β§ π
β β) β§ ((π₯
β β β§ 1 β€ π₯) β§ π < π₯)) β§ π β (1...(ββπ₯))) β ((π
βπ) / (π Β· (π + 1))) β β) |
37 | 36 | abscld 15379 |
. . . . . 6
β’
((((β€ β§ π
β β) β§ ((π₯
β β β§ 1 β€ π₯) β§ π < π₯)) β§ π β (1...(ββπ₯))) β (absβ((π
βπ) / (π Β· (π + 1)))) β β) |
38 | 36 | absge0d 15387 |
. . . . . 6
β’
((((β€ β§ π
β β) β§ ((π₯
β β β§ 1 β€ π₯) β§ π < π₯)) β§ π β (1...(ββπ₯))) β 0 β€
(absβ((π
βπ) / (π Β· (π + 1))))) |
39 | | simplr 768 |
. . . . . . . 8
β’
(((β€ β§ π
β β) β§ ((π₯
β β β§ 1 β€ π₯) β§ π < π₯)) β π β β) |
40 | | simprll 778 |
. . . . . . . 8
β’
(((β€ β§ π
β β) β§ ((π₯
β β β§ 1 β€ π₯) β§ π < π₯)) β π₯ β β) |
41 | | simprr 772 |
. . . . . . . . 9
β’
(((β€ β§ π
β β) β§ ((π₯
β β β§ 1 β€ π₯) β§ π < π₯)) β π < π₯) |
42 | 39, 40, 41 | ltled 11358 |
. . . . . . . 8
β’
(((β€ β§ π
β β) β§ ((π₯
β β β§ 1 β€ π₯) β§ π < π₯)) β π β€ π₯) |
43 | | flword2 13774 |
. . . . . . . 8
β’ ((π β β β§ π₯ β β β§ π β€ π₯) β (ββπ₯) β
(β€β₯β(ββπ))) |
44 | 39, 40, 42, 43 | syl3anc 1372 |
. . . . . . 7
β’
(((β€ β§ π
β β) β§ ((π₯
β β β§ 1 β€ π₯) β§ π < π₯)) β (ββπ₯) β
(β€β₯β(ββπ))) |
45 | | fzss2 13537 |
. . . . . . 7
β’
((ββπ₯)
β (β€β₯β(ββπ)) β (1...(ββπ)) β
(1...(ββπ₯))) |
46 | 44, 45 | syl 17 |
. . . . . 6
β’
(((β€ β§ π
β β) β§ ((π₯
β β β§ 1 β€ π₯) β§ π < π₯)) β (1...(ββπ)) β
(1...(ββπ₯))) |
47 | 34, 37, 38, 46 | fsumless 15738 |
. . . . 5
β’
(((β€ β§ π
β β) β§ ((π₯
β β β§ 1 β€ π₯) β§ π < π₯)) β Ξ£π β (1...(ββπ))(absβ((π
βπ) / (π Β· (π + 1)))) β€ Ξ£π β (1...(ββπ₯))(absβ((π
βπ) / (π Β· (π + 1))))) |
48 | 27, 31, 32, 33, 47 | letrd 11367 |
. . . 4
β’
(((β€ β§ π
β β) β§ ((π₯
β β β§ 1 β€ π₯) β§ π < π₯)) β (absβΞ£π β
(1...(ββπ))((π
βπ) / (π Β· (π + 1)))) β€ Ξ£π β (1...(ββπ₯))(absβ((π
βπ) / (π Β· (π + 1))))) |
49 | 1, 2, 17, 19, 25, 48 | o1bddrp 15482 |
. . 3
β’ (β€
β βπ β
β+ βπ β β (absβΞ£π β
(1...(ββπ))((π
βπ) / (π Β· (π + 1)))) β€ π) |
50 | 49 | mptru 1549 |
. 2
β’
βπ β
β+ βπ β β (absβΞ£π β
(1...(ββπ))((π
βπ) / (π Β· (π + 1)))) β€ π |
51 | | zre 12558 |
. . . . . 6
β’ (π β β€ β π β
β) |
52 | 51 | imim1i 63 |
. . . . 5
β’ ((π β β β
(absβΞ£π β
(1...(ββπ))((π
βπ) / (π Β· (π + 1)))) β€ π) β (π β β€ β
(absβΞ£π β
(1...(ββπ))((π
βπ) / (π Β· (π + 1)))) β€ π)) |
53 | | flid 13769 |
. . . . . . . . 9
β’ (π β β€ β
(ββπ) = π) |
54 | 53 | oveq2d 7420 |
. . . . . . . 8
β’ (π β β€ β
(1...(ββπ)) =
(1...π)) |
55 | 54 | sumeq1d 15643 |
. . . . . . 7
β’ (π β β€ β
Ξ£π β
(1...(ββπ))((π
βπ) / (π Β· (π + 1))) = Ξ£π β (1...π)((π
βπ) / (π Β· (π + 1)))) |
56 | 55 | fveq2d 6892 |
. . . . . 6
β’ (π β β€ β
(absβΞ£π β
(1...(ββπ))((π
βπ) / (π Β· (π + 1)))) = (absβΞ£π β (1...π)((π
βπ) / (π Β· (π + 1))))) |
57 | 56 | breq1d 5157 |
. . . . 5
β’ (π β β€ β
((absβΞ£π β
(1...(ββπ))((π
βπ) / (π Β· (π + 1)))) β€ π β (absβΞ£π β (1...π)((π
βπ) / (π Β· (π + 1)))) β€ π)) |
58 | 52, 57 | mpbidi 240 |
. . . 4
β’ ((π β β β
(absβΞ£π β
(1...(ββπ))((π
βπ) / (π Β· (π + 1)))) β€ π) β (π β β€ β
(absβΞ£π β
(1...π)((π
βπ) / (π Β· (π + 1)))) β€ π)) |
59 | 58 | ralimi2 3079 |
. . 3
β’
(βπ β
β (absβΞ£π
β (1...(ββπ))((π
βπ) / (π Β· (π + 1)))) β€ π β βπ β β€ (absβΞ£π β (1...π)((π
βπ) / (π Β· (π + 1)))) β€ π) |
60 | 59 | reximi 3085 |
. 2
β’
(βπ β
β+ βπ β β (absβΞ£π β
(1...(ββπ))((π
βπ) / (π Β· (π + 1)))) β€ π β βπ β β+ βπ β β€
(absβΞ£π β
(1...π)((π
βπ) / (π Β· (π + 1)))) β€ π) |
61 | 50, 60 | ax-mp 5 |
1
β’
βπ β
β+ βπ β β€ (absβΞ£π β (1...π)((π
βπ) / (π Β· (π + 1)))) β€ π |