Step | Hyp | Ref
| Expression |
1 | | xrltso 13117 |
. . . 4
β’ < Or
β* |
2 | 1 | a1i 11 |
. . 3
β’ (π β < Or
β*) |
3 | | nnuz 12862 |
. . . . 5
β’ β =
(β€β₯β1) |
4 | | 1zzd 12590 |
. . . . 5
β’ (π β 1 β
β€) |
5 | | esumpcvgval.1 |
. . . . . . . . . 10
β’ ((π β§ π β β) β π΄ β (0[,)+β)) |
6 | | esumpcvgval.2 |
. . . . . . . . . . . 12
β’ (π = π β π΄ = π΅) |
7 | | eqcom 2740 |
. . . . . . . . . . . 12
β’ (π = π β π = π) |
8 | | eqcom 2740 |
. . . . . . . . . . . 12
β’ (π΄ = π΅ β π΅ = π΄) |
9 | 6, 7, 8 | 3imtr3i 291 |
. . . . . . . . . . 11
β’ (π = π β π΅ = π΄) |
10 | 9 | cbvmptv 5261 |
. . . . . . . . . 10
β’ (π β β β¦ π΅) = (π β β β¦ π΄) |
11 | 5, 10 | fmptd 7111 |
. . . . . . . . 9
β’ (π β (π β β β¦ π΅):ββΆ(0[,)+β)) |
12 | 11 | ffvelcdmda 7084 |
. . . . . . . 8
β’ ((π β§ π₯ β β) β ((π β β β¦ π΅)βπ₯) β (0[,)+β)) |
13 | | elrege0 13428 |
. . . . . . . . 9
β’ (((π β β β¦ π΅)βπ₯) β (0[,)+β) β (((π β β β¦ π΅)βπ₯) β β β§ 0 β€ ((π β β β¦ π΅)βπ₯))) |
14 | 13 | simplbi 499 |
. . . . . . . 8
β’ (((π β β β¦ π΅)βπ₯) β (0[,)+β) β ((π β β β¦ π΅)βπ₯) β β) |
15 | 12, 14 | syl 17 |
. . . . . . 7
β’ ((π β§ π₯ β β) β ((π β β β¦ π΅)βπ₯) β β) |
16 | 3, 4, 15 | serfre 13994 |
. . . . . 6
β’ (π β seq1( + , (π β β β¦ π΅)):ββΆβ) |
17 | 11 | adantr 482 |
. . . . . . . . . 10
β’ ((π β§ π β β) β (π β β β¦ π΅):ββΆ(0[,)+β)) |
18 | | simpr 486 |
. . . . . . . . . . 11
β’ ((π β§ π β β) β π β β) |
19 | 18 | peano2nnd 12226 |
. . . . . . . . . 10
β’ ((π β§ π β β) β (π + 1) β β) |
20 | 17, 19 | ffvelcdmd 7085 |
. . . . . . . . 9
β’ ((π β§ π β β) β ((π β β β¦ π΅)β(π + 1)) β
(0[,)+β)) |
21 | | elrege0 13428 |
. . . . . . . . . 10
β’ (((π β β β¦ π΅)β(π + 1)) β (0[,)+β) β (((π β β β¦ π΅)β(π + 1)) β β β§ 0 β€ ((π β β β¦ π΅)β(π + 1)))) |
22 | 21 | simprbi 498 |
. . . . . . . . 9
β’ (((π β β β¦ π΅)β(π + 1)) β (0[,)+β) β 0 β€
((π β β β¦
π΅)β(π + 1))) |
23 | 20, 22 | syl 17 |
. . . . . . . 8
β’ ((π β§ π β β) β 0 β€ ((π β β β¦ π΅)β(π + 1))) |
24 | 16 | ffvelcdmda 7084 |
. . . . . . . . 9
β’ ((π β§ π β β) β (seq1( + , (π β β β¦ π΅))βπ) β β) |
25 | 21 | simplbi 499 |
. . . . . . . . . 10
β’ (((π β β β¦ π΅)β(π + 1)) β (0[,)+β) β ((π β β β¦ π΅)β(π + 1)) β β) |
26 | 20, 25 | syl 17 |
. . . . . . . . 9
β’ ((π β§ π β β) β ((π β β β¦ π΅)β(π + 1)) β β) |
27 | 24, 26 | addge01d 11799 |
. . . . . . . 8
β’ ((π β§ π β β) β (0 β€ ((π β β β¦ π΅)β(π + 1)) β (seq1( + , (π β β β¦ π΅))βπ) β€ ((seq1( + , (π β β β¦ π΅))βπ) + ((π β β β¦ π΅)β(π + 1))))) |
28 | 23, 27 | mpbid 231 |
. . . . . . 7
β’ ((π β§ π β β) β (seq1( + , (π β β β¦ π΅))βπ) β€ ((seq1( + , (π β β β¦ π΅))βπ) + ((π β β β¦ π΅)β(π + 1)))) |
29 | 18, 3 | eleqtrdi 2844 |
. . . . . . . 8
β’ ((π β§ π β β) β π β
(β€β₯β1)) |
30 | | seqp1 13978 |
. . . . . . . 8
β’ (π β
(β€β₯β1) β (seq1( + , (π β β β¦ π΅))β(π + 1)) = ((seq1( + , (π β β β¦ π΅))βπ) + ((π β β β¦ π΅)β(π + 1)))) |
31 | 29, 30 | syl 17 |
. . . . . . 7
β’ ((π β§ π β β) β (seq1( + , (π β β β¦ π΅))β(π + 1)) = ((seq1( + , (π β β β¦ π΅))βπ) + ((π β β β¦ π΅)β(π + 1)))) |
32 | 28, 31 | breqtrrd 5176 |
. . . . . 6
β’ ((π β§ π β β) β (seq1( + , (π β β β¦ π΅))βπ) β€ (seq1( + , (π β β β¦ π΅))β(π + 1))) |
33 | | simpr 486 |
. . . . . . . . 9
β’ ((π β§ π β β) β π β β) |
34 | 10 | fvmpt2 7007 |
. . . . . . . . 9
β’ ((π β β β§ π΄ β (0[,)+β)) β
((π β β β¦
π΅)βπ) = π΄) |
35 | 33, 5, 34 | syl2anc 585 |
. . . . . . . 8
β’ ((π β§ π β β) β ((π β β β¦ π΅)βπ) = π΄) |
36 | | rge0ssre 13430 |
. . . . . . . . 9
β’
(0[,)+β) β β |
37 | 36, 5 | sselid 3980 |
. . . . . . . 8
β’ ((π β§ π β β) β π΄ β β) |
38 | 16 | feqmptd 6958 |
. . . . . . . . . 10
β’ (π β seq1( + , (π β β β¦ π΅)) = (π β β β¦ (seq1( + , (π β β β¦ π΅))βπ))) |
39 | | simpll 766 |
. . . . . . . . . . . . . 14
β’ (((π β§ π β β) β§ π β (1...π)) β π) |
40 | | elfznn 13527 |
. . . . . . . . . . . . . . 15
β’ (π β (1...π) β π β β) |
41 | 40 | adantl 483 |
. . . . . . . . . . . . . 14
β’ (((π β§ π β β) β§ π β (1...π)) β π β β) |
42 | 39, 41, 35 | syl2anc 585 |
. . . . . . . . . . . . 13
β’ (((π β§ π β β) β§ π β (1...π)) β ((π β β β¦ π΅)βπ) = π΄) |
43 | 37 | recnd 11239 |
. . . . . . . . . . . . . 14
β’ ((π β§ π β β) β π΄ β β) |
44 | 39, 41, 43 | syl2anc 585 |
. . . . . . . . . . . . 13
β’ (((π β§ π β β) β§ π β (1...π)) β π΄ β β) |
45 | 42, 29, 44 | fsumser 15673 |
. . . . . . . . . . . 12
β’ ((π β§ π β β) β Ξ£π β (1...π)π΄ = (seq1( + , (π β β β¦ π΅))βπ)) |
46 | 45 | eqcomd 2739 |
. . . . . . . . . . 11
β’ ((π β§ π β β) β (seq1( + , (π β β β¦ π΅))βπ) = Ξ£π β (1...π)π΄) |
47 | 46 | mpteq2dva 5248 |
. . . . . . . . . 10
β’ (π β (π β β β¦ (seq1( + , (π β β β¦ π΅))βπ)) = (π β β β¦ Ξ£π β (1...π)π΄)) |
48 | 38, 47 | eqtr2d 2774 |
. . . . . . . . 9
β’ (π β (π β β β¦ Ξ£π β (1...π)π΄) = seq1( + , (π β β β¦ π΅))) |
49 | | esumpcvgval.3 |
. . . . . . . . 9
β’ (π β (π β β β¦ Ξ£π β (1...π)π΄) β dom β ) |
50 | 48, 49 | eqeltrrd 2835 |
. . . . . . . 8
β’ (π β seq1( + , (π β β β¦ π΅)) β dom β
) |
51 | 3, 4, 35, 37, 50 | isumrecl 15708 |
. . . . . . 7
β’ (π β Ξ£π β β π΄ β β) |
52 | | 1zzd 12590 |
. . . . . . . . . 10
β’ ((π β§ π β β) β 1 β
β€) |
53 | | fzfid 13935 |
. . . . . . . . . 10
β’ ((π β§ π β β) β (1...π) β Fin) |
54 | | fzssuz 13539 |
. . . . . . . . . . . 12
β’
(1...π) β
(β€β₯β1) |
55 | 54, 3 | sseqtrri 4019 |
. . . . . . . . . . 11
β’
(1...π) β
β |
56 | 55 | a1i 11 |
. . . . . . . . . 10
β’ ((π β§ π β β) β (1...π) β
β) |
57 | 35 | adantlr 714 |
. . . . . . . . . 10
β’ (((π β§ π β β) β§ π β β) β ((π β β β¦ π΅)βπ) = π΄) |
58 | 37 | adantlr 714 |
. . . . . . . . . 10
β’ (((π β§ π β β) β§ π β β) β π΄ β β) |
59 | 5 | adantlr 714 |
. . . . . . . . . . 11
β’ (((π β§ π β β) β§ π β β) β π΄ β (0[,)+β)) |
60 | | elrege0 13428 |
. . . . . . . . . . . 12
β’ (π΄ β (0[,)+β) β
(π΄ β β β§ 0
β€ π΄)) |
61 | 60 | simprbi 498 |
. . . . . . . . . . 11
β’ (π΄ β (0[,)+β) β 0
β€ π΄) |
62 | 59, 61 | syl 17 |
. . . . . . . . . 10
β’ (((π β§ π β β) β§ π β β) β 0 β€ π΄) |
63 | 50 | adantr 482 |
. . . . . . . . . 10
β’ ((π β§ π β β) β seq1( + , (π β β β¦ π΅)) β dom β
) |
64 | 3, 52, 53, 56, 57, 58, 62, 63 | isumless 15788 |
. . . . . . . . 9
β’ ((π β§ π β β) β Ξ£π β (1...π)π΄ β€ Ξ£π β β π΄) |
65 | 45, 64 | eqbrtrrd 5172 |
. . . . . . . 8
β’ ((π β§ π β β) β (seq1( + , (π β β β¦ π΅))βπ) β€ Ξ£π β β π΄) |
66 | 65 | ralrimiva 3147 |
. . . . . . 7
β’ (π β βπ β β (seq1( + , (π β β β¦ π΅))βπ) β€ Ξ£π β β π΄) |
67 | | brralrspcev 5208 |
. . . . . . 7
β’
((Ξ£π β
β π΄ β β
β§ βπ β
β (seq1( + , (π
β β β¦ π΅))βπ) β€ Ξ£π β β π΄) β βπ β β βπ β β (seq1( + , (π β β β¦ π΅))βπ) β€ π ) |
68 | 51, 66, 67 | syl2anc 585 |
. . . . . 6
β’ (π β βπ β β βπ β β (seq1( + , (π β β β¦ π΅))βπ) β€ π ) |
69 | 3, 4, 16, 32, 68 | climsup 15613 |
. . . . 5
β’ (π β seq1( + , (π β β β¦ π΅)) β sup(ran seq1( + ,
(π β β β¦
π΅)), β, <
)) |
70 | 3, 4, 69, 24 | climrecl 15524 |
. . . 4
β’ (π β sup(ran seq1( + , (π β β β¦ π΅)), β, < ) β
β) |
71 | 70 | rexrd 11261 |
. . 3
β’ (π β sup(ran seq1( + , (π β β β¦ π΅)), β, < ) β
β*) |
72 | | eqid 2733 |
. . . . . . 7
β’ (π β (π« β β©
Fin) β¦ Ξ£π
β π π΄) = (π β (π« β β© Fin) β¦
Ξ£π β π π΄) |
73 | | sumex 15631 |
. . . . . . 7
β’
Ξ£π β
π π΄ β V |
74 | 72, 73 | elrnmpti 5958 |
. . . . . 6
β’ (π₯ β ran (π β (π« β β© Fin) β¦
Ξ£π β π π΄) β βπ β (π« β β© Fin)π₯ = Ξ£π β π π΄) |
75 | | ssnnssfz 31986 |
. . . . . . . . . 10
β’ (π β (π« β β©
Fin) β βπ β
β π β
(1...π)) |
76 | | fzfid 13935 |
. . . . . . . . . . . . . 14
β’ ((π β§ π β (1...π)) β (1...π) β Fin) |
77 | | elfznn 13527 |
. . . . . . . . . . . . . . . . 17
β’ (π β (1...π) β π β β) |
78 | 77, 5 | sylan2 594 |
. . . . . . . . . . . . . . . 16
β’ ((π β§ π β (1...π)) β π΄ β (0[,)+β)) |
79 | 60 | simplbi 499 |
. . . . . . . . . . . . . . . 16
β’ (π΄ β (0[,)+β) β
π΄ β
β) |
80 | 78, 79 | syl 17 |
. . . . . . . . . . . . . . 15
β’ ((π β§ π β (1...π)) β π΄ β β) |
81 | 80 | adantlr 714 |
. . . . . . . . . . . . . 14
β’ (((π β§ π β (1...π)) β§ π β (1...π)) β π΄ β β) |
82 | 78, 61 | syl 17 |
. . . . . . . . . . . . . . 15
β’ ((π β§ π β (1...π)) β 0 β€ π΄) |
83 | 82 | adantlr 714 |
. . . . . . . . . . . . . 14
β’ (((π β§ π β (1...π)) β§ π β (1...π)) β 0 β€ π΄) |
84 | | simpr 486 |
. . . . . . . . . . . . . 14
β’ ((π β§ π β (1...π)) β π β (1...π)) |
85 | 76, 81, 83, 84 | fsumless 15739 |
. . . . . . . . . . . . 13
β’ ((π β§ π β (1...π)) β Ξ£π β π π΄ β€ Ξ£π β (1...π)π΄) |
86 | 85 | ex 414 |
. . . . . . . . . . . 12
β’ (π β (π β (1...π) β Ξ£π β π π΄ β€ Ξ£π β (1...π)π΄)) |
87 | 86 | reximdv 3171 |
. . . . . . . . . . 11
β’ (π β (βπ β β π β (1...π) β βπ β β Ξ£π β π π΄ β€ Ξ£π β (1...π)π΄)) |
88 | 87 | imp 408 |
. . . . . . . . . 10
β’ ((π β§ βπ β β π β (1...π)) β βπ β β Ξ£π β π π΄ β€ Ξ£π β (1...π)π΄) |
89 | 75, 88 | sylan2 594 |
. . . . . . . . 9
β’ ((π β§ π β (π« β β© Fin)) β
βπ β β
Ξ£π β π π΄ β€ Ξ£π β (1...π)π΄) |
90 | | breq1 5151 |
. . . . . . . . . 10
β’ (π₯ = Ξ£π β π π΄ β (π₯ β€ Ξ£π β (1...π)π΄ β Ξ£π β π π΄ β€ Ξ£π β (1...π)π΄)) |
91 | 90 | rexbidv 3179 |
. . . . . . . . 9
β’ (π₯ = Ξ£π β π π΄ β (βπ β β π₯ β€ Ξ£π β (1...π)π΄ β βπ β β Ξ£π β π π΄ β€ Ξ£π β (1...π)π΄)) |
92 | 89, 91 | syl5ibrcom 246 |
. . . . . . . 8
β’ ((π β§ π β (π« β β© Fin)) β
(π₯ = Ξ£π β π π΄ β βπ β β π₯ β€ Ξ£π β (1...π)π΄)) |
93 | 92 | rexlimdva 3156 |
. . . . . . 7
β’ (π β (βπ β (π« β β© Fin)π₯ = Ξ£π β π π΄ β βπ β β π₯ β€ Ξ£π β (1...π)π΄)) |
94 | 93 | imp 408 |
. . . . . 6
β’ ((π β§ βπ β (π« β β© Fin)π₯ = Ξ£π β π π΄) β βπ β β π₯ β€ Ξ£π β (1...π)π΄) |
95 | 74, 94 | sylan2b 595 |
. . . . 5
β’ ((π β§ π₯ β ran (π β (π« β β© Fin) β¦
Ξ£π β π π΄)) β βπ β β π₯ β€ Ξ£π β (1...π)π΄) |
96 | | simpr 486 |
. . . . . . . . . 10
β’ (((π β§ π β (π« β β© Fin)) β§
π₯ = Ξ£π β π π΄) β π₯ = Ξ£π β π π΄) |
97 | | inss2 4229 |
. . . . . . . . . . . . 13
β’
(π« β β© Fin) β Fin |
98 | | simpr 486 |
. . . . . . . . . . . . 13
β’ ((π β§ π β (π« β β© Fin)) β
π β (π« β
β© Fin)) |
99 | 97, 98 | sselid 3980 |
. . . . . . . . . . . 12
β’ ((π β§ π β (π« β β© Fin)) β
π β
Fin) |
100 | | simpll 766 |
. . . . . . . . . . . . . 14
β’ (((π β§ π β (π« β β© Fin)) β§
π β π) β π) |
101 | | inss1 4228 |
. . . . . . . . . . . . . . . . 17
β’
(π« β β© Fin) β π« β |
102 | | simplr 768 |
. . . . . . . . . . . . . . . . 17
β’ (((π β§ π β (π« β β© Fin)) β§
π β π) β π β (π« β β©
Fin)) |
103 | 101, 102 | sselid 3980 |
. . . . . . . . . . . . . . . 16
β’ (((π β§ π β (π« β β© Fin)) β§
π β π) β π β π« β) |
104 | 103 | elpwid 4611 |
. . . . . . . . . . . . . . 15
β’ (((π β§ π β (π« β β© Fin)) β§
π β π) β π β β) |
105 | | simpr 486 |
. . . . . . . . . . . . . . 15
β’ (((π β§ π β (π« β β© Fin)) β§
π β π) β π β π) |
106 | 104, 105 | sseldd 3983 |
. . . . . . . . . . . . . 14
β’ (((π β§ π β (π« β β© Fin)) β§
π β π) β π β β) |
107 | 100, 106,
5 | syl2anc 585 |
. . . . . . . . . . . . 13
β’ (((π β§ π β (π« β β© Fin)) β§
π β π) β π΄ β (0[,)+β)) |
108 | 107, 79 | syl 17 |
. . . . . . . . . . . 12
β’ (((π β§ π β (π« β β© Fin)) β§
π β π) β π΄ β β) |
109 | 99, 108 | fsumrecl 15677 |
. . . . . . . . . . 11
β’ ((π β§ π β (π« β β© Fin)) β
Ξ£π β π π΄ β β) |
110 | 109 | adantr 482 |
. . . . . . . . . 10
β’ (((π β§ π β (π« β β© Fin)) β§
π₯ = Ξ£π β π π΄) β Ξ£π β π π΄ β β) |
111 | 96, 110 | eqeltrd 2834 |
. . . . . . . . 9
β’ (((π β§ π β (π« β β© Fin)) β§
π₯ = Ξ£π β π π΄) β π₯ β β) |
112 | 111 | r19.29an 3159 |
. . . . . . . 8
β’ ((π β§ βπ β (π« β β© Fin)π₯ = Ξ£π β π π΄) β π₯ β β) |
113 | 74, 112 | sylan2b 595 |
. . . . . . 7
β’ ((π β§ π₯ β ran (π β (π« β β© Fin) β¦
Ξ£π β π π΄)) β π₯ β β) |
114 | 113 | adantr 482 |
. . . . . 6
β’ (((π β§ π₯ β ran (π β (π« β β© Fin) β¦
Ξ£π β π π΄)) β§ (π β β β§ π₯ β€ Ξ£π β (1...π)π΄)) β π₯ β β) |
115 | | fzfid 13935 |
. . . . . . . 8
β’ (π β (1...π) β Fin) |
116 | 115, 80 | fsumrecl 15677 |
. . . . . . 7
β’ (π β Ξ£π β (1...π)π΄ β β) |
117 | 116 | ad2antrr 725 |
. . . . . 6
β’ (((π β§ π₯ β ran (π β (π« β β© Fin) β¦
Ξ£π β π π΄)) β§ (π β β β§ π₯ β€ Ξ£π β (1...π)π΄)) β Ξ£π β (1...π)π΄ β β) |
118 | 70 | ad2antrr 725 |
. . . . . 6
β’ (((π β§ π₯ β ran (π β (π« β β© Fin) β¦
Ξ£π β π π΄)) β§ (π β β β§ π₯ β€ Ξ£π β (1...π)π΄)) β sup(ran seq1( + , (π β β β¦ π΅)), β, < ) β
β) |
119 | | simprr 772 |
. . . . . 6
β’ (((π β§ π₯ β ran (π β (π« β β© Fin) β¦
Ξ£π β π π΄)) β§ (π β β β§ π₯ β€ Ξ£π β (1...π)π΄)) β π₯ β€ Ξ£π β (1...π)π΄) |
120 | 16 | frnd 6723 |
. . . . . . . 8
β’ (π β ran seq1( + , (π β β β¦ π΅)) β
β) |
121 | 120 | ad2antrr 725 |
. . . . . . 7
β’ (((π β§ π₯ β ran (π β (π« β β© Fin) β¦
Ξ£π β π π΄)) β§ (π β β β§ π₯ β€ Ξ£π β (1...π)π΄)) β ran seq1( + , (π β β β¦ π΅)) β β) |
122 | | 1nn 12220 |
. . . . . . . . . 10
β’ 1 β
β |
123 | 122 | ne0ii 4337 |
. . . . . . . . 9
β’ β
β β
|
124 | | dm0rn0 5923 |
. . . . . . . . . . 11
β’ (dom
seq1( + , (π β β
β¦ π΅)) = β
β ran seq1( + , (π
β β β¦ π΅))
= β
) |
125 | 16 | fdmd 6726 |
. . . . . . . . . . . 12
β’ (π β dom seq1( + , (π β β β¦ π΅)) = β) |
126 | 125 | eqeq1d 2735 |
. . . . . . . . . . 11
β’ (π β (dom seq1( + , (π β β β¦ π΅)) = β
β β =
β
)) |
127 | 124, 126 | bitr3id 285 |
. . . . . . . . . 10
β’ (π β (ran seq1( + , (π β β β¦ π΅)) = β
β β =
β
)) |
128 | 127 | necon3bid 2986 |
. . . . . . . . 9
β’ (π β (ran seq1( + , (π β β β¦ π΅)) β β
β β
β β
)) |
129 | 123, 128 | mpbiri 258 |
. . . . . . . 8
β’ (π β ran seq1( + , (π β β β¦ π΅)) β
β
) |
130 | 129 | ad2antrr 725 |
. . . . . . 7
β’ (((π β§ π₯ β ran (π β (π« β β© Fin) β¦
Ξ£π β π π΄)) β§ (π β β β§ π₯ β€ Ξ£π β (1...π)π΄)) β ran seq1( + , (π β β β¦ π΅)) β β
) |
131 | | 1z 12589 |
. . . . . . . . . . . . . . . 16
β’ 1 β
β€ |
132 | | seqfn 13975 |
. . . . . . . . . . . . . . . 16
β’ (1 β
β€ β seq1( + , (π
β β β¦ π΅))
Fn (β€β₯β1)) |
133 | 131, 132 | ax-mp 5 |
. . . . . . . . . . . . . . 15
β’ seq1( + ,
(π β β β¦
π΅)) Fn
(β€β₯β1) |
134 | 3 | fneq2i 6645 |
. . . . . . . . . . . . . . 15
β’ (seq1( +
, (π β β β¦
π΅)) Fn β β seq1(
+ , (π β β
β¦ π΅)) Fn
(β€β₯β1)) |
135 | 133, 134 | mpbir 230 |
. . . . . . . . . . . . . 14
β’ seq1( + ,
(π β β β¦
π΅)) Fn
β |
136 | | dffn5 6948 |
. . . . . . . . . . . . . 14
β’ (seq1( +
, (π β β β¦
π΅)) Fn β β seq1(
+ , (π β β
β¦ π΅)) = (π β β β¦ (seq1( +
, (π β β β¦
π΅))βπ))) |
137 | 135, 136 | mpbi 229 |
. . . . . . . . . . . . 13
β’ seq1( + ,
(π β β β¦
π΅)) = (π β β β¦ (seq1( + , (π β β β¦ π΅))βπ)) |
138 | | fvex 6902 |
. . . . . . . . . . . . 13
β’ (seq1( +
, (π β β β¦
π΅))βπ) β V |
139 | 137, 138 | elrnmpti 5958 |
. . . . . . . . . . . 12
β’ (π§ β ran seq1( + , (π β β β¦ π΅)) β βπ β β π§ = (seq1( + , (π β β β¦ π΅))βπ)) |
140 | | r19.29 3115 |
. . . . . . . . . . . . 13
β’
((βπ β
β (seq1( + , (π
β β β¦ π΅))βπ) β€ π β§ βπ β β π§ = (seq1( + , (π β β β¦ π΅))βπ)) β βπ β β ((seq1( + , (π β β β¦ π΅))βπ) β€ π β§ π§ = (seq1( + , (π β β β¦ π΅))βπ))) |
141 | | breq1 5151 |
. . . . . . . . . . . . . . 15
β’ (π§ = (seq1( + , (π β β β¦ π΅))βπ) β (π§ β€ π β (seq1( + , (π β β β¦ π΅))βπ) β€ π )) |
142 | 141 | biimparc 481 |
. . . . . . . . . . . . . 14
β’ (((seq1(
+ , (π β β
β¦ π΅))βπ) β€ π β§ π§ = (seq1( + , (π β β β¦ π΅))βπ)) β π§ β€ π ) |
143 | 142 | rexlimivw 3152 |
. . . . . . . . . . . . 13
β’
(βπ β
β ((seq1( + , (π
β β β¦ π΅))βπ) β€ π β§ π§ = (seq1( + , (π β β β¦ π΅))βπ)) β π§ β€ π ) |
144 | 140, 143 | syl 17 |
. . . . . . . . . . . 12
β’
((βπ β
β (seq1( + , (π
β β β¦ π΅))βπ) β€ π β§ βπ β β π§ = (seq1( + , (π β β β¦ π΅))βπ)) β π§ β€ π ) |
145 | 139, 144 | sylan2b 595 |
. . . . . . . . . . 11
β’
((βπ β
β (seq1( + , (π
β β β¦ π΅))βπ) β€ π β§ π§ β ran seq1( + , (π β β β¦ π΅))) β π§ β€ π ) |
146 | 145 | ralrimiva 3147 |
. . . . . . . . . 10
β’
(βπ β
β (seq1( + , (π
β β β¦ π΅))βπ) β€ π β βπ§ β ran seq1( + , (π β β β¦ π΅))π§ β€ π ) |
147 | 146 | reximi 3085 |
. . . . . . . . 9
β’
(βπ β
β βπ β
β (seq1( + , (π
β β β¦ π΅))βπ) β€ π β βπ β β βπ§ β ran seq1( + , (π β β β¦ π΅))π§ β€ π ) |
148 | 68, 147 | syl 17 |
. . . . . . . 8
β’ (π β βπ β β βπ§ β ran seq1( + , (π β β β¦ π΅))π§ β€ π ) |
149 | 148 | ad2antrr 725 |
. . . . . . 7
β’ (((π β§ π₯ β ran (π β (π« β β© Fin) β¦
Ξ£π β π π΄)) β§ (π β β β§ π₯ β€ Ξ£π β (1...π)π΄)) β βπ β β βπ§ β ran seq1( + , (π β β β¦ π΅))π§ β€ π ) |
150 | | simpr 486 |
. . . . . . . . . 10
β’ ((π β§ π β β) β π β β) |
151 | | simpll 766 |
. . . . . . . . . . . 12
β’ (((π β§ π β β) β§ π β (1...π)) β π) |
152 | 77 | adantl 483 |
. . . . . . . . . . . 12
β’ (((π β§ π β β) β§ π β (1...π)) β π β β) |
153 | 151, 152,
35 | syl2anc 585 |
. . . . . . . . . . 11
β’ (((π β§ π β β) β§ π β (1...π)) β ((π β β β¦ π΅)βπ) = π΄) |
154 | 150, 3 | eleqtrdi 2844 |
. . . . . . . . . . 11
β’ ((π β§ π β β) β π β
(β€β₯β1)) |
155 | 151, 152,
5 | syl2anc 585 |
. . . . . . . . . . . . 13
β’ (((π β§ π β β) β§ π β (1...π)) β π΄ β (0[,)+β)) |
156 | 155, 79 | syl 17 |
. . . . . . . . . . . 12
β’ (((π β§ π β β) β§ π β (1...π)) β π΄ β β) |
157 | 156 | recnd 11239 |
. . . . . . . . . . 11
β’ (((π β§ π β β) β§ π β (1...π)) β π΄ β β) |
158 | 153, 154,
157 | fsumser 15673 |
. . . . . . . . . 10
β’ ((π β§ π β β) β Ξ£π β (1...π)π΄ = (seq1( + , (π β β β¦ π΅))βπ)) |
159 | | fveq2 6889 |
. . . . . . . . . . 11
β’ (π = π β (seq1( + , (π β β β¦ π΅))βπ) = (seq1( + , (π β β β¦ π΅))βπ)) |
160 | 159 | rspceeqv 3633 |
. . . . . . . . . 10
β’ ((π β β β§
Ξ£π β (1...π)π΄ = (seq1( + , (π β β β¦ π΅))βπ)) β βπ β β Ξ£π β (1...π)π΄ = (seq1( + , (π β β β¦ π΅))βπ)) |
161 | 150, 158,
160 | syl2anc 585 |
. . . . . . . . 9
β’ ((π β§ π β β) β βπ β β Ξ£π β (1...π)π΄ = (seq1( + , (π β β β¦ π΅))βπ)) |
162 | 137, 138 | elrnmpti 5958 |
. . . . . . . . 9
β’
(Ξ£π β
(1...π)π΄ β ran seq1( + , (π β β β¦ π΅)) β βπ β β Ξ£π β (1...π)π΄ = (seq1( + , (π β β β¦ π΅))βπ)) |
163 | 161, 162 | sylibr 233 |
. . . . . . . 8
β’ ((π β§ π β β) β Ξ£π β (1...π)π΄ β ran seq1( + , (π β β β¦ π΅))) |
164 | 163 | ad2ant2r 746 |
. . . . . . 7
β’ (((π β§ π₯ β ran (π β (π« β β© Fin) β¦
Ξ£π β π π΄)) β§ (π β β β§ π₯ β€ Ξ£π β (1...π)π΄)) β Ξ£π β (1...π)π΄ β ran seq1( + , (π β β β¦ π΅))) |
165 | | suprub 12172 |
. . . . . . 7
β’ (((ran
seq1( + , (π β β
β¦ π΅)) β β
β§ ran seq1( + , (π
β β β¦ π΅))
β β
β§ βπ
β β βπ§
β ran seq1( + , (π
β β β¦ π΅))π§ β€ π ) β§ Ξ£π β (1...π)π΄ β ran seq1( + , (π β β β¦ π΅))) β Ξ£π β (1...π)π΄ β€ sup(ran seq1( + , (π β β β¦ π΅)), β, < )) |
166 | 121, 130,
149, 164, 165 | syl31anc 1374 |
. . . . . 6
β’ (((π β§ π₯ β ran (π β (π« β β© Fin) β¦
Ξ£π β π π΄)) β§ (π β β β§ π₯ β€ Ξ£π β (1...π)π΄)) β Ξ£π β (1...π)π΄ β€ sup(ran seq1( + , (π β β β¦ π΅)), β, < )) |
167 | 114, 117,
118, 119, 166 | letrd 11368 |
. . . . 5
β’ (((π β§ π₯ β ran (π β (π« β β© Fin) β¦
Ξ£π β π π΄)) β§ (π β β β§ π₯ β€ Ξ£π β (1...π)π΄)) β π₯ β€ sup(ran seq1( + , (π β β β¦ π΅)), β, < )) |
168 | 95, 167 | rexlimddv 3162 |
. . . 4
β’ ((π β§ π₯ β ran (π β (π« β β© Fin) β¦
Ξ£π β π π΄)) β π₯ β€ sup(ran seq1( + , (π β β β¦ π΅)), β, < )) |
169 | 70 | adantr 482 |
. . . . 5
β’ ((π β§ π₯ β ran (π β (π« β β© Fin) β¦
Ξ£π β π π΄)) β sup(ran seq1( + , (π β β β¦ π΅)), β, < ) β
β) |
170 | 113, 169 | lenltd 11357 |
. . . 4
β’ ((π β§ π₯ β ran (π β (π« β β© Fin) β¦
Ξ£π β π π΄)) β (π₯ β€ sup(ran seq1( + , (π β β β¦ π΅)), β, < ) β Β¬ sup(ran
seq1( + , (π β β
β¦ π΅)), β, <
) < π₯)) |
171 | 168, 170 | mpbid 231 |
. . 3
β’ ((π β§ π₯ β ran (π β (π« β β© Fin) β¦
Ξ£π β π π΄)) β Β¬ sup(ran seq1( + , (π β β β¦ π΅)), β, < ) < π₯) |
172 | | simpr1r 1232 |
. . . . . . 7
β’ ((π β§ ((π₯ β β* β§ π₯ < sup(ran seq1( + , (π β β β¦ π΅)), β, < )) β§ 0
β€ π₯ β§ π₯ = +β)) β π₯ < sup(ran seq1( + , (π β β β¦ π΅)), β, <
)) |
173 | 172 | 3anassrs 1361 |
. . . . . 6
β’ ((((π β§ (π₯ β β* β§ π₯ < sup(ran seq1( + , (π β β β¦ π΅)), β, < ))) β§ 0
β€ π₯) β§ π₯ = +β) β π₯ < sup(ran seq1( + , (π β β β¦ π΅)), β, <
)) |
174 | 71 | ad3antrrr 729 |
. . . . . . . 8
β’ ((((π β§ (π₯ β β* β§ π₯ < sup(ran seq1( + , (π β β β¦ π΅)), β, < ))) β§ 0
β€ π₯) β§ π₯ = +β) β sup(ran
seq1( + , (π β β
β¦ π΅)), β, <
) β β*) |
175 | | pnfnlt 13105 |
. . . . . . . 8
β’ (sup(ran
seq1( + , (π β β
β¦ π΅)), β, <
) β β* β Β¬ +β < sup(ran seq1( + ,
(π β β β¦
π΅)), β, <
)) |
176 | 174, 175 | syl 17 |
. . . . . . 7
β’ ((((π β§ (π₯ β β* β§ π₯ < sup(ran seq1( + , (π β β β¦ π΅)), β, < ))) β§ 0
β€ π₯) β§ π₯ = +β) β Β¬
+β < sup(ran seq1( + , (π β β β¦ π΅)), β, < )) |
177 | | breq1 5151 |
. . . . . . . . 9
β’ (π₯ = +β β (π₯ < sup(ran seq1( + , (π β β β¦ π΅)), β, < ) β
+β < sup(ran seq1( + , (π β β β¦ π΅)), β, < ))) |
178 | 177 | notbid 318 |
. . . . . . . 8
β’ (π₯ = +β β (Β¬ π₯ < sup(ran seq1( + , (π β β β¦ π΅)), β, < ) β Β¬
+β < sup(ran seq1( + , (π β β β¦ π΅)), β, < ))) |
179 | 178 | adantl 483 |
. . . . . . 7
β’ ((((π β§ (π₯ β β* β§ π₯ < sup(ran seq1( + , (π β β β¦ π΅)), β, < ))) β§ 0
β€ π₯) β§ π₯ = +β) β (Β¬ π₯ < sup(ran seq1( + , (π β β β¦ π΅)), β, < ) β Β¬
+β < sup(ran seq1( + , (π β β β¦ π΅)), β, < ))) |
180 | 176, 179 | mpbird 257 |
. . . . . 6
β’ ((((π β§ (π₯ β β* β§ π₯ < sup(ran seq1( + , (π β β β¦ π΅)), β, < ))) β§ 0
β€ π₯) β§ π₯ = +β) β Β¬ π₯ < sup(ran seq1( + , (π β β β¦ π΅)), β, <
)) |
181 | 173, 180 | pm2.21dd 194 |
. . . . 5
β’ ((((π β§ (π₯ β β* β§ π₯ < sup(ran seq1( + , (π β β β¦ π΅)), β, < ))) β§ 0
β€ π₯) β§ π₯ = +β) β βπ¦ β ran (π β (π« β β© Fin) β¦
Ξ£π β π π΄)π₯ < π¦) |
182 | | simplll 774 |
. . . . . 6
β’ ((((π β§ (π₯ β β* β§ π₯ < sup(ran seq1( + , (π β β β¦ π΅)), β, < ))) β§ 0
β€ π₯) β§ π₯ < +β) β π) |
183 | | simpr1l 1231 |
. . . . . . . 8
β’ ((π β§ ((π₯ β β* β§ π₯ < sup(ran seq1( + , (π β β β¦ π΅)), β, < )) β§ 0
β€ π₯ β§ π₯ < +β)) β π₯ β
β*) |
184 | 183 | 3anassrs 1361 |
. . . . . . 7
β’ ((((π β§ (π₯ β β* β§ π₯ < sup(ran seq1( + , (π β β β¦ π΅)), β, < ))) β§ 0
β€ π₯) β§ π₯ < +β) β π₯ β
β*) |
185 | | simplr 768 |
. . . . . . 7
β’ ((((π β§ (π₯ β β* β§ π₯ < sup(ran seq1( + , (π β β β¦ π΅)), β, < ))) β§ 0
β€ π₯) β§ π₯ < +β) β 0 β€
π₯) |
186 | | simpr 486 |
. . . . . . 7
β’ ((((π β§ (π₯ β β* β§ π₯ < sup(ran seq1( + , (π β β β¦ π΅)), β, < ))) β§ 0
β€ π₯) β§ π₯ < +β) β π₯ < +β) |
187 | | 0xr 11258 |
. . . . . . . 8
β’ 0 β
β* |
188 | | pnfxr 11265 |
. . . . . . . 8
β’ +β
β β* |
189 | | elico1 13364 |
. . . . . . . 8
β’ ((0
β β* β§ +β β β*) β
(π₯ β (0[,)+β)
β (π₯ β
β* β§ 0 β€ π₯ β§ π₯ < +β))) |
190 | 187, 188,
189 | mp2an 691 |
. . . . . . 7
β’ (π₯ β (0[,)+β) β
(π₯ β
β* β§ 0 β€ π₯ β§ π₯ < +β)) |
191 | 184, 185,
186, 190 | syl3anbrc 1344 |
. . . . . 6
β’ ((((π β§ (π₯ β β* β§ π₯ < sup(ran seq1( + , (π β β β¦ π΅)), β, < ))) β§ 0
β€ π₯) β§ π₯ < +β) β π₯ β
(0[,)+β)) |
192 | | simpr1r 1232 |
. . . . . . 7
β’ ((π β§ ((π₯ β β* β§ π₯ < sup(ran seq1( + , (π β β β¦ π΅)), β, < )) β§ 0
β€ π₯ β§ π₯ < +β)) β π₯ < sup(ran seq1( + , (π β β β¦ π΅)), β, <
)) |
193 | 192 | 3anassrs 1361 |
. . . . . 6
β’ ((((π β§ (π₯ β β* β§ π₯ < sup(ran seq1( + , (π β β β¦ π΅)), β, < ))) β§ 0
β€ π₯) β§ π₯ < +β) β π₯ < sup(ran seq1( + , (π β β β¦ π΅)), β, <
)) |
194 | 120 | adantr 482 |
. . . . . . . . 9
β’ ((π β§ (π₯ β (0[,)+β) β§ π₯ < sup(ran seq1( + , (π β β β¦ π΅)), β, < ))) β ran
seq1( + , (π β β
β¦ π΅)) β
β) |
195 | 129 | adantr 482 |
. . . . . . . . 9
β’ ((π β§ (π₯ β (0[,)+β) β§ π₯ < sup(ran seq1( + , (π β β β¦ π΅)), β, < ))) β ran
seq1( + , (π β β
β¦ π΅)) β
β
) |
196 | 148 | adantr 482 |
. . . . . . . . 9
β’ ((π β§ (π₯ β (0[,)+β) β§ π₯ < sup(ran seq1( + , (π β β β¦ π΅)), β, < ))) β
βπ β β
βπ§ β ran seq1(
+ , (π β β
β¦ π΅))π§ β€ π ) |
197 | 194, 195,
196 | 3jca 1129 |
. . . . . . . 8
β’ ((π β§ (π₯ β (0[,)+β) β§ π₯ < sup(ran seq1( + , (π β β β¦ π΅)), β, < ))) β
(ran seq1( + , (π β
β β¦ π΅)) β
β β§ ran seq1( + , (π β β β¦ π΅)) β β
β§ βπ β β βπ§ β ran seq1( + , (π β β β¦ π΅))π§ β€ π )) |
198 | | simprl 770 |
. . . . . . . . 9
β’ ((π β§ (π₯ β (0[,)+β) β§ π₯ < sup(ran seq1( + , (π β β β¦ π΅)), β, < ))) β
π₯ β
(0[,)+β)) |
199 | 36, 198 | sselid 3980 |
. . . . . . . 8
β’ ((π β§ (π₯ β (0[,)+β) β§ π₯ < sup(ran seq1( + , (π β β β¦ π΅)), β, < ))) β
π₯ β
β) |
200 | | simprr 772 |
. . . . . . . 8
β’ ((π β§ (π₯ β (0[,)+β) β§ π₯ < sup(ran seq1( + , (π β β β¦ π΅)), β, < ))) β
π₯ < sup(ran seq1( + ,
(π β β β¦
π΅)), β, <
)) |
201 | | suprlub 12175 |
. . . . . . . . 9
β’ (((ran
seq1( + , (π β β
β¦ π΅)) β β
β§ ran seq1( + , (π
β β β¦ π΅))
β β
β§ βπ
β β βπ§
β ran seq1( + , (π
β β β¦ π΅))π§ β€ π ) β§ π₯ β β) β (π₯ < sup(ran seq1( + , (π β β β¦ π΅)), β, < ) β βπ¦ β ran seq1( + , (π β β β¦ π΅))π₯ < π¦)) |
202 | 201 | biimpa 478 |
. . . . . . . 8
β’ ((((ran
seq1( + , (π β β
β¦ π΅)) β β
β§ ran seq1( + , (π
β β β¦ π΅))
β β
β§ βπ
β β βπ§
β ran seq1( + , (π
β β β¦ π΅))π§ β€ π ) β§ π₯ β β) β§ π₯ < sup(ran seq1( + , (π β β β¦ π΅)), β, < )) β βπ¦ β ran seq1( + , (π β β β¦ π΅))π₯ < π¦) |
203 | 197, 199,
200, 202 | syl21anc 837 |
. . . . . . 7
β’ ((π β§ (π₯ β (0[,)+β) β§ π₯ < sup(ran seq1( + , (π β β β¦ π΅)), β, < ))) β
βπ¦ β ran seq1( +
, (π β β β¦
π΅))π₯ < π¦) |
204 | 40 | ssriv 3986 |
. . . . . . . . . . . . . . . . 17
β’
(1...π) β
β |
205 | | ovex 7439 |
. . . . . . . . . . . . . . . . . 18
β’
(1...π) β
V |
206 | 205 | elpw 4606 |
. . . . . . . . . . . . . . . . 17
β’
((1...π) β
π« β β (1...π) β β) |
207 | 204, 206 | mpbir 230 |
. . . . . . . . . . . . . . . 16
β’
(1...π) β
π« β |
208 | | fzfi 13934 |
. . . . . . . . . . . . . . . 16
β’
(1...π) β
Fin |
209 | | elin 3964 |
. . . . . . . . . . . . . . . 16
β’
((1...π) β
(π« β β© Fin) β ((1...π) β π« β β§ (1...π) β Fin)) |
210 | 207, 208,
209 | mpbir2an 710 |
. . . . . . . . . . . . . . 15
β’
(1...π) β
(π« β β© Fin) |
211 | 210 | a1i 11 |
. . . . . . . . . . . . . 14
β’ (((π β§ π β β) β§ π¦ = (seq1( + , (π β β β¦ π΅))βπ)) β (1...π) β (π« β β©
Fin)) |
212 | | simpr 486 |
. . . . . . . . . . . . . . 15
β’ (((π β§ π β β) β§ π¦ = (seq1( + , (π β β β¦ π΅))βπ)) β π¦ = (seq1( + , (π β β β¦ π΅))βπ)) |
213 | 45 | adantr 482 |
. . . . . . . . . . . . . . 15
β’ (((π β§ π β β) β§ π¦ = (seq1( + , (π β β β¦ π΅))βπ)) β Ξ£π β (1...π)π΄ = (seq1( + , (π β β β¦ π΅))βπ)) |
214 | 212, 213 | eqtr4d 2776 |
. . . . . . . . . . . . . 14
β’ (((π β§ π β β) β§ π¦ = (seq1( + , (π β β β¦ π΅))βπ)) β π¦ = Ξ£π β (1...π)π΄) |
215 | | sumeq1 15632 |
. . . . . . . . . . . . . . 15
β’ (π = (1...π) β Ξ£π β π π΄ = Ξ£π β (1...π)π΄) |
216 | 215 | rspceeqv 3633 |
. . . . . . . . . . . . . 14
β’
(((1...π) β
(π« β β© Fin) β§ π¦ = Ξ£π β (1...π)π΄) β βπ β (π« β β© Fin)π¦ = Ξ£π β π π΄) |
217 | 211, 214,
216 | syl2anc 585 |
. . . . . . . . . . . . 13
β’ (((π β§ π β β) β§ π¦ = (seq1( + , (π β β β¦ π΅))βπ)) β βπ β (π« β β© Fin)π¦ = Ξ£π β π π΄) |
218 | 217 | ex 414 |
. . . . . . . . . . . 12
β’ ((π β§ π β β) β (π¦ = (seq1( + , (π β β β¦ π΅))βπ) β βπ β (π« β β© Fin)π¦ = Ξ£π β π π΄)) |
219 | 218 | rexlimdva 3156 |
. . . . . . . . . . 11
β’ (π β (βπ β β π¦ = (seq1( + , (π β β β¦ π΅))βπ) β βπ β (π« β β© Fin)π¦ = Ξ£π β π π΄)) |
220 | 137, 138 | elrnmpti 5958 |
. . . . . . . . . . 11
β’ (π¦ β ran seq1( + , (π β β β¦ π΅)) β βπ β β π¦ = (seq1( + , (π β β β¦ π΅))βπ)) |
221 | 72, 73 | elrnmpti 5958 |
. . . . . . . . . . 11
β’ (π¦ β ran (π β (π« β β© Fin) β¦
Ξ£π β π π΄) β βπ β (π« β β© Fin)π¦ = Ξ£π β π π΄) |
222 | 219, 220,
221 | 3imtr4g 296 |
. . . . . . . . . 10
β’ (π β (π¦ β ran seq1( + , (π β β β¦ π΅)) β π¦ β ran (π β (π« β β© Fin) β¦
Ξ£π β π π΄))) |
223 | 222 | ssrdv 3988 |
. . . . . . . . 9
β’ (π β ran seq1( + , (π β β β¦ π΅)) β ran (π β (π« β β©
Fin) β¦ Ξ£π
β π π΄)) |
224 | | ssrexv 4051 |
. . . . . . . . 9
β’ (ran
seq1( + , (π β β
β¦ π΅)) β ran
(π β (π«
β β© Fin) β¦ Ξ£π β π π΄) β (βπ¦ β ran seq1( + , (π β β β¦ π΅))π₯ < π¦ β βπ¦ β ran (π β (π« β β© Fin) β¦
Ξ£π β π π΄)π₯ < π¦)) |
225 | 223, 224 | syl 17 |
. . . . . . . 8
β’ (π β (βπ¦ β ran seq1( + , (π β β β¦ π΅))π₯ < π¦ β βπ¦ β ran (π β (π« β β© Fin) β¦
Ξ£π β π π΄)π₯ < π¦)) |
226 | 225 | imp 408 |
. . . . . . 7
β’ ((π β§ βπ¦ β ran seq1( + , (π β β β¦ π΅))π₯ < π¦) β βπ¦ β ran (π β (π« β β© Fin) β¦
Ξ£π β π π΄)π₯ < π¦) |
227 | 203, 226 | syldan 592 |
. . . . . 6
β’ ((π β§ (π₯ β (0[,)+β) β§ π₯ < sup(ran seq1( + , (π β β β¦ π΅)), β, < ))) β
βπ¦ β ran (π β (π« β β©
Fin) β¦ Ξ£π
β π π΄)π₯ < π¦) |
228 | 182, 191,
193, 227 | syl12anc 836 |
. . . . 5
β’ ((((π β§ (π₯ β β* β§ π₯ < sup(ran seq1( + , (π β β β¦ π΅)), β, < ))) β§ 0
β€ π₯) β§ π₯ < +β) β
βπ¦ β ran (π β (π« β β©
Fin) β¦ Ξ£π
β π π΄)π₯ < π¦) |
229 | | simplrl 776 |
. . . . . 6
β’ (((π β§ (π₯ β β* β§ π₯ < sup(ran seq1( + , (π β β β¦ π΅)), β, < ))) β§ 0
β€ π₯) β π₯ β
β*) |
230 | | xrlelttric 31953 |
. . . . . . . 8
β’
((+β β β* β§ π₯ β β*) β (+β
β€ π₯ β¨ π₯ <
+β)) |
231 | 188, 230 | mpan 689 |
. . . . . . 7
β’ (π₯ β β*
β (+β β€ π₯
β¨ π₯ <
+β)) |
232 | | xgepnf 13141 |
. . . . . . . 8
β’ (π₯ β β*
β (+β β€ π₯
β π₯ =
+β)) |
233 | 232 | orbi1d 916 |
. . . . . . 7
β’ (π₯ β β*
β ((+β β€ π₯
β¨ π₯ < +β)
β (π₯ = +β β¨
π₯ <
+β))) |
234 | 231, 233 | mpbid 231 |
. . . . . 6
β’ (π₯ β β*
β (π₯ = +β β¨
π₯ <
+β)) |
235 | 229, 234 | syl 17 |
. . . . 5
β’ (((π β§ (π₯ β β* β§ π₯ < sup(ran seq1( + , (π β β β¦ π΅)), β, < ))) β§ 0
β€ π₯) β (π₯ = +β β¨ π₯ <
+β)) |
236 | 181, 228,
235 | mpjaodan 958 |
. . . 4
β’ (((π β§ (π₯ β β* β§ π₯ < sup(ran seq1( + , (π β β β¦ π΅)), β, < ))) β§ 0
β€ π₯) β βπ¦ β ran (π β (π« β β© Fin) β¦
Ξ£π β π π΄)π₯ < π¦) |
237 | | 0elpw 5354 |
. . . . . . . . 9
β’ β
β π« β |
238 | | 0fin 9168 |
. . . . . . . . 9
β’ β
β Fin |
239 | | elin 3964 |
. . . . . . . . 9
β’ (β
β (π« β β© Fin) β (β
β π« β
β§ β
β Fin)) |
240 | 237, 238,
239 | mpbir2an 710 |
. . . . . . . 8
β’ β
β (π« β β© Fin) |
241 | | sum0 15664 |
. . . . . . . . 9
β’
Ξ£π β
β
π΄ =
0 |
242 | 241 | eqcomi 2742 |
. . . . . . . 8
β’ 0 =
Ξ£π β β
π΄ |
243 | | sumeq1 15632 |
. . . . . . . . 9
β’ (π = β
β Ξ£π β π π΄ = Ξ£π β β
π΄) |
244 | 243 | rspceeqv 3633 |
. . . . . . . 8
β’ ((β
β (π« β β© Fin) β§ 0 = Ξ£π β β
π΄) β βπ β (π« β β© Fin)0 =
Ξ£π β π π΄) |
245 | 240, 242,
244 | mp2an 691 |
. . . . . . 7
β’
βπ β
(π« β β© Fin)0 = Ξ£π β π π΄ |
246 | 72, 73 | elrnmpti 5958 |
. . . . . . 7
β’ (0 β
ran (π β (π«
β β© Fin) β¦ Ξ£π β π π΄) β βπ β (π« β β© Fin)0 =
Ξ£π β π π΄) |
247 | 245, 246 | mpbir 230 |
. . . . . 6
β’ 0 β
ran (π β (π«
β β© Fin) β¦ Ξ£π β π π΄) |
248 | | breq2 5152 |
. . . . . . 7
β’ (π¦ = 0 β (π₯ < π¦ β π₯ < 0)) |
249 | 248 | rspcev 3613 |
. . . . . 6
β’ ((0
β ran (π β
(π« β β© Fin) β¦ Ξ£π β π π΄) β§ π₯ < 0) β βπ¦ β ran (π β (π« β β© Fin) β¦
Ξ£π β π π΄)π₯ < π¦) |
250 | 247, 249 | mpan 689 |
. . . . 5
β’ (π₯ < 0 β βπ¦ β ran (π β (π« β β© Fin) β¦
Ξ£π β π π΄)π₯ < π¦) |
251 | 250 | adantl 483 |
. . . 4
β’ (((π β§ (π₯ β β* β§ π₯ < sup(ran seq1( + , (π β β β¦ π΅)), β, < ))) β§
π₯ < 0) β
βπ¦ β ran (π β (π« β β©
Fin) β¦ Ξ£π
β π π΄)π₯ < π¦) |
252 | | xrlelttric 31953 |
. . . . . 6
β’ ((0
β β* β§ π₯ β β*) β (0 β€
π₯ β¨ π₯ < 0)) |
253 | 187, 252 | mpan 689 |
. . . . 5
β’ (π₯ β β*
β (0 β€ π₯ β¨ π₯ < 0)) |
254 | 253 | ad2antrl 727 |
. . . 4
β’ ((π β§ (π₯ β β* β§ π₯ < sup(ran seq1( + , (π β β β¦ π΅)), β, < ))) β (0
β€ π₯ β¨ π₯ < 0)) |
255 | 236, 251,
254 | mpjaodan 958 |
. . 3
β’ ((π β§ (π₯ β β* β§ π₯ < sup(ran seq1( + , (π β β β¦ π΅)), β, < ))) β
βπ¦ β ran (π β (π« β β©
Fin) β¦ Ξ£π
β π π΄)π₯ < π¦) |
256 | 2, 71, 171, 255 | eqsupd 9449 |
. 2
β’ (π β sup(ran (π β (π« β β©
Fin) β¦ Ξ£π
β π π΄), β*, < ) = sup(ran
seq1( + , (π β β
β¦ π΅)), β, <
)) |
257 | | nfv 1918 |
. . 3
β’
β²ππ |
258 | | nfcv 2904 |
. . 3
β’
β²πβ |
259 | | nnex 12215 |
. . . 4
β’ β
β V |
260 | 259 | a1i 11 |
. . 3
β’ (π β β β
V) |
261 | | icossicc 13410 |
. . . 4
β’
(0[,)+β) β (0[,]+β) |
262 | 261, 5 | sselid 3980 |
. . 3
β’ ((π β§ π β β) β π΄ β (0[,]+β)) |
263 | | elex 3493 |
. . . . . 6
β’ (π β (π« β β©
Fin) β π β
V) |
264 | 263 | adantl 483 |
. . . . 5
β’ ((π β§ π β (π« β β© Fin)) β
π β
V) |
265 | 107 | fmpttd 7112 |
. . . . 5
β’ ((π β§ π β (π« β β© Fin)) β
(π β π β¦ π΄):πβΆ(0[,)+β)) |
266 | | esumpfinvallem 33061 |
. . . . 5
β’ ((π β V β§ (π β π β¦ π΄):πβΆ(0[,)+β)) β
(βfld Ξ£g (π β π β¦ π΄)) =
((β*π βΎs (0[,]+β))
Ξ£g (π β π β¦ π΄))) |
267 | 264, 265,
266 | syl2anc 585 |
. . . 4
β’ ((π β§ π β (π« β β© Fin)) β
(βfld Ξ£g (π β π β¦ π΄)) =
((β*π βΎs (0[,]+β))
Ξ£g (π β π β¦ π΄))) |
268 | 108 | recnd 11239 |
. . . . 5
β’ (((π β§ π β (π« β β© Fin)) β§
π β π) β π΄ β β) |
269 | 99, 268 | gsumfsum 21005 |
. . . 4
β’ ((π β§ π β (π« β β© Fin)) β
(βfld Ξ£g (π β π β¦ π΄)) = Ξ£π β π π΄) |
270 | 267, 269 | eqtr3d 2775 |
. . 3
β’ ((π β§ π β (π« β β© Fin)) β
((β*π βΎs (0[,]+β))
Ξ£g (π β π β¦ π΄)) = Ξ£π β π π΄) |
271 | 257, 258,
260, 262, 270 | esumval 33033 |
. 2
β’ (π β Ξ£*π β βπ΄ = sup(ran (π β (π« β β© Fin) β¦
Ξ£π β π π΄), β*, <
)) |
272 | 3, 4, 35, 43, 69 | isumclim 15700 |
. 2
β’ (π β Ξ£π β β π΄ = sup(ran seq1( + , (π β β β¦ π΅)), β, < )) |
273 | 256, 271,
272 | 3eqtr4d 2783 |
1
β’ (π β Ξ£*π β βπ΄ = Ξ£π β β π΄) |