Step | Hyp | Ref
| Expression |
1 | | nnuz 9565 |
. . 3
β’ β =
(β€β₯β1) |
2 | | 1zzd 9282 |
. . 3
β’ (π β 1 β
β€) |
3 | | mertens.9 |
. . . . 5
β’ (π β πΈ β
β+) |
4 | 3 | rphalfcld 9711 |
. . . 4
β’ (π β (πΈ / 2) β
β+) |
5 | | nn0uz 9564 |
. . . . . 6
β’
β0 = (β€β₯β0) |
6 | | 0zd 9267 |
. . . . . 6
β’ (π β 0 β
β€) |
7 | | eqidd 2178 |
. . . . . 6
β’ ((π β§ π β β0) β (πΎβπ) = (πΎβπ)) |
8 | | mertens.2 |
. . . . . . 7
β’ ((π β§ π β β0) β (πΎβπ) = (absβπ΄)) |
9 | | mertens.3 |
. . . . . . . 8
β’ ((π β§ π β β0) β π΄ β
β) |
10 | 9 | abscld 11192 |
. . . . . . 7
β’ ((π β§ π β β0) β
(absβπ΄) β
β) |
11 | 8, 10 | eqeltrd 2254 |
. . . . . 6
β’ ((π β§ π β β0) β (πΎβπ) β β) |
12 | | mertens.7 |
. . . . . 6
β’ (π β seq0( + , πΎ) β dom β
) |
13 | 5, 6, 7, 11, 12 | isumrecl 11439 |
. . . . 5
β’ (π β Ξ£π β β0 (πΎβπ) β β) |
14 | 9 | absge0d 11195 |
. . . . . . 7
β’ ((π β§ π β β0) β 0 β€
(absβπ΄)) |
15 | 14, 8 | breqtrrd 4033 |
. . . . . 6
β’ ((π β§ π β β0) β 0 β€
(πΎβπ)) |
16 | 5, 6, 7, 11, 12, 15 | isumge0 11440 |
. . . . 5
β’ (π β 0 β€ Ξ£π β β0
(πΎβπ)) |
17 | 13, 16 | ge0p1rpd 9729 |
. . . 4
β’ (π β (Ξ£π β β0 (πΎβπ) + 1) β
β+) |
18 | 4, 17 | rpdivcld 9716 |
. . 3
β’ (π β ((πΈ / 2) / (Ξ£π β β0 (πΎβπ) + 1)) β
β+) |
19 | | eqidd 2178 |
. . 3
β’ ((π β§ π β β) β (seq0( + , πΊ)βπ) = (seq0( + , πΊ)βπ)) |
20 | | mertens.4 |
. . . 4
β’ ((π β§ π β β0) β (πΊβπ) = π΅) |
21 | | mertens.5 |
. . . 4
β’ ((π β§ π β β0) β π΅ β
β) |
22 | | mertens.8 |
. . . 4
β’ (π β seq0( + , πΊ) β dom β
) |
23 | 5, 6, 20, 21, 22 | isumclim2 11432 |
. . 3
β’ (π β seq0( + , πΊ) β Ξ£π β β0
π΅) |
24 | 1, 2, 18, 19, 23 | climi2 11298 |
. 2
β’ (π β βπ β β βπ β (β€β₯βπ )(absβ((seq0( + , πΊ)βπ) β Ξ£π β β0 π΅)) < ((πΈ / 2) / (Ξ£π β β0 (πΎβπ) + 1))) |
25 | | eluznn 9602 |
. . . . . . . 8
β’ ((π β β β§ π β
(β€β₯βπ )) β π β β) |
26 | 20, 21 | eqeltrd 2254 |
. . . . . . . . . . . . 13
β’ ((π β§ π β β0) β (πΊβπ) β β) |
27 | 5, 6, 26 | serf 10476 |
. . . . . . . . . . . 12
β’ (π β seq0( + , πΊ):β0βΆβ) |
28 | | nnnn0 9185 |
. . . . . . . . . . . 12
β’ (π β β β π β
β0) |
29 | | ffvelcdm 5651 |
. . . . . . . . . . . 12
β’ ((seq0( +
, πΊ):β0βΆβ β§
π β
β0) β (seq0( + , πΊ)βπ) β β) |
30 | 27, 28, 29 | syl2an 289 |
. . . . . . . . . . 11
β’ ((π β§ π β β) β (seq0( + , πΊ)βπ) β β) |
31 | 5, 6, 20, 21, 22 | isumcl 11435 |
. . . . . . . . . . . 12
β’ (π β Ξ£π β β0 π΅ β β) |
32 | 31 | adantr 276 |
. . . . . . . . . . 11
β’ ((π β§ π β β) β Ξ£π β β0
π΅ β
β) |
33 | 30, 32 | abssubd 11204 |
. . . . . . . . . 10
β’ ((π β§ π β β) β (absβ((seq0( +
, πΊ)βπ) β Ξ£π β β0
π΅)) =
(absβ(Ξ£π β
β0 π΅
β (seq0( + , πΊ)βπ)))) |
34 | | eqid 2177 |
. . . . . . . . . . . . . 14
β’
(β€β₯β(π + 1)) = (β€β₯β(π + 1)) |
35 | 28 | adantl 277 |
. . . . . . . . . . . . . . . 16
β’ ((π β§ π β β) β π β β0) |
36 | | peano2nn0 9218 |
. . . . . . . . . . . . . . . 16
β’ (π β β0
β (π + 1) β
β0) |
37 | 35, 36 | syl 14 |
. . . . . . . . . . . . . . 15
β’ ((π β§ π β β) β (π + 1) β
β0) |
38 | 37 | nn0zd 9375 |
. . . . . . . . . . . . . 14
β’ ((π β§ π β β) β (π + 1) β β€) |
39 | | simpll 527 |
. . . . . . . . . . . . . . 15
β’ (((π β§ π β β) β§ π β (β€β₯β(π + 1))) β π) |
40 | | eluznn0 9601 |
. . . . . . . . . . . . . . . 16
β’ (((π + 1) β β0
β§ π β
(β€β₯β(π + 1))) β π β β0) |
41 | 37, 40 | sylan 283 |
. . . . . . . . . . . . . . 15
β’ (((π β§ π β β) β§ π β (β€β₯β(π + 1))) β π β
β0) |
42 | 39, 41, 20 | syl2anc 411 |
. . . . . . . . . . . . . 14
β’ (((π β§ π β β) β§ π β (β€β₯β(π + 1))) β (πΊβπ) = π΅) |
43 | 39, 41, 21 | syl2anc 411 |
. . . . . . . . . . . . . 14
β’ (((π β§ π β β) β§ π β (β€β₯β(π + 1))) β π΅ β β) |
44 | 22 | adantr 276 |
. . . . . . . . . . . . . . 15
β’ ((π β§ π β β) β seq0( + , πΊ) β dom β
) |
45 | 26 | adantlr 477 |
. . . . . . . . . . . . . . . 16
β’ (((π β§ π β β) β§ π β β0) β (πΊβπ) β β) |
46 | 5, 37, 45 | iserex 11349 |
. . . . . . . . . . . . . . 15
β’ ((π β§ π β β) β (seq0( + , πΊ) β dom β β
seq(π + 1)( + , πΊ) β dom β
)) |
47 | 44, 46 | mpbid 147 |
. . . . . . . . . . . . . 14
β’ ((π β§ π β β) β seq(π + 1)( + , πΊ) β dom β ) |
48 | 34, 38, 42, 43, 47 | isumcl 11435 |
. . . . . . . . . . . . 13
β’ ((π β§ π β β) β Ξ£π β
(β€β₯β(π + 1))π΅ β β) |
49 | 30, 48 | pncan2d 8272 |
. . . . . . . . . . . 12
β’ ((π β§ π β β) β (((seq0( + , πΊ)βπ) + Ξ£π β (β€β₯β(π + 1))π΅) β (seq0( + , πΊ)βπ)) = Ξ£π β (β€β₯β(π + 1))π΅) |
50 | 20 | adantlr 477 |
. . . . . . . . . . . . . . 15
β’ (((π β§ π β β) β§ π β β0) β (πΊβπ) = π΅) |
51 | 21 | adantlr 477 |
. . . . . . . . . . . . . . 15
β’ (((π β§ π β β) β§ π β β0) β π΅ β
β) |
52 | 5, 34, 37, 50, 51, 44 | isumsplit 11501 |
. . . . . . . . . . . . . 14
β’ ((π β§ π β β) β Ξ£π β β0
π΅ = (Ξ£π β (0...((π + 1) β 1))π΅ + Ξ£π β (β€β₯β(π + 1))π΅)) |
53 | | nncn 8929 |
. . . . . . . . . . . . . . . . . . . 20
β’ (π β β β π β
β) |
54 | 53 | adantl 277 |
. . . . . . . . . . . . . . . . . . 19
β’ ((π β§ π β β) β π β β) |
55 | | ax-1cn 7906 |
. . . . . . . . . . . . . . . . . . 19
β’ 1 β
β |
56 | | pncan 8165 |
. . . . . . . . . . . . . . . . . . 19
β’ ((π β β β§ 1 β
β) β ((π + 1)
β 1) = π) |
57 | 54, 55, 56 | sylancl 413 |
. . . . . . . . . . . . . . . . . 18
β’ ((π β§ π β β) β ((π + 1) β 1) = π) |
58 | 57 | oveq2d 5893 |
. . . . . . . . . . . . . . . . 17
β’ ((π β§ π β β) β (0...((π + 1) β 1)) = (0...π)) |
59 | 58 | sumeq1d 11376 |
. . . . . . . . . . . . . . . 16
β’ ((π β§ π β β) β Ξ£π β (0...((π + 1) β 1))π΅ = Ξ£π β (0...π)π΅) |
60 | | elnn0uz 9567 |
. . . . . . . . . . . . . . . . . 18
β’ (π β β0
β π β
(β€β₯β0)) |
61 | 60, 50 | sylan2br 288 |
. . . . . . . . . . . . . . . . 17
β’ (((π β§ π β β) β§ π β (β€β₯β0))
β (πΊβπ) = π΅) |
62 | 35, 5 | eleqtrdi 2270 |
. . . . . . . . . . . . . . . . 17
β’ ((π β§ π β β) β π β
(β€β₯β0)) |
63 | 60, 51 | sylan2br 288 |
. . . . . . . . . . . . . . . . 17
β’ (((π β§ π β β) β§ π β (β€β₯β0))
β π΅ β
β) |
64 | 61, 62, 63 | fsum3ser 11407 |
. . . . . . . . . . . . . . . 16
β’ ((π β§ π β β) β Ξ£π β (0...π)π΅ = (seq0( + , πΊ)βπ)) |
65 | 59, 64 | eqtrd 2210 |
. . . . . . . . . . . . . . 15
β’ ((π β§ π β β) β Ξ£π β (0...((π + 1) β 1))π΅ = (seq0( + , πΊ)βπ)) |
66 | 65 | oveq1d 5892 |
. . . . . . . . . . . . . 14
β’ ((π β§ π β β) β (Ξ£π β (0...((π + 1) β 1))π΅ + Ξ£π β (β€β₯β(π + 1))π΅) = ((seq0( + , πΊ)βπ) + Ξ£π β (β€β₯β(π + 1))π΅)) |
67 | 52, 66 | eqtrd 2210 |
. . . . . . . . . . . . 13
β’ ((π β§ π β β) β Ξ£π β β0
π΅ = ((seq0( + , πΊ)βπ) + Ξ£π β (β€β₯β(π + 1))π΅)) |
68 | 67 | oveq1d 5892 |
. . . . . . . . . . . 12
β’ ((π β§ π β β) β (Ξ£π β β0
π΅ β (seq0( + , πΊ)βπ)) = (((seq0( + , πΊ)βπ) + Ξ£π β (β€β₯β(π + 1))π΅) β (seq0( + , πΊ)βπ))) |
69 | 42 | sumeq2dv 11378 |
. . . . . . . . . . . 12
β’ ((π β§ π β β) β Ξ£π β
(β€β₯β(π + 1))(πΊβπ) = Ξ£π β (β€β₯β(π + 1))π΅) |
70 | 49, 68, 69 | 3eqtr4d 2220 |
. . . . . . . . . . 11
β’ ((π β§ π β β) β (Ξ£π β β0
π΅ β (seq0( + , πΊ)βπ)) = Ξ£π β (β€β₯β(π + 1))(πΊβπ)) |
71 | 70 | fveq2d 5521 |
. . . . . . . . . 10
β’ ((π β§ π β β) β
(absβ(Ξ£π β
β0 π΅
β (seq0( + , πΊ)βπ))) = (absβΞ£π β (β€β₯β(π + 1))(πΊβπ))) |
72 | 33, 71 | eqtrd 2210 |
. . . . . . . . 9
β’ ((π β§ π β β) β (absβ((seq0( +
, πΊ)βπ) β Ξ£π β β0
π΅)) =
(absβΞ£π β
(β€β₯β(π + 1))(πΊβπ))) |
73 | 72 | breq1d 4015 |
. . . . . . . 8
β’ ((π β§ π β β) β ((absβ((seq0( +
, πΊ)βπ) β Ξ£π β β0
π΅)) < ((πΈ / 2) / (Ξ£π β β0
(πΎβπ) + 1)) β (absβΞ£π β
(β€β₯β(π + 1))(πΊβπ)) < ((πΈ / 2) / (Ξ£π β β0 (πΎβπ) + 1)))) |
74 | 25, 73 | sylan2 286 |
. . . . . . 7
β’ ((π β§ (π β β β§ π β (β€β₯βπ ))) β ((absβ((seq0( +
, πΊ)βπ) β Ξ£π β β0
π΅)) < ((πΈ / 2) / (Ξ£π β β0
(πΎβπ) + 1)) β (absβΞ£π β
(β€β₯β(π + 1))(πΊβπ)) < ((πΈ / 2) / (Ξ£π β β0 (πΎβπ) + 1)))) |
75 | 74 | anassrs 400 |
. . . . . 6
β’ (((π β§ π β β) β§ π β (β€β₯βπ )) β ((absβ((seq0( +
, πΊ)βπ) β Ξ£π β β0
π΅)) < ((πΈ / 2) / (Ξ£π β β0
(πΎβπ) + 1)) β (absβΞ£π β
(β€β₯β(π + 1))(πΊβπ)) < ((πΈ / 2) / (Ξ£π β β0 (πΎβπ) + 1)))) |
76 | 75 | ralbidva 2473 |
. . . . 5
β’ ((π β§ π β β) β (βπ β
(β€β₯βπ )(absβ((seq0( + , πΊ)βπ) β Ξ£π β β0 π΅)) < ((πΈ / 2) / (Ξ£π β β0 (πΎβπ) + 1)) β βπ β (β€β₯βπ )(absβΞ£π β
(β€β₯β(π + 1))(πΊβπ)) < ((πΈ / 2) / (Ξ£π β β0 (πΎβπ) + 1)))) |
77 | | fvoveq1 5900 |
. . . . . . . . 9
β’ (π = π β (β€β₯β(π + 1)) =
(β€β₯β(π + 1))) |
78 | 77 | sumeq1d 11376 |
. . . . . . . 8
β’ (π = π β Ξ£π β (β€β₯β(π + 1))(πΊβπ) = Ξ£π β (β€β₯β(π + 1))(πΊβπ)) |
79 | 78 | fveq2d 5521 |
. . . . . . 7
β’ (π = π β (absβΞ£π β (β€β₯β(π + 1))(πΊβπ)) = (absβΞ£π β (β€β₯β(π + 1))(πΊβπ))) |
80 | 79 | breq1d 4015 |
. . . . . 6
β’ (π = π β ((absβΞ£π β (β€β₯β(π + 1))(πΊβπ)) < ((πΈ / 2) / (Ξ£π β β0 (πΎβπ) + 1)) β (absβΞ£π β
(β€β₯β(π + 1))(πΊβπ)) < ((πΈ / 2) / (Ξ£π β β0 (πΎβπ) + 1)))) |
81 | 80 | cbvralv 2705 |
. . . . 5
β’
(βπ β
(β€β₯βπ )(absβΞ£π β (β€β₯β(π + 1))(πΊβπ)) < ((πΈ / 2) / (Ξ£π β β0 (πΎβπ) + 1)) β βπ β (β€β₯βπ )(absβΞ£π β
(β€β₯β(π + 1))(πΊβπ)) < ((πΈ / 2) / (Ξ£π β β0 (πΎβπ) + 1))) |
82 | 76, 81 | bitrdi 196 |
. . . 4
β’ ((π β§ π β β) β (βπ β
(β€β₯βπ )(absβ((seq0( + , πΊ)βπ) β Ξ£π β β0 π΅)) < ((πΈ / 2) / (Ξ£π β β0 (πΎβπ) + 1)) β βπ β (β€β₯βπ )(absβΞ£π β
(β€β₯β(π + 1))(πΊβπ)) < ((πΈ / 2) / (Ξ£π β β0 (πΎβπ) + 1)))) |
83 | | mertens.11 |
. . . . . 6
β’ (π β (π β β β§ βπ β
(β€β₯βπ )(absβΞ£π β (β€β₯β(π + 1))(πΊβπ)) < ((πΈ / 2) / (Ξ£π β β0 (πΎβπ) + 1)))) |
84 | | 0zd 9267 |
. . . . . . . . . 10
β’ ((π β§ π) β 0 β β€) |
85 | 4 | adantr 276 |
. . . . . . . . . . . 12
β’ ((π β§ π) β (πΈ / 2) β
β+) |
86 | 83 | simplbi 274 |
. . . . . . . . . . . . . 14
β’ (π β π β β) |
87 | 86 | adantl 277 |
. . . . . . . . . . . . 13
β’ ((π β§ π) β π β β) |
88 | 87 | nnrpd 9696 |
. . . . . . . . . . . 12
β’ ((π β§ π) β π β β+) |
89 | 85, 88 | rpdivcld 9716 |
. . . . . . . . . . 11
β’ ((π β§ π) β ((πΈ / 2) / π ) β
β+) |
90 | 87 | nnzd 9376 |
. . . . . . . . . . . . . . 15
β’ ((π β§ π) β π β β€) |
91 | | 1zzd 9282 |
. . . . . . . . . . . . . . 15
β’ ((π β§ π) β 1 β β€) |
92 | 90, 91 | zsubcld 9382 |
. . . . . . . . . . . . . 14
β’ ((π β§ π) β (π β 1) β β€) |
93 | 84, 92 | fzfigd 10433 |
. . . . . . . . . . . . 13
β’ ((π β§ π) β (0...(π β 1)) β Fin) |
94 | | eqid 2177 |
. . . . . . . . . . . . . . 15
β’
(β€β₯β(π + 1)) = (β€β₯β(π + 1)) |
95 | | elfznn0 10116 |
. . . . . . . . . . . . . . . . . 18
β’ (π β (0...(π β 1)) β π β β0) |
96 | 95 | adantl 277 |
. . . . . . . . . . . . . . . . 17
β’ (((π β§ π) β§ π β (0...(π β 1))) β π β β0) |
97 | | peano2nn0 9218 |
. . . . . . . . . . . . . . . . 17
β’ (π β β0
β (π + 1) β
β0) |
98 | 96, 97 | syl 14 |
. . . . . . . . . . . . . . . 16
β’ (((π β§ π) β§ π β (0...(π β 1))) β (π + 1) β
β0) |
99 | 98 | nn0zd 9375 |
. . . . . . . . . . . . . . 15
β’ (((π β§ π) β§ π β (0...(π β 1))) β (π + 1) β β€) |
100 | | eqidd 2178 |
. . . . . . . . . . . . . . 15
β’ ((((π β§ π) β§ π β (0...(π β 1))) β§ π β (β€β₯β(π + 1))) β (πΊβπ) = (πΊβπ)) |
101 | | simplll 533 |
. . . . . . . . . . . . . . . 16
β’ ((((π β§ π) β§ π β (0...(π β 1))) β§ π β (β€β₯β(π + 1))) β π) |
102 | | eluznn0 9601 |
. . . . . . . . . . . . . . . . 17
β’ (((π + 1) β β0
β§ π β
(β€β₯β(π + 1))) β π β β0) |
103 | 98, 102 | sylan 283 |
. . . . . . . . . . . . . . . 16
β’ ((((π β§ π) β§ π β (0...(π β 1))) β§ π β (β€β₯β(π + 1))) β π β
β0) |
104 | 101, 103,
26 | syl2anc 411 |
. . . . . . . . . . . . . . 15
β’ ((((π β§ π) β§ π β (0...(π β 1))) β§ π β (β€β₯β(π + 1))) β (πΊβπ) β β) |
105 | 22 | ad2antrr 488 |
. . . . . . . . . . . . . . . 16
β’ (((π β§ π) β§ π β (0...(π β 1))) β seq0( + , πΊ) β dom β
) |
106 | | simpll 527 |
. . . . . . . . . . . . . . . . . 18
β’ (((π β§ π) β§ π β (0...(π β 1))) β π) |
107 | 106, 26 | sylan 283 |
. . . . . . . . . . . . . . . . 17
β’ ((((π β§ π) β§ π β (0...(π β 1))) β§ π β β0) β (πΊβπ) β β) |
108 | 5, 98, 107 | iserex 11349 |
. . . . . . . . . . . . . . . 16
β’ (((π β§ π) β§ π β (0...(π β 1))) β (seq0( + , πΊ) β dom β β
seq(π + 1)( + , πΊ) β dom β
)) |
109 | 105, 108 | mpbid 147 |
. . . . . . . . . . . . . . 15
β’ (((π β§ π) β§ π β (0...(π β 1))) β seq(π + 1)( + , πΊ) β dom β ) |
110 | 94, 99, 100, 104, 109 | isumcl 11435 |
. . . . . . . . . . . . . 14
β’ (((π β§ π) β§ π β (0...(π β 1))) β Ξ£π β
(β€β₯β(π + 1))(πΊβπ) β β) |
111 | 110 | abscld 11192 |
. . . . . . . . . . . . 13
β’ (((π β§ π) β§ π β (0...(π β 1))) β (absβΞ£π β
(β€β₯β(π + 1))(πΊβπ)) β β) |
112 | 93, 111 | fsumrecl 11411 |
. . . . . . . . . . . 12
β’ ((π β§ π) β Ξ£π β (0...(π β 1))(absβΞ£π β
(β€β₯β(π + 1))(πΊβπ)) β β) |
113 | | 0red 7960 |
. . . . . . . . . . . . 13
β’ ((π β§ π) β 0 β β) |
114 | | nnnn0 9185 |
. . . . . . . . . . . . . . . . 17
β’ (π β β β π β
β0) |
115 | 114, 20 | sylan2 286 |
. . . . . . . . . . . . . . . 16
β’ ((π β§ π β β) β (πΊβπ) = π΅) |
116 | 114, 21 | sylan2 286 |
. . . . . . . . . . . . . . . 16
β’ ((π β§ π β β) β π΅ β β) |
117 | | 1nn0 9194 |
. . . . . . . . . . . . . . . . . . 19
β’ 1 β
β0 |
118 | 117 | a1i 9 |
. . . . . . . . . . . . . . . . . 18
β’ (π β 1 β
β0) |
119 | 5, 118, 26 | iserex 11349 |
. . . . . . . . . . . . . . . . 17
β’ (π β (seq0( + , πΊ) β dom β β
seq1( + , πΊ) β dom
β )) |
120 | 22, 119 | mpbid 147 |
. . . . . . . . . . . . . . . 16
β’ (π β seq1( + , πΊ) β dom β
) |
121 | 1, 2, 115, 116, 120 | isumcl 11435 |
. . . . . . . . . . . . . . 15
β’ (π β Ξ£π β β π΅ β β) |
122 | 121 | adantr 276 |
. . . . . . . . . . . . . 14
β’ ((π β§ π) β Ξ£π β β π΅ β β) |
123 | 122 | abscld 11192 |
. . . . . . . . . . . . 13
β’ ((π β§ π) β (absβΞ£π β β π΅) β
β) |
124 | 122 | absge0d 11195 |
. . . . . . . . . . . . 13
β’ ((π β§ π) β 0 β€ (absβΞ£π β β π΅)) |
125 | 20 | adantlr 477 |
. . . . . . . . . . . . . 14
β’ (((π β§ π) β§ π β β0) β (πΊβπ) = π΅) |
126 | 21 | adantlr 477 |
. . . . . . . . . . . . . 14
β’ (((π β§ π) β§ π β β0) β π΅ β
β) |
127 | 22 | adantr 276 |
. . . . . . . . . . . . . 14
β’ ((π β§ π) β seq0( + , πΊ) β dom β ) |
128 | | mertens.10 |
. . . . . . . . . . . . . 14
β’ π = {π§ β£ βπ β (0...(π β 1))π§ = (absβΞ£π β (β€β₯β(π + 1))(πΊβπ))} |
129 | | nnm1nn0 9219 |
. . . . . . . . . . . . . . . . . . 19
β’ (π β β β (π β 1) β
β0) |
130 | 87, 129 | syl 14 |
. . . . . . . . . . . . . . . . . 18
β’ ((π β§ π) β (π β 1) β
β0) |
131 | 130, 5 | eleqtrdi 2270 |
. . . . . . . . . . . . . . . . 17
β’ ((π β§ π) β (π β 1) β
(β€β₯β0)) |
132 | | eluzfz1 10033 |
. . . . . . . . . . . . . . . . 17
β’ ((π β 1) β
(β€β₯β0) β 0 β (0...(π β 1))) |
133 | 131, 132 | syl 14 |
. . . . . . . . . . . . . . . 16
β’ ((π β§ π) β 0 β (0...(π β 1))) |
134 | 115 | sumeq2dv 11378 |
. . . . . . . . . . . . . . . . . . 19
β’ (π β Ξ£π β β (πΊβπ) = Ξ£π β β π΅) |
135 | 134 | adantr 276 |
. . . . . . . . . . . . . . . . . 18
β’ ((π β§ π) β Ξ£π β β (πΊβπ) = Ξ£π β β π΅) |
136 | 135 | fveq2d 5521 |
. . . . . . . . . . . . . . . . 17
β’ ((π β§ π) β (absβΞ£π β β (πΊβπ)) = (absβΞ£π β β π΅)) |
137 | 136 | eqcomd 2183 |
. . . . . . . . . . . . . . . 16
β’ ((π β§ π) β (absβΞ£π β β π΅) = (absβΞ£π β β (πΊβπ))) |
138 | | fv0p1e1 9036 |
. . . . . . . . . . . . . . . . . . . 20
β’ (π = 0 β
(β€β₯β(π + 1)) =
(β€β₯β1)) |
139 | 138, 1 | eqtr4di 2228 |
. . . . . . . . . . . . . . . . . . 19
β’ (π = 0 β
(β€β₯β(π + 1)) = β) |
140 | 139 | sumeq1d 11376 |
. . . . . . . . . . . . . . . . . 18
β’ (π = 0 β Ξ£π β
(β€β₯β(π + 1))(πΊβπ) = Ξ£π β β (πΊβπ)) |
141 | 140 | fveq2d 5521 |
. . . . . . . . . . . . . . . . 17
β’ (π = 0 β
(absβΞ£π β
(β€β₯β(π + 1))(πΊβπ)) = (absβΞ£π β β (πΊβπ))) |
142 | 141 | rspceeqv 2861 |
. . . . . . . . . . . . . . . 16
β’ ((0
β (0...(π β 1))
β§ (absβΞ£π
β β π΅) =
(absβΞ£π β
β (πΊβπ))) β βπ β (0...(π β 1))(absβΞ£π β β π΅) = (absβΞ£π β
(β€β₯β(π + 1))(πΊβπ))) |
143 | 133, 137,
142 | syl2anc 411 |
. . . . . . . . . . . . . . 15
β’ ((π β§ π) β βπ β (0...(π β 1))(absβΞ£π β β π΅) = (absβΞ£π β
(β€β₯β(π + 1))(πΊβπ))) |
144 | | eqeq1 2184 |
. . . . . . . . . . . . . . . . . 18
β’ (π§ = (absβΞ£π β β π΅) β (π§ = (absβΞ£π β (β€β₯β(π + 1))(πΊβπ)) β (absβΞ£π β β π΅) = (absβΞ£π β
(β€β₯β(π + 1))(πΊβπ)))) |
145 | 144 | rexbidv 2478 |
. . . . . . . . . . . . . . . . 17
β’ (π§ = (absβΞ£π β β π΅) β (βπ β (0...(π β 1))π§ = (absβΞ£π β (β€β₯β(π + 1))(πΊβπ)) β βπ β (0...(π β 1))(absβΞ£π β β π΅) = (absβΞ£π β
(β€β₯β(π + 1))(πΊβπ)))) |
146 | 145, 128 | elab2g 2886 |
. . . . . . . . . . . . . . . 16
β’
((absβΞ£π
β β π΅) β
β β ((absβΞ£π β β π΅) β π β βπ β (0...(π β 1))(absβΞ£π β β π΅) = (absβΞ£π β
(β€β₯β(π + 1))(πΊβπ)))) |
147 | 123, 146 | syl 14 |
. . . . . . . . . . . . . . 15
β’ ((π β§ π) β ((absβΞ£π β β π΅) β π β βπ β (0...(π β 1))(absβΞ£π β β π΅) = (absβΞ£π β
(β€β₯β(π + 1))(πΊβπ)))) |
148 | 143, 147 | mpbird 167 |
. . . . . . . . . . . . . 14
β’ ((π β§ π) β (absβΞ£π β β π΅) β π) |
149 | 125, 126,
127, 128, 148, 87 | mertenslemub 11544 |
. . . . . . . . . . . . 13
β’ ((π β§ π) β (absβΞ£π β β π΅) β€ Ξ£π β (0...(π β 1))(absβΞ£π β
(β€β₯β(π + 1))(πΊβπ))) |
150 | 113, 123,
112, 124, 149 | letrd 8083 |
. . . . . . . . . . . 12
β’ ((π β§ π) β 0 β€ Ξ£π β (0...(π β 1))(absβΞ£π β
(β€β₯β(π + 1))(πΊβπ))) |
151 | 112, 150 | ge0p1rpd 9729 |
. . . . . . . . . . 11
β’ ((π β§ π) β (Ξ£π β (0...(π β 1))(absβΞ£π β
(β€β₯β(π + 1))(πΊβπ)) + 1) β
β+) |
152 | 89, 151 | rpdivcld 9716 |
. . . . . . . . . 10
β’ ((π β§ π) β (((πΈ / 2) / π ) / (Ξ£π β (0...(π β 1))(absβΞ£π β
(β€β₯β(π + 1))(πΊβπ)) + 1)) β
β+) |
153 | | simpr 110 |
. . . . . . . . . . 11
β’ (((π β§ π) β§ π β β0) β π β
β0) |
154 | | fveq2 5517 |
. . . . . . . . . . . . 13
β’ (π = π β (πΎβπ) = (πΎβπ)) |
155 | 154 | eleq1d 2246 |
. . . . . . . . . . . 12
β’ (π = π β ((πΎβπ) β β β (πΎβπ) β β)) |
156 | 11 | ralrimiva 2550 |
. . . . . . . . . . . . 13
β’ (π β βπ β β0 (πΎβπ) β β) |
157 | 156 | ad2antrr 488 |
. . . . . . . . . . . 12
β’ (((π β§ π) β§ π β β0) β
βπ β
β0 (πΎβπ) β β) |
158 | 155, 157,
153 | rspcdva 2848 |
. . . . . . . . . . 11
β’ (((π β§ π) β§ π β β0) β (πΎβπ) β β) |
159 | | fveq2 5517 |
. . . . . . . . . . . 12
β’ (π = π β (πΎβπ) = (πΎβπ)) |
160 | | eqid 2177 |
. . . . . . . . . . . 12
β’ (π β β0
β¦ (πΎβπ)) = (π β β0 β¦ (πΎβπ)) |
161 | 159, 160 | fvmptg 5594 |
. . . . . . . . . . 11
β’ ((π β β0
β§ (πΎβπ) β β) β ((π β β0
β¦ (πΎβπ))βπ) = (πΎβπ)) |
162 | 153, 158,
161 | syl2anc 411 |
. . . . . . . . . 10
β’ (((π β§ π) β§ π β β0) β ((π β β0
β¦ (πΎβπ))βπ) = (πΎβπ)) |
163 | | nn0ex 9184 |
. . . . . . . . . . . . . 14
β’
β0 β V |
164 | 163 | mptex 5744 |
. . . . . . . . . . . . 13
β’ (π β β0
β¦ (πΎβπ)) β V |
165 | 164 | a1i 9 |
. . . . . . . . . . . 12
β’ (π β (π β β0 β¦ (πΎβπ)) β V) |
166 | 60 | biimpri 133 |
. . . . . . . . . . . . . . . 16
β’ (π β
(β€β₯β0) β π β β0) |
167 | | fveq2 5517 |
. . . . . . . . . . . . . . . . . . 19
β’ (π = π β (πΎβπ) = (πΎβπ)) |
168 | 167 | eleq1d 2246 |
. . . . . . . . . . . . . . . . . 18
β’ (π = π β ((πΎβπ) β β β (πΎβπ) β β)) |
169 | 156 | adantr 276 |
. . . . . . . . . . . . . . . . . 18
β’ ((π β§ π β β0) β
βπ β
β0 (πΎβπ) β β) |
170 | | simpr 110 |
. . . . . . . . . . . . . . . . . 18
β’ ((π β§ π β β0) β π β
β0) |
171 | 168, 169,
170 | rspcdva 2848 |
. . . . . . . . . . . . . . . . 17
β’ ((π β§ π β β0) β (πΎβπ) β β) |
172 | 60, 171 | sylan2br 288 |
. . . . . . . . . . . . . . . 16
β’ ((π β§ π β (β€β₯β0))
β (πΎβπ) β
β) |
173 | | fveq2 5517 |
. . . . . . . . . . . . . . . . 17
β’ (π = π β (πΎβπ) = (πΎβπ)) |
174 | 173, 160 | fvmptg 5594 |
. . . . . . . . . . . . . . . 16
β’ ((π β β0
β§ (πΎβπ) β β) β ((π β β0
β¦ (πΎβπ))βπ) = (πΎβπ)) |
175 | 166, 172,
174 | syl2an2 594 |
. . . . . . . . . . . . . . 15
β’ ((π β§ π β (β€β₯β0))
β ((π β
β0 β¦ (πΎβπ))βπ) = (πΎβπ)) |
176 | 175, 172 | eqeltrd 2254 |
. . . . . . . . . . . . . 14
β’ ((π β§ π β (β€β₯β0))
β ((π β
β0 β¦ (πΎβπ))βπ) β β) |
177 | | elnn0uz 9567 |
. . . . . . . . . . . . . . 15
β’ (π β β0
β π β
(β€β₯β0)) |
178 | | simpr 110 |
. . . . . . . . . . . . . . . 16
β’ ((π β§ π β β0) β π β
β0) |
179 | | fveq2 5517 |
. . . . . . . . . . . . . . . . 17
β’ (π = π β (πΎβπ) = (πΎβπ)) |
180 | 179, 160 | fvmptg 5594 |
. . . . . . . . . . . . . . . 16
β’ ((π β β0
β§ (πΎβπ) β β) β ((π β β0
β¦ (πΎβπ))βπ) = (πΎβπ)) |
181 | 178, 11, 180 | syl2anc 411 |
. . . . . . . . . . . . . . 15
β’ ((π β§ π β β0) β ((π β β0
β¦ (πΎβπ))βπ) = (πΎβπ)) |
182 | 177, 181 | sylan2br 288 |
. . . . . . . . . . . . . 14
β’ ((π β§ π β (β€β₯β0))
β ((π β
β0 β¦ (πΎβπ))βπ) = (πΎβπ)) |
183 | | readdcl 7939 |
. . . . . . . . . . . . . . 15
β’ ((π β β β§ π¦ β β) β (π + π¦) β β) |
184 | 183 | adantl 277 |
. . . . . . . . . . . . . 14
β’ ((π β§ (π β β β§ π¦ β β)) β (π + π¦) β β) |
185 | 6, 176, 182, 184 | seq3feq 10474 |
. . . . . . . . . . . . 13
β’ (π β seq0( + , (π β β0
β¦ (πΎβπ))) = seq0( + , πΎ)) |
186 | 185, 12 | eqeltrd 2254 |
. . . . . . . . . . . 12
β’ (π β seq0( + , (π β β0
β¦ (πΎβπ))) β dom β
) |
187 | 181, 11 | eqeltrd 2254 |
. . . . . . . . . . . . 13
β’ ((π β§ π β β0) β ((π β β0
β¦ (πΎβπ))βπ) β β) |
188 | 187 | recnd 7988 |
. . . . . . . . . . . 12
β’ ((π β§ π β β0) β ((π β β0
β¦ (πΎβπ))βπ) β β) |
189 | 5, 6, 165, 186, 188 | serf0 11362 |
. . . . . . . . . . 11
β’ (π β (π β β0 β¦ (πΎβπ)) β 0) |
190 | 189 | adantr 276 |
. . . . . . . . . 10
β’ ((π β§ π) β (π β β0 β¦ (πΎβπ)) β 0) |
191 | 5, 84, 152, 162, 190 | climi0 11299 |
. . . . . . . . 9
β’ ((π β§ π) β βπ‘ β β0 βπ β
(β€β₯βπ‘)(absβ(πΎβπ)) < (((πΈ / 2) / π ) / (Ξ£π β (0...(π β 1))(absβΞ£π β
(β€β₯β(π + 1))(πΊβπ)) + 1))) |
192 | | fveq2 5517 |
. . . . . . . . . . . . . . . . . 18
β’ (π = π β (πΊβπ) = (πΊβπ)) |
193 | 192 | cbvsumv 11371 |
. . . . . . . . . . . . . . . . 17
β’
Ξ£π β
(β€β₯β(π + 1))(πΊβπ) = Ξ£π β (β€β₯β(π + 1))(πΊβπ) |
194 | 193 | fveq2i 5520 |
. . . . . . . . . . . . . . . 16
β’
(absβΞ£π
β (β€β₯β(π + 1))(πΊβπ)) = (absβΞ£π β (β€β₯β(π + 1))(πΊβπ)) |
195 | 194 | a1i 9 |
. . . . . . . . . . . . . . 15
β’ (π β (0...(π β 1)) β (absβΞ£π β
(β€β₯β(π + 1))(πΊβπ)) = (absβΞ£π β (β€β₯β(π + 1))(πΊβπ))) |
196 | 195 | sumeq2i 11374 |
. . . . . . . . . . . . . 14
β’
Ξ£π β
(0...(π β
1))(absβΞ£π
β (β€β₯β(π + 1))(πΊβπ)) = Ξ£π β (0...(π β 1))(absβΞ£π β
(β€β₯β(π + 1))(πΊβπ)) |
197 | 196 | oveq1i 5887 |
. . . . . . . . . . . . 13
β’
(Ξ£π β
(0...(π β
1))(absβΞ£π
β (β€β₯β(π + 1))(πΊβπ)) + 1) = (Ξ£π β (0...(π β 1))(absβΞ£π β
(β€β₯β(π + 1))(πΊβπ)) + 1) |
198 | 197 | oveq2i 5888 |
. . . . . . . . . . . 12
β’ (((πΈ / 2) / π ) / (Ξ£π β (0...(π β 1))(absβΞ£π β
(β€β₯β(π + 1))(πΊβπ)) + 1)) = (((πΈ / 2) / π ) / (Ξ£π β (0...(π β 1))(absβΞ£π β
(β€β₯β(π + 1))(πΊβπ)) + 1)) |
199 | 198 | breq2i 4013 |
. . . . . . . . . . 11
β’
((absβ(πΎβπ)) < (((πΈ / 2) / π ) / (Ξ£π β (0...(π β 1))(absβΞ£π β
(β€β₯β(π + 1))(πΊβπ)) + 1)) β (absβ(πΎβπ)) < (((πΈ / 2) / π ) / (Ξ£π β (0...(π β 1))(absβΞ£π β
(β€β₯β(π + 1))(πΊβπ)) + 1))) |
200 | 199 | ralbii 2483 |
. . . . . . . . . 10
β’
(βπ β
(β€β₯βπ‘)(absβ(πΎβπ)) < (((πΈ / 2) / π ) / (Ξ£π β (0...(π β 1))(absβΞ£π β
(β€β₯β(π + 1))(πΊβπ)) + 1)) β βπ β (β€β₯βπ‘)(absβ(πΎβπ)) < (((πΈ / 2) / π ) / (Ξ£π β (0...(π β 1))(absβΞ£π β
(β€β₯β(π + 1))(πΊβπ)) + 1))) |
201 | 200 | rexbii 2484 |
. . . . . . . . 9
β’
(βπ‘ β
β0 βπ β (β€β₯βπ‘)(absβ(πΎβπ)) < (((πΈ / 2) / π ) / (Ξ£π β (0...(π β 1))(absβΞ£π β
(β€β₯β(π + 1))(πΊβπ)) + 1)) β βπ‘ β β0 βπ β
(β€β₯βπ‘)(absβ(πΎβπ)) < (((πΈ / 2) / π ) / (Ξ£π β (0...(π β 1))(absβΞ£π β
(β€β₯β(π + 1))(πΊβπ)) + 1))) |
202 | 191, 201 | sylib 122 |
. . . . . . . 8
β’ ((π β§ π) β βπ‘ β β0 βπ β
(β€β₯βπ‘)(absβ(πΎβπ)) < (((πΈ / 2) / π ) / (Ξ£π β (0...(π β 1))(absβΞ£π β
(β€β₯β(π + 1))(πΊβπ)) + 1))) |
203 | | simplll 533 |
. . . . . . . . . . . . . 14
β’ ((((π β§ π) β§ π‘ β β0) β§ π β
(β€β₯βπ‘)) β π) |
204 | | eluznn0 9601 |
. . . . . . . . . . . . . . 15
β’ ((π‘ β β0
β§ π β
(β€β₯βπ‘)) β π β β0) |
205 | 204 | adantll 476 |
. . . . . . . . . . . . . 14
β’ ((((π β§ π) β§ π‘ β β0) β§ π β
(β€β₯βπ‘)) β π β β0) |
206 | 11, 15 | absidd 11178 |
. . . . . . . . . . . . . . . 16
β’ ((π β§ π β β0) β
(absβ(πΎβπ)) = (πΎβπ)) |
207 | 206 | ralrimiva 2550 |
. . . . . . . . . . . . . . 15
β’ (π β βπ β β0 (absβ(πΎβπ)) = (πΎβπ)) |
208 | 154 | fveq2d 5521 |
. . . . . . . . . . . . . . . . 17
β’ (π = π β (absβ(πΎβπ)) = (absβ(πΎβπ))) |
209 | 208, 154 | eqeq12d 2192 |
. . . . . . . . . . . . . . . 16
β’ (π = π β ((absβ(πΎβπ)) = (πΎβπ) β (absβ(πΎβπ)) = (πΎβπ))) |
210 | 209 | rspccva 2842 |
. . . . . . . . . . . . . . 15
β’
((βπ β
β0 (absβ(πΎβπ)) = (πΎβπ) β§ π β β0) β
(absβ(πΎβπ)) = (πΎβπ)) |
211 | 207, 210 | sylan 283 |
. . . . . . . . . . . . . 14
β’ ((π β§ π β β0) β
(absβ(πΎβπ)) = (πΎβπ)) |
212 | 203, 205,
211 | syl2anc 411 |
. . . . . . . . . . . . 13
β’ ((((π β§ π) β§ π‘ β β0) β§ π β
(β€β₯βπ‘)) β (absβ(πΎβπ)) = (πΎβπ)) |
213 | 212 | breq1d 4015 |
. . . . . . . . . . . 12
β’ ((((π β§ π) β§ π‘ β β0) β§ π β
(β€β₯βπ‘)) β ((absβ(πΎβπ)) < (((πΈ / 2) / π ) / (Ξ£π β (0...(π β 1))(absβΞ£π β
(β€β₯β(π + 1))(πΊβπ)) + 1)) β (πΎβπ) < (((πΈ / 2) / π ) / (Ξ£π β (0...(π β 1))(absβΞ£π β
(β€β₯β(π + 1))(πΊβπ)) + 1)))) |
214 | 213 | ralbidva 2473 |
. . . . . . . . . . 11
β’ (((π β§ π) β§ π‘ β β0) β
(βπ β
(β€β₯βπ‘)(absβ(πΎβπ)) < (((πΈ / 2) / π ) / (Ξ£π β (0...(π β 1))(absβΞ£π β
(β€β₯β(π + 1))(πΊβπ)) + 1)) β βπ β (β€β₯βπ‘)(πΎβπ) < (((πΈ / 2) / π ) / (Ξ£π β (0...(π β 1))(absβΞ£π β
(β€β₯β(π + 1))(πΊβπ)) + 1)))) |
215 | | nfv 1528 |
. . . . . . . . . . . 12
β’
β²π(πΎβπ) < (((πΈ / 2) / π ) / (Ξ£π β (0...(π β 1))(absβΞ£π β
(β€β₯β(π + 1))(πΊβπ)) + 1)) |
216 | | nfcv 2319 |
. . . . . . . . . . . . 13
β’
β²π(πΎβπ) |
217 | | nfcv 2319 |
. . . . . . . . . . . . 13
β’
β²π
< |
218 | | nfcv 2319 |
. . . . . . . . . . . . . 14
β’
β²π((πΈ / 2) / π ) |
219 | | nfcv 2319 |
. . . . . . . . . . . . . 14
β’
β²π
/ |
220 | | nfcv 2319 |
. . . . . . . . . . . . . . . 16
β’
β²π(0...(π β 1)) |
221 | 220 | nfsum1 11366 |
. . . . . . . . . . . . . . 15
β’
β²πΞ£π β (0...(π β 1))(absβΞ£π β
(β€β₯β(π + 1))(πΊβπ)) |
222 | | nfcv 2319 |
. . . . . . . . . . . . . . 15
β’
β²π
+ |
223 | | nfcv 2319 |
. . . . . . . . . . . . . . 15
β’
β²π1 |
224 | 221, 222,
223 | nfov 5907 |
. . . . . . . . . . . . . 14
β’
β²π(Ξ£π β (0...(π β 1))(absβΞ£π β
(β€β₯β(π + 1))(πΊβπ)) + 1) |
225 | 218, 219,
224 | nfov 5907 |
. . . . . . . . . . . . 13
β’
β²π(((πΈ / 2) / π ) / (Ξ£π β (0...(π β 1))(absβΞ£π β
(β€β₯β(π + 1))(πΊβπ)) + 1)) |
226 | 216, 217,
225 | nfbr 4051 |
. . . . . . . . . . . 12
β’
β²π(πΎβπ) < (((πΈ / 2) / π ) / (Ξ£π β (0...(π β 1))(absβΞ£π β
(β€β₯β(π + 1))(πΊβπ)) + 1)) |
227 | 159 | breq1d 4015 |
. . . . . . . . . . . 12
β’ (π = π β ((πΎβπ) < (((πΈ / 2) / π ) / (Ξ£π β (0...(π β 1))(absβΞ£π β
(β€β₯β(π + 1))(πΊβπ)) + 1)) β (πΎβπ) < (((πΈ / 2) / π ) / (Ξ£π β (0...(π β 1))(absβΞ£π β
(β€β₯β(π + 1))(πΊβπ)) + 1)))) |
228 | 215, 226,
227 | cbvral 2701 |
. . . . . . . . . . 11
β’
(βπ β
(β€β₯βπ‘)(πΎβπ) < (((πΈ / 2) / π ) / (Ξ£π β (0...(π β 1))(absβΞ£π β
(β€β₯β(π + 1))(πΊβπ)) + 1)) β βπ β (β€β₯βπ‘)(πΎβπ) < (((πΈ / 2) / π ) / (Ξ£π β (0...(π β 1))(absβΞ£π β
(β€β₯β(π + 1))(πΊβπ)) + 1))) |
229 | 214, 228 | bitr4di 198 |
. . . . . . . . . 10
β’ (((π β§ π) β§ π‘ β β0) β
(βπ β
(β€β₯βπ‘)(absβ(πΎβπ)) < (((πΈ / 2) / π ) / (Ξ£π β (0...(π β 1))(absβΞ£π β
(β€β₯β(π + 1))(πΊβπ)) + 1)) β βπ β (β€β₯βπ‘)(πΎβπ) < (((πΈ / 2) / π ) / (Ξ£π β (0...(π β 1))(absβΞ£π β
(β€β₯β(π + 1))(πΊβπ)) + 1)))) |
230 | | simpll 527 |
. . . . . . . . . . . . 13
β’ (((π β§ π) β§ (π‘ β β0 β§
βπ β
(β€β₯βπ‘)(πΎβπ) < (((πΈ / 2) / π ) / (Ξ£π β (0...(π β 1))(absβΞ£π β
(β€β₯β(π + 1))(πΊβπ)) + 1)))) β π) |
231 | | mertens.1 |
. . . . . . . . . . . . 13
β’ ((π β§ π β β0) β (πΉβπ) = π΄) |
232 | 230, 231 | sylan 283 |
. . . . . . . . . . . 12
β’ ((((π β§ π) β§ (π‘ β β0 β§
βπ β
(β€β₯βπ‘)(πΎβπ) < (((πΈ / 2) / π ) / (Ξ£π β (0...(π β 1))(absβΞ£π β
(β€β₯β(π + 1))(πΊβπ)) + 1)))) β§ π β β0) β (πΉβπ) = π΄) |
233 | 230, 8 | sylan 283 |
. . . . . . . . . . . 12
β’ ((((π β§ π) β§ (π‘ β β0 β§
βπ β
(β€β₯βπ‘)(πΎβπ) < (((πΈ / 2) / π ) / (Ξ£π β (0...(π β 1))(absβΞ£π β
(β€β₯β(π + 1))(πΊβπ)) + 1)))) β§ π β β0) β (πΎβπ) = (absβπ΄)) |
234 | 230, 9 | sylan 283 |
. . . . . . . . . . . 12
β’ ((((π β§ π) β§ (π‘ β β0 β§
βπ β
(β€β₯βπ‘)(πΎβπ) < (((πΈ / 2) / π ) / (Ξ£π β (0...(π β 1))(absβΞ£π β
(β€β₯β(π + 1))(πΊβπ)) + 1)))) β§ π β β0) β π΄ β
β) |
235 | 230, 20 | sylan 283 |
. . . . . . . . . . . 12
β’ ((((π β§ π) β§ (π‘ β β0 β§
βπ β
(β€β₯βπ‘)(πΎβπ) < (((πΈ / 2) / π ) / (Ξ£π β (0...(π β 1))(absβΞ£π β
(β€β₯β(π + 1))(πΊβπ)) + 1)))) β§ π β β0) β (πΊβπ) = π΅) |
236 | 230, 21 | sylan 283 |
. . . . . . . . . . . 12
β’ ((((π β§ π) β§ (π‘ β β0 β§
βπ β
(β€β₯βπ‘)(πΎβπ) < (((πΈ / 2) / π ) / (Ξ£π β (0...(π β 1))(absβΞ£π β
(β€β₯β(π + 1))(πΊβπ)) + 1)))) β§ π β β0) β π΅ β
β) |
237 | | mertens.6 |
. . . . . . . . . . . . 13
β’ ((π β§ π β β0) β (π»βπ) = Ξ£π β (0...π)(π΄ Β· (πΊβ(π β π)))) |
238 | 230, 237 | sylan 283 |
. . . . . . . . . . . 12
β’ ((((π β§ π) β§ (π‘ β β0 β§
βπ β
(β€β₯βπ‘)(πΎβπ) < (((πΈ / 2) / π ) / (Ξ£π β (0...(π β 1))(absβΞ£π β
(β€β₯β(π + 1))(πΊβπ)) + 1)))) β§ π β β0) β (π»βπ) = Ξ£π β (0...π)(π΄ Β· (πΊβ(π β π)))) |
239 | 12 | ad2antrr 488 |
. . . . . . . . . . . 12
β’ (((π β§ π) β§ (π‘ β β0 β§
βπ β
(β€β₯βπ‘)(πΎβπ) < (((πΈ / 2) / π ) / (Ξ£π β (0...(π β 1))(absβΞ£π β
(β€β₯β(π + 1))(πΊβπ)) + 1)))) β seq0( + , πΎ) β dom β ) |
240 | 22 | ad2antrr 488 |
. . . . . . . . . . . 12
β’ (((π β§ π) β§ (π‘ β β0 β§
βπ β
(β€β₯βπ‘)(πΎβπ) < (((πΈ / 2) / π ) / (Ξ£π β (0...(π β 1))(absβΞ£π β
(β€β₯β(π + 1))(πΊβπ)) + 1)))) β seq0( + , πΊ) β dom β ) |
241 | 3 | ad2antrr 488 |
. . . . . . . . . . . 12
β’ (((π β§ π) β§ (π‘ β β0 β§
βπ β
(β€β₯βπ‘)(πΎβπ) < (((πΈ / 2) / π ) / (Ξ£π β (0...(π β 1))(absβΞ£π β
(β€β₯β(π + 1))(πΊβπ)) + 1)))) β πΈ β
β+) |
242 | 196, 112 | eqeltrrid 2265 |
. . . . . . . . . . . . 13
β’ ((π β§ π) β Ξ£π β (0...(π β 1))(absβΞ£π β
(β€β₯β(π + 1))(πΊβπ)) β β) |
243 | 242 | adantr 276 |
. . . . . . . . . . . 12
β’ (((π β§ π) β§ (π‘ β β0 β§
βπ β
(β€β₯βπ‘)(πΎβπ) < (((πΈ / 2) / π ) / (Ξ£π β (0...(π β 1))(absβΞ£π β
(β€β₯β(π + 1))(πΊβπ)) + 1)))) β Ξ£π β (0...(π β 1))(absβΞ£π β
(β€β₯β(π + 1))(πΊβπ)) β β) |
244 | 228 | anbi2i 457 |
. . . . . . . . . . . . . . 15
β’ ((π‘ β β0
β§ βπ β
(β€β₯βπ‘)(πΎβπ) < (((πΈ / 2) / π ) / (Ξ£π β (0...(π β 1))(absβΞ£π β
(β€β₯β(π + 1))(πΊβπ)) + 1))) β (π‘ β β0 β§
βπ β
(β€β₯βπ‘)(πΎβπ) < (((πΈ / 2) / π ) / (Ξ£π β (0...(π β 1))(absβΞ£π β
(β€β₯β(π + 1))(πΊβπ)) + 1)))) |
245 | 244 | anbi2i 457 |
. . . . . . . . . . . . . 14
β’ ((π β§ (π‘ β β0 β§
βπ β
(β€β₯βπ‘)(πΎβπ) < (((πΈ / 2) / π ) / (Ξ£π β (0...(π β 1))(absβΞ£π β
(β€β₯β(π + 1))(πΊβπ)) + 1)))) β (π β§ (π‘ β β0 β§
βπ β
(β€β₯βπ‘)(πΎβπ) < (((πΈ / 2) / π ) / (Ξ£π β (0...(π β 1))(absβΞ£π β
(β€β₯β(π + 1))(πΊβπ)) + 1))))) |
246 | 245 | biimpi 120 |
. . . . . . . . . . . . 13
β’ ((π β§ (π‘ β β0 β§
βπ β
(β€β₯βπ‘)(πΎβπ) < (((πΈ / 2) / π ) / (Ξ£π β (0...(π β 1))(absβΞ£π β
(β€β₯β(π + 1))(πΊβπ)) + 1)))) β (π β§ (π‘ β β0 β§
βπ β
(β€β₯βπ‘)(πΎβπ) < (((πΈ / 2) / π ) / (Ξ£π β (0...(π β 1))(absβΞ£π β
(β€β₯β(π + 1))(πΊβπ)) + 1))))) |
247 | 246 | adantll 476 |
. . . . . . . . . . . 12
β’ (((π β§ π) β§ (π‘ β β0 β§
βπ β
(β€β₯βπ‘)(πΎβπ) < (((πΈ / 2) / π ) / (Ξ£π β (0...(π β 1))(absβΞ£π β
(β€β₯β(π + 1))(πΊβπ)) + 1)))) β (π β§ (π‘ β β0 β§
βπ β
(β€β₯βπ‘)(πΎβπ) < (((πΈ / 2) / π ) / (Ξ£π β (0...(π β 1))(absβΞ£π β
(β€β₯β(π + 1))(πΊβπ)) + 1))))) |
248 | 150, 196 | breqtrdi 4046 |
. . . . . . . . . . . . 13
β’ ((π β§ π) β 0 β€ Ξ£π β (0...(π β 1))(absβΞ£π β
(β€β₯β(π + 1))(πΊβπ))) |
249 | 248 | adantr 276 |
. . . . . . . . . . . 12
β’ (((π β§ π) β§ (π‘ β β0 β§
βπ β
(β€β₯βπ‘)(πΎβπ) < (((πΈ / 2) / π ) / (Ξ£π β (0...(π β 1))(absβΞ£π β
(β€β₯β(π + 1))(πΊβπ)) + 1)))) β 0 β€ Ξ£π β (0...(π β 1))(absβΞ£π β
(β€β₯β(π + 1))(πΊβπ))) |
250 | | simpr 110 |
. . . . . . . . . . . . . . . 16
β’ ((((π β§ π) β§ π€ β π) β§ π β β0) β π β
β0) |
251 | 20 | ralrimiva 2550 |
. . . . . . . . . . . . . . . . 17
β’ (π β βπ β β0 (πΊβπ) = π΅) |
252 | 251 | ad3antrrr 492 |
. . . . . . . . . . . . . . . 16
β’ ((((π β§ π) β§ π€ β π) β§ π β β0) β
βπ β
β0 (πΊβπ) = π΅) |
253 | | nfcsb1v 3092 |
. . . . . . . . . . . . . . . . . 18
β’
β²πβ¦π / πβ¦π΅ |
254 | 253 | nfeq2 2331 |
. . . . . . . . . . . . . . . . 17
β’
β²π(πΊβπ) = β¦π / πβ¦π΅ |
255 | | csbeq1a 3068 |
. . . . . . . . . . . . . . . . . 18
β’ (π = π β π΅ = β¦π / πβ¦π΅) |
256 | 192, 255 | eqeq12d 2192 |
. . . . . . . . . . . . . . . . 17
β’ (π = π β ((πΊβπ) = π΅ β (πΊβπ) = β¦π / πβ¦π΅)) |
257 | 254, 256 | rspc 2837 |
. . . . . . . . . . . . . . . 16
β’ (π β β0
β (βπ β
β0 (πΊβπ) = π΅ β (πΊβπ) = β¦π / πβ¦π΅)) |
258 | 250, 252,
257 | sylc 62 |
. . . . . . . . . . . . . . 15
β’ ((((π β§ π) β§ π€ β π) β§ π β β0) β (πΊβπ) = β¦π / πβ¦π΅) |
259 | 21 | ralrimiva 2550 |
. . . . . . . . . . . . . . . . 17
β’ (π β βπ β β0 π΅ β β) |
260 | 259 | ad3antrrr 492 |
. . . . . . . . . . . . . . . 16
β’ ((((π β§ π) β§ π€ β π) β§ π β β0) β
βπ β
β0 π΅
β β) |
261 | 253 | nfel1 2330 |
. . . . . . . . . . . . . . . . 17
β’
β²πβ¦π / πβ¦π΅ β β |
262 | 255 | eleq1d 2246 |
. . . . . . . . . . . . . . . . 17
β’ (π = π β (π΅ β β β β¦π / πβ¦π΅ β β)) |
263 | 261, 262 | rspc 2837 |
. . . . . . . . . . . . . . . 16
β’ (π β β0
β (βπ β
β0 π΅
β β β β¦π / πβ¦π΅ β β)) |
264 | 250, 260,
263 | sylc 62 |
. . . . . . . . . . . . . . 15
β’ ((((π β§ π) β§ π€ β π) β§ π β β0) β
β¦π / πβ¦π΅ β β) |
265 | 22 | ad2antrr 488 |
. . . . . . . . . . . . . . 15
β’ (((π β§ π) β§ π€ β π) β seq0( + , πΊ) β dom β ) |
266 | 194 | eqeq2i 2188 |
. . . . . . . . . . . . . . . . . 18
β’ (π§ = (absβΞ£π β
(β€β₯β(π + 1))(πΊβπ)) β π§ = (absβΞ£π β (β€β₯β(π + 1))(πΊβπ))) |
267 | 266 | rexbii 2484 |
. . . . . . . . . . . . . . . . 17
β’
(βπ β
(0...(π β 1))π§ = (absβΞ£π β
(β€β₯β(π + 1))(πΊβπ)) β βπ β (0...(π β 1))π§ = (absβΞ£π β (β€β₯β(π + 1))(πΊβπ))) |
268 | 267 | abbii 2293 |
. . . . . . . . . . . . . . . 16
β’ {π§ β£ βπ β (0...(π β 1))π§ = (absβΞ£π β (β€β₯β(π + 1))(πΊβπ))} = {π§ β£ βπ β (0...(π β 1))π§ = (absβΞ£π β (β€β₯β(π + 1))(πΊβπ))} |
269 | 128, 268 | eqtri 2198 |
. . . . . . . . . . . . . . 15
β’ π = {π§ β£ βπ β (0...(π β 1))π§ = (absβΞ£π β (β€β₯β(π + 1))(πΊβπ))} |
270 | | simpr 110 |
. . . . . . . . . . . . . . 15
β’ (((π β§ π) β§ π€ β π) β π€ β π) |
271 | 87 | adantr 276 |
. . . . . . . . . . . . . . 15
β’ (((π β§ π) β§ π€ β π) β π β β) |
272 | 258, 264,
265, 269, 270, 271 | mertenslemub 11544 |
. . . . . . . . . . . . . 14
β’ (((π β§ π) β§ π€ β π) β π€ β€ Ξ£π β (0...(π β 1))(absβΞ£π β
(β€β₯β(π + 1))(πΊβπ))) |
273 | 272 | ralrimiva 2550 |
. . . . . . . . . . . . 13
β’ ((π β§ π) β βπ€ β π π€ β€ Ξ£π β (0...(π β 1))(absβΞ£π β
(β€β₯β(π + 1))(πΊβπ))) |
274 | 273 | adantr 276 |
. . . . . . . . . . . 12
β’ (((π β§ π) β§ (π‘ β β0 β§
βπ β
(β€β₯βπ‘)(πΎβπ) < (((πΈ / 2) / π ) / (Ξ£π β (0...(π β 1))(absβΞ£π β
(β€β₯β(π + 1))(πΊβπ)) + 1)))) β βπ€ β π π€ β€ Ξ£π β (0...(π β 1))(absβΞ£π β
(β€β₯β(π + 1))(πΊβπ))) |
275 | 232, 233,
234, 235, 236, 238, 239, 240, 241, 128, 83, 243, 247, 249, 274 | mertenslemi1 11545 |
. . . . . . . . . . 11
β’ (((π β§ π) β§ (π‘ β β0 β§
βπ β
(β€β₯βπ‘)(πΎβπ) < (((πΈ / 2) / π ) / (Ξ£π β (0...(π β 1))(absβΞ£π β
(β€β₯β(π + 1))(πΊβπ)) + 1)))) β βπ¦ β β0 βπ β
(β€β₯βπ¦)(absβΞ£π β (0...π)(π΄ Β· Ξ£π β (β€β₯β((π β π) + 1))π΅)) < πΈ) |
276 | 275 | expr 375 |
. . . . . . . . . 10
β’ (((π β§ π) β§ π‘ β β0) β
(βπ β
(β€β₯βπ‘)(πΎβπ) < (((πΈ / 2) / π ) / (Ξ£π β (0...(π β 1))(absβΞ£π β
(β€β₯β(π + 1))(πΊβπ)) + 1)) β βπ¦ β β0 βπ β
(β€β₯βπ¦)(absβΞ£π β (0...π)(π΄ Β· Ξ£π β (β€β₯β((π β π) + 1))π΅)) < πΈ)) |
277 | 229, 276 | sylbid 150 |
. . . . . . . . 9
β’ (((π β§ π) β§ π‘ β β0) β
(βπ β
(β€β₯βπ‘)(absβ(πΎβπ)) < (((πΈ / 2) / π ) / (Ξ£π β (0...(π β 1))(absβΞ£π β
(β€β₯β(π + 1))(πΊβπ)) + 1)) β βπ¦ β β0 βπ β
(β€β₯βπ¦)(absβΞ£π β (0...π)(π΄ Β· Ξ£π β (β€β₯β((π β π) + 1))π΅)) < πΈ)) |
278 | 277 | rexlimdva 2594 |
. . . . . . . 8
β’ ((π β§ π) β (βπ‘ β β0 βπ β
(β€β₯βπ‘)(absβ(πΎβπ)) < (((πΈ / 2) / π ) / (Ξ£π β (0...(π β 1))(absβΞ£π β
(β€β₯β(π + 1))(πΊβπ)) + 1)) β βπ¦ β β0 βπ β
(β€β₯βπ¦)(absβΞ£π β (0...π)(π΄ Β· Ξ£π β (β€β₯β((π β π) + 1))π΅)) < πΈ)) |
279 | 202, 278 | mpd 13 |
. . . . . . 7
β’ ((π β§ π) β βπ¦ β β0 βπ β
(β€β₯βπ¦)(absβΞ£π β (0...π)(π΄ Β· Ξ£π β (β€β₯β((π β π) + 1))π΅)) < πΈ) |
280 | 279 | ex 115 |
. . . . . 6
β’ (π β (π β βπ¦ β β0 βπ β
(β€β₯βπ¦)(absβΞ£π β (0...π)(π΄ Β· Ξ£π β (β€β₯β((π β π) + 1))π΅)) < πΈ)) |
281 | 83, 280 | biimtrrid 153 |
. . . . 5
β’ (π β ((π β β β§ βπ β
(β€β₯βπ )(absβΞ£π β (β€β₯β(π + 1))(πΊβπ)) < ((πΈ / 2) / (Ξ£π β β0 (πΎβπ) + 1))) β βπ¦ β β0 βπ β
(β€β₯βπ¦)(absβΞ£π β (0...π)(π΄ Β· Ξ£π β (β€β₯β((π β π) + 1))π΅)) < πΈ)) |
282 | 281 | expdimp 259 |
. . . 4
β’ ((π β§ π β β) β (βπ β
(β€β₯βπ )(absβΞ£π β (β€β₯β(π + 1))(πΊβπ)) < ((πΈ / 2) / (Ξ£π β β0 (πΎβπ) + 1)) β βπ¦ β β0 βπ β
(β€β₯βπ¦)(absβΞ£π β (0...π)(π΄ Β· Ξ£π β (β€β₯β((π β π) + 1))π΅)) < πΈ)) |
283 | 82, 282 | sylbid 150 |
. . 3
β’ ((π β§ π β β) β (βπ β
(β€β₯βπ )(absβ((seq0( + , πΊ)βπ) β Ξ£π β β0 π΅)) < ((πΈ / 2) / (Ξ£π β β0 (πΎβπ) + 1)) β βπ¦ β β0 βπ β
(β€β₯βπ¦)(absβΞ£π β (0...π)(π΄ Β· Ξ£π β (β€β₯β((π β π) + 1))π΅)) < πΈ)) |
284 | 283 | rexlimdva 2594 |
. 2
β’ (π β (βπ β β βπ β (β€β₯βπ )(absβ((seq0( + , πΊ)βπ) β Ξ£π β β0 π΅)) < ((πΈ / 2) / (Ξ£π β β0 (πΎβπ) + 1)) β βπ¦ β β0 βπ β
(β€β₯βπ¦)(absβΞ£π β (0...π)(π΄ Β· Ξ£π β (β€β₯β((π β π) + 1))π΅)) < πΈ)) |
285 | 24, 284 | mpd 13 |
1
β’ (π β βπ¦ β β0 βπ β
(β€β₯βπ¦)(absβΞ£π β (0...π)(π΄ Β· Ξ£π β (β€β₯β((π β π) + 1))π΅)) < πΈ) |