Step | Hyp | Ref
| Expression |
1 | | nn0uz 12860 |
. . . 4
โข
โ0 = (โคโฅโ0) |
2 | | 0zd 12566 |
. . . 4
โข (๐ป โ dom โ โ 0
โ โค) |
3 | | 1ex 11206 |
. . . . . 6
โข 1 โ
V |
4 | 3 | fvconst2 7201 |
. . . . 5
โข (๐ โ โ0
โ ((โ0 ร {1})โ๐) = 1) |
5 | 4 | adantl 482 |
. . . 4
โข ((๐ป โ dom โ โง ๐ โ โ0)
โ ((โ0 ร {1})โ๐) = 1) |
6 | | 1red 11211 |
. . . 4
โข ((๐ป โ dom โ โง ๐ โ โ0)
โ 1 โ โ) |
7 | | harmonic.2 |
. . . . . . 7
โข ๐ป = seq1( + , ๐น) |
8 | 7 | eleq1i 2824 |
. . . . . 6
โข (๐ป โ dom โ โ seq1(
+ , ๐น) โ dom โ
) |
9 | 8 | biimpi 215 |
. . . . 5
โข (๐ป โ dom โ โ seq1(
+ , ๐น) โ dom โ
) |
10 | | oveq2 7413 |
. . . . . . . . 9
โข (๐ = ๐ โ (1 / ๐) = (1 / ๐)) |
11 | | harmonic.1 |
. . . . . . . . 9
โข ๐น = (๐ โ โ โฆ (1 / ๐)) |
12 | | ovex 7438 |
. . . . . . . . 9
โข (1 /
๐) โ
V |
13 | 10, 11, 12 | fvmpt 6995 |
. . . . . . . 8
โข (๐ โ โ โ (๐นโ๐) = (1 / ๐)) |
14 | | nnrecre 12250 |
. . . . . . . 8
โข (๐ โ โ โ (1 /
๐) โ
โ) |
15 | 13, 14 | eqeltrd 2833 |
. . . . . . 7
โข (๐ โ โ โ (๐นโ๐) โ โ) |
16 | 15 | adantl 482 |
. . . . . 6
โข ((๐ป โ dom โ โง ๐ โ โ) โ (๐นโ๐) โ โ) |
17 | | nnrp 12981 |
. . . . . . . . . 10
โข (๐ โ โ โ ๐ โ
โ+) |
18 | 17 | rpreccld 13022 |
. . . . . . . . 9
โข (๐ โ โ โ (1 /
๐) โ
โ+) |
19 | 18 | rpge0d 13016 |
. . . . . . . 8
โข (๐ โ โ โ 0 โค (1
/ ๐)) |
20 | 19, 13 | breqtrrd 5175 |
. . . . . . 7
โข (๐ โ โ โ 0 โค
(๐นโ๐)) |
21 | 20 | adantl 482 |
. . . . . 6
โข ((๐ป โ dom โ โง ๐ โ โ) โ 0 โค
(๐นโ๐)) |
22 | | nnre 12215 |
. . . . . . . . . 10
โข (๐ โ โ โ ๐ โ
โ) |
23 | 22 | lep1d 12141 |
. . . . . . . . 9
โข (๐ โ โ โ ๐ โค (๐ + 1)) |
24 | | nngt0 12239 |
. . . . . . . . . 10
โข (๐ โ โ โ 0 <
๐) |
25 | | peano2re 11383 |
. . . . . . . . . . 11
โข (๐ โ โ โ (๐ + 1) โ
โ) |
26 | 22, 25 | syl 17 |
. . . . . . . . . 10
โข (๐ โ โ โ (๐ + 1) โ
โ) |
27 | | peano2nn 12220 |
. . . . . . . . . . 11
โข (๐ โ โ โ (๐ + 1) โ
โ) |
28 | 27 | nngt0d 12257 |
. . . . . . . . . 10
โข (๐ โ โ โ 0 <
(๐ + 1)) |
29 | | lerec 12093 |
. . . . . . . . . 10
โข (((๐ โ โ โง 0 <
๐) โง ((๐ + 1) โ โ โง 0
< (๐ + 1))) โ
(๐ โค (๐ + 1) โ (1 / (๐ + 1)) โค (1 / ๐))) |
30 | 22, 24, 26, 28, 29 | syl22anc 837 |
. . . . . . . . 9
โข (๐ โ โ โ (๐ โค (๐ + 1) โ (1 / (๐ + 1)) โค (1 / ๐))) |
31 | 23, 30 | mpbid 231 |
. . . . . . . 8
โข (๐ โ โ โ (1 /
(๐ + 1)) โค (1 / ๐)) |
32 | | oveq2 7413 |
. . . . . . . . . 10
โข (๐ = (๐ + 1) โ (1 / ๐) = (1 / (๐ + 1))) |
33 | | ovex 7438 |
. . . . . . . . . 10
โข (1 /
(๐ + 1)) โ
V |
34 | 32, 11, 33 | fvmpt 6995 |
. . . . . . . . 9
โข ((๐ + 1) โ โ โ
(๐นโ(๐ + 1)) = (1 / (๐ + 1))) |
35 | 27, 34 | syl 17 |
. . . . . . . 8
โข (๐ โ โ โ (๐นโ(๐ + 1)) = (1 / (๐ + 1))) |
36 | 31, 35, 13 | 3brtr4d 5179 |
. . . . . . 7
โข (๐ โ โ โ (๐นโ(๐ + 1)) โค (๐นโ๐)) |
37 | 36 | adantl 482 |
. . . . . 6
โข ((๐ป โ dom โ โง ๐ โ โ) โ (๐นโ(๐ + 1)) โค (๐นโ๐)) |
38 | | oveq2 7413 |
. . . . . . . . 9
โข (๐ = ๐ โ (2โ๐) = (2โ๐)) |
39 | 38 | fveq2d 6892 |
. . . . . . . . 9
โข (๐ = ๐ โ (๐นโ(2โ๐)) = (๐นโ(2โ๐))) |
40 | 38, 39 | oveq12d 7423 |
. . . . . . . 8
โข (๐ = ๐ โ ((2โ๐) ยท (๐นโ(2โ๐))) = ((2โ๐) ยท (๐นโ(2โ๐)))) |
41 | | fconstmpt 5736 |
. . . . . . . . 9
โข
(โ0 ร {1}) = (๐ โ โ0 โฆ
1) |
42 | | 2nn 12281 |
. . . . . . . . . . . . . 14
โข 2 โ
โ |
43 | | nnexpcl 14036 |
. . . . . . . . . . . . . 14
โข ((2
โ โ โง ๐
โ โ0) โ (2โ๐) โ โ) |
44 | 42, 43 | mpan 688 |
. . . . . . . . . . . . 13
โข (๐ โ โ0
โ (2โ๐) โ
โ) |
45 | | oveq2 7413 |
. . . . . . . . . . . . . 14
โข (๐ = (2โ๐) โ (1 / ๐) = (1 / (2โ๐))) |
46 | | ovex 7438 |
. . . . . . . . . . . . . 14
โข (1 /
(2โ๐)) โ
V |
47 | 45, 11, 46 | fvmpt 6995 |
. . . . . . . . . . . . 13
โข
((2โ๐) โ
โ โ (๐นโ(2โ๐)) = (1 / (2โ๐))) |
48 | 44, 47 | syl 17 |
. . . . . . . . . . . 12
โข (๐ โ โ0
โ (๐นโ(2โ๐)) = (1 / (2โ๐))) |
49 | 48 | oveq2d 7421 |
. . . . . . . . . . 11
โข (๐ โ โ0
โ ((2โ๐) ยท
(๐นโ(2โ๐))) = ((2โ๐) ยท (1 / (2โ๐)))) |
50 | | nncn 12216 |
. . . . . . . . . . . . 13
โข
((2โ๐) โ
โ โ (2โ๐)
โ โ) |
51 | | nnne0 12242 |
. . . . . . . . . . . . 13
โข
((2โ๐) โ
โ โ (2โ๐)
โ 0) |
52 | 50, 51 | recidd 11981 |
. . . . . . . . . . . 12
โข
((2โ๐) โ
โ โ ((2โ๐)
ยท (1 / (2โ๐)))
= 1) |
53 | 44, 52 | syl 17 |
. . . . . . . . . . 11
โข (๐ โ โ0
โ ((2โ๐) ยท
(1 / (2โ๐))) =
1) |
54 | 49, 53 | eqtrd 2772 |
. . . . . . . . . 10
โข (๐ โ โ0
โ ((2โ๐) ยท
(๐นโ(2โ๐))) = 1) |
55 | 54 | mpteq2ia 5250 |
. . . . . . . . 9
โข (๐ โ โ0
โฆ ((2โ๐)
ยท (๐นโ(2โ๐)))) = (๐ โ โ0 โฆ
1) |
56 | 41, 55 | eqtr4i 2763 |
. . . . . . . 8
โข
(โ0 ร {1}) = (๐ โ โ0 โฆ
((2โ๐) ยท (๐นโ(2โ๐)))) |
57 | | ovex 7438 |
. . . . . . . 8
โข
((2โ๐) ยท
(๐นโ(2โ๐))) โ V |
58 | 40, 56, 57 | fvmpt 6995 |
. . . . . . 7
โข (๐ โ โ0
โ ((โ0 ร {1})โ๐) = ((2โ๐) ยท (๐นโ(2โ๐)))) |
59 | 58 | adantl 482 |
. . . . . 6
โข ((๐ป โ dom โ โง ๐ โ โ0)
โ ((โ0 ร {1})โ๐) = ((2โ๐) ยท (๐นโ(2โ๐)))) |
60 | 16, 21, 37, 59 | climcnds 15793 |
. . . . 5
โข (๐ป โ dom โ โ
(seq1( + , ๐น) โ dom
โ โ seq0( + , (โ0 ร {1})) โ dom โ
)) |
61 | 9, 60 | mpbid 231 |
. . . 4
โข (๐ป โ dom โ โ seq0(
+ , (โ0 ร {1})) โ dom โ ) |
62 | 1, 2, 5, 6, 61 | isumrecl 15707 |
. . 3
โข (๐ป โ dom โ โ
ฮฃ๐ โ
โ0 1 โ โ) |
63 | | arch 12465 |
. . 3
โข
(ฮฃ๐ โ
โ0 1 โ โ โ โ๐ โ โ ฮฃ๐ โ โ0 1 < ๐) |
64 | 62, 63 | syl 17 |
. 2
โข (๐ป โ dom โ โ
โ๐ โ โ
ฮฃ๐ โ
โ0 1 < ๐) |
65 | | fzfid 13934 |
. . . . . . 7
โข ((๐ป โ dom โ โง ๐ โ โ) โ
(1...๐) โ
Fin) |
66 | | ax-1cn 11164 |
. . . . . . 7
โข 1 โ
โ |
67 | | fsumconst 15732 |
. . . . . . 7
โข
(((1...๐) โ Fin
โง 1 โ โ) โ ฮฃ๐ โ (1...๐)1 = ((โฏโ(1...๐)) ยท 1)) |
68 | 65, 66, 67 | sylancl 586 |
. . . . . 6
โข ((๐ป โ dom โ โง ๐ โ โ) โ
ฮฃ๐ โ (1...๐)1 = ((โฏโ(1...๐)) ยท 1)) |
69 | | nnnn0 12475 |
. . . . . . . . 9
โข (๐ โ โ โ ๐ โ
โ0) |
70 | 69 | adantl 482 |
. . . . . . . 8
โข ((๐ป โ dom โ โง ๐ โ โ) โ ๐ โ
โ0) |
71 | | hashfz1 14302 |
. . . . . . . 8
โข (๐ โ โ0
โ (โฏโ(1...๐)) = ๐) |
72 | 70, 71 | syl 17 |
. . . . . . 7
โข ((๐ป โ dom โ โง ๐ โ โ) โ
(โฏโ(1...๐)) =
๐) |
73 | 72 | oveq1d 7420 |
. . . . . 6
โข ((๐ป โ dom โ โง ๐ โ โ) โ
((โฏโ(1...๐))
ยท 1) = (๐ ยท
1)) |
74 | | nncn 12216 |
. . . . . . . 8
โข (๐ โ โ โ ๐ โ
โ) |
75 | 74 | adantl 482 |
. . . . . . 7
โข ((๐ป โ dom โ โง ๐ โ โ) โ ๐ โ
โ) |
76 | 75 | mulridd 11227 |
. . . . . 6
โข ((๐ป โ dom โ โง ๐ โ โ) โ (๐ ยท 1) = ๐) |
77 | 68, 73, 76 | 3eqtrd 2776 |
. . . . 5
โข ((๐ป โ dom โ โง ๐ โ โ) โ
ฮฃ๐ โ (1...๐)1 = ๐) |
78 | | 0zd 12566 |
. . . . . 6
โข ((๐ป โ dom โ โง ๐ โ โ) โ 0 โ
โค) |
79 | | elfznn 13526 |
. . . . . . . . 9
โข (๐ โ (1...๐) โ ๐ โ โ) |
80 | | nnnn0 12475 |
. . . . . . . . 9
โข (๐ โ โ โ ๐ โ
โ0) |
81 | 79, 80 | syl 17 |
. . . . . . . 8
โข (๐ โ (1...๐) โ ๐ โ โ0) |
82 | 81 | ssriv 3985 |
. . . . . . 7
โข
(1...๐) โ
โ0 |
83 | 82 | a1i 11 |
. . . . . 6
โข ((๐ป โ dom โ โง ๐ โ โ) โ
(1...๐) โ
โ0) |
84 | 4 | adantl 482 |
. . . . . 6
โข (((๐ป โ dom โ โง ๐ โ โ) โง ๐ โ โ0)
โ ((โ0 ร {1})โ๐) = 1) |
85 | | 1red 11211 |
. . . . . 6
โข (((๐ป โ dom โ โง ๐ โ โ) โง ๐ โ โ0)
โ 1 โ โ) |
86 | | 0le1 11733 |
. . . . . . 7
โข 0 โค
1 |
87 | 86 | a1i 11 |
. . . . . 6
โข (((๐ป โ dom โ โง ๐ โ โ) โง ๐ โ โ0)
โ 0 โค 1) |
88 | 61 | adantr 481 |
. . . . . 6
โข ((๐ป โ dom โ โง ๐ โ โ) โ seq0( +
, (โ0 ร {1})) โ dom โ ) |
89 | 1, 78, 65, 83, 84, 85, 87, 88 | isumless 15787 |
. . . . 5
โข ((๐ป โ dom โ โง ๐ โ โ) โ
ฮฃ๐ โ (1...๐)1 โค ฮฃ๐ โ โ0
1) |
90 | 77, 89 | eqbrtrrd 5171 |
. . . 4
โข ((๐ป โ dom โ โง ๐ โ โ) โ ๐ โค ฮฃ๐ โ โ0
1) |
91 | | nnre 12215 |
. . . . 5
โข (๐ โ โ โ ๐ โ
โ) |
92 | | lenlt 11288 |
. . . . 5
โข ((๐ โ โ โง
ฮฃ๐ โ
โ0 1 โ โ) โ (๐ โค ฮฃ๐ โ โ0 1 โ ยฌ
ฮฃ๐ โ
โ0 1 < ๐)) |
93 | 91, 62, 92 | syl2anr 597 |
. . . 4
โข ((๐ป โ dom โ โง ๐ โ โ) โ (๐ โค ฮฃ๐ โ โ0 1 โ ยฌ
ฮฃ๐ โ
โ0 1 < ๐)) |
94 | 90, 93 | mpbid 231 |
. . 3
โข ((๐ป โ dom โ โง ๐ โ โ) โ ยฌ
ฮฃ๐ โ
โ0 1 < ๐) |
95 | 94 | nrexdv 3149 |
. 2
โข (๐ป โ dom โ โ ยฌ
โ๐ โ โ
ฮฃ๐ โ
โ0 1 < ๐) |
96 | 64, 95 | pm2.65i 193 |
1
โข ยฌ
๐ป โ dom
โ |