Step | Hyp | Ref
| Expression |
1 | | nnuz 9565 |
. . 3
β’ β =
(β€β₯β1) |
2 | | 1zzd 9282 |
. . 3
β’ (π β 1 β
β€) |
3 | | cvgratnn.6 |
. . 3
β’ ((π β§ π β β) β (πΉβπ) β β) |
4 | 1, 2, 3 | serf 10476 |
. 2
β’ (π β seq1( + , πΉ):ββΆβ) |
5 | | cvgratnn.3 |
. . . . . . . . . 10
β’ (π β π΄ β β) |
6 | | cvgratnn.gt0 |
. . . . . . . . . 10
β’ (π β 0 < π΄) |
7 | 5, 6 | elrpd 9695 |
. . . . . . . . 9
β’ (π β π΄ β
β+) |
8 | 7 | rprecred 9710 |
. . . . . . . 8
β’ (π β (1 / π΄) β β) |
9 | | 1red 7974 |
. . . . . . . 8
β’ (π β 1 β
β) |
10 | 8, 9 | resubcld 8340 |
. . . . . . 7
β’ (π β ((1 / π΄) β 1) β
β) |
11 | | cvgratnn.4 |
. . . . . . . . 9
β’ (π β π΄ < 1) |
12 | 7 | reclt1d 9712 |
. . . . . . . . 9
β’ (π β (π΄ < 1 β 1 < (1 / π΄))) |
13 | 11, 12 | mpbid 147 |
. . . . . . . 8
β’ (π β 1 < (1 / π΄)) |
14 | 9, 8 | posdifd 8491 |
. . . . . . . 8
β’ (π β (1 < (1 / π΄) β 0 < ((1 / π΄) β 1))) |
15 | 13, 14 | mpbid 147 |
. . . . . . 7
β’ (π β 0 < ((1 / π΄) β 1)) |
16 | 10, 15 | elrpd 9695 |
. . . . . 6
β’ (π β ((1 / π΄) β 1) β
β+) |
17 | 16 | rpreccld 9709 |
. . . . 5
β’ (π β (1 / ((1 / π΄) β 1)) β
β+) |
18 | 17, 7 | rpdivcld 9716 |
. . . 4
β’ (π β ((1 / ((1 / π΄) β 1)) / π΄) β
β+) |
19 | | fveq2 5517 |
. . . . . . . 8
β’ (π = 1 β (πΉβπ) = (πΉβ1)) |
20 | 19 | eleq1d 2246 |
. . . . . . 7
β’ (π = 1 β ((πΉβπ) β β β (πΉβ1) β β)) |
21 | 3 | ralrimiva 2550 |
. . . . . . 7
β’ (π β βπ β β (πΉβπ) β β) |
22 | | 1nn 8932 |
. . . . . . . 8
β’ 1 β
β |
23 | 22 | a1i 9 |
. . . . . . 7
β’ (π β 1 β
β) |
24 | 20, 21, 23 | rspcdva 2848 |
. . . . . 6
β’ (π β (πΉβ1) β β) |
25 | 24 | abscld 11192 |
. . . . 5
β’ (π β (absβ(πΉβ1)) β
β) |
26 | 24 | absge0d 11195 |
. . . . 5
β’ (π β 0 β€ (absβ(πΉβ1))) |
27 | 25, 26 | ge0p1rpd 9729 |
. . . 4
β’ (π β ((absβ(πΉβ1)) + 1) β
β+) |
28 | 18, 27 | rpmulcld 9715 |
. . 3
β’ (π β (((1 / ((1 / π΄) β 1)) / π΄) Β· ((absβ(πΉβ1)) + 1)) β
β+) |
29 | 9, 5 | resubcld 8340 |
. . . . 5
β’ (π β (1 β π΄) β
β) |
30 | 5, 9 | posdifd 8491 |
. . . . . 6
β’ (π β (π΄ < 1 β 0 < (1 β π΄))) |
31 | 11, 30 | mpbid 147 |
. . . . 5
β’ (π β 0 < (1 β π΄)) |
32 | 29, 31 | elrpd 9695 |
. . . 4
β’ (π β (1 β π΄) β
β+) |
33 | 7, 32 | rpdivcld 9716 |
. . 3
β’ (π β (π΄ / (1 β π΄)) β
β+) |
34 | 28, 33 | rpmulcld 9715 |
. 2
β’ (π β ((((1 / ((1 / π΄) β 1)) / π΄) Β· ((absβ(πΉβ1)) + 1)) Β· (π΄ / (1 β π΄))) β
β+) |
35 | 5 | adantr 276 |
. . . 4
β’ ((π β§ (π β β β§ π β (β€β₯βπ))) β π΄ β β) |
36 | 11 | adantr 276 |
. . . 4
β’ ((π β§ (π β β β§ π β (β€β₯βπ))) β π΄ < 1) |
37 | 6 | adantr 276 |
. . . 4
β’ ((π β§ (π β β β§ π β (β€β₯βπ))) β 0 < π΄) |
38 | 3 | adantlr 477 |
. . . 4
β’ (((π β§ (π β β β§ π β (β€β₯βπ))) β§ π β β) β (πΉβπ) β β) |
39 | | cvgratnn.7 |
. . . . 5
β’ ((π β§ π β β) β (absβ(πΉβ(π + 1))) β€ (π΄ Β· (absβ(πΉβπ)))) |
40 | 39 | adantlr 477 |
. . . 4
β’ (((π β§ (π β β β§ π β (β€β₯βπ))) β§ π β β) β (absβ(πΉβ(π + 1))) β€ (π΄ Β· (absβ(πΉβπ)))) |
41 | | simprl 529 |
. . . 4
β’ ((π β§ (π β β β§ π β (β€β₯βπ))) β π β β) |
42 | | simprr 531 |
. . . 4
β’ ((π β§ (π β β β§ π β (β€β₯βπ))) β π β (β€β₯βπ)) |
43 | 35, 36, 37, 38, 40, 41, 42 | cvgratnnlemrate 11540 |
. . 3
β’ ((π β§ (π β β β§ π β (β€β₯βπ))) β (absβ((seq1( +
, πΉ)βπ) β (seq1( + , πΉ)βπ))) < (((((1 / ((1 / π΄) β 1)) / π΄) Β· ((absβ(πΉβ1)) + 1)) Β· (π΄ / (1 β π΄))) / π)) |
44 | 43 | ralrimivva 2559 |
. 2
β’ (π β βπ β β βπ β (β€β₯βπ)(absβ((seq1( + , πΉ)βπ) β (seq1( + , πΉ)βπ))) < (((((1 / ((1 / π΄) β 1)) / π΄) Β· ((absβ(πΉβ1)) + 1)) Β· (π΄ / (1 β π΄))) / π)) |
45 | 4, 34, 44 | climcvg1n 11360 |
1
β’ (π β seq1( + , πΉ) β dom β
) |