Step | Hyp | Ref
| Expression |
1 | | nnuz 12862 |
. . . . . 6
β’ β =
(β€β₯β1) |
2 | | 1zzd 12590 |
. . . . . 6
β’ (((π β§ βπ β β π΅ β (0[,)+β)) β§ πΉ β dom β ) β 1
β β€) |
3 | | simpr 486 |
. . . . . 6
β’ (((π β§ βπ β β π΅ β (0[,)+β)) β§ πΉ β dom β ) β
πΉ β dom β
) |
4 | | rge0ssre 13430 |
. . . . . . . . 9
β’
(0[,)+β) β β |
5 | | ax-resscn 11164 |
. . . . . . . . 9
β’ β
β β |
6 | 4, 5 | sstri 3991 |
. . . . . . . 8
β’
(0[,)+β) β β |
7 | | esumcvg.m |
. . . . . . . . . . . . 13
β’ (π = π β π΄ = π΅) |
8 | 7 | eleq1d 2819 |
. . . . . . . . . . . 12
β’ (π = π β (π΄ β (0[,)+β) β π΅ β
(0[,)+β))) |
9 | 8 | cbvralvw 3235 |
. . . . . . . . . . 11
β’
(βπ β
β π΄ β
(0[,)+β) β βπ β β π΅ β (0[,)+β)) |
10 | | rsp 3245 |
. . . . . . . . . . 11
β’
(βπ β
β π΄ β
(0[,)+β) β (π
β β β π΄
β (0[,)+β))) |
11 | 9, 10 | sylbir 234 |
. . . . . . . . . 10
β’
(βπ β
β π΅ β
(0[,)+β) β (π
β β β π΄
β (0[,)+β))) |
12 | 11 | adantl 483 |
. . . . . . . . 9
β’ ((π β§ βπ β β π΅ β (0[,)+β)) β (π β β β π΄ β
(0[,)+β))) |
13 | 12 | imp 408 |
. . . . . . . 8
β’ (((π β§ βπ β β π΅ β (0[,)+β)) β§ π β β) β π΄ β
(0[,)+β)) |
14 | 6, 13 | sselid 3980 |
. . . . . . 7
β’ (((π β§ βπ β β π΅ β (0[,)+β)) β§ π β β) β π΄ β
β) |
15 | 14 | adantlr 714 |
. . . . . 6
β’ ((((π β§ βπ β β π΅ β (0[,)+β)) β§ πΉ β dom β ) β§
π β β) β
π΄ β
β) |
16 | | esumcvg.f |
. . . . . . . . 9
β’ πΉ = (π β β β¦
Ξ£*π β
(1...π)π΄) |
17 | | fzfid 13935 |
. . . . . . . . . . 11
β’ (((π β§ βπ β β π΅ β (0[,)+β)) β§ π β β) β
(1...π) β
Fin) |
18 | | elfznn 13527 |
. . . . . . . . . . . . 13
β’ (π β (1...π) β π β β) |
19 | 18, 13 | sylan2 594 |
. . . . . . . . . . . 12
β’ (((π β§ βπ β β π΅ β (0[,)+β)) β§ π β (1...π)) β π΄ β (0[,)+β)) |
20 | 19 | adantlr 714 |
. . . . . . . . . . 11
β’ ((((π β§ βπ β β π΅ β (0[,)+β)) β§ π β β) β§ π β (1...π)) β π΄ β (0[,)+β)) |
21 | 17, 20 | esumpfinval 33062 |
. . . . . . . . . 10
β’ (((π β§ βπ β β π΅ β (0[,)+β)) β§ π β β) β
Ξ£*π β
(1...π)π΄ = Ξ£π β (1...π)π΄) |
22 | 21 | mpteq2dva 5248 |
. . . . . . . . 9
β’ ((π β§ βπ β β π΅ β (0[,)+β)) β (π β β β¦
Ξ£*π β
(1...π)π΄) = (π β β β¦ Ξ£π β (1...π)π΄)) |
23 | 16, 22 | eqtrid 2785 |
. . . . . . . 8
β’ ((π β§ βπ β β π΅ β (0[,)+β)) β πΉ = (π β β β¦ Ξ£π β (1...π)π΄)) |
24 | 6, 20 | sselid 3980 |
. . . . . . . . 9
β’ ((((π β§ βπ β β π΅ β (0[,)+β)) β§ π β β) β§ π β (1...π)) β π΄ β β) |
25 | 17, 24 | fsumcl 15676 |
. . . . . . . 8
β’ (((π β§ βπ β β π΅ β (0[,)+β)) β§ π β β) β
Ξ£π β (1...π)π΄ β β) |
26 | 23, 25 | fvmpt2d 7009 |
. . . . . . 7
β’ (((π β§ βπ β β π΅ β (0[,)+β)) β§ π β β) β (πΉβπ) = Ξ£π β (1...π)π΄) |
27 | 26 | adantlr 714 |
. . . . . 6
β’ ((((π β§ βπ β β π΅ β (0[,)+β)) β§ πΉ β dom β ) β§
π β β) β
(πΉβπ) = Ξ£π β (1...π)π΄) |
28 | 1, 2, 3, 15, 27 | isumclim3 15702 |
. . . . 5
β’ (((π β§ βπ β β π΅ β (0[,)+β)) β§ πΉ β dom β ) β
πΉ β Ξ£π β β π΄) |
29 | | esumcvg.j |
. . . . . 6
β’ π½ =
(TopOpenβ(β*π βΎs
(0[,]+β))) |
30 | 17, 20 | fsumrp0cl 32184 |
. . . . . . . . 9
β’ (((π β§ βπ β β π΅ β (0[,)+β)) β§ π β β) β
Ξ£π β (1...π)π΄ β (0[,)+β)) |
31 | 21, 30 | eqeltrd 2834 |
. . . . . . . 8
β’ (((π β§ βπ β β π΅ β (0[,)+β)) β§ π β β) β
Ξ£*π β
(1...π)π΄ β (0[,)+β)) |
32 | 31, 16 | fmptd 7111 |
. . . . . . 7
β’ ((π β§ βπ β β π΅ β (0[,)+β)) β πΉ:ββΆ(0[,)+β)) |
33 | 32 | adantr 482 |
. . . . . 6
β’ (((π β§ βπ β β π΅ β (0[,)+β)) β§ πΉ β dom β ) β
πΉ:ββΆ(0[,)+β)) |
34 | | simplll 774 |
. . . . . . . . 9
β’ ((((π β§ βπ β β π΅ β (0[,)+β)) β§ πΉ β dom β ) β§
π β β) β
π) |
35 | | eqidd 2734 |
. . . . . . . . . 10
β’ ((π β§ π β β) β (π β β β¦ π΅) = (π β β β¦ π΅)) |
36 | | eqcom 2740 |
. . . . . . . . . . . 12
β’ (π = π β π = π) |
37 | | eqcom 2740 |
. . . . . . . . . . . 12
β’ (π΄ = π΅ β π΅ = π΄) |
38 | 7, 36, 37 | 3imtr3i 291 |
. . . . . . . . . . 11
β’ (π = π β π΅ = π΄) |
39 | 38 | adantl 483 |
. . . . . . . . . 10
β’ (((π β§ π β β) β§ π = π) β π΅ = π΄) |
40 | | simpr 486 |
. . . . . . . . . 10
β’ ((π β§ π β β) β π β β) |
41 | | esumcvg.a |
. . . . . . . . . 10
β’ ((π β§ π β β) β π΄ β (0[,]+β)) |
42 | 35, 39, 40, 41 | fvmptd 7003 |
. . . . . . . . 9
β’ ((π β§ π β β) β ((π β β β¦ π΅)βπ) = π΄) |
43 | 34, 42 | sylancom 589 |
. . . . . . . 8
β’ ((((π β§ βπ β β π΅ β (0[,)+β)) β§ πΉ β dom β ) β§
π β β) β
((π β β β¦
π΅)βπ) = π΄) |
44 | 13 | adantlr 714 |
. . . . . . . . . 10
β’ ((((π β§ βπ β β π΅ β (0[,)+β)) β§ πΉ β dom β ) β§
π β β) β
π΄ β
(0[,)+β)) |
45 | | elrege0 13428 |
. . . . . . . . . 10
β’ (π΄ β (0[,)+β) β
(π΄ β β β§ 0
β€ π΄)) |
46 | 44, 45 | sylib 217 |
. . . . . . . . 9
β’ ((((π β§ βπ β β π΅ β (0[,)+β)) β§ πΉ β dom β ) β§
π β β) β
(π΄ β β β§ 0
β€ π΄)) |
47 | 46 | simpld 496 |
. . . . . . . 8
β’ ((((π β§ βπ β β π΅ β (0[,)+β)) β§ πΉ β dom β ) β§
π β β) β
π΄ β
β) |
48 | | ovex 7439 |
. . . . . . . . . . . . . . 15
β’
(1...π) β
V |
49 | | simpll 766 |
. . . . . . . . . . . . . . . . 17
β’ (((π β§ π β β) β§ π β (1...π)) β π) |
50 | 18 | adantl 483 |
. . . . . . . . . . . . . . . . 17
β’ (((π β§ π β β) β§ π β (1...π)) β π β β) |
51 | 49, 50, 41 | syl2anc 585 |
. . . . . . . . . . . . . . . 16
β’ (((π β§ π β β) β§ π β (1...π)) β π΄ β (0[,]+β)) |
52 | 51 | ralrimiva 3147 |
. . . . . . . . . . . . . . 15
β’ ((π β§ π β β) β βπ β (1...π)π΄ β (0[,]+β)) |
53 | | nfcv 2904 |
. . . . . . . . . . . . . . . 16
β’
β²π(1...π) |
54 | 53 | esumcl 33017 |
. . . . . . . . . . . . . . 15
β’
(((1...π) β V
β§ βπ β
(1...π)π΄ β (0[,]+β)) β
Ξ£*π β
(1...π)π΄ β (0[,]+β)) |
55 | 48, 52, 54 | sylancr 588 |
. . . . . . . . . . . . . 14
β’ ((π β§ π β β) β
Ξ£*π β
(1...π)π΄ β (0[,]+β)) |
56 | 55, 16 | fmptd 7111 |
. . . . . . . . . . . . 13
β’ (π β πΉ:ββΆ(0[,]+β)) |
57 | 56 | ffnd 6716 |
. . . . . . . . . . . 12
β’ (π β πΉ Fn β) |
58 | 57 | adantr 482 |
. . . . . . . . . . 11
β’ ((π β§ βπ β β π΅ β (0[,)+β)) β πΉ Fn β) |
59 | | 1z 12589 |
. . . . . . . . . . . . . 14
β’ 1 β
β€ |
60 | | seqfn 13975 |
. . . . . . . . . . . . . 14
β’ (1 β
β€ β seq1( + , (π
β β β¦ π΅))
Fn (β€β₯β1)) |
61 | 59, 60 | ax-mp 5 |
. . . . . . . . . . . . 13
β’ seq1( + ,
(π β β β¦
π΅)) Fn
(β€β₯β1) |
62 | 1 | fneq2i 6645 |
. . . . . . . . . . . . 13
β’ (seq1( +
, (π β β β¦
π΅)) Fn β β seq1(
+ , (π β β
β¦ π΅)) Fn
(β€β₯β1)) |
63 | 61, 62 | mpbir 230 |
. . . . . . . . . . . 12
β’ seq1( + ,
(π β β β¦
π΅)) Fn
β |
64 | 63 | a1i 11 |
. . . . . . . . . . 11
β’ ((π β§ βπ β β π΅ β (0[,)+β)) β seq1( + ,
(π β β β¦
π΅)) Fn
β) |
65 | | simplll 774 |
. . . . . . . . . . . . . 14
β’ ((((π β§ βπ β β π΅ β (0[,)+β)) β§ π β β) β§ π β (1...π)) β π) |
66 | 18, 42 | sylan2 594 |
. . . . . . . . . . . . . 14
β’ ((π β§ π β (1...π)) β ((π β β β¦ π΅)βπ) = π΄) |
67 | 65, 66 | sylancom 589 |
. . . . . . . . . . . . 13
β’ ((((π β§ βπ β β π΅ β (0[,)+β)) β§ π β β) β§ π β (1...π)) β ((π β β β¦ π΅)βπ) = π΄) |
68 | | simpr 486 |
. . . . . . . . . . . . . 14
β’ (((π β§ βπ β β π΅ β (0[,)+β)) β§ π β β) β π β
β) |
69 | 68, 1 | eleqtrdi 2844 |
. . . . . . . . . . . . 13
β’ (((π β§ βπ β β π΅ β (0[,)+β)) β§ π β β) β π β
(β€β₯β1)) |
70 | 67, 69, 24 | fsumser 15673 |
. . . . . . . . . . . 12
β’ (((π β§ βπ β β π΅ β (0[,)+β)) β§ π β β) β
Ξ£π β (1...π)π΄ = (seq1( + , (π β β β¦ π΅))βπ)) |
71 | 26, 70 | eqtrd 2773 |
. . . . . . . . . . 11
β’ (((π β§ βπ β β π΅ β (0[,)+β)) β§ π β β) β (πΉβπ) = (seq1( + , (π β β β¦ π΅))βπ)) |
72 | 58, 64, 71 | eqfnfvd 7033 |
. . . . . . . . . 10
β’ ((π β§ βπ β β π΅ β (0[,)+β)) β πΉ = seq1( + , (π β β β¦ π΅))) |
73 | 72 | adantr 482 |
. . . . . . . . 9
β’ (((π β§ βπ β β π΅ β (0[,)+β)) β§ πΉ β dom β ) β
πΉ = seq1( + , (π β β β¦ π΅))) |
74 | 73, 3 | eqeltrrd 2835 |
. . . . . . . 8
β’ (((π β§ βπ β β π΅ β (0[,)+β)) β§ πΉ β dom β ) β
seq1( + , (π β β
β¦ π΅)) β dom
β ) |
75 | 1, 2, 43, 47, 74 | isumrecl 15708 |
. . . . . . 7
β’ (((π β§ βπ β β π΅ β (0[,)+β)) β§ πΉ β dom β ) β
Ξ£π β β
π΄ β
β) |
76 | 46 | simprd 497 |
. . . . . . . 8
β’ ((((π β§ βπ β β π΅ β (0[,)+β)) β§ πΉ β dom β ) β§
π β β) β 0
β€ π΄) |
77 | 1, 2, 43, 47, 74, 76 | isumge0 15709 |
. . . . . . 7
β’ (((π β§ βπ β β π΅ β (0[,)+β)) β§ πΉ β dom β ) β 0
β€ Ξ£π β
β π΄) |
78 | | elrege0 13428 |
. . . . . . 7
β’
(Ξ£π β
β π΄ β
(0[,)+β) β (Ξ£π β β π΄ β β β§ 0 β€ Ξ£π β β π΄)) |
79 | 75, 77, 78 | sylanbrc 584 |
. . . . . 6
β’ (((π β§ βπ β β π΅ β (0[,)+β)) β§ πΉ β dom β ) β
Ξ£π β β
π΄ β
(0[,)+β)) |
80 | | ssid 4004 |
. . . . . 6
β’
(0[,)+β) β (0[,)+β) |
81 | 29, 33, 79, 80 | lmlimxrge0 32917 |
. . . . 5
β’ (((π β§ βπ β β π΅ β (0[,)+β)) β§ πΉ β dom β ) β
(πΉ(βπ‘βπ½)Ξ£π β β π΄ β πΉ β Ξ£π β β π΄)) |
82 | 28, 81 | mpbird 257 |
. . . 4
β’ (((π β§ βπ β β π΅ β (0[,)+β)) β§ πΉ β dom β ) β
πΉ(βπ‘βπ½)Ξ£π β β π΄) |
83 | 16, 3 | eqeltrrid 2839 |
. . . . . 6
β’ (((π β§ βπ β β π΅ β (0[,)+β)) β§ πΉ β dom β ) β
(π β β β¦
Ξ£*π β
(1...π)π΄) β dom β ) |
84 | 22 | eleq1d 2819 |
. . . . . . 7
β’ ((π β§ βπ β β π΅ β (0[,)+β)) β ((π β β β¦
Ξ£*π β
(1...π)π΄) β dom β β (π β β β¦
Ξ£π β (1...π)π΄) β dom β )) |
85 | 84 | adantr 482 |
. . . . . 6
β’ (((π β§ βπ β β π΅ β (0[,)+β)) β§ πΉ β dom β ) β
((π β β β¦
Ξ£*π β
(1...π)π΄) β dom β β (π β β β¦
Ξ£π β (1...π)π΄) β dom β )) |
86 | 83, 85 | mpbid 231 |
. . . . 5
β’ (((π β§ βπ β β π΅ β (0[,)+β)) β§ πΉ β dom β ) β
(π β β β¦
Ξ£π β (1...π)π΄) β dom β ) |
87 | 44, 7, 86 | esumpcvgval 33065 |
. . . 4
β’ (((π β§ βπ β β π΅ β (0[,)+β)) β§ πΉ β dom β ) β
Ξ£*π β
βπ΄ = Ξ£π β β π΄) |
88 | 82, 87 | breqtrrd 5176 |
. . 3
β’ (((π β§ βπ β β π΅ β (0[,)+β)) β§ πΉ β dom β ) β
πΉ(βπ‘βπ½)Ξ£*π β βπ΄) |
89 | 32 | adantr 482 |
. . . . 5
β’ (((π β§ βπ β β π΅ β (0[,)+β)) β§ Β¬ πΉ β dom β ) β
πΉ:ββΆ(0[,)+β)) |
90 | | simpr 486 |
. . . . . . 7
β’ ((((π β§ βπ β β π΅ β (0[,)+β)) β§ Β¬ πΉ β dom β ) β§
π β β) β
π β
β) |
91 | 90 | nnzd 12582 |
. . . . . . . 8
β’ ((((π β§ βπ β β π΅ β (0[,)+β)) β§ Β¬ πΉ β dom β ) β§
π β β) β
π β
β€) |
92 | | uzid 12834 |
. . . . . . . 8
β’ (π β β€ β π β
(β€β₯βπ)) |
93 | | peano2uz 12882 |
. . . . . . . 8
β’ (π β
(β€β₯βπ) β (π + 1) β
(β€β₯βπ)) |
94 | 91, 92, 93 | 3syl 18 |
. . . . . . 7
β’ ((((π β§ βπ β β π΅ β (0[,)+β)) β§ Β¬ πΉ β dom β ) β§
π β β) β
(π + 1) β
(β€β₯βπ)) |
95 | | simplll 774 |
. . . . . . . 8
β’
(((((π β§
βπ β β
π΅ β (0[,)+β))
β§ Β¬ πΉ β dom
β ) β§ π β
β) β§ π β
β) β (π β§
βπ β β
π΅ β
(0[,)+β))) |
96 | 95, 13 | sylancom 589 |
. . . . . . 7
β’
(((((π β§
βπ β β
π΅ β (0[,)+β))
β§ Β¬ πΉ β dom
β ) β§ π β
β) β§ π β
β) β π΄ β
(0[,)+β)) |
97 | 90, 94, 96 | esumpmono 33066 |
. . . . . 6
β’ ((((π β§ βπ β β π΅ β (0[,)+β)) β§ Β¬ πΉ β dom β ) β§
π β β) β
Ξ£*π β
(1...π)π΄ β€ Ξ£*π β (1...(π + 1))π΄) |
98 | 26, 21 | eqtr4d 2776 |
. . . . . . 7
β’ (((π β§ βπ β β π΅ β (0[,)+β)) β§ π β β) β (πΉβπ) = Ξ£*π β (1...π)π΄) |
99 | 98 | adantlr 714 |
. . . . . 6
β’ ((((π β§ βπ β β π΅ β (0[,)+β)) β§ Β¬ πΉ β dom β ) β§
π β β) β
(πΉβπ) = Ξ£*π β (1...π)π΄) |
100 | | oveq2 7414 |
. . . . . . . . . . 11
β’ (π = π β (1...π) = (1...π)) |
101 | | esumeq1 33021 |
. . . . . . . . . . 11
β’
((1...π) =
(1...π) β
Ξ£*π β
(1...π)π΄ = Ξ£*π β (1...π)π΄) |
102 | 100, 101 | syl 17 |
. . . . . . . . . 10
β’ (π = π β Ξ£*π β (1...π)π΄ = Ξ£*π β (1...π)π΄) |
103 | 102 | cbvmptv 5261 |
. . . . . . . . 9
β’ (π β β β¦
Ξ£*π β
(1...π)π΄) = (π β β β¦
Ξ£*π β
(1...π)π΄) |
104 | 16, 103 | eqtr4i 2764 |
. . . . . . . 8
β’ πΉ = (π β β β¦
Ξ£*π β
(1...π)π΄) |
105 | 104 | a1i 11 |
. . . . . . 7
β’ ((((π β§ βπ β β π΅ β (0[,)+β)) β§ Β¬ πΉ β dom β ) β§
π β β) β
πΉ = (π β β β¦
Ξ£*π β
(1...π)π΄)) |
106 | | simpr3 1197 |
. . . . . . . . 9
β’ (((π β§ βπ β β π΅ β (0[,)+β)) β§ (Β¬ πΉ β dom β β§ π β β β§ π = (π + 1))) β π = (π + 1)) |
107 | | oveq2 7414 |
. . . . . . . . 9
β’ (π = (π + 1) β (1...π) = (1...(π + 1))) |
108 | | esumeq1 33021 |
. . . . . . . . 9
β’
((1...π) =
(1...(π + 1)) β
Ξ£*π β
(1...π)π΄ = Ξ£*π β (1...(π + 1))π΄) |
109 | 106, 107,
108 | 3syl 18 |
. . . . . . . 8
β’ (((π β§ βπ β β π΅ β (0[,)+β)) β§ (Β¬ πΉ β dom β β§ π β β β§ π = (π + 1))) β Ξ£*π β (1...π)π΄ = Ξ£*π β (1...(π + 1))π΄) |
110 | 109 | 3anassrs 1361 |
. . . . . . 7
β’
(((((π β§
βπ β β
π΅ β (0[,)+β))
β§ Β¬ πΉ β dom
β ) β§ π β
β) β§ π = (π + 1)) β
Ξ£*π β
(1...π)π΄ = Ξ£*π β (1...(π + 1))π΄) |
111 | 90 | peano2nnd 12226 |
. . . . . . 7
β’ ((((π β§ βπ β β π΅ β (0[,)+β)) β§ Β¬ πΉ β dom β ) β§
π β β) β
(π + 1) β
β) |
112 | | ovex 7439 |
. . . . . . . 8
β’
(1...(π + 1)) β
V |
113 | | simp-4l 782 |
. . . . . . . . . 10
β’
(((((π β§
βπ β β
π΅ β (0[,)+β))
β§ Β¬ πΉ β dom
β ) β§ π β
β) β§ π β
(1...(π + 1))) β π) |
114 | | elfznn 13527 |
. . . . . . . . . . 11
β’ (π β (1...(π + 1)) β π β β) |
115 | 114 | adantl 483 |
. . . . . . . . . 10
β’
(((((π β§
βπ β β
π΅ β (0[,)+β))
β§ Β¬ πΉ β dom
β ) β§ π β
β) β§ π β
(1...(π + 1))) β π β
β) |
116 | 113, 115,
41 | syl2anc 585 |
. . . . . . . . 9
β’
(((((π β§
βπ β β
π΅ β (0[,)+β))
β§ Β¬ πΉ β dom
β ) β§ π β
β) β§ π β
(1...(π + 1))) β π΄ β
(0[,]+β)) |
117 | 116 | ralrimiva 3147 |
. . . . . . . 8
β’ ((((π β§ βπ β β π΅ β (0[,)+β)) β§ Β¬ πΉ β dom β ) β§
π β β) β
βπ β
(1...(π + 1))π΄ β
(0[,]+β)) |
118 | | nfcv 2904 |
. . . . . . . . 9
β’
β²π(1...(π + 1)) |
119 | 118 | esumcl 33017 |
. . . . . . . 8
β’
(((1...(π + 1))
β V β§ βπ
β (1...(π + 1))π΄ β (0[,]+β)) β
Ξ£*π β
(1...(π + 1))π΄ β
(0[,]+β)) |
120 | 112, 117,
119 | sylancr 588 |
. . . . . . 7
β’ ((((π β§ βπ β β π΅ β (0[,)+β)) β§ Β¬ πΉ β dom β ) β§
π β β) β
Ξ£*π β
(1...(π + 1))π΄ β
(0[,]+β)) |
121 | 105, 110,
111, 120 | fvmptd 7003 |
. . . . . 6
β’ ((((π β§ βπ β β π΅ β (0[,)+β)) β§ Β¬ πΉ β dom β ) β§
π β β) β
(πΉβ(π + 1)) =
Ξ£*π β
(1...(π + 1))π΄) |
122 | 97, 99, 121 | 3brtr4d 5180 |
. . . . 5
β’ ((((π β§ βπ β β π΅ β (0[,)+β)) β§ Β¬ πΉ β dom β ) β§
π β β) β
(πΉβπ) β€ (πΉβ(π + 1))) |
123 | | simpr 486 |
. . . . 5
β’ (((π β§ βπ β β π΅ β (0[,)+β)) β§ Β¬ πΉ β dom β ) β
Β¬ πΉ β dom β
) |
124 | 29, 89, 122, 123 | lmdvglim 32923 |
. . . 4
β’ (((π β§ βπ β β π΅ β (0[,)+β)) β§ Β¬ πΉ β dom β ) β
πΉ(βπ‘βπ½)+β) |
125 | | nfv 1918 |
. . . . . . 7
β’
β²π(π β§ βπ β β π΅ β (0[,)+β)) |
126 | | nfcv 2904 |
. . . . . . 7
β’
β²πβ |
127 | | nnex 12215 |
. . . . . . . 8
β’ β
β V |
128 | 127 | a1i 11 |
. . . . . . 7
β’ ((π β§ βπ β β π΅ β (0[,)+β)) β β
β V) |
129 | 41 | adantlr 714 |
. . . . . . 7
β’ (((π β§ βπ β β π΅ β (0[,)+β)) β§ π β β) β π΄ β
(0[,]+β)) |
130 | | simpr 486 |
. . . . . . . . 9
β’ (((π β§ βπ β β π΅ β (0[,)+β)) β§ π₯ β (π« β β©
Fin)) β π₯ β
(π« β β© Fin)) |
131 | | simpll 766 |
. . . . . . . . . . 11
β’ ((((π β§ βπ β β π΅ β (0[,)+β)) β§ π₯ β (π« β β©
Fin)) β§ π β π₯) β (π β§ βπ β β π΅ β (0[,)+β))) |
132 | | inss1 4228 |
. . . . . . . . . . . . . 14
β’
(π« β β© Fin) β π« β |
133 | | simplr 768 |
. . . . . . . . . . . . . 14
β’ ((((π β§ βπ β β π΅ β (0[,)+β)) β§ π₯ β (π« β β©
Fin)) β§ π β π₯) β π₯ β (π« β β©
Fin)) |
134 | 132, 133 | sselid 3980 |
. . . . . . . . . . . . 13
β’ ((((π β§ βπ β β π΅ β (0[,)+β)) β§ π₯ β (π« β β©
Fin)) β§ π β π₯) β π₯ β π« β) |
135 | 134 | elpwid 4611 |
. . . . . . . . . . . 12
β’ ((((π β§ βπ β β π΅ β (0[,)+β)) β§ π₯ β (π« β β©
Fin)) β§ π β π₯) β π₯ β β) |
136 | | simpr 486 |
. . . . . . . . . . . 12
β’ ((((π β§ βπ β β π΅ β (0[,)+β)) β§ π₯ β (π« β β©
Fin)) β§ π β π₯) β π β π₯) |
137 | 135, 136 | sseldd 3983 |
. . . . . . . . . . 11
β’ ((((π β§ βπ β β π΅ β (0[,)+β)) β§ π₯ β (π« β β©
Fin)) β§ π β π₯) β π β β) |
138 | 131, 137,
13 | syl2anc 585 |
. . . . . . . . . 10
β’ ((((π β§ βπ β β π΅ β (0[,)+β)) β§ π₯ β (π« β β©
Fin)) β§ π β π₯) β π΄ β (0[,)+β)) |
139 | 138 | fmpttd 7112 |
. . . . . . . . 9
β’ (((π β§ βπ β β π΅ β (0[,)+β)) β§ π₯ β (π« β β©
Fin)) β (π β
π₯ β¦ π΄):π₯βΆ(0[,)+β)) |
140 | | esumpfinvallem 33061 |
. . . . . . . . 9
β’ ((π₯ β (π« β β©
Fin) β§ (π β π₯ β¦ π΄):π₯βΆ(0[,)+β)) β
(βfld Ξ£g (π β π₯ β¦ π΄)) =
((β*π βΎs (0[,]+β))
Ξ£g (π β π₯ β¦ π΄))) |
141 | 130, 139,
140 | syl2anc 585 |
. . . . . . . 8
β’ (((π β§ βπ β β π΅ β (0[,)+β)) β§ π₯ β (π« β β©
Fin)) β (βfld Ξ£g (π β π₯ β¦ π΄)) =
((β*π βΎs (0[,]+β))
Ξ£g (π β π₯ β¦ π΄))) |
142 | | inss2 4229 |
. . . . . . . . . 10
β’
(π« β β© Fin) β Fin |
143 | 142, 130 | sselid 3980 |
. . . . . . . . 9
β’ (((π β§ βπ β β π΅ β (0[,)+β)) β§ π₯ β (π« β β©
Fin)) β π₯ β
Fin) |
144 | 131, 137,
14 | syl2anc 585 |
. . . . . . . . 9
β’ ((((π β§ βπ β β π΅ β (0[,)+β)) β§ π₯ β (π« β β©
Fin)) β§ π β π₯) β π΄ β β) |
145 | 143, 144 | gsumfsum 21005 |
. . . . . . . 8
β’ (((π β§ βπ β β π΅ β (0[,)+β)) β§ π₯ β (π« β β©
Fin)) β (βfld Ξ£g (π β π₯ β¦ π΄)) = Ξ£π β π₯ π΄) |
146 | 141, 145 | eqtr3d 2775 |
. . . . . . 7
β’ (((π β§ βπ β β π΅ β (0[,)+β)) β§ π₯ β (π« β β©
Fin)) β ((β*π βΎs
(0[,]+β)) Ξ£g (π β π₯ β¦ π΄)) = Ξ£π β π₯ π΄) |
147 | 125, 126,
128, 129, 146 | esumval 33033 |
. . . . . 6
β’ ((π β§ βπ β β π΅ β (0[,)+β)) β
Ξ£*π β
βπ΄ = sup(ran (π₯ β (π« β β©
Fin) β¦ Ξ£π
β π₯ π΄), β*, <
)) |
148 | 147 | adantr 482 |
. . . . 5
β’ (((π β§ βπ β β π΅ β (0[,)+β)) β§ Β¬ πΉ β dom β ) β
Ξ£*π β
βπ΄ = sup(ran (π₯ β (π« β β©
Fin) β¦ Ξ£π
β π₯ π΄), β*, <
)) |
149 | 89, 122, 123 | lmdvg 32922 |
. . . . . . . . . . 11
β’ (((π β§ βπ β β π΅ β (0[,)+β)) β§ Β¬ πΉ β dom β ) β
βπ¦ β β
βπ β β
βπ β
(β€β₯βπ)π¦ < (πΉβπ)) |
150 | 149 | r19.21bi 3249 |
. . . . . . . . . 10
β’ ((((π β§ βπ β β π΅ β (0[,)+β)) β§ Β¬ πΉ β dom β ) β§
π¦ β β) β
βπ β β
βπ β
(β€β₯βπ)π¦ < (πΉβπ)) |
151 | | nnz 12576 |
. . . . . . . . . . . . 13
β’ (π β β β π β
β€) |
152 | | uzid 12834 |
. . . . . . . . . . . . 13
β’ (π β β€ β π β
(β€β₯βπ)) |
153 | 151, 152 | syl 17 |
. . . . . . . . . . . 12
β’ (π β β β π β
(β€β₯βπ)) |
154 | | simpr 486 |
. . . . . . . . . . . . . 14
β’ ((π β β β§ π = π) β π = π) |
155 | 154 | fveq2d 6893 |
. . . . . . . . . . . . 13
β’ ((π β β β§ π = π) β (πΉβπ) = (πΉβπ)) |
156 | 155 | breq2d 5160 |
. . . . . . . . . . . 12
β’ ((π β β β§ π = π) β (π¦ < (πΉβπ) β π¦ < (πΉβπ))) |
157 | 153, 156 | rspcdv 3605 |
. . . . . . . . . . 11
β’ (π β β β
(βπ β
(β€β₯βπ)π¦ < (πΉβπ) β π¦ < (πΉβπ))) |
158 | 157 | reximia 3082 |
. . . . . . . . . 10
β’
(βπ β
β βπ β
(β€β₯βπ)π¦ < (πΉβπ) β βπ β β π¦ < (πΉβπ)) |
159 | 150, 158 | syl 17 |
. . . . . . . . 9
β’ ((((π β§ βπ β β π΅ β (0[,)+β)) β§ Β¬ πΉ β dom β ) β§
π¦ β β) β
βπ β β
π¦ < (πΉβπ)) |
160 | | simplr 768 |
. . . . . . . . . . . 12
β’
(((((π β§
βπ β β
π΅ β (0[,)+β))
β§ Β¬ πΉ β dom
β ) β§ π¦ β
β) β§ π β
β) β π¦ β
β) |
161 | 89 | ad2antrr 725 |
. . . . . . . . . . . . . 14
β’
(((((π β§
βπ β β
π΅ β (0[,)+β))
β§ Β¬ πΉ β dom
β ) β§ π¦ β
β) β§ π β
β) β πΉ:ββΆ(0[,)+β)) |
162 | | simpr 486 |
. . . . . . . . . . . . . 14
β’
(((((π β§
βπ β β
π΅ β (0[,)+β))
β§ Β¬ πΉ β dom
β ) β§ π¦ β
β) β§ π β
β) β π β
β) |
163 | 161, 162 | ffvelcdmd 7085 |
. . . . . . . . . . . . 13
β’
(((((π β§
βπ β β
π΅ β (0[,)+β))
β§ Β¬ πΉ β dom
β ) β§ π¦ β
β) β§ π β
β) β (πΉβπ) β (0[,)+β)) |
164 | 4, 163 | sselid 3980 |
. . . . . . . . . . . 12
β’
(((((π β§
βπ β β
π΅ β (0[,)+β))
β§ Β¬ πΉ β dom
β ) β§ π¦ β
β) β§ π β
β) β (πΉβπ) β β) |
165 | | ltle 11299 |
. . . . . . . . . . . 12
β’ ((π¦ β β β§ (πΉβπ) β β) β (π¦ < (πΉβπ) β π¦ β€ (πΉβπ))) |
166 | 160, 164,
165 | syl2anc 585 |
. . . . . . . . . . 11
β’
(((((π β§
βπ β β
π΅ β (0[,)+β))
β§ Β¬ πΉ β dom
β ) β§ π¦ β
β) β§ π β
β) β (π¦ <
(πΉβπ) β π¦ β€ (πΉβπ))) |
167 | | oveq2 7414 |
. . . . . . . . . . . . . . 15
β’ (π = π β (1...π) = (1...π)) |
168 | | esumeq1 33021 |
. . . . . . . . . . . . . . 15
β’
((1...π) =
(1...π) β
Ξ£*π β
(1...π)π΄ = Ξ£*π β (1...π)π΄) |
169 | 167, 168 | syl 17 |
. . . . . . . . . . . . . 14
β’ (π = π β Ξ£*π β (1...π)π΄ = Ξ£*π β (1...π)π΄) |
170 | | esumex 33016 |
. . . . . . . . . . . . . . 15
β’
Ξ£*π
β (1...π)π΄ β V |
171 | 170 | a1i 11 |
. . . . . . . . . . . . . 14
β’
(((((π β§
βπ β β
π΅ β (0[,)+β))
β§ Β¬ πΉ β dom
β ) β§ π¦ β
β) β§ π β
β) β Ξ£*π β (1...π)π΄ β V) |
172 | 16, 169, 162, 171 | fvmptd3 7019 |
. . . . . . . . . . . . 13
β’
(((((π β§
βπ β β
π΅ β (0[,)+β))
β§ Β¬ πΉ β dom
β ) β§ π¦ β
β) β§ π β
β) β (πΉβπ) = Ξ£*π β (1...π)π΄) |
173 | | fzfid 13935 |
. . . . . . . . . . . . . 14
β’
(((((π β§
βπ β β
π΅ β (0[,)+β))
β§ Β¬ πΉ β dom
β ) β§ π¦ β
β) β§ π β
β) β (1...π)
β Fin) |
174 | | simp-4l 782 |
. . . . . . . . . . . . . . 15
β’
((((((π β§
βπ β β
π΅ β (0[,)+β))
β§ Β¬ πΉ β dom
β ) β§ π¦ β
β) β§ π β
β) β§ π β
(1...π)) β (π β§ βπ β β π΅ β (0[,)+β))) |
175 | | elfznn 13527 |
. . . . . . . . . . . . . . . 16
β’ (π β (1...π) β π β β) |
176 | 175 | adantl 483 |
. . . . . . . . . . . . . . 15
β’
((((((π β§
βπ β β
π΅ β (0[,)+β))
β§ Β¬ πΉ β dom
β ) β§ π¦ β
β) β§ π β
β) β§ π β
(1...π)) β π β
β) |
177 | 174, 176,
13 | syl2anc 585 |
. . . . . . . . . . . . . 14
β’
((((((π β§
βπ β β
π΅ β (0[,)+β))
β§ Β¬ πΉ β dom
β ) β§ π¦ β
β) β§ π β
β) β§ π β
(1...π)) β π΄ β
(0[,)+β)) |
178 | 173, 177 | esumpfinval 33062 |
. . . . . . . . . . . . 13
β’
(((((π β§
βπ β β
π΅ β (0[,)+β))
β§ Β¬ πΉ β dom
β ) β§ π¦ β
β) β§ π β
β) β Ξ£*π β (1...π)π΄ = Ξ£π β (1...π)π΄) |
179 | 172, 178 | eqtrd 2773 |
. . . . . . . . . . . 12
β’
(((((π β§
βπ β β
π΅ β (0[,)+β))
β§ Β¬ πΉ β dom
β ) β§ π¦ β
β) β§ π β
β) β (πΉβπ) = Ξ£π β (1...π)π΄) |
180 | 179 | breq2d 5160 |
. . . . . . . . . . 11
β’
(((((π β§
βπ β β
π΅ β (0[,)+β))
β§ Β¬ πΉ β dom
β ) β§ π¦ β
β) β§ π β
β) β (π¦ β€
(πΉβπ) β π¦ β€ Ξ£π β (1...π)π΄)) |
181 | 166, 180 | sylibd 238 |
. . . . . . . . . 10
β’
(((((π β§
βπ β β
π΅ β (0[,)+β))
β§ Β¬ πΉ β dom
β ) β§ π¦ β
β) β§ π β
β) β (π¦ <
(πΉβπ) β π¦ β€ Ξ£π β (1...π)π΄)) |
182 | 181 | reximdva 3169 |
. . . . . . . . 9
β’ ((((π β§ βπ β β π΅ β (0[,)+β)) β§ Β¬ πΉ β dom β ) β§
π¦ β β) β
(βπ β β
π¦ < (πΉβπ) β βπ β β π¦ β€ Ξ£π β (1...π)π΄)) |
183 | 159, 182 | mpd 15 |
. . . . . . . 8
β’ ((((π β§ βπ β β π΅ β (0[,)+β)) β§ Β¬ πΉ β dom β ) β§
π¦ β β) β
βπ β β
π¦ β€ Ξ£π β (1...π)π΄) |
184 | | fzssuz 13539 |
. . . . . . . . . . . . . 14
β’
(1...π) β
(β€β₯β1) |
185 | 184, 1 | sseqtrri 4019 |
. . . . . . . . . . . . 13
β’
(1...π) β
β |
186 | | ovex 7439 |
. . . . . . . . . . . . . 14
β’
(1...π) β
V |
187 | 186 | elpw 4606 |
. . . . . . . . . . . . 13
β’
((1...π) β
π« β β (1...π) β β) |
188 | 185, 187 | mpbir 230 |
. . . . . . . . . . . 12
β’
(1...π) β
π« β |
189 | | fzfi 13934 |
. . . . . . . . . . . 12
β’
(1...π) β
Fin |
190 | | elin 3964 |
. . . . . . . . . . . 12
β’
((1...π) β
(π« β β© Fin) β ((1...π) β π« β β§ (1...π) β Fin)) |
191 | 188, 189,
190 | mpbir2an 710 |
. . . . . . . . . . 11
β’
(1...π) β
(π« β β© Fin) |
192 | | sumex 15631 |
. . . . . . . . . . 11
β’
Ξ£π β
(1...π)π΄ β V |
193 | | eqid 2733 |
. . . . . . . . . . . 12
β’ (π₯ β (π« β β©
Fin) β¦ Ξ£π
β π₯ π΄) = (π₯ β (π« β β© Fin) β¦
Ξ£π β π₯ π΄) |
194 | | sumeq1 15632 |
. . . . . . . . . . . 12
β’ (π₯ = (1...π) β Ξ£π β π₯ π΄ = Ξ£π β (1...π)π΄) |
195 | 193, 194 | elrnmpt1s 5955 |
. . . . . . . . . . 11
β’
(((1...π) β
(π« β β© Fin) β§ Ξ£π β (1...π)π΄ β V) β Ξ£π β (1...π)π΄ β ran (π₯ β (π« β β© Fin) β¦
Ξ£π β π₯ π΄)) |
196 | 191, 192,
195 | mp2an 691 |
. . . . . . . . . 10
β’
Ξ£π β
(1...π)π΄ β ran (π₯ β (π« β β© Fin) β¦
Ξ£π β π₯ π΄) |
197 | | nfv 1918 |
. . . . . . . . . . 11
β’
β²π§ π¦ β€ Ξ£π β (1...π)π΄ |
198 | | breq2 5152 |
. . . . . . . . . . 11
β’ (π§ = Ξ£π β (1...π)π΄ β (π¦ β€ π§ β π¦ β€ Ξ£π β (1...π)π΄)) |
199 | 197, 198 | rspce 3602 |
. . . . . . . . . 10
β’
((Ξ£π β
(1...π)π΄ β ran (π₯ β (π« β β© Fin) β¦
Ξ£π β π₯ π΄) β§ π¦ β€ Ξ£π β (1...π)π΄) β βπ§ β ran (π₯ β (π« β β© Fin) β¦
Ξ£π β π₯ π΄)π¦ β€ π§) |
200 | 196, 199 | mpan 689 |
. . . . . . . . 9
β’ (π¦ β€ Ξ£π β (1...π)π΄ β βπ§ β ran (π₯ β (π« β β© Fin) β¦
Ξ£π β π₯ π΄)π¦ β€ π§) |
201 | 200 | rexlimivw 3152 |
. . . . . . . 8
β’
(βπ β
β π¦ β€ Ξ£π β (1...π)π΄ β βπ§ β ran (π₯ β (π« β β© Fin) β¦
Ξ£π β π₯ π΄)π¦ β€ π§) |
202 | 183, 201 | syl 17 |
. . . . . . 7
β’ ((((π β§ βπ β β π΅ β (0[,)+β)) β§ Β¬ πΉ β dom β ) β§
π¦ β β) β
βπ§ β ran (π₯ β (π« β β©
Fin) β¦ Ξ£π
β π₯ π΄)π¦ β€ π§) |
203 | 202 | ralrimiva 3147 |
. . . . . 6
β’ (((π β§ βπ β β π΅ β (0[,)+β)) β§ Β¬ πΉ β dom β ) β
βπ¦ β β
βπ§ β ran (π₯ β (π« β β©
Fin) β¦ Ξ£π
β π₯ π΄)π¦ β€ π§) |
204 | | simpr 486 |
. . . . . . . . . . 11
β’ ((((π β§ βπ β β π΅ β (0[,)+β)) β§ Β¬ πΉ β dom β ) β§
π₯ β (π« β
β© Fin)) β π₯ β
(π« β β© Fin)) |
205 | 142, 204 | sselid 3980 |
. . . . . . . . . 10
β’ ((((π β§ βπ β β π΅ β (0[,)+β)) β§ Β¬ πΉ β dom β ) β§
π₯ β (π« β
β© Fin)) β π₯ β
Fin) |
206 | 138 | adantllr 718 |
. . . . . . . . . . 11
β’
(((((π β§
βπ β β
π΅ β (0[,)+β))
β§ Β¬ πΉ β dom
β ) β§ π₯ β
(π« β β© Fin)) β§ π β π₯) β π΄ β (0[,)+β)) |
207 | 4, 206 | sselid 3980 |
. . . . . . . . . 10
β’
(((((π β§
βπ β β
π΅ β (0[,)+β))
β§ Β¬ πΉ β dom
β ) β§ π₯ β
(π« β β© Fin)) β§ π β π₯) β π΄ β β) |
208 | 205, 207 | fsumrecl 15677 |
. . . . . . . . 9
β’ ((((π β§ βπ β β π΅ β (0[,)+β)) β§ Β¬ πΉ β dom β ) β§
π₯ β (π« β
β© Fin)) β Ξ£π
β π₯ π΄ β β) |
209 | 208 | rexrd 11261 |
. . . . . . . 8
β’ ((((π β§ βπ β β π΅ β (0[,)+β)) β§ Β¬ πΉ β dom β ) β§
π₯ β (π« β
β© Fin)) β Ξ£π
β π₯ π΄ β
β*) |
210 | 209 | fmpttd 7112 |
. . . . . . 7
β’ (((π β§ βπ β β π΅ β (0[,)+β)) β§ Β¬ πΉ β dom β ) β
(π₯ β (π«
β β© Fin) β¦ Ξ£π β π₯ π΄):(π« β β©
Fin)βΆβ*) |
211 | | frn 6722 |
. . . . . . 7
β’ ((π₯ β (π« β β©
Fin) β¦ Ξ£π
β π₯ π΄):(π« β β©
Fin)βΆβ* β ran (π₯ β (π« β β© Fin) β¦
Ξ£π β π₯ π΄) β
β*) |
212 | | supxrunb1 13295 |
. . . . . . 7
β’ (ran
(π₯ β (π«
β β© Fin) β¦ Ξ£π β π₯ π΄) β β* β
(βπ¦ β β
βπ§ β ran (π₯ β (π« β β©
Fin) β¦ Ξ£π
β π₯ π΄)π¦ β€ π§ β sup(ran (π₯ β (π« β β© Fin) β¦
Ξ£π β π₯ π΄), β*, < ) =
+β)) |
213 | 210, 211,
212 | 3syl 18 |
. . . . . 6
β’ (((π β§ βπ β β π΅ β (0[,)+β)) β§ Β¬ πΉ β dom β ) β
(βπ¦ β β
βπ§ β ran (π₯ β (π« β β©
Fin) β¦ Ξ£π
β π₯ π΄)π¦ β€ π§ β sup(ran (π₯ β (π« β β© Fin) β¦
Ξ£π β π₯ π΄), β*, < ) =
+β)) |
214 | 203, 213 | mpbid 231 |
. . . . 5
β’ (((π β§ βπ β β π΅ β (0[,)+β)) β§ Β¬ πΉ β dom β ) β
sup(ran (π₯ β
(π« β β© Fin) β¦ Ξ£π β π₯ π΄), β*, < ) =
+β) |
215 | 148, 214 | eqtrd 2773 |
. . . 4
β’ (((π β§ βπ β β π΅ β (0[,)+β)) β§ Β¬ πΉ β dom β ) β
Ξ£*π β
βπ΄ =
+β) |
216 | 124, 215 | breqtrrd 5176 |
. . 3
β’ (((π β§ βπ β β π΅ β (0[,)+β)) β§ Β¬ πΉ β dom β ) β
πΉ(βπ‘βπ½)Ξ£*π β βπ΄) |
217 | 88, 216 | pm2.61dan 812 |
. 2
β’ ((π β§ βπ β β π΅ β (0[,)+β)) β πΉ(βπ‘βπ½)Ξ£*π β βπ΄) |
218 | 16 | reseq1i 5976 |
. . . . . . . 8
β’ (πΉ βΎ
(β€β₯βπ)) = ((π β β β¦
Ξ£*π β
(1...π)π΄) βΎ
(β€β₯βπ)) |
219 | | eleq1w 2817 |
. . . . . . . . . . . 12
β’ (π = π β (π β β β π β β)) |
220 | 219 | anbi2d 630 |
. . . . . . . . . . 11
β’ (π = π β ((π β§ π β β) β (π β§ π β β))) |
221 | | sbequ12r 2245 |
. . . . . . . . . . 11
β’ (π = π β ([π / π]π΄ = +β β π΄ = +β)) |
222 | 220, 221 | anbi12d 632 |
. . . . . . . . . 10
β’ (π = π β (((π β§ π β β) β§ [π / π]π΄ = +β) β ((π β§ π β β) β§ π΄ = +β))) |
223 | | fveq2 6889 |
. . . . . . . . . . . 12
β’ (π = π β (β€β₯βπ) =
(β€β₯βπ)) |
224 | 223 | reseq2d 5980 |
. . . . . . . . . . 11
β’ (π = π β ((π β β β¦
Ξ£*π β
(1...π)π΄) βΎ
(β€β₯βπ)) = ((π β β β¦
Ξ£*π β
(1...π)π΄) βΎ
(β€β₯βπ))) |
225 | 223 | xpeq1d 5705 |
. . . . . . . . . . 11
β’ (π = π β ((β€β₯βπ) Γ {+β}) =
((β€β₯βπ) Γ {+β})) |
226 | 224, 225 | eqeq12d 2749 |
. . . . . . . . . 10
β’ (π = π β (((π β β β¦
Ξ£*π β
(1...π)π΄) βΎ
(β€β₯βπ)) = ((β€β₯βπ) Γ {+β}) β
((π β β β¦
Ξ£*π β
(1...π)π΄) βΎ
(β€β₯βπ)) = ((β€β₯βπ) Γ
{+β}))) |
227 | 222, 226 | imbi12d 345 |
. . . . . . . . 9
β’ (π = π β ((((π β§ π β β) β§ [π / π]π΄ = +β) β ((π β β β¦
Ξ£*π β
(1...π)π΄) βΎ
(β€β₯βπ)) = ((β€β₯βπ) Γ {+β})) β
(((π β§ π β β) β§ π΄ = +β) β ((π β β β¦
Ξ£*π β
(1...π)π΄) βΎ
(β€β₯βπ)) = ((β€β₯βπ) Γ
{+β})))) |
228 | | nfv 1918 |
. . . . . . . . . . . . . 14
β’
β²π(π β§ π β β) |
229 | | nfs1v 2154 |
. . . . . . . . . . . . . 14
β’
β²π[π / π]π΄ = +β |
230 | 228, 229 | nfan 1903 |
. . . . . . . . . . . . 13
β’
β²π((π β§ π β β) β§ [π / π]π΄ = +β) |
231 | | nfv 1918 |
. . . . . . . . . . . . 13
β’
β²π π β
(β€β₯βπ) |
232 | 230, 231 | nfan 1903 |
. . . . . . . . . . . 12
β’
β²π(((π β§ π β β) β§ [π / π]π΄ = +β) β§ π β (β€β₯βπ)) |
233 | | ovexd 7441 |
. . . . . . . . . . . 12
β’ ((((π β§ π β β) β§ [π / π]π΄ = +β) β§ π β (β€β₯βπ)) β (1...π) β V) |
234 | | simp-4l 782 |
. . . . . . . . . . . . 13
β’
(((((π β§ π β β) β§ [π / π]π΄ = +β) β§ π β (β€β₯βπ)) β§ π β (1...π)) β π) |
235 | 18 | adantl 483 |
. . . . . . . . . . . . 13
β’
(((((π β§ π β β) β§ [π / π]π΄ = +β) β§ π β (β€β₯βπ)) β§ π β (1...π)) β π β β) |
236 | 234, 235,
41 | syl2anc 585 |
. . . . . . . . . . . 12
β’
(((((π β§ π β β) β§ [π / π]π΄ = +β) β§ π β (β€β₯βπ)) β§ π β (1...π)) β π΄ β (0[,]+β)) |
237 | | simpllr 775 |
. . . . . . . . . . . . . 14
β’ ((((π β§ π β β) β§ [π / π]π΄ = +β) β§ π β (β€β₯βπ)) β π β β) |
238 | | elnnuz 12863 |
. . . . . . . . . . . . . . 15
β’ (π β β β π β
(β€β₯β1)) |
239 | | eluzfz 13493 |
. . . . . . . . . . . . . . 15
β’ ((π β
(β€β₯β1) β§ π β (β€β₯βπ)) β π β (1...π)) |
240 | 238, 239 | sylanb 582 |
. . . . . . . . . . . . . 14
β’ ((π β β β§ π β
(β€β₯βπ)) β π β (1...π)) |
241 | 237, 240 | sylancom 589 |
. . . . . . . . . . . . 13
β’ ((((π β§ π β β) β§ [π / π]π΄ = +β) β§ π β (β€β₯βπ)) β π β (1...π)) |
242 | | simplr 768 |
. . . . . . . . . . . . 13
β’ ((((π β§ π β β) β§ [π / π]π΄ = +β) β§ π β (β€β₯βπ)) β [π / π]π΄ = +β) |
243 | | sbequ12 2244 |
. . . . . . . . . . . . . 14
β’ (π = π β (π΄ = +β β [π / π]π΄ = +β)) |
244 | 229, 243 | rspce 3602 |
. . . . . . . . . . . . 13
β’ ((π β (1...π) β§ [π / π]π΄ = +β) β βπ β (1...π)π΄ = +β) |
245 | 241, 242,
244 | syl2anc 585 |
. . . . . . . . . . . 12
β’ ((((π β§ π β β) β§ [π / π]π΄ = +β) β§ π β (β€β₯βπ)) β βπ β (1...π)π΄ = +β) |
246 | 232, 233,
236, 245 | esumpinfval 33060 |
. . . . . . . . . . 11
β’ ((((π β§ π β β) β§ [π / π]π΄ = +β) β§ π β (β€β₯βπ)) β
Ξ£*π β
(1...π)π΄ = +β) |
247 | 246 | ralrimiva 3147 |
. . . . . . . . . 10
β’ (((π β§ π β β) β§ [π / π]π΄ = +β) β βπ β
(β€β₯βπ)Ξ£*π β (1...π)π΄ = +β) |
248 | | eqidd 2734 |
. . . . . . . . . . . 12
β’ (((π β§ π β β) β§ [π / π]π΄ = +β) β
(β€β₯βπ) = (β€β₯βπ)) |
249 | | mpteq12 5240 |
. . . . . . . . . . . 12
β’
(((β€β₯βπ) = (β€β₯βπ) β§ βπ β
(β€β₯βπ)Ξ£*π β (1...π)π΄ = +β) β (π β (β€β₯βπ) β¦
Ξ£*π β
(1...π)π΄) = (π β (β€β₯βπ) β¦
+β)) |
250 | 248, 249 | sylan 581 |
. . . . . . . . . . 11
β’ ((((π β§ π β β) β§ [π / π]π΄ = +β) β§ βπ β
(β€β₯βπ)Ξ£*π β (1...π)π΄ = +β) β (π β (β€β₯βπ) β¦
Ξ£*π β
(1...π)π΄) = (π β (β€β₯βπ) β¦
+β)) |
251 | | simplr 768 |
. . . . . . . . . . . . 13
β’ (((π β§ π β β) β§ [π / π]π΄ = +β) β π β β) |
252 | | uznnssnn 12876 |
. . . . . . . . . . . . 13
β’ (π β β β
(β€β₯βπ) β β) |
253 | | resmpt 6036 |
. . . . . . . . . . . . 13
β’
((β€β₯βπ) β β β ((π β β β¦
Ξ£*π β
(1...π)π΄) βΎ
(β€β₯βπ)) = (π β (β€β₯βπ) β¦
Ξ£*π β
(1...π)π΄)) |
254 | 251, 252,
253 | 3syl 18 |
. . . . . . . . . . . 12
β’ (((π β§ π β β) β§ [π / π]π΄ = +β) β ((π β β β¦
Ξ£*π β
(1...π)π΄) βΎ
(β€β₯βπ)) = (π β (β€β₯βπ) β¦
Ξ£*π β
(1...π)π΄)) |
255 | 254 | adantr 482 |
. . . . . . . . . . 11
β’ ((((π β§ π β β) β§ [π / π]π΄ = +β) β§ βπ β
(β€β₯βπ)Ξ£*π β (1...π)π΄ = +β) β ((π β β β¦
Ξ£*π β
(1...π)π΄) βΎ
(β€β₯βπ)) = (π β (β€β₯βπ) β¦
Ξ£*π β
(1...π)π΄)) |
256 | | fconstmpt 5737 |
. . . . . . . . . . . 12
β’
((β€β₯βπ) Γ {+β}) = (π β (β€β₯βπ) β¦
+β) |
257 | 256 | a1i 11 |
. . . . . . . . . . 11
β’ ((((π β§ π β β) β§ [π / π]π΄ = +β) β§ βπ β
(β€β₯βπ)Ξ£*π β (1...π)π΄ = +β) β
((β€β₯βπ) Γ {+β}) = (π β (β€β₯βπ) β¦
+β)) |
258 | 250, 255,
257 | 3eqtr4d 2783 |
. . . . . . . . . 10
β’ ((((π β§ π β β) β§ [π / π]π΄ = +β) β§ βπ β
(β€β₯βπ)Ξ£*π β (1...π)π΄ = +β) β ((π β β β¦
Ξ£*π β
(1...π)π΄) βΎ
(β€β₯βπ)) = ((β€β₯βπ) Γ
{+β})) |
259 | 247, 258 | mpdan 686 |
. . . . . . . . 9
β’ (((π β§ π β β) β§ [π / π]π΄ = +β) β ((π β β β¦
Ξ£*π β
(1...π)π΄) βΎ
(β€β₯βπ)) = ((β€β₯βπ) Γ
{+β})) |
260 | 227, 259 | chvarvv 2003 |
. . . . . . . 8
β’ (((π β§ π β β) β§ π΄ = +β) β ((π β β β¦
Ξ£*π β
(1...π)π΄) βΎ
(β€β₯βπ)) = ((β€β₯βπ) Γ
{+β})) |
261 | 218, 260 | eqtrid 2785 |
. . . . . . 7
β’ (((π β§ π β β) β§ π΄ = +β) β (πΉ βΎ (β€β₯βπ)) =
((β€β₯βπ) Γ {+β})) |
262 | 261 | ex 414 |
. . . . . 6
β’ ((π β§ π β β) β (π΄ = +β β (πΉ βΎ (β€β₯βπ)) =
((β€β₯βπ) Γ {+β}))) |
263 | 262 | reximdva 3169 |
. . . . 5
β’ (π β (βπ β β π΄ = +β β βπ β β (πΉ βΎ (β€β₯βπ)) =
((β€β₯βπ) Γ {+β}))) |
264 | 263 | imp 408 |
. . . 4
β’ ((π β§ βπ β β π΄ = +β) β βπ β β (πΉ βΎ
(β€β₯βπ)) = ((β€β₯βπ) Γ
{+β})) |
265 | | xrge0topn 32912 |
. . . . . . . . . . 11
β’
(TopOpenβ(β*π
βΎs (0[,]+β))) = ((ordTopβ β€ )
βΎt (0[,]+β)) |
266 | 29, 265 | eqtri 2761 |
. . . . . . . . . 10
β’ π½ = ((ordTopβ β€ )
βΎt (0[,]+β)) |
267 | | letopon 22701 |
. . . . . . . . . . 11
β’
(ordTopβ β€ ) β
(TopOnββ*) |
268 | | iccssxr 13404 |
. . . . . . . . . . 11
β’
(0[,]+β) β β* |
269 | | resttopon 22657 |
. . . . . . . . . . 11
β’
(((ordTopβ β€ ) β (TopOnββ*) β§
(0[,]+β) β β*) β ((ordTopβ β€ )
βΎt (0[,]+β)) β
(TopOnβ(0[,]+β))) |
270 | 267, 268,
269 | mp2an 691 |
. . . . . . . . . 10
β’
((ordTopβ β€ ) βΎt (0[,]+β)) β
(TopOnβ(0[,]+β)) |
271 | 266, 270 | eqeltri 2830 |
. . . . . . . . 9
β’ π½ β
(TopOnβ(0[,]+β)) |
272 | 271 | a1i 11 |
. . . . . . . 8
β’ ((π β§ π β β) β π½ β
(TopOnβ(0[,]+β))) |
273 | | 0xr 11258 |
. . . . . . . . . 10
β’ 0 β
β* |
274 | | pnfxr 11265 |
. . . . . . . . . 10
β’ +β
β β* |
275 | | 0lepnf 13109 |
. . . . . . . . . 10
β’ 0 β€
+β |
276 | | ubicc2 13439 |
. . . . . . . . . 10
β’ ((0
β β* β§ +β β β* β§ 0
β€ +β) β +β β (0[,]+β)) |
277 | 273, 274,
275, 276 | mp3an 1462 |
. . . . . . . . 9
β’ +β
β (0[,]+β) |
278 | 277 | a1i 11 |
. . . . . . . 8
β’ ((π β§ π β β) β +β β
(0[,]+β)) |
279 | 40 | nnzd 12582 |
. . . . . . . 8
β’ ((π β§ π β β) β π β β€) |
280 | | eqid 2733 |
. . . . . . . . 9
β’
(β€β₯βπ) = (β€β₯βπ) |
281 | 280 | lmconst 22757 |
. . . . . . . 8
β’ ((π½ β
(TopOnβ(0[,]+β)) β§ +β β (0[,]+β) β§ π β β€) β
((β€β₯βπ) Γ
{+β})(βπ‘βπ½)+β) |
282 | 272, 278,
279, 281 | syl3anc 1372 |
. . . . . . 7
β’ ((π β§ π β β) β
((β€β₯βπ) Γ
{+β})(βπ‘βπ½)+β) |
283 | | breq1 5151 |
. . . . . . . 8
β’ ((πΉ βΎ
(β€β₯βπ)) = ((β€β₯βπ) Γ {+β}) β
((πΉ βΎ
(β€β₯βπ))(βπ‘βπ½)+β β
((β€β₯βπ) Γ
{+β})(βπ‘βπ½)+β)) |
284 | 283 | biimprd 247 |
. . . . . . 7
β’ ((πΉ βΎ
(β€β₯βπ)) = ((β€β₯βπ) Γ {+β}) β
(((β€β₯βπ) Γ
{+β})(βπ‘βπ½)+β β (πΉ βΎ (β€β₯βπ))(βπ‘βπ½)+β)) |
285 | 282, 284 | mpan9 508 |
. . . . . 6
β’ (((π β§ π β β) β§ (πΉ βΎ (β€β₯βπ)) =
((β€β₯βπ) Γ {+β})) β (πΉ βΎ
(β€β₯βπ))(βπ‘βπ½)+β) |
286 | | ovexd 7441 |
. . . . . . . . 9
β’ ((π β§ π β β) β (0[,]+β) β
V) |
287 | | cnex 11188 |
. . . . . . . . . 10
β’ β
β V |
288 | 287 | a1i 11 |
. . . . . . . . 9
β’ ((π β§ π β β) β β β
V) |
289 | 56 | adantr 482 |
. . . . . . . . 9
β’ ((π β§ π β β) β πΉ:ββΆ(0[,]+β)) |
290 | | nnsscn 12214 |
. . . . . . . . . 10
β’ β
β β |
291 | 290 | a1i 11 |
. . . . . . . . 9
β’ ((π β§ π β β) β β β
β) |
292 | | elpm2r 8836 |
. . . . . . . . 9
β’
((((0[,]+β) β V β§ β β V) β§ (πΉ:ββΆ(0[,]+β)
β§ β β β)) β πΉ β ((0[,]+β) βpm
β)) |
293 | 286, 288,
289, 291, 292 | syl22anc 838 |
. . . . . . . 8
β’ ((π β§ π β β) β πΉ β ((0[,]+β) βpm
β)) |
294 | 272, 293,
279 | lmres 22796 |
. . . . . . 7
β’ ((π β§ π β β) β (πΉ(βπ‘βπ½)+β β (πΉ βΎ
(β€β₯βπ))(βπ‘βπ½)+β)) |
295 | 294 | biimpar 479 |
. . . . . 6
β’ (((π β§ π β β) β§ (πΉ βΎ (β€β₯βπ))(βπ‘βπ½)+β) β πΉ(βπ‘βπ½)+β) |
296 | 285, 295 | syldan 592 |
. . . . 5
β’ (((π β§ π β β) β§ (πΉ βΎ (β€β₯βπ)) =
((β€β₯βπ) Γ {+β})) β πΉ(βπ‘βπ½)+β) |
297 | 296 | r19.29an 3159 |
. . . 4
β’ ((π β§ βπ β β (πΉ βΎ (β€β₯βπ)) =
((β€β₯βπ) Γ {+β})) β πΉ(βπ‘βπ½)+β) |
298 | 264, 297 | syldan 592 |
. . 3
β’ ((π β§ βπ β β π΄ = +β) β πΉ(βπ‘βπ½)+β) |
299 | | nfv 1918 |
. . . . 5
β’
β²ππ |
300 | | nfre1 3283 |
. . . . 5
β’
β²πβπ β β π΄ = +β |
301 | 299, 300 | nfan 1903 |
. . . 4
β’
β²π(π β§ βπ β β π΄ = +β) |
302 | 127 | a1i 11 |
. . . 4
β’ ((π β§ βπ β β π΄ = +β) β β β
V) |
303 | 41 | adantlr 714 |
. . . 4
β’ (((π β§ βπ β β π΄ = +β) β§ π β β) β π΄ β (0[,]+β)) |
304 | | simpr 486 |
. . . 4
β’ ((π β§ βπ β β π΄ = +β) β βπ β β π΄ = +β) |
305 | 301, 302,
303, 304 | esumpinfval 33060 |
. . 3
β’ ((π β§ βπ β β π΄ = +β) β Ξ£*π β βπ΄ = +β) |
306 | 298, 305 | breqtrrd 5176 |
. 2
β’ ((π β§ βπ β β π΄ = +β) β πΉ(βπ‘βπ½)Ξ£*π β βπ΄) |
307 | | eleq1w 2817 |
. . . . . . . . 9
β’ (π = π β (π β β β π β β)) |
308 | 307 | anbi2d 630 |
. . . . . . . 8
β’ (π = π β ((π β§ π β β) β (π β§ π β β))) |
309 | 7 | eleq1d 2819 |
. . . . . . . 8
β’ (π = π β (π΄ β (0[,]+β) β π΅ β
(0[,]+β))) |
310 | 308, 309 | imbi12d 345 |
. . . . . . 7
β’ (π = π β (((π β§ π β β) β π΄ β (0[,]+β)) β ((π β§ π β β) β π΅ β (0[,]+β)))) |
311 | 310, 41 | chvarvv 2003 |
. . . . . 6
β’ ((π β§ π β β) β π΅ β (0[,]+β)) |
312 | | eliccelico 31976 |
. . . . . . 7
β’ ((0
β β* β§ +β β β* β§ 0
β€ +β) β (π΅
β (0[,]+β) β (π΅ β (0[,)+β) β¨ π΅ = +β))) |
313 | 273, 274,
275, 312 | mp3an 1462 |
. . . . . 6
β’ (π΅ β (0[,]+β) β
(π΅ β (0[,)+β)
β¨ π΅ =
+β)) |
314 | 311, 313 | sylib 217 |
. . . . 5
β’ ((π β§ π β β) β (π΅ β (0[,)+β) β¨ π΅ = +β)) |
315 | 314 | ralrimiva 3147 |
. . . 4
β’ (π β βπ β β (π΅ β (0[,)+β) β¨ π΅ = +β)) |
316 | | r19.30 3121 |
. . . 4
β’
(βπ β
β (π΅ β
(0[,)+β) β¨ π΅ =
+β) β (βπ
β β π΅ β
(0[,)+β) β¨ βπ β β π΅ = +β)) |
317 | 315, 316 | syl 17 |
. . 3
β’ (π β (βπ β β π΅ β (0[,)+β) β¨
βπ β β
π΅ =
+β)) |
318 | 7 | eqeq1d 2735 |
. . . . 5
β’ (π = π β (π΄ = +β β π΅ = +β)) |
319 | 318 | cbvrexvw 3236 |
. . . 4
β’
(βπ β
β π΄ = +β β
βπ β β
π΅ =
+β) |
320 | 319 | orbi2i 912 |
. . 3
β’
((βπ β
β π΅ β
(0[,)+β) β¨ βπ β β π΄ = +β) β (βπ β β π΅ β (0[,)+β) β¨
βπ β β
π΅ =
+β)) |
321 | 317, 320 | sylibr 233 |
. 2
β’ (π β (βπ β β π΅ β (0[,)+β) β¨
βπ β β
π΄ =
+β)) |
322 | 217, 306,
321 | mpjaodan 958 |
1
β’ (π β πΉ(βπ‘βπ½)Ξ£*π β βπ΄) |