Step | Hyp | Ref
| Expression |
1 | | mertens.i12 |
. . . . . . 7
โข (๐ โ (๐ โง (๐ก โ โ0 โง
โ๐ โ
(โคโฅโ๐ก)(๐พโ๐) < (((๐ธ / 2) / ๐ ) / (๐ + 1))))) |
2 | 1 | simpld 112 |
. . . . . 6
โข (๐ โ ๐) |
3 | | mertens.11 |
. . . . . 6
โข (๐ โ (๐ โ โ โง โ๐ โ
(โคโฅโ๐ )(absโฮฃ๐ โ (โคโฅโ(๐ + 1))(๐บโ๐)) < ((๐ธ / 2) / (ฮฃ๐ โ โ0 (๐พโ๐) + 1)))) |
4 | 2, 3 | sylib 122 |
. . . . 5
โข (๐ โ (๐ โ โ โง โ๐ โ
(โคโฅโ๐ )(absโฮฃ๐ โ (โคโฅโ(๐ + 1))(๐บโ๐)) < ((๐ธ / 2) / (ฮฃ๐ โ โ0 (๐พโ๐) + 1)))) |
5 | 4 | simpld 112 |
. . . 4
โข (๐ โ ๐ โ โ) |
6 | 5 | nnnn0d 9231 |
. . 3
โข (๐ โ ๐ โ โ0) |
7 | 1 | simprd 114 |
. . . 4
โข (๐ โ (๐ก โ โ0 โง
โ๐ โ
(โคโฅโ๐ก)(๐พโ๐) < (((๐ธ / 2) / ๐ ) / (๐ + 1)))) |
8 | 7 | simpld 112 |
. . 3
โข (๐ โ ๐ก โ โ0) |
9 | 6, 8 | nn0addcld 9235 |
. 2
โข (๐ โ (๐ + ๐ก) โ
โ0) |
10 | | 0zd 9267 |
. . . . . . 7
โข ((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โ 0 โ โค) |
11 | | eluzelz 9539 |
. . . . . . . 8
โข (๐ โ
(โคโฅโ(๐ + ๐ก)) โ ๐ โ โค) |
12 | 11 | adantl 277 |
. . . . . . 7
โข ((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โ ๐ โ โค) |
13 | 10, 12 | fzfigd 10433 |
. . . . . 6
โข ((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โ (0...๐) โ Fin) |
14 | | simpl 109 |
. . . . . . . 8
โข ((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โ ๐) |
15 | | elfznn0 10116 |
. . . . . . . 8
โข (๐ โ (0...๐) โ ๐ โ โ0) |
16 | | mertens.3 |
. . . . . . . 8
โข ((๐ โง ๐ โ โ0) โ ๐ด โ
โ) |
17 | 14, 15, 16 | syl2an 289 |
. . . . . . 7
โข (((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โง ๐ โ (0...๐)) โ ๐ด โ โ) |
18 | | eqid 2177 |
. . . . . . . 8
โข
(โคโฅโ((๐ โ ๐) + 1)) =
(โคโฅโ((๐ โ ๐) + 1)) |
19 | | fznn0sub 10059 |
. . . . . . . . . . 11
โข (๐ โ (0...๐) โ (๐ โ ๐) โ
โ0) |
20 | 19 | adantl 277 |
. . . . . . . . . 10
โข (((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โง ๐ โ (0...๐)) โ (๐ โ ๐) โ
โ0) |
21 | | peano2nn0 9218 |
. . . . . . . . . 10
โข ((๐ โ ๐) โ โ0 โ ((๐ โ ๐) + 1) โ
โ0) |
22 | 20, 21 | syl 14 |
. . . . . . . . 9
โข (((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โง ๐ โ (0...๐)) โ ((๐ โ ๐) + 1) โ
โ0) |
23 | 22 | nn0zd 9375 |
. . . . . . . 8
โข (((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โง ๐ โ (0...๐)) โ ((๐ โ ๐) + 1) โ โค) |
24 | | simplll 533 |
. . . . . . . . 9
โข ((((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โง ๐ โ (0...๐)) โง ๐ โ (โคโฅโ((๐ โ ๐) + 1))) โ ๐) |
25 | | eluznn0 9601 |
. . . . . . . . . 10
โข ((((๐ โ ๐) + 1) โ โ0 โง ๐ โ
(โคโฅโ((๐ โ ๐) + 1))) โ ๐ โ โ0) |
26 | 22, 25 | sylan 283 |
. . . . . . . . 9
โข ((((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โง ๐ โ (0...๐)) โง ๐ โ (โคโฅโ((๐ โ ๐) + 1))) โ ๐ โ โ0) |
27 | | mertens.4 |
. . . . . . . . 9
โข ((๐ โง ๐ โ โ0) โ (๐บโ๐) = ๐ต) |
28 | 24, 26, 27 | syl2anc 411 |
. . . . . . . 8
โข ((((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โง ๐ โ (0...๐)) โง ๐ โ (โคโฅโ((๐ โ ๐) + 1))) โ (๐บโ๐) = ๐ต) |
29 | | mertens.5 |
. . . . . . . . 9
โข ((๐ โง ๐ โ โ0) โ ๐ต โ
โ) |
30 | 24, 26, 29 | syl2anc 411 |
. . . . . . . 8
โข ((((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โง ๐ โ (0...๐)) โง ๐ โ (โคโฅโ((๐ โ ๐) + 1))) โ ๐ต โ โ) |
31 | | mertens.8 |
. . . . . . . . . 10
โข (๐ โ seq0( + , ๐บ) โ dom โ
) |
32 | 31 | ad2antrr 488 |
. . . . . . . . 9
โข (((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โง ๐ โ (0...๐)) โ seq0( + , ๐บ) โ dom โ ) |
33 | | nn0uz 9564 |
. . . . . . . . . 10
โข
โ0 = (โคโฅโ0) |
34 | | simpll 527 |
. . . . . . . . . . 11
โข (((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โง ๐ โ (0...๐)) โ ๐) |
35 | 27, 29 | eqeltrd 2254 |
. . . . . . . . . . 11
โข ((๐ โง ๐ โ โ0) โ (๐บโ๐) โ โ) |
36 | 34, 35 | sylan 283 |
. . . . . . . . . 10
โข ((((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โง ๐ โ (0...๐)) โง ๐ โ โ0) โ (๐บโ๐) โ โ) |
37 | 33, 22, 36 | iserex 11349 |
. . . . . . . . 9
โข (((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โง ๐ โ (0...๐)) โ (seq0( + , ๐บ) โ dom โ โ seq((๐ โ ๐) + 1)( + , ๐บ) โ dom โ )) |
38 | 32, 37 | mpbid 147 |
. . . . . . . 8
โข (((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โง ๐ โ (0...๐)) โ seq((๐ โ ๐) + 1)( + , ๐บ) โ dom โ ) |
39 | 18, 23, 28, 30, 38 | isumcl 11435 |
. . . . . . 7
โข (((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โง ๐ โ (0...๐)) โ ฮฃ๐ โ (โคโฅโ((๐ โ ๐) + 1))๐ต โ โ) |
40 | 17, 39 | mulcld 7980 |
. . . . . 6
โข (((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โง ๐ โ (0...๐)) โ (๐ด ยท ฮฃ๐ โ (โคโฅโ((๐ โ ๐) + 1))๐ต) โ โ) |
41 | 13, 40 | fsumcl 11410 |
. . . . 5
โข ((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โ ฮฃ๐ โ (0...๐)(๐ด ยท ฮฃ๐ โ (โคโฅโ((๐ โ ๐) + 1))๐ต) โ โ) |
42 | 41 | abscld 11192 |
. . . 4
โข ((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โ (absโฮฃ๐ โ (0...๐)(๐ด ยท ฮฃ๐ โ (โคโฅโ((๐ โ ๐) + 1))๐ต)) โ โ) |
43 | 40 | abscld 11192 |
. . . . 5
โข (((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โง ๐ โ (0...๐)) โ (absโ(๐ด ยท ฮฃ๐ โ (โคโฅโ((๐ โ ๐) + 1))๐ต)) โ โ) |
44 | 13, 43 | fsumrecl 11411 |
. . . 4
โข ((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โ ฮฃ๐ โ (0...๐)(absโ(๐ด ยท ฮฃ๐ โ (โคโฅโ((๐ โ ๐) + 1))๐ต)) โ โ) |
45 | | mertens.9 |
. . . . . 6
โข (๐ โ ๐ธ โ
โ+) |
46 | 45 | rpred 9698 |
. . . . 5
โข (๐ โ ๐ธ โ โ) |
47 | 46 | adantr 276 |
. . . 4
โข ((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โ ๐ธ โ โ) |
48 | 13, 40 | fsumabs 11475 |
. . . 4
โข ((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โ (absโฮฃ๐ โ (0...๐)(๐ด ยท ฮฃ๐ โ (โคโฅโ((๐ โ ๐) + 1))๐ต)) โค ฮฃ๐ โ (0...๐)(absโ(๐ด ยท ฮฃ๐ โ (โคโฅโ((๐ โ ๐) + 1))๐ต))) |
49 | 5 | nnzd 9376 |
. . . . . . . . . 10
โข (๐ โ ๐ โ โค) |
50 | 49 | adantr 276 |
. . . . . . . . 9
โข ((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โ ๐ โ โค) |
51 | 12, 50 | zsubcld 9382 |
. . . . . . . 8
โข ((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โ (๐ โ ๐ ) โ โค) |
52 | 10, 51 | fzfigd 10433 |
. . . . . . 7
โข ((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โ (0...(๐ โ ๐ )) โ Fin) |
53 | 6 | adantr 276 |
. . . . . . . . . . . . 13
โข ((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โ ๐ โ โ0) |
54 | 53 | nn0ge0d 9234 |
. . . . . . . . . . . 12
โข ((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โ 0 โค ๐ ) |
55 | 12 | zred 9377 |
. . . . . . . . . . . . 13
โข ((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โ ๐ โ โ) |
56 | 53 | nn0red 9232 |
. . . . . . . . . . . . 13
โข ((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โ ๐ โ โ) |
57 | 55, 56 | subge02d 8496 |
. . . . . . . . . . . 12
โข ((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โ (0 โค ๐ โ (๐ โ ๐ ) โค ๐)) |
58 | 54, 57 | mpbid 147 |
. . . . . . . . . . 11
โข ((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โ (๐ โ ๐ ) โค ๐) |
59 | 53, 33 | eleqtrdi 2270 |
. . . . . . . . . . . . . . 15
โข ((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โ ๐ โ
(โคโฅโ0)) |
60 | | uzid 9544 |
. . . . . . . . . . . . . . . . . 18
โข (๐ โ โค โ ๐ โ
(โคโฅโ๐ )) |
61 | 49, 60 | syl 14 |
. . . . . . . . . . . . . . . . 17
โข (๐ โ ๐ โ (โคโฅโ๐ )) |
62 | | uzaddcl 9588 |
. . . . . . . . . . . . . . . . 17
โข ((๐ โ
(โคโฅโ๐ ) โง ๐ก โ โ0) โ (๐ + ๐ก) โ (โคโฅโ๐ )) |
63 | 61, 8, 62 | syl2anc 411 |
. . . . . . . . . . . . . . . 16
โข (๐ โ (๐ + ๐ก) โ (โคโฅโ๐ )) |
64 | | eqid 2177 |
. . . . . . . . . . . . . . . . 17
โข
(โคโฅโ๐ ) = (โคโฅโ๐ ) |
65 | 64 | uztrn2 9547 |
. . . . . . . . . . . . . . . 16
โข (((๐ + ๐ก) โ (โคโฅโ๐ ) โง ๐ โ (โคโฅโ(๐ + ๐ก))) โ ๐ โ (โคโฅโ๐ )) |
66 | 63, 65 | sylan 283 |
. . . . . . . . . . . . . . 15
โข ((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โ ๐ โ (โคโฅโ๐ )) |
67 | | elfzuzb 10021 |
. . . . . . . . . . . . . . 15
โข (๐ โ (0...๐) โ (๐ โ (โคโฅโ0)
โง ๐ โ
(โคโฅโ๐ ))) |
68 | 59, 66, 67 | sylanbrc 417 |
. . . . . . . . . . . . . 14
โข ((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โ ๐ โ (0...๐)) |
69 | | fznn0sub2 10130 |
. . . . . . . . . . . . . 14
โข (๐ โ (0...๐) โ (๐ โ ๐ ) โ (0...๐)) |
70 | 68, 69 | syl 14 |
. . . . . . . . . . . . 13
โข ((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โ (๐ โ ๐ ) โ (0...๐)) |
71 | | elfzelz 10027 |
. . . . . . . . . . . . 13
โข ((๐ โ ๐ ) โ (0...๐) โ (๐ โ ๐ ) โ โค) |
72 | 70, 71 | syl 14 |
. . . . . . . . . . . 12
โข ((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โ (๐ โ ๐ ) โ โค) |
73 | | eluz 9543 |
. . . . . . . . . . . 12
โข (((๐ โ ๐ ) โ โค โง ๐ โ โค) โ (๐ โ (โคโฅโ(๐ โ ๐ )) โ (๐ โ ๐ ) โค ๐)) |
74 | 72, 12, 73 | syl2anc 411 |
. . . . . . . . . . 11
โข ((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โ (๐ โ (โคโฅโ(๐ โ ๐ )) โ (๐ โ ๐ ) โค ๐)) |
75 | 58, 74 | mpbird 167 |
. . . . . . . . . 10
โข ((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โ ๐ โ (โคโฅโ(๐ โ ๐ ))) |
76 | | fzss2 10066 |
. . . . . . . . . 10
โข (๐ โ
(โคโฅโ(๐ โ ๐ )) โ (0...(๐ โ ๐ )) โ (0...๐)) |
77 | 75, 76 | syl 14 |
. . . . . . . . 9
โข ((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โ (0...(๐ โ ๐ )) โ (0...๐)) |
78 | 77 | sselda 3157 |
. . . . . . . 8
โข (((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โง ๐ โ (0...(๐ โ ๐ ))) โ ๐ โ (0...๐)) |
79 | 16 | abscld 11192 |
. . . . . . . . . 10
โข ((๐ โง ๐ โ โ0) โ
(absโ๐ด) โ
โ) |
80 | 14, 15, 79 | syl2an 289 |
. . . . . . . . 9
โข (((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โง ๐ โ (0...๐)) โ (absโ๐ด) โ โ) |
81 | 39 | abscld 11192 |
. . . . . . . . 9
โข (((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โง ๐ โ (0...๐)) โ (absโฮฃ๐ โ
(โคโฅโ((๐ โ ๐) + 1))๐ต) โ โ) |
82 | 80, 81 | remulcld 7990 |
. . . . . . . 8
โข (((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โง ๐ โ (0...๐)) โ ((absโ๐ด) ยท (absโฮฃ๐ โ
(โคโฅโ((๐ โ ๐) + 1))๐ต)) โ โ) |
83 | 78, 82 | syldan 282 |
. . . . . . 7
โข (((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โง ๐ โ (0...(๐ โ ๐ ))) โ ((absโ๐ด) ยท (absโฮฃ๐ โ
(โคโฅโ((๐ โ ๐) + 1))๐ต)) โ โ) |
84 | 52, 83 | fsumrecl 11411 |
. . . . . 6
โข ((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โ ฮฃ๐ โ (0...(๐ โ ๐ ))((absโ๐ด) ยท (absโฮฃ๐ โ
(โคโฅโ((๐ โ ๐) + 1))๐ต)) โ โ) |
85 | 51 | peano2zd 9380 |
. . . . . . . 8
โข ((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โ ((๐ โ ๐ ) + 1) โ โค) |
86 | 85, 12 | fzfigd 10433 |
. . . . . . 7
โข ((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โ (((๐ โ ๐ ) + 1)...๐) โ Fin) |
87 | | elfznn0 10116 |
. . . . . . . . . . . . 13
โข ((๐ โ ๐ ) โ (0...๐) โ (๐ โ ๐ ) โ
โ0) |
88 | 70, 87 | syl 14 |
. . . . . . . . . . . 12
โข ((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โ (๐ โ ๐ ) โ
โ0) |
89 | | peano2nn0 9218 |
. . . . . . . . . . . 12
โข ((๐ โ ๐ ) โ โ0 โ ((๐ โ ๐ ) + 1) โ
โ0) |
90 | 88, 89 | syl 14 |
. . . . . . . . . . 11
โข ((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โ ((๐ โ ๐ ) + 1) โ
โ0) |
91 | 90, 33 | eleqtrdi 2270 |
. . . . . . . . . 10
โข ((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โ ((๐ โ ๐ ) + 1) โ
(โคโฅโ0)) |
92 | | fzss1 10065 |
. . . . . . . . . 10
โข (((๐ โ ๐ ) + 1) โ
(โคโฅโ0) โ (((๐ โ ๐ ) + 1)...๐) โ (0...๐)) |
93 | 91, 92 | syl 14 |
. . . . . . . . 9
โข ((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โ (((๐ โ ๐ ) + 1)...๐) โ (0...๐)) |
94 | 93 | sselda 3157 |
. . . . . . . 8
โข (((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โง ๐ โ (((๐ โ ๐ ) + 1)...๐)) โ ๐ โ (0...๐)) |
95 | 94, 82 | syldan 282 |
. . . . . . 7
โข (((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โง ๐ โ (((๐ โ ๐ ) + 1)...๐)) โ ((absโ๐ด) ยท (absโฮฃ๐ โ
(โคโฅโ((๐ โ ๐) + 1))๐ต)) โ โ) |
96 | 86, 95 | fsumrecl 11411 |
. . . . . 6
โข ((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โ ฮฃ๐ โ (((๐ โ ๐ ) + 1)...๐)((absโ๐ด) ยท (absโฮฃ๐ โ
(โคโฅโ((๐ โ ๐) + 1))๐ต)) โ โ) |
97 | 45 | rphalfcld 9711 |
. . . . . . . 8
โข (๐ โ (๐ธ / 2) โ
โ+) |
98 | 97 | rpred 9698 |
. . . . . . 7
โข (๐ โ (๐ธ / 2) โ โ) |
99 | 98 | adantr 276 |
. . . . . 6
โข ((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โ (๐ธ / 2) โ โ) |
100 | | elfznn0 10116 |
. . . . . . . . . . 11
โข (๐ โ (0...(๐ โ ๐ )) โ ๐ โ โ0) |
101 | 14, 100, 79 | syl2an 289 |
. . . . . . . . . 10
โข (((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โง ๐ โ (0...(๐ โ ๐ ))) โ (absโ๐ด) โ โ) |
102 | 52, 101 | fsumrecl 11411 |
. . . . . . . . 9
โข ((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โ ฮฃ๐ โ (0...(๐ โ ๐ ))(absโ๐ด) โ โ) |
103 | 102, 99 | remulcld 7990 |
. . . . . . . 8
โข ((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โ (ฮฃ๐ โ (0...(๐ โ ๐ ))(absโ๐ด) ยท (๐ธ / 2)) โ โ) |
104 | | 0zd 9267 |
. . . . . . . . . . 11
โข (๐ โ 0 โ
โค) |
105 | | eqidd 2178 |
. . . . . . . . . . 11
โข ((๐ โง ๐ โ โ0) โ (๐พโ๐) = (๐พโ๐)) |
106 | | mertens.2 |
. . . . . . . . . . . 12
โข ((๐ โง ๐ โ โ0) โ (๐พโ๐) = (absโ๐ด)) |
107 | 106, 79 | eqeltrd 2254 |
. . . . . . . . . . 11
โข ((๐ โง ๐ โ โ0) โ (๐พโ๐) โ โ) |
108 | | mertens.7 |
. . . . . . . . . . 11
โข (๐ โ seq0( + , ๐พ) โ dom โ
) |
109 | 33, 104, 105, 107, 108 | isumrecl 11439 |
. . . . . . . . . 10
โข (๐ โ ฮฃ๐ โ โ0 (๐พโ๐) โ โ) |
110 | 16 | absge0d 11195 |
. . . . . . . . . . . 12
โข ((๐ โง ๐ โ โ0) โ 0 โค
(absโ๐ด)) |
111 | 110, 106 | breqtrrd 4033 |
. . . . . . . . . . 11
โข ((๐ โง ๐ โ โ0) โ 0 โค
(๐พโ๐)) |
112 | 33, 104, 105, 107, 108, 111 | isumge0 11440 |
. . . . . . . . . 10
โข (๐ โ 0 โค ฮฃ๐ โ โ0
(๐พโ๐)) |
113 | 109, 112 | ge0p1rpd 9729 |
. . . . . . . . 9
โข (๐ โ (ฮฃ๐ โ โ0 (๐พโ๐) + 1) โ
โ+) |
114 | 113 | adantr 276 |
. . . . . . . 8
โข ((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โ (ฮฃ๐ โ โ0 (๐พโ๐) + 1) โ
โ+) |
115 | 103, 114 | rerpdivcld 9730 |
. . . . . . 7
โข ((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โ ((ฮฃ๐ โ (0...(๐ โ ๐ ))(absโ๐ด) ยท (๐ธ / 2)) / (ฮฃ๐ โ โ0 (๐พโ๐) + 1)) โ โ) |
116 | 97, 113 | rpdivcld 9716 |
. . . . . . . . . . . 12
โข (๐ โ ((๐ธ / 2) / (ฮฃ๐ โ โ0 (๐พโ๐) + 1)) โ
โ+) |
117 | 116 | rpred 9698 |
. . . . . . . . . . 11
โข (๐ โ ((๐ธ / 2) / (ฮฃ๐ โ โ0 (๐พโ๐) + 1)) โ โ) |
118 | 117 | ad2antrr 488 |
. . . . . . . . . 10
โข (((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โง ๐ โ (0...(๐ โ ๐ ))) โ ((๐ธ / 2) / (ฮฃ๐ โ โ0 (๐พโ๐) + 1)) โ โ) |
119 | 101, 118 | remulcld 7990 |
. . . . . . . . 9
โข (((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โง ๐ โ (0...(๐ โ ๐ ))) โ ((absโ๐ด) ยท ((๐ธ / 2) / (ฮฃ๐ โ โ0 (๐พโ๐) + 1))) โ โ) |
120 | 78, 23 | syldan 282 |
. . . . . . . . . . . 12
โข (((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โง ๐ โ (0...(๐ โ ๐ ))) โ ((๐ โ ๐) + 1) โ โค) |
121 | | simplll 533 |
. . . . . . . . . . . . 13
โข ((((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โง ๐ โ (0...(๐ โ ๐ ))) โง ๐ โ (โคโฅโ((๐ โ ๐) + 1))) โ ๐) |
122 | 78, 22 | syldan 282 |
. . . . . . . . . . . . . 14
โข (((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โง ๐ โ (0...(๐ โ ๐ ))) โ ((๐ โ ๐) + 1) โ
โ0) |
123 | 122, 25 | sylan 283 |
. . . . . . . . . . . . 13
โข ((((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โง ๐ โ (0...(๐ โ ๐ ))) โง ๐ โ (โคโฅโ((๐ โ ๐) + 1))) โ ๐ โ โ0) |
124 | 121, 123,
27 | syl2anc 411 |
. . . . . . . . . . . 12
โข ((((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โง ๐ โ (0...(๐ โ ๐ ))) โง ๐ โ (โคโฅโ((๐ โ ๐) + 1))) โ (๐บโ๐) = ๐ต) |
125 | 121, 123,
29 | syl2anc 411 |
. . . . . . . . . . . 12
โข ((((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โง ๐ โ (0...(๐ โ ๐ ))) โง ๐ โ (โคโฅโ((๐ โ ๐) + 1))) โ ๐ต โ โ) |
126 | 78, 38 | syldan 282 |
. . . . . . . . . . . 12
โข (((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โง ๐ โ (0...(๐ โ ๐ ))) โ seq((๐ โ ๐) + 1)( + , ๐บ) โ dom โ ) |
127 | 18, 120, 124, 125, 126 | isumcl 11435 |
. . . . . . . . . . 11
โข (((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โง ๐ โ (0...(๐ โ ๐ ))) โ ฮฃ๐ โ (โคโฅโ((๐ โ ๐) + 1))๐ต โ โ) |
128 | 127 | abscld 11192 |
. . . . . . . . . 10
โข (((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โง ๐ โ (0...(๐ โ ๐ ))) โ (absโฮฃ๐ โ
(โคโฅโ((๐ โ ๐) + 1))๐ต) โ โ) |
129 | 79, 110 | jca 306 |
. . . . . . . . . . 11
โข ((๐ โง ๐ โ โ0) โ
((absโ๐ด) โ
โ โง 0 โค (absโ๐ด))) |
130 | 14, 100, 129 | syl2an 289 |
. . . . . . . . . 10
โข (((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โง ๐ โ (0...(๐ โ ๐ ))) โ ((absโ๐ด) โ โ โง 0 โค
(absโ๐ด))) |
131 | 124 | sumeq2dv 11378 |
. . . . . . . . . . . . 13
โข (((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โง ๐ โ (0...(๐ โ ๐ ))) โ ฮฃ๐ โ (โคโฅโ((๐ โ ๐) + 1))(๐บโ๐) = ฮฃ๐ โ (โคโฅโ((๐ โ ๐) + 1))๐ต) |
132 | 131 | fveq2d 5521 |
. . . . . . . . . . . 12
โข (((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โง ๐ โ (0...(๐ โ ๐ ))) โ (absโฮฃ๐ โ
(โคโฅโ((๐ โ ๐) + 1))(๐บโ๐)) = (absโฮฃ๐ โ (โคโฅโ((๐ โ ๐) + 1))๐ต)) |
133 | | fvoveq1 5900 |
. . . . . . . . . . . . . . . 16
โข (๐ = (๐ โ ๐) โ (โคโฅโ(๐ + 1)) =
(โคโฅโ((๐ โ ๐) + 1))) |
134 | 133 | sumeq1d 11376 |
. . . . . . . . . . . . . . 15
โข (๐ = (๐ โ ๐) โ ฮฃ๐ โ (โคโฅโ(๐ + 1))(๐บโ๐) = ฮฃ๐ โ (โคโฅโ((๐ โ ๐) + 1))(๐บโ๐)) |
135 | 134 | fveq2d 5521 |
. . . . . . . . . . . . . 14
โข (๐ = (๐ โ ๐) โ (absโฮฃ๐ โ (โคโฅโ(๐ + 1))(๐บโ๐)) = (absโฮฃ๐ โ (โคโฅโ((๐ โ ๐) + 1))(๐บโ๐))) |
136 | 135 | breq1d 4015 |
. . . . . . . . . . . . 13
โข (๐ = (๐ โ ๐) โ ((absโฮฃ๐ โ
(โคโฅโ(๐ + 1))(๐บโ๐)) < ((๐ธ / 2) / (ฮฃ๐ โ โ0 (๐พโ๐) + 1)) โ (absโฮฃ๐ โ
(โคโฅโ((๐ โ ๐) + 1))(๐บโ๐)) < ((๐ธ / 2) / (ฮฃ๐ โ โ0 (๐พโ๐) + 1)))) |
137 | 4 | simprd 114 |
. . . . . . . . . . . . . 14
โข (๐ โ โ๐ โ (โคโฅโ๐ )(absโฮฃ๐ โ
(โคโฅโ(๐ + 1))(๐บโ๐)) < ((๐ธ / 2) / (ฮฃ๐ โ โ0 (๐พโ๐) + 1))) |
138 | 137 | ad2antrr 488 |
. . . . . . . . . . . . 13
โข (((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โง ๐ โ (0...(๐ โ ๐ ))) โ โ๐ โ (โคโฅโ๐ )(absโฮฃ๐ โ
(โคโฅโ(๐ + 1))(๐บโ๐)) < ((๐ธ / 2) / (ฮฃ๐ โ โ0 (๐พโ๐) + 1))) |
139 | | elfzelz 10027 |
. . . . . . . . . . . . . . . . 17
โข (๐ โ (0...(๐ โ ๐ )) โ ๐ โ โค) |
140 | 139 | adantl 277 |
. . . . . . . . . . . . . . . 16
โข (((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โง ๐ โ (0...(๐ โ ๐ ))) โ ๐ โ โค) |
141 | 140 | zred 9377 |
. . . . . . . . . . . . . . 15
โข (((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โง ๐ โ (0...(๐ โ ๐ ))) โ ๐ โ โ) |
142 | 11 | ad2antlr 489 |
. . . . . . . . . . . . . . . 16
โข (((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โง ๐ โ (0...(๐ โ ๐ ))) โ ๐ โ โค) |
143 | 142 | zred 9377 |
. . . . . . . . . . . . . . 15
โข (((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โง ๐ โ (0...(๐ โ ๐ ))) โ ๐ โ โ) |
144 | 49 | ad2antrr 488 |
. . . . . . . . . . . . . . . 16
โข (((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โง ๐ โ (0...(๐ โ ๐ ))) โ ๐ โ โค) |
145 | 144 | zred 9377 |
. . . . . . . . . . . . . . 15
โข (((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โง ๐ โ (0...(๐ โ ๐ ))) โ ๐ โ โ) |
146 | | elfzle2 10030 |
. . . . . . . . . . . . . . . 16
โข (๐ โ (0...(๐ โ ๐ )) โ ๐ โค (๐ โ ๐ )) |
147 | 146 | adantl 277 |
. . . . . . . . . . . . . . 15
โข (((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โง ๐ โ (0...(๐ โ ๐ ))) โ ๐ โค (๐ โ ๐ )) |
148 | 141, 143,
145, 147 | lesubd 8508 |
. . . . . . . . . . . . . 14
โข (((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โง ๐ โ (0...(๐ โ ๐ ))) โ ๐ โค (๐ โ ๐)) |
149 | 142, 140 | zsubcld 9382 |
. . . . . . . . . . . . . . 15
โข (((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โง ๐ โ (0...(๐ โ ๐ ))) โ (๐ โ ๐) โ โค) |
150 | | eluz 9543 |
. . . . . . . . . . . . . . 15
โข ((๐ โ โค โง (๐ โ ๐) โ โค) โ ((๐ โ ๐) โ (โคโฅโ๐ ) โ ๐ โค (๐ โ ๐))) |
151 | 144, 149,
150 | syl2anc 411 |
. . . . . . . . . . . . . 14
โข (((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โง ๐ โ (0...(๐ โ ๐ ))) โ ((๐ โ ๐) โ (โคโฅโ๐ ) โ ๐ โค (๐ โ ๐))) |
152 | 148, 151 | mpbird 167 |
. . . . . . . . . . . . 13
โข (((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โง ๐ โ (0...(๐ โ ๐ ))) โ (๐ โ ๐) โ (โคโฅโ๐ )) |
153 | 136, 138,
152 | rspcdva 2848 |
. . . . . . . . . . . 12
โข (((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โง ๐ โ (0...(๐ โ ๐ ))) โ (absโฮฃ๐ โ
(โคโฅโ((๐ โ ๐) + 1))(๐บโ๐)) < ((๐ธ / 2) / (ฮฃ๐ โ โ0 (๐พโ๐) + 1))) |
154 | 132, 153 | eqbrtrrd 4029 |
. . . . . . . . . . 11
โข (((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โง ๐ โ (0...(๐ โ ๐ ))) โ (absโฮฃ๐ โ
(โคโฅโ((๐ โ ๐) + 1))๐ต) < ((๐ธ / 2) / (ฮฃ๐ โ โ0 (๐พโ๐) + 1))) |
155 | 128, 118,
154 | ltled 8078 |
. . . . . . . . . 10
โข (((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โง ๐ โ (0...(๐ โ ๐ ))) โ (absโฮฃ๐ โ
(โคโฅโ((๐ โ ๐) + 1))๐ต) โค ((๐ธ / 2) / (ฮฃ๐ โ โ0 (๐พโ๐) + 1))) |
156 | | lemul2a 8818 |
. . . . . . . . . 10
โข
((((absโฮฃ๐ โ (โคโฅโ((๐ โ ๐) + 1))๐ต) โ โ โง ((๐ธ / 2) / (ฮฃ๐ โ โ0 (๐พโ๐) + 1)) โ โ โง
((absโ๐ด) โ
โ โง 0 โค (absโ๐ด))) โง (absโฮฃ๐ โ
(โคโฅโ((๐ โ ๐) + 1))๐ต) โค ((๐ธ / 2) / (ฮฃ๐ โ โ0 (๐พโ๐) + 1))) โ ((absโ๐ด) ยท (absโฮฃ๐ โ
(โคโฅโ((๐ โ ๐) + 1))๐ต)) โค ((absโ๐ด) ยท ((๐ธ / 2) / (ฮฃ๐ โ โ0 (๐พโ๐) + 1)))) |
157 | 128, 118,
130, 155, 156 | syl31anc 1241 |
. . . . . . . . 9
โข (((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โง ๐ โ (0...(๐ โ ๐ ))) โ ((absโ๐ด) ยท (absโฮฃ๐ โ
(โคโฅโ((๐ โ ๐) + 1))๐ต)) โค ((absโ๐ด) ยท ((๐ธ / 2) / (ฮฃ๐ โ โ0 (๐พโ๐) + 1)))) |
158 | 52, 83, 119, 157 | fsumle 11473 |
. . . . . . . 8
โข ((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โ ฮฃ๐ โ (0...(๐ โ ๐ ))((absโ๐ด) ยท (absโฮฃ๐ โ
(โคโฅโ((๐ โ ๐) + 1))๐ต)) โค ฮฃ๐ โ (0...(๐ โ ๐ ))((absโ๐ด) ยท ((๐ธ / 2) / (ฮฃ๐ โ โ0 (๐พโ๐) + 1)))) |
159 | 102 | recnd 7988 |
. . . . . . . . . 10
โข ((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โ ฮฃ๐ โ (0...(๐ โ ๐ ))(absโ๐ด) โ โ) |
160 | 97 | rpcnd 9700 |
. . . . . . . . . . 11
โข (๐ โ (๐ธ / 2) โ โ) |
161 | 160 | adantr 276 |
. . . . . . . . . 10
โข ((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โ (๐ธ / 2) โ โ) |
162 | | peano2re 8095 |
. . . . . . . . . . . . 13
โข
(ฮฃ๐ โ
โ0 (๐พโ๐) โ โ โ (ฮฃ๐ โ โ0
(๐พโ๐) + 1) โ โ) |
163 | 109, 162 | syl 14 |
. . . . . . . . . . . 12
โข (๐ โ (ฮฃ๐ โ โ0 (๐พโ๐) + 1) โ โ) |
164 | 163 | recnd 7988 |
. . . . . . . . . . 11
โข (๐ โ (ฮฃ๐ โ โ0 (๐พโ๐) + 1) โ โ) |
165 | 164 | adantr 276 |
. . . . . . . . . 10
โข ((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โ (ฮฃ๐ โ โ0 (๐พโ๐) + 1) โ โ) |
166 | 114 | rpap0d 9704 |
. . . . . . . . . 10
โข ((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โ (ฮฃ๐ โ โ0 (๐พโ๐) + 1) # 0) |
167 | 159, 161,
165, 166 | divassapd 8785 |
. . . . . . . . 9
โข ((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โ ((ฮฃ๐ โ (0...(๐ โ ๐ ))(absโ๐ด) ยท (๐ธ / 2)) / (ฮฃ๐ โ โ0 (๐พโ๐) + 1)) = (ฮฃ๐ โ (0...(๐ โ ๐ ))(absโ๐ด) ยท ((๐ธ / 2) / (ฮฃ๐ โ โ0 (๐พโ๐) + 1)))) |
168 | | fveq2 5517 |
. . . . . . . . . . . . . . . . 17
โข (๐ = ๐ โ (๐พโ๐) = (๐พโ๐)) |
169 | 168 | cbvsumv 11371 |
. . . . . . . . . . . . . . . 16
โข
ฮฃ๐ โ
โ0 (๐พโ๐) = ฮฃ๐ โ โ0 (๐พโ๐) |
170 | 169 | oveq1i 5887 |
. . . . . . . . . . . . . . 15
โข
(ฮฃ๐ โ
โ0 (๐พโ๐) + 1) = (ฮฃ๐ โ โ0 (๐พโ๐) + 1) |
171 | 170 | oveq2i 5888 |
. . . . . . . . . . . . . 14
โข ((๐ธ / 2) / (ฮฃ๐ โ โ0
(๐พโ๐) + 1)) = ((๐ธ / 2) / (ฮฃ๐ โ โ0 (๐พโ๐) + 1)) |
172 | 171, 116 | eqeltrid 2264 |
. . . . . . . . . . . . 13
โข (๐ โ ((๐ธ / 2) / (ฮฃ๐ โ โ0 (๐พโ๐) + 1)) โ
โ+) |
173 | 172 | rpcnd 9700 |
. . . . . . . . . . . 12
โข (๐ โ ((๐ธ / 2) / (ฮฃ๐ โ โ0 (๐พโ๐) + 1)) โ โ) |
174 | 173 | adantr 276 |
. . . . . . . . . . 11
โข ((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โ ((๐ธ / 2) / (ฮฃ๐ โ โ0 (๐พโ๐) + 1)) โ โ) |
175 | 79 | recnd 7988 |
. . . . . . . . . . . 12
โข ((๐ โง ๐ โ โ0) โ
(absโ๐ด) โ
โ) |
176 | 14, 100, 175 | syl2an 289 |
. . . . . . . . . . 11
โข (((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โง ๐ โ (0...(๐ โ ๐ ))) โ (absโ๐ด) โ โ) |
177 | 52, 174, 176 | fsummulc1 11459 |
. . . . . . . . . 10
โข ((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โ (ฮฃ๐ โ (0...(๐ โ ๐ ))(absโ๐ด) ยท ((๐ธ / 2) / (ฮฃ๐ โ โ0 (๐พโ๐) + 1))) = ฮฃ๐ โ (0...(๐ โ ๐ ))((absโ๐ด) ยท ((๐ธ / 2) / (ฮฃ๐ โ โ0 (๐พโ๐) + 1)))) |
178 | 171 | oveq2i 5888 |
. . . . . . . . . 10
โข
(ฮฃ๐ โ
(0...(๐ โ ๐ ))(absโ๐ด) ยท ((๐ธ / 2) / (ฮฃ๐ โ โ0 (๐พโ๐) + 1))) = (ฮฃ๐ โ (0...(๐ โ ๐ ))(absโ๐ด) ยท ((๐ธ / 2) / (ฮฃ๐ โ โ0 (๐พโ๐) + 1))) |
179 | 171 | oveq2i 5888 |
. . . . . . . . . . . 12
โข
((absโ๐ด)
ยท ((๐ธ / 2) /
(ฮฃ๐ โ
โ0 (๐พโ๐) + 1))) = ((absโ๐ด) ยท ((๐ธ / 2) / (ฮฃ๐ โ โ0 (๐พโ๐) + 1))) |
180 | 179 | a1i 9 |
. . . . . . . . . . 11
โข (๐ โ (0...(๐ โ ๐ )) โ ((absโ๐ด) ยท ((๐ธ / 2) / (ฮฃ๐ โ โ0 (๐พโ๐) + 1))) = ((absโ๐ด) ยท ((๐ธ / 2) / (ฮฃ๐ โ โ0 (๐พโ๐) + 1)))) |
181 | 180 | sumeq2i 11374 |
. . . . . . . . . 10
โข
ฮฃ๐ โ
(0...(๐ โ ๐ ))((absโ๐ด) ยท ((๐ธ / 2) / (ฮฃ๐ โ โ0 (๐พโ๐) + 1))) = ฮฃ๐ โ (0...(๐ โ ๐ ))((absโ๐ด) ยท ((๐ธ / 2) / (ฮฃ๐ โ โ0 (๐พโ๐) + 1))) |
182 | 177, 178,
181 | 3eqtr3g 2233 |
. . . . . . . . 9
โข ((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โ (ฮฃ๐ โ (0...(๐ โ ๐ ))(absโ๐ด) ยท ((๐ธ / 2) / (ฮฃ๐ โ โ0 (๐พโ๐) + 1))) = ฮฃ๐ โ (0...(๐ โ ๐ ))((absโ๐ด) ยท ((๐ธ / 2) / (ฮฃ๐ โ โ0 (๐พโ๐) + 1)))) |
183 | 167, 182 | eqtrd 2210 |
. . . . . . . 8
โข ((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โ ((ฮฃ๐ โ (0...(๐ โ ๐ ))(absโ๐ด) ยท (๐ธ / 2)) / (ฮฃ๐ โ โ0 (๐พโ๐) + 1)) = ฮฃ๐ โ (0...(๐ โ ๐ ))((absโ๐ด) ยท ((๐ธ / 2) / (ฮฃ๐ โ โ0 (๐พโ๐) + 1)))) |
184 | 158, 183 | breqtrrd 4033 |
. . . . . . 7
โข ((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โ ฮฃ๐ โ (0...(๐ โ ๐ ))((absโ๐ด) ยท (absโฮฃ๐ โ
(โคโฅโ((๐ โ ๐) + 1))๐ต)) โค ((ฮฃ๐ โ (0...(๐ โ ๐ ))(absโ๐ด) ยท (๐ธ / 2)) / (ฮฃ๐ โ โ0 (๐พโ๐) + 1))) |
185 | 109 | adantr 276 |
. . . . . . . . . 10
โข ((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โ ฮฃ๐ โ โ0 (๐พโ๐) โ โ) |
186 | 163 | adantr 276 |
. . . . . . . . . 10
โข ((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โ (ฮฃ๐ โ โ0 (๐พโ๐) + 1) โ โ) |
187 | | fz0ssnn0 10118 |
. . . . . . . . . . . . 13
โข
(0...(๐ โ
๐ )) โ
โ0 |
188 | 187 | a1i 9 |
. . . . . . . . . . . 12
โข ((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โ (0...(๐ โ ๐ )) โ
โ0) |
189 | 106 | adantlr 477 |
. . . . . . . . . . . 12
โข (((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โง ๐ โ โ0) โ (๐พโ๐) = (absโ๐ด)) |
190 | | nn0z 9275 |
. . . . . . . . . . . . . . 15
โข (๐ โ โ0
โ ๐ โ
โค) |
191 | 190 | adantl 277 |
. . . . . . . . . . . . . 14
โข (((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โง ๐ โ โ0) โ ๐ โ
โค) |
192 | | 0zd 9267 |
. . . . . . . . . . . . . 14
โข (((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โง ๐ โ โ0) โ 0 โ
โค) |
193 | 51 | adantr 276 |
. . . . . . . . . . . . . 14
โข (((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โง ๐ โ โ0) โ (๐ โ ๐ ) โ โค) |
194 | | fzdcel 10042 |
. . . . . . . . . . . . . 14
โข ((๐ โ โค โง 0 โ
โค โง (๐ โ
๐ ) โ โค) โ
DECID ๐
โ (0...(๐ โ
๐ ))) |
195 | 191, 192,
193, 194 | syl3anc 1238 |
. . . . . . . . . . . . 13
โข (((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โง ๐ โ โ0) โ
DECID ๐
โ (0...(๐ โ
๐ ))) |
196 | 195 | ralrimiva 2550 |
. . . . . . . . . . . 12
โข ((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โ โ๐ โ โ0
DECID ๐
โ (0...(๐ โ
๐ ))) |
197 | 79 | adantlr 477 |
. . . . . . . . . . . 12
โข (((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โง ๐ โ โ0) โ
(absโ๐ด) โ
โ) |
198 | 110 | adantlr 477 |
. . . . . . . . . . . 12
โข (((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โง ๐ โ โ0) โ 0 โค
(absโ๐ด)) |
199 | 108 | adantr 276 |
. . . . . . . . . . . 12
โข ((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โ seq0( + , ๐พ) โ dom โ ) |
200 | 33, 10, 52, 188, 189, 196, 197, 198, 199 | isumlessdc 11506 |
. . . . . . . . . . 11
โข ((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โ ฮฃ๐ โ (0...(๐ โ ๐ ))(absโ๐ด) โค ฮฃ๐ โ โ0 (absโ๐ด)) |
201 | 106 | sumeq2dv 11378 |
. . . . . . . . . . . 12
โข (๐ โ ฮฃ๐ โ โ0 (๐พโ๐) = ฮฃ๐ โ โ0 (absโ๐ด)) |
202 | 201 | adantr 276 |
. . . . . . . . . . 11
โข ((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โ ฮฃ๐ โ โ0 (๐พโ๐) = ฮฃ๐ โ โ0 (absโ๐ด)) |
203 | 200, 202 | breqtrrd 4033 |
. . . . . . . . . 10
โข ((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โ ฮฃ๐ โ (0...(๐ โ ๐ ))(absโ๐ด) โค ฮฃ๐ โ โ0 (๐พโ๐)) |
204 | 109 | ltp1d 8889 |
. . . . . . . . . . 11
โข (๐ โ ฮฃ๐ โ โ0 (๐พโ๐) < (ฮฃ๐ โ โ0 (๐พโ๐) + 1)) |
205 | 204 | adantr 276 |
. . . . . . . . . 10
โข ((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โ ฮฃ๐ โ โ0 (๐พโ๐) < (ฮฃ๐ โ โ0 (๐พโ๐) + 1)) |
206 | 102, 185,
186, 203, 205 | lelttrd 8084 |
. . . . . . . . 9
โข ((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โ ฮฃ๐ โ (0...(๐ โ ๐ ))(absโ๐ด) < (ฮฃ๐ โ โ0 (๐พโ๐) + 1)) |
207 | 97 | rpregt0d 9705 |
. . . . . . . . . . 11
โข (๐ โ ((๐ธ / 2) โ โ โง 0 < (๐ธ / 2))) |
208 | 207 | adantr 276 |
. . . . . . . . . 10
โข ((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โ ((๐ธ / 2) โ โ โง 0 < (๐ธ / 2))) |
209 | | ltmul1 8551 |
. . . . . . . . . 10
โข
((ฮฃ๐ โ
(0...(๐ โ ๐ ))(absโ๐ด) โ โ โง (ฮฃ๐ โ โ0
(๐พโ๐) + 1) โ โ โง ((๐ธ / 2) โ โ โง 0
< (๐ธ / 2))) โ
(ฮฃ๐ โ
(0...(๐ โ ๐ ))(absโ๐ด) < (ฮฃ๐ โ โ0 (๐พโ๐) + 1) โ (ฮฃ๐ โ (0...(๐ โ ๐ ))(absโ๐ด) ยท (๐ธ / 2)) < ((ฮฃ๐ โ โ0 (๐พโ๐) + 1) ยท (๐ธ / 2)))) |
210 | 102, 186,
208, 209 | syl3anc 1238 |
. . . . . . . . 9
โข ((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โ (ฮฃ๐ โ (0...(๐ โ ๐ ))(absโ๐ด) < (ฮฃ๐ โ โ0 (๐พโ๐) + 1) โ (ฮฃ๐ โ (0...(๐ โ ๐ ))(absโ๐ด) ยท (๐ธ / 2)) < ((ฮฃ๐ โ โ0 (๐พโ๐) + 1) ยท (๐ธ / 2)))) |
211 | 206, 210 | mpbid 147 |
. . . . . . . 8
โข ((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โ (ฮฃ๐ โ (0...(๐ โ ๐ ))(absโ๐ด) ยท (๐ธ / 2)) < ((ฮฃ๐ โ โ0 (๐พโ๐) + 1) ยท (๐ธ / 2))) |
212 | 113 | rpregt0d 9705 |
. . . . . . . . . 10
โข (๐ โ ((ฮฃ๐ โ โ0
(๐พโ๐) + 1) โ โ โง 0 <
(ฮฃ๐ โ
โ0 (๐พโ๐) + 1))) |
213 | 212 | adantr 276 |
. . . . . . . . 9
โข ((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โ ((ฮฃ๐ โ โ0 (๐พโ๐) + 1) โ โ โง 0 <
(ฮฃ๐ โ
โ0 (๐พโ๐) + 1))) |
214 | | ltdivmul 8835 |
. . . . . . . . 9
โข
(((ฮฃ๐ โ
(0...(๐ โ ๐ ))(absโ๐ด) ยท (๐ธ / 2)) โ โ โง (๐ธ / 2) โ โ โง
((ฮฃ๐ โ
โ0 (๐พโ๐) + 1) โ โ โง 0 <
(ฮฃ๐ โ
โ0 (๐พโ๐) + 1))) โ (((ฮฃ๐ โ (0...(๐ โ ๐ ))(absโ๐ด) ยท (๐ธ / 2)) / (ฮฃ๐ โ โ0 (๐พโ๐) + 1)) < (๐ธ / 2) โ (ฮฃ๐ โ (0...(๐ โ ๐ ))(absโ๐ด) ยท (๐ธ / 2)) < ((ฮฃ๐ โ โ0 (๐พโ๐) + 1) ยท (๐ธ / 2)))) |
215 | 103, 99, 213, 214 | syl3anc 1238 |
. . . . . . . 8
โข ((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โ (((ฮฃ๐ โ (0...(๐ โ ๐ ))(absโ๐ด) ยท (๐ธ / 2)) / (ฮฃ๐ โ โ0 (๐พโ๐) + 1)) < (๐ธ / 2) โ (ฮฃ๐ โ (0...(๐ โ ๐ ))(absโ๐ด) ยท (๐ธ / 2)) < ((ฮฃ๐ โ โ0 (๐พโ๐) + 1) ยท (๐ธ / 2)))) |
216 | 211, 215 | mpbird 167 |
. . . . . . 7
โข ((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โ ((ฮฃ๐ โ (0...(๐ โ ๐ ))(absโ๐ด) ยท (๐ธ / 2)) / (ฮฃ๐ โ โ0 (๐พโ๐) + 1)) < (๐ธ / 2)) |
217 | 84, 115, 99, 184, 216 | lelttrd 8084 |
. . . . . 6
โข ((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โ ฮฃ๐ โ (0...(๐ โ ๐ ))((absโ๐ด) ยท (absโฮฃ๐ โ
(โคโฅโ((๐ โ ๐) + 1))๐ต)) < (๐ธ / 2)) |
218 | | mertens.p |
. . . . . . . . . 10
โข (๐ โ ๐ โ โ) |
219 | 98, 218 | remulcld 7990 |
. . . . . . . . 9
โข (๐ โ ((๐ธ / 2) ยท ๐) โ โ) |
220 | | mertens.pge0 |
. . . . . . . . . 10
โข (๐ โ 0 โค ๐) |
221 | 218, 220 | ge0p1rpd 9729 |
. . . . . . . . 9
โข (๐ โ (๐ + 1) โ
โ+) |
222 | 219, 221 | rerpdivcld 9730 |
. . . . . . . 8
โข (๐ โ (((๐ธ / 2) ยท ๐) / (๐ + 1)) โ โ) |
223 | 222 | adantr 276 |
. . . . . . 7
โข ((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โ (((๐ธ / 2) ยท ๐) / (๐ + 1)) โ โ) |
224 | 5 | nnrpd 9696 |
. . . . . . . . . . . . . 14
โข (๐ โ ๐ โ โ+) |
225 | 97, 224 | rpdivcld 9716 |
. . . . . . . . . . . . 13
โข (๐ โ ((๐ธ / 2) / ๐ ) โ
โ+) |
226 | 225, 221 | rpdivcld 9716 |
. . . . . . . . . . . 12
โข (๐ โ (((๐ธ / 2) / ๐ ) / (๐ + 1)) โ
โ+) |
227 | 226 | rpred 9698 |
. . . . . . . . . . 11
โข (๐ โ (((๐ธ / 2) / ๐ ) / (๐ + 1)) โ โ) |
228 | 227, 218 | remulcld 7990 |
. . . . . . . . . 10
โข (๐ โ ((((๐ธ / 2) / ๐ ) / (๐ + 1)) ยท ๐) โ โ) |
229 | 228 | ad2antrr 488 |
. . . . . . . . 9
โข (((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โง ๐ โ (((๐ โ ๐ ) + 1)...๐)) โ ((((๐ธ / 2) / ๐ ) / (๐ + 1)) ยท ๐) โ โ) |
230 | | simpll 527 |
. . . . . . . . . . . 12
โข (((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โง ๐ โ (((๐ โ ๐ ) + 1)...๐)) โ ๐) |
231 | 94, 15 | syl 14 |
. . . . . . . . . . . 12
โข (((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โง ๐ โ (((๐ โ ๐ ) + 1)...๐)) โ ๐ โ โ0) |
232 | 230, 231,
79 | syl2anc 411 |
. . . . . . . . . . 11
โข (((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โง ๐ โ (((๐ โ ๐ ) + 1)...๐)) โ (absโ๐ด) โ โ) |
233 | 227 | ad2antrr 488 |
. . . . . . . . . . 11
โข (((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โง ๐ โ (((๐ โ ๐ ) + 1)...๐)) โ (((๐ธ / 2) / ๐ ) / (๐ + 1)) โ โ) |
234 | 230, 231,
106 | syl2anc 411 |
. . . . . . . . . . . 12
โข (((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โง ๐ โ (((๐ โ ๐ ) + 1)...๐)) โ (๐พโ๐) = (absโ๐ด)) |
235 | | fveq2 5517 |
. . . . . . . . . . . . . 14
โข (๐ = ๐ โ (๐พโ๐) = (๐พโ๐)) |
236 | 235 | breq1d 4015 |
. . . . . . . . . . . . 13
โข (๐ = ๐ โ ((๐พโ๐) < (((๐ธ / 2) / ๐ ) / (๐ + 1)) โ (๐พโ๐) < (((๐ธ / 2) / ๐ ) / (๐ + 1)))) |
237 | 7 | simprd 114 |
. . . . . . . . . . . . . 14
โข (๐ โ โ๐ โ (โคโฅโ๐ก)(๐พโ๐) < (((๐ธ / 2) / ๐ ) / (๐ + 1))) |
238 | 237 | ad2antrr 488 |
. . . . . . . . . . . . 13
โข (((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โง ๐ โ (((๐ โ ๐ ) + 1)...๐)) โ โ๐ โ (โคโฅโ๐ก)(๐พโ๐) < (((๐ธ / 2) / ๐ ) / (๐ + 1))) |
239 | | elfzuz 10023 |
. . . . . . . . . . . . . 14
โข (๐ โ (((๐ โ ๐ ) + 1)...๐) โ ๐ โ (โคโฅโ((๐ โ ๐ ) + 1))) |
240 | | eluzle 9542 |
. . . . . . . . . . . . . . . . . 18
โข (๐ โ
(โคโฅโ(๐ + ๐ก)) โ (๐ + ๐ก) โค ๐) |
241 | 240 | adantl 277 |
. . . . . . . . . . . . . . . . 17
โข ((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โ (๐ + ๐ก) โค ๐) |
242 | 8 | nn0zd 9375 |
. . . . . . . . . . . . . . . . . . . 20
โข (๐ โ ๐ก โ โค) |
243 | 242 | adantr 276 |
. . . . . . . . . . . . . . . . . . 19
โข ((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โ ๐ก โ โค) |
244 | 243 | zred 9377 |
. . . . . . . . . . . . . . . . . 18
โข ((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โ ๐ก โ โ) |
245 | 56, 244, 55 | leaddsub2d 8506 |
. . . . . . . . . . . . . . . . 17
โข ((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โ ((๐ + ๐ก) โค ๐ โ ๐ก โค (๐ โ ๐ ))) |
246 | 241, 245 | mpbid 147 |
. . . . . . . . . . . . . . . 16
โข ((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โ ๐ก โค (๐ โ ๐ )) |
247 | | eluz 9543 |
. . . . . . . . . . . . . . . . 17
โข ((๐ก โ โค โง (๐ โ ๐ ) โ โค) โ ((๐ โ ๐ ) โ (โคโฅโ๐ก) โ ๐ก โค (๐ โ ๐ ))) |
248 | 243, 72, 247 | syl2anc 411 |
. . . . . . . . . . . . . . . 16
โข ((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โ ((๐ โ ๐ ) โ (โคโฅโ๐ก) โ ๐ก โค (๐ โ ๐ ))) |
249 | 246, 248 | mpbird 167 |
. . . . . . . . . . . . . . 15
โข ((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โ (๐ โ ๐ ) โ (โคโฅโ๐ก)) |
250 | | peano2uz 9585 |
. . . . . . . . . . . . . . 15
โข ((๐ โ ๐ ) โ (โคโฅโ๐ก) โ ((๐ โ ๐ ) + 1) โ
(โคโฅโ๐ก)) |
251 | 249, 250 | syl 14 |
. . . . . . . . . . . . . 14
โข ((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โ ((๐ โ ๐ ) + 1) โ
(โคโฅโ๐ก)) |
252 | | uztrn 9546 |
. . . . . . . . . . . . . 14
โข ((๐ โ
(โคโฅโ((๐ โ ๐ ) + 1)) โง ((๐ โ ๐ ) + 1) โ
(โคโฅโ๐ก)) โ ๐ โ (โคโฅโ๐ก)) |
253 | 239, 251,
252 | syl2anr 290 |
. . . . . . . . . . . . 13
โข (((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โง ๐ โ (((๐ โ ๐ ) + 1)...๐)) โ ๐ โ (โคโฅโ๐ก)) |
254 | 236, 238,
253 | rspcdva 2848 |
. . . . . . . . . . . 12
โข (((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โง ๐ โ (((๐ โ ๐ ) + 1)...๐)) โ (๐พโ๐) < (((๐ธ / 2) / ๐ ) / (๐ + 1))) |
255 | 234, 254 | eqbrtrrd 4029 |
. . . . . . . . . . 11
โข (((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โง ๐ โ (((๐ โ ๐ ) + 1)...๐)) โ (absโ๐ด) < (((๐ธ / 2) / ๐ ) / (๐ + 1))) |
256 | 232, 233,
255 | ltled 8078 |
. . . . . . . . . 10
โข (((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โง ๐ โ (((๐ โ ๐ ) + 1)...๐)) โ (absโ๐ด) โค (((๐ธ / 2) / ๐ ) / (๐ + 1))) |
257 | | breq1 4008 |
. . . . . . . . . . 11
โข (๐ค = (absโฮฃ๐ โ
(โคโฅโ((๐ โ ๐) + 1))๐ต) โ (๐ค โค ๐ โ (absโฮฃ๐ โ (โคโฅโ((๐ โ ๐) + 1))๐ต) โค ๐)) |
258 | | mertens.pub |
. . . . . . . . . . . 12
โข (๐ โ โ๐ค โ ๐ ๐ค โค ๐) |
259 | 258 | ad2antrr 488 |
. . . . . . . . . . 11
โข (((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โง ๐ โ (((๐ โ ๐ ) + 1)...๐)) โ โ๐ค โ ๐ ๐ค โค ๐) |
260 | 55 | adantr 276 |
. . . . . . . . . . . . . . 15
โข (((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โง ๐ โ (((๐ โ ๐ ) + 1)...๐)) โ ๐ โ โ) |
261 | | peano2zm 9293 |
. . . . . . . . . . . . . . . . . 18
โข (๐ โ โค โ (๐ โ 1) โ
โค) |
262 | 49, 261 | syl 14 |
. . . . . . . . . . . . . . . . 17
โข (๐ โ (๐ โ 1) โ โค) |
263 | 262 | zred 9377 |
. . . . . . . . . . . . . . . 16
โข (๐ โ (๐ โ 1) โ โ) |
264 | 263 | ad2antrr 488 |
. . . . . . . . . . . . . . 15
โข (((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โง ๐ โ (((๐ โ ๐ ) + 1)...๐)) โ (๐ โ 1) โ โ) |
265 | 231 | nn0red 9232 |
. . . . . . . . . . . . . . 15
โข (((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โง ๐ โ (((๐ โ ๐ ) + 1)...๐)) โ ๐ โ โ) |
266 | 12 | zcnd 9378 |
. . . . . . . . . . . . . . . . . 18
โข ((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โ ๐ โ โ) |
267 | 56 | recnd 7988 |
. . . . . . . . . . . . . . . . . 18
โข ((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โ ๐ โ โ) |
268 | | 1cnd 7975 |
. . . . . . . . . . . . . . . . . 18
โข ((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โ 1 โ โ) |
269 | 266, 267,
268 | subsubd 8298 |
. . . . . . . . . . . . . . . . 17
โข ((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โ (๐ โ (๐ โ 1)) = ((๐ โ ๐ ) + 1)) |
270 | 269 | adantr 276 |
. . . . . . . . . . . . . . . 16
โข (((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โง ๐ โ (((๐ โ ๐ ) + 1)...๐)) โ (๐ โ (๐ โ 1)) = ((๐ โ ๐ ) + 1)) |
271 | | elfzle1 10029 |
. . . . . . . . . . . . . . . . 17
โข (๐ โ (((๐ โ ๐ ) + 1)...๐) โ ((๐ โ ๐ ) + 1) โค ๐) |
272 | 271 | adantl 277 |
. . . . . . . . . . . . . . . 16
โข (((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โง ๐ โ (((๐ โ ๐ ) + 1)...๐)) โ ((๐ โ ๐ ) + 1) โค ๐) |
273 | 270, 272 | eqbrtrd 4027 |
. . . . . . . . . . . . . . 15
โข (((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โง ๐ โ (((๐ โ ๐ ) + 1)...๐)) โ (๐ โ (๐ โ 1)) โค ๐) |
274 | 260, 264,
265, 273 | subled 8507 |
. . . . . . . . . . . . . 14
โข (((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โง ๐ โ (((๐ โ ๐ ) + 1)...๐)) โ (๐ โ ๐) โค (๐ โ 1)) |
275 | 94, 19 | syl 14 |
. . . . . . . . . . . . . . . 16
โข (((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โง ๐ โ (((๐ โ ๐ ) + 1)...๐)) โ (๐ โ ๐) โ
โ0) |
276 | 275, 33 | eleqtrdi 2270 |
. . . . . . . . . . . . . . 15
โข (((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โง ๐ โ (((๐ โ ๐ ) + 1)...๐)) โ (๐ โ ๐) โ
(โคโฅโ0)) |
277 | 262 | ad2antrr 488 |
. . . . . . . . . . . . . . 15
โข (((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โง ๐ โ (((๐ โ ๐ ) + 1)...๐)) โ (๐ โ 1) โ โค) |
278 | | elfz5 10019 |
. . . . . . . . . . . . . . 15
โข (((๐ โ ๐) โ (โคโฅโ0)
โง (๐ โ 1) โ
โค) โ ((๐ โ
๐) โ (0...(๐ โ 1)) โ (๐ โ ๐) โค (๐ โ 1))) |
279 | 276, 277,
278 | syl2anc 411 |
. . . . . . . . . . . . . 14
โข (((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โง ๐ โ (((๐ โ ๐ ) + 1)...๐)) โ ((๐ โ ๐) โ (0...(๐ โ 1)) โ (๐ โ ๐) โค (๐ โ 1))) |
280 | 274, 279 | mpbird 167 |
. . . . . . . . . . . . 13
โข (((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โง ๐ โ (((๐ โ ๐ ) + 1)...๐)) โ (๐ โ ๐) โ (0...(๐ โ 1))) |
281 | | simplll 533 |
. . . . . . . . . . . . . . . . 17
โข ((((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โง ๐ โ (((๐ โ ๐ ) + 1)...๐)) โง ๐ โ (โคโฅโ((๐ โ ๐) + 1))) โ ๐) |
282 | 94, 22 | syldan 282 |
. . . . . . . . . . . . . . . . . 18
โข (((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โง ๐ โ (((๐ โ ๐ ) + 1)...๐)) โ ((๐ โ ๐) + 1) โ
โ0) |
283 | 282, 25 | sylan 283 |
. . . . . . . . . . . . . . . . 17
โข ((((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โง ๐ โ (((๐ โ ๐ ) + 1)...๐)) โง ๐ โ (โคโฅโ((๐ โ ๐) + 1))) โ ๐ โ โ0) |
284 | 281, 283,
27 | syl2anc 411 |
. . . . . . . . . . . . . . . 16
โข ((((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โง ๐ โ (((๐ โ ๐ ) + 1)...๐)) โง ๐ โ (โคโฅโ((๐ โ ๐) + 1))) โ (๐บโ๐) = ๐ต) |
285 | 284 | sumeq2dv 11378 |
. . . . . . . . . . . . . . 15
โข (((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โง ๐ โ (((๐ โ ๐ ) + 1)...๐)) โ ฮฃ๐ โ (โคโฅโ((๐ โ ๐) + 1))(๐บโ๐) = ฮฃ๐ โ (โคโฅโ((๐ โ ๐) + 1))๐ต) |
286 | 285 | eqcomd 2183 |
. . . . . . . . . . . . . 14
โข (((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โง ๐ โ (((๐ โ ๐ ) + 1)...๐)) โ ฮฃ๐ โ (โคโฅโ((๐ โ ๐) + 1))๐ต = ฮฃ๐ โ (โคโฅโ((๐ โ ๐) + 1))(๐บโ๐)) |
287 | 286 | fveq2d 5521 |
. . . . . . . . . . . . 13
โข (((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โง ๐ โ (((๐ โ ๐ ) + 1)...๐)) โ (absโฮฃ๐ โ
(โคโฅโ((๐ โ ๐) + 1))๐ต) = (absโฮฃ๐ โ (โคโฅโ((๐ โ ๐) + 1))(๐บโ๐))) |
288 | 135 | rspceeqv 2861 |
. . . . . . . . . . . . 13
โข (((๐ โ ๐) โ (0...(๐ โ 1)) โง (absโฮฃ๐ โ
(โคโฅโ((๐ โ ๐) + 1))๐ต) = (absโฮฃ๐ โ (โคโฅโ((๐ โ ๐) + 1))(๐บโ๐))) โ โ๐ โ (0...(๐ โ 1))(absโฮฃ๐ โ
(โคโฅโ((๐ โ ๐) + 1))๐ต) = (absโฮฃ๐ โ (โคโฅโ(๐ + 1))(๐บโ๐))) |
289 | 280, 287,
288 | syl2anc 411 |
. . . . . . . . . . . 12
โข (((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โง ๐ โ (((๐ โ ๐ ) + 1)...๐)) โ โ๐ โ (0...(๐ โ 1))(absโฮฃ๐ โ
(โคโฅโ((๐ โ ๐) + 1))๐ต) = (absโฮฃ๐ โ (โคโฅโ(๐ + 1))(๐บโ๐))) |
290 | 94, 39 | syldan 282 |
. . . . . . . . . . . . . 14
โข (((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โง ๐ โ (((๐ โ ๐ ) + 1)...๐)) โ ฮฃ๐ โ (โคโฅโ((๐ โ ๐) + 1))๐ต โ โ) |
291 | 290 | abscld 11192 |
. . . . . . . . . . . . 13
โข (((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โง ๐ โ (((๐ โ ๐ ) + 1)...๐)) โ (absโฮฃ๐ โ
(โคโฅโ((๐ โ ๐) + 1))๐ต) โ โ) |
292 | | eqeq1 2184 |
. . . . . . . . . . . . . . 15
โข (๐ง = (absโฮฃ๐ โ
(โคโฅโ((๐ โ ๐) + 1))๐ต) โ (๐ง = (absโฮฃ๐ โ (โคโฅโ(๐ + 1))(๐บโ๐)) โ (absโฮฃ๐ โ
(โคโฅโ((๐ โ ๐) + 1))๐ต) = (absโฮฃ๐ โ (โคโฅโ(๐ + 1))(๐บโ๐)))) |
293 | 292 | rexbidv 2478 |
. . . . . . . . . . . . . 14
โข (๐ง = (absโฮฃ๐ โ
(โคโฅโ((๐ โ ๐) + 1))๐ต) โ (โ๐ โ (0...(๐ โ 1))๐ง = (absโฮฃ๐ โ (โคโฅโ(๐ + 1))(๐บโ๐)) โ โ๐ โ (0...(๐ โ 1))(absโฮฃ๐ โ
(โคโฅโ((๐ โ ๐) + 1))๐ต) = (absโฮฃ๐ โ (โคโฅโ(๐ + 1))(๐บโ๐)))) |
294 | | mertens.10 |
. . . . . . . . . . . . . 14
โข ๐ = {๐ง โฃ โ๐ โ (0...(๐ โ 1))๐ง = (absโฮฃ๐ โ (โคโฅโ(๐ + 1))(๐บโ๐))} |
295 | 293, 294 | elab2g 2886 |
. . . . . . . . . . . . 13
โข
((absโฮฃ๐
โ (โคโฅโ((๐ โ ๐) + 1))๐ต) โ โ โ
((absโฮฃ๐ โ
(โคโฅโ((๐ โ ๐) + 1))๐ต) โ ๐ โ โ๐ โ (0...(๐ โ 1))(absโฮฃ๐ โ
(โคโฅโ((๐ โ ๐) + 1))๐ต) = (absโฮฃ๐ โ (โคโฅโ(๐ + 1))(๐บโ๐)))) |
296 | 291, 295 | syl 14 |
. . . . . . . . . . . 12
โข (((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โง ๐ โ (((๐ โ ๐ ) + 1)...๐)) โ ((absโฮฃ๐ โ
(โคโฅโ((๐ โ ๐) + 1))๐ต) โ ๐ โ โ๐ โ (0...(๐ โ 1))(absโฮฃ๐ โ
(โคโฅโ((๐ โ ๐) + 1))๐ต) = (absโฮฃ๐ โ (โคโฅโ(๐ + 1))(๐บโ๐)))) |
297 | 289, 296 | mpbird 167 |
. . . . . . . . . . 11
โข (((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โง ๐ โ (((๐ โ ๐ ) + 1)...๐)) โ (absโฮฃ๐ โ
(โคโฅโ((๐ โ ๐) + 1))๐ต) โ ๐) |
298 | 257, 259,
297 | rspcdva 2848 |
. . . . . . . . . 10
โข (((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โง ๐ โ (((๐ โ ๐ ) + 1)...๐)) โ (absโฮฃ๐ โ
(โคโฅโ((๐ โ ๐) + 1))๐ต) โค ๐) |
299 | 230, 231,
129 | syl2anc 411 |
. . . . . . . . . . 11
โข (((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โง ๐ โ (((๐ โ ๐ ) + 1)...๐)) โ ((absโ๐ด) โ โ โง 0 โค
(absโ๐ด))) |
300 | 94, 81 | syldan 282 |
. . . . . . . . . . . 12
โข (((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โง ๐ โ (((๐ โ ๐ ) + 1)...๐)) โ (absโฮฃ๐ โ
(โคโฅโ((๐ โ ๐) + 1))๐ต) โ โ) |
301 | 39 | absge0d 11195 |
. . . . . . . . . . . . 13
โข (((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โง ๐ โ (0...๐)) โ 0 โค (absโฮฃ๐ โ
(โคโฅโ((๐ โ ๐) + 1))๐ต)) |
302 | 94, 301 | syldan 282 |
. . . . . . . . . . . 12
โข (((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โง ๐ โ (((๐ โ ๐ ) + 1)...๐)) โ 0 โค (absโฮฃ๐ โ
(โคโฅโ((๐ โ ๐) + 1))๐ต)) |
303 | 300, 302 | jca 306 |
. . . . . . . . . . 11
โข (((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โง ๐ โ (((๐ โ ๐ ) + 1)...๐)) โ ((absโฮฃ๐ โ
(โคโฅโ((๐ โ ๐) + 1))๐ต) โ โ โง 0 โค
(absโฮฃ๐ โ
(โคโฅโ((๐ โ ๐) + 1))๐ต))) |
304 | 218 | ad2antrr 488 |
. . . . . . . . . . 11
โข (((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โง ๐ โ (((๐ โ ๐ ) + 1)...๐)) โ ๐ โ โ) |
305 | | lemul12a 8821 |
. . . . . . . . . . 11
โข
(((((absโ๐ด)
โ โ โง 0 โค (absโ๐ด)) โง (((๐ธ / 2) / ๐ ) / (๐ + 1)) โ โ) โง
(((absโฮฃ๐
โ (โคโฅโ((๐ โ ๐) + 1))๐ต) โ โ โง 0 โค
(absโฮฃ๐ โ
(โคโฅโ((๐ โ ๐) + 1))๐ต)) โง ๐ โ โ)) โ (((absโ๐ด) โค (((๐ธ / 2) / ๐ ) / (๐ + 1)) โง (absโฮฃ๐ โ
(โคโฅโ((๐ โ ๐) + 1))๐ต) โค ๐) โ ((absโ๐ด) ยท (absโฮฃ๐ โ
(โคโฅโ((๐ โ ๐) + 1))๐ต)) โค ((((๐ธ / 2) / ๐ ) / (๐ + 1)) ยท ๐))) |
306 | 299, 233,
303, 304, 305 | syl22anc 1239 |
. . . . . . . . . 10
โข (((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โง ๐ โ (((๐ โ ๐ ) + 1)...๐)) โ (((absโ๐ด) โค (((๐ธ / 2) / ๐ ) / (๐ + 1)) โง (absโฮฃ๐ โ
(โคโฅโ((๐ โ ๐) + 1))๐ต) โค ๐) โ ((absโ๐ด) ยท (absโฮฃ๐ โ
(โคโฅโ((๐ โ ๐) + 1))๐ต)) โค ((((๐ธ / 2) / ๐ ) / (๐ + 1)) ยท ๐))) |
307 | 256, 298,
306 | mp2and 433 |
. . . . . . . . 9
โข (((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โง ๐ โ (((๐ โ ๐ ) + 1)...๐)) โ ((absโ๐ด) ยท (absโฮฃ๐ โ
(โคโฅโ((๐ โ ๐) + 1))๐ต)) โค ((((๐ธ / 2) / ๐ ) / (๐ + 1)) ยท ๐)) |
308 | 86, 95, 229, 307 | fsumle 11473 |
. . . . . . . 8
โข ((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โ ฮฃ๐ โ (((๐ โ ๐ ) + 1)...๐)((absโ๐ด) ยท (absโฮฃ๐ โ
(โคโฅโ((๐ โ ๐) + 1))๐ต)) โค ฮฃ๐ โ (((๐ โ ๐ ) + 1)...๐)((((๐ธ / 2) / ๐ ) / (๐ + 1)) ยท ๐)) |
309 | 228 | recnd 7988 |
. . . . . . . . . . 11
โข (๐ โ ((((๐ธ / 2) / ๐ ) / (๐ + 1)) ยท ๐) โ โ) |
310 | 309 | adantr 276 |
. . . . . . . . . 10
โข ((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โ ((((๐ธ / 2) / ๐ ) / (๐ + 1)) ยท ๐) โ โ) |
311 | | fsumconst 11464 |
. . . . . . . . . 10
โข
(((((๐ โ ๐ ) + 1)...๐) โ Fin โง ((((๐ธ / 2) / ๐ ) / (๐ + 1)) ยท ๐) โ โ) โ ฮฃ๐ โ (((๐ โ ๐ ) + 1)...๐)((((๐ธ / 2) / ๐ ) / (๐ + 1)) ยท ๐) = ((โฏโ(((๐ โ ๐ ) + 1)...๐)) ยท ((((๐ธ / 2) / ๐ ) / (๐ + 1)) ยท ๐))) |
312 | 86, 310, 311 | syl2anc 411 |
. . . . . . . . 9
โข ((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โ ฮฃ๐ โ (((๐ โ ๐ ) + 1)...๐)((((๐ธ / 2) / ๐ ) / (๐ + 1)) ยท ๐) = ((โฏโ(((๐ โ ๐ ) + 1)...๐)) ยท ((((๐ธ / 2) / ๐ ) / (๐ + 1)) ยท ๐))) |
313 | | 1zzd 9282 |
. . . . . . . . . . . . . 14
โข ((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โ 1 โ โค) |
314 | | fzen 10045 |
. . . . . . . . . . . . . 14
โข ((1
โ โค โง ๐
โ โค โง (๐
โ ๐ ) โ โค)
โ (1...๐ ) โ ((1
+ (๐ โ ๐ ))...(๐ + (๐ โ ๐ )))) |
315 | 313, 50, 72, 314 | syl3anc 1238 |
. . . . . . . . . . . . 13
โข ((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โ (1...๐ ) โ ((1 + (๐ โ ๐ ))...(๐ + (๐ โ ๐ )))) |
316 | | ax-1cn 7906 |
. . . . . . . . . . . . . . 15
โข 1 โ
โ |
317 | 72 | zcnd 9378 |
. . . . . . . . . . . . . . 15
โข ((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โ (๐ โ ๐ ) โ โ) |
318 | | addcom 8096 |
. . . . . . . . . . . . . . 15
โข ((1
โ โ โง (๐
โ ๐ ) โ โ)
โ (1 + (๐ โ
๐ )) = ((๐ โ ๐ ) + 1)) |
319 | 316, 317,
318 | sylancr 414 |
. . . . . . . . . . . . . 14
โข ((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โ (1 + (๐ โ ๐ )) = ((๐ โ ๐ ) + 1)) |
320 | 267, 266 | pncan3d 8273 |
. . . . . . . . . . . . . 14
โข ((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โ (๐ + (๐ โ ๐ )) = ๐) |
321 | 319, 320 | oveq12d 5895 |
. . . . . . . . . . . . 13
โข ((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โ ((1 + (๐ โ ๐ ))...(๐ + (๐ โ ๐ ))) = (((๐ โ ๐ ) + 1)...๐)) |
322 | 315, 321 | breqtrd 4031 |
. . . . . . . . . . . 12
โข ((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โ (1...๐ ) โ (((๐ โ ๐ ) + 1)...๐)) |
323 | 313, 50 | fzfigd 10433 |
. . . . . . . . . . . . 13
โข ((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โ (1...๐ ) โ Fin) |
324 | | hashen 10766 |
. . . . . . . . . . . . 13
โข
(((1...๐ ) โ Fin
โง (((๐ โ ๐ ) + 1)...๐) โ Fin) โ
((โฏโ(1...๐ )) =
(โฏโ(((๐ โ
๐ ) + 1)...๐)) โ (1...๐ ) โ (((๐ โ ๐ ) + 1)...๐))) |
325 | 323, 86, 324 | syl2anc 411 |
. . . . . . . . . . . 12
โข ((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โ ((โฏโ(1...๐ )) = (โฏโ(((๐ โ ๐ ) + 1)...๐)) โ (1...๐ ) โ (((๐ โ ๐ ) + 1)...๐))) |
326 | 322, 325 | mpbird 167 |
. . . . . . . . . . 11
โข ((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โ (โฏโ(1...๐ )) = (โฏโ(((๐ โ ๐ ) + 1)...๐))) |
327 | | hashfz1 10765 |
. . . . . . . . . . . 12
โข (๐ โ โ0
โ (โฏโ(1...๐ )) = ๐ ) |
328 | 53, 327 | syl 14 |
. . . . . . . . . . 11
โข ((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โ (โฏโ(1...๐ )) = ๐ ) |
329 | 326, 328 | eqtr3d 2212 |
. . . . . . . . . 10
โข ((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โ (โฏโ(((๐ โ ๐ ) + 1)...๐)) = ๐ ) |
330 | 329 | oveq1d 5892 |
. . . . . . . . 9
โข ((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โ ((โฏโ(((๐ โ ๐ ) + 1)...๐)) ยท ((((๐ธ / 2) / ๐ ) / (๐ + 1)) ยท ๐)) = (๐ ยท ((((๐ธ / 2) / ๐ ) / (๐ + 1)) ยท ๐))) |
331 | 218 | recnd 7988 |
. . . . . . . . . . . 12
โข (๐ โ ๐ โ โ) |
332 | 221 | rpcnd 9700 |
. . . . . . . . . . . 12
โข (๐ โ (๐ + 1) โ โ) |
333 | 221 | rpap0d 9704 |
. . . . . . . . . . . 12
โข (๐ โ (๐ + 1) # 0) |
334 | 160, 331,
332, 333 | div23apd 8787 |
. . . . . . . . . . 11
โข (๐ โ (((๐ธ / 2) ยท ๐) / (๐ + 1)) = (((๐ธ / 2) / (๐ + 1)) ยท ๐)) |
335 | 49 | zcnd 9378 |
. . . . . . . . . . . . . 14
โข (๐ โ ๐ โ โ) |
336 | 225 | rpcnd 9700 |
. . . . . . . . . . . . . 14
โข (๐ โ ((๐ธ / 2) / ๐ ) โ โ) |
337 | 335, 336,
332, 333 | divassapd 8785 |
. . . . . . . . . . . . 13
โข (๐ โ ((๐ ยท ((๐ธ / 2) / ๐ )) / (๐ + 1)) = (๐ ยท (((๐ธ / 2) / ๐ ) / (๐ + 1)))) |
338 | 5 | nnap0d 8967 |
. . . . . . . . . . . . . . 15
โข (๐ โ ๐ # 0) |
339 | 160, 335,
338 | divcanap2d 8751 |
. . . . . . . . . . . . . 14
โข (๐ โ (๐ ยท ((๐ธ / 2) / ๐ )) = (๐ธ / 2)) |
340 | 339 | oveq1d 5892 |
. . . . . . . . . . . . 13
โข (๐ โ ((๐ ยท ((๐ธ / 2) / ๐ )) / (๐ + 1)) = ((๐ธ / 2) / (๐ + 1))) |
341 | 337, 340 | eqtr3d 2212 |
. . . . . . . . . . . 12
โข (๐ โ (๐ ยท (((๐ธ / 2) / ๐ ) / (๐ + 1))) = ((๐ธ / 2) / (๐ + 1))) |
342 | 341 | oveq1d 5892 |
. . . . . . . . . . 11
โข (๐ โ ((๐ ยท (((๐ธ / 2) / ๐ ) / (๐ + 1))) ยท ๐) = (((๐ธ / 2) / (๐ + 1)) ยท ๐)) |
343 | 226 | rpcnd 9700 |
. . . . . . . . . . . 12
โข (๐ โ (((๐ธ / 2) / ๐ ) / (๐ + 1)) โ โ) |
344 | 335, 343,
331 | mulassd 7983 |
. . . . . . . . . . 11
โข (๐ โ ((๐ ยท (((๐ธ / 2) / ๐ ) / (๐ + 1))) ยท ๐) = (๐ ยท ((((๐ธ / 2) / ๐ ) / (๐ + 1)) ยท ๐))) |
345 | 334, 342,
344 | 3eqtr2rd 2217 |
. . . . . . . . . 10
โข (๐ โ (๐ ยท ((((๐ธ / 2) / ๐ ) / (๐ + 1)) ยท ๐)) = (((๐ธ / 2) ยท ๐) / (๐ + 1))) |
346 | 345 | adantr 276 |
. . . . . . . . 9
โข ((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โ (๐ ยท ((((๐ธ / 2) / ๐ ) / (๐ + 1)) ยท ๐)) = (((๐ธ / 2) ยท ๐) / (๐ + 1))) |
347 | 312, 330,
346 | 3eqtrd 2214 |
. . . . . . . 8
โข ((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โ ฮฃ๐ โ (((๐ โ ๐ ) + 1)...๐)((((๐ธ / 2) / ๐ ) / (๐ + 1)) ยท ๐) = (((๐ธ / 2) ยท ๐) / (๐ + 1))) |
348 | 308, 347 | breqtrd 4031 |
. . . . . . 7
โข ((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โ ฮฃ๐ โ (((๐ โ ๐ ) + 1)...๐)((absโ๐ด) ยท (absโฮฃ๐ โ
(โคโฅโ((๐ โ ๐) + 1))๐ต)) โค (((๐ธ / 2) ยท ๐) / (๐ + 1))) |
349 | | peano2re 8095 |
. . . . . . . . . . 11
โข (๐ โ โ โ (๐ + 1) โ
โ) |
350 | 218, 349 | syl 14 |
. . . . . . . . . 10
โข (๐ โ (๐ + 1) โ โ) |
351 | 218 | ltp1d 8889 |
. . . . . . . . . 10
โข (๐ โ ๐ < (๐ + 1)) |
352 | 218, 350,
97, 351 | ltmul2dd 9755 |
. . . . . . . . 9
โข (๐ โ ((๐ธ / 2) ยท ๐) < ((๐ธ / 2) ยท (๐ + 1))) |
353 | 219, 98, 221 | ltdivmul2d 9751 |
. . . . . . . . 9
โข (๐ โ ((((๐ธ / 2) ยท ๐) / (๐ + 1)) < (๐ธ / 2) โ ((๐ธ / 2) ยท ๐) < ((๐ธ / 2) ยท (๐ + 1)))) |
354 | 352, 353 | mpbird 167 |
. . . . . . . 8
โข (๐ โ (((๐ธ / 2) ยท ๐) / (๐ + 1)) < (๐ธ / 2)) |
355 | 354 | adantr 276 |
. . . . . . 7
โข ((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โ (((๐ธ / 2) ยท ๐) / (๐ + 1)) < (๐ธ / 2)) |
356 | 96, 223, 99, 348, 355 | lelttrd 8084 |
. . . . . 6
โข ((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โ ฮฃ๐ โ (((๐ โ ๐ ) + 1)...๐)((absโ๐ด) ยท (absโฮฃ๐ โ
(โคโฅโ((๐ โ ๐) + 1))๐ต)) < (๐ธ / 2)) |
357 | 84, 96, 99, 99, 217, 356 | lt2addd 8526 |
. . . . 5
โข ((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โ (ฮฃ๐ โ (0...(๐ โ ๐ ))((absโ๐ด) ยท (absโฮฃ๐ โ
(โคโฅโ((๐ โ ๐) + 1))๐ต)) + ฮฃ๐ โ (((๐ โ ๐ ) + 1)...๐)((absโ๐ด) ยท (absโฮฃ๐ โ
(โคโฅโ((๐ โ ๐) + 1))๐ต))) < ((๐ธ / 2) + (๐ธ / 2))) |
358 | 17, 39 | absmuld 11205 |
. . . . . . 7
โข (((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โง ๐ โ (0...๐)) โ (absโ(๐ด ยท ฮฃ๐ โ (โคโฅโ((๐ โ ๐) + 1))๐ต)) = ((absโ๐ด) ยท (absโฮฃ๐ โ
(โคโฅโ((๐ โ ๐) + 1))๐ต))) |
359 | 358 | sumeq2dv 11378 |
. . . . . 6
โข ((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โ ฮฃ๐ โ (0...๐)(absโ(๐ด ยท ฮฃ๐ โ (โคโฅโ((๐ โ ๐) + 1))๐ต)) = ฮฃ๐ โ (0...๐)((absโ๐ด) ยท (absโฮฃ๐ โ
(โคโฅโ((๐ โ ๐) + 1))๐ต))) |
360 | 72 | zred 9377 |
. . . . . . . . 9
โข ((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โ (๐ โ ๐ ) โ โ) |
361 | 360 | ltp1d 8889 |
. . . . . . . 8
โข ((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โ (๐ โ ๐ ) < ((๐ โ ๐ ) + 1)) |
362 | | fzdisj 10054 |
. . . . . . . 8
โข ((๐ โ ๐ ) < ((๐ โ ๐ ) + 1) โ ((0...(๐ โ ๐ )) โฉ (((๐ โ ๐ ) + 1)...๐)) = โ
) |
363 | 361, 362 | syl 14 |
. . . . . . 7
โข ((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โ ((0...(๐ โ ๐ )) โฉ (((๐ โ ๐ ) + 1)...๐)) = โ
) |
364 | | fzsplit 10053 |
. . . . . . . 8
โข ((๐ โ ๐ ) โ (0...๐) โ (0...๐) = ((0...(๐ โ ๐ )) โช (((๐ โ ๐ ) + 1)...๐))) |
365 | 70, 364 | syl 14 |
. . . . . . 7
โข ((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โ (0...๐) = ((0...(๐ โ ๐ )) โช (((๐ โ ๐ ) + 1)...๐))) |
366 | 82 | recnd 7988 |
. . . . . . 7
โข (((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โง ๐ โ (0...๐)) โ ((absโ๐ด) ยท (absโฮฃ๐ โ
(โคโฅโ((๐ โ ๐) + 1))๐ต)) โ โ) |
367 | 363, 365,
13, 366 | fsumsplit 11417 |
. . . . . 6
โข ((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โ ฮฃ๐ โ (0...๐)((absโ๐ด) ยท (absโฮฃ๐ โ
(โคโฅโ((๐ โ ๐) + 1))๐ต)) = (ฮฃ๐ โ (0...(๐ โ ๐ ))((absโ๐ด) ยท (absโฮฃ๐ โ
(โคโฅโ((๐ โ ๐) + 1))๐ต)) + ฮฃ๐ โ (((๐ โ ๐ ) + 1)...๐)((absโ๐ด) ยท (absโฮฃ๐ โ
(โคโฅโ((๐ โ ๐) + 1))๐ต)))) |
368 | 359, 367 | eqtr2d 2211 |
. . . . 5
โข ((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โ (ฮฃ๐ โ (0...(๐ โ ๐ ))((absโ๐ด) ยท (absโฮฃ๐ โ
(โคโฅโ((๐ โ ๐) + 1))๐ต)) + ฮฃ๐ โ (((๐ โ ๐ ) + 1)...๐)((absโ๐ด) ยท (absโฮฃ๐ โ
(โคโฅโ((๐ โ ๐) + 1))๐ต))) = ฮฃ๐ โ (0...๐)(absโ(๐ด ยท ฮฃ๐ โ (โคโฅโ((๐ โ ๐) + 1))๐ต))) |
369 | 45 | rpcnd 9700 |
. . . . . . 7
โข (๐ โ ๐ธ โ โ) |
370 | 369 | adantr 276 |
. . . . . 6
โข ((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โ ๐ธ โ โ) |
371 | 370 | 2halvesd 9166 |
. . . . 5
โข ((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โ ((๐ธ / 2) + (๐ธ / 2)) = ๐ธ) |
372 | 357, 368,
371 | 3brtr3d 4036 |
. . . 4
โข ((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โ ฮฃ๐ โ (0...๐)(absโ(๐ด ยท ฮฃ๐ โ (โคโฅโ((๐ โ ๐) + 1))๐ต)) < ๐ธ) |
373 | 42, 44, 47, 48, 372 | lelttrd 8084 |
. . 3
โข ((๐ โง ๐ โ (โคโฅโ(๐ + ๐ก))) โ (absโฮฃ๐ โ (0...๐)(๐ด ยท ฮฃ๐ โ (โคโฅโ((๐ โ ๐) + 1))๐ต)) < ๐ธ) |
374 | 373 | ralrimiva 2550 |
. 2
โข (๐ โ โ๐ โ (โคโฅโ(๐ + ๐ก))(absโฮฃ๐ โ (0...๐)(๐ด ยท ฮฃ๐ โ (โคโฅโ((๐ โ ๐) + 1))๐ต)) < ๐ธ) |
375 | | fveq2 5517 |
. . . 4
โข (๐ฆ = (๐ + ๐ก) โ (โคโฅโ๐ฆ) =
(โคโฅโ(๐ + ๐ก))) |
376 | 375 | raleqdv 2679 |
. . 3
โข (๐ฆ = (๐ + ๐ก) โ (โ๐ โ (โคโฅโ๐ฆ)(absโฮฃ๐ โ (0...๐)(๐ด ยท ฮฃ๐ โ (โคโฅโ((๐ โ ๐) + 1))๐ต)) < ๐ธ โ โ๐ โ (โคโฅโ(๐ + ๐ก))(absโฮฃ๐ โ (0...๐)(๐ด ยท ฮฃ๐ โ (โคโฅโ((๐ โ ๐) + 1))๐ต)) < ๐ธ)) |
377 | 376 | rspcev 2843 |
. 2
โข (((๐ + ๐ก) โ โ0 โง
โ๐ โ
(โคโฅโ(๐ + ๐ก))(absโฮฃ๐ โ (0...๐)(๐ด ยท ฮฃ๐ โ (โคโฅโ((๐ โ ๐) + 1))๐ต)) < ๐ธ) โ โ๐ฆ โ โ0 โ๐ โ
(โคโฅโ๐ฆ)(absโฮฃ๐ โ (0...๐)(๐ด ยท ฮฃ๐ โ (โคโฅโ((๐ โ ๐) + 1))๐ต)) < ๐ธ) |
378 | 9, 374, 377 | syl2anc 411 |
1
โข (๐ โ โ๐ฆ โ โ0 โ๐ โ
(โคโฅโ๐ฆ)(absโฮฃ๐ โ (0...๐)(๐ด ยท ฮฃ๐ โ (โคโฅโ((๐ โ ๐) + 1))๐ต)) < ๐ธ) |