Step | Hyp | Ref
| Expression |
1 | | 0cn 11203 |
. . . . 5
β’ 0 β
β |
2 | | ax-1cn 11165 |
. . . . 5
β’ 1 β
β |
3 | 1, 2 | subnegi 11536 |
. . . 4
β’ (0
β -1) = (0 + 1) |
4 | | 0p1e1 12331 |
. . . 4
β’ (0 + 1) =
1 |
5 | 3, 4 | eqtri 2761 |
. . 3
β’ (0
β -1) = 1 |
6 | | seqeq1 13966 |
. . 3
β’ ((0
β -1) = 1 β seq(0 β -1)( + , π») = seq1( + , π»)) |
7 | 5, 6 | ax-mp 5 |
. 2
β’ seq(0
β -1)( + , π») = seq1(
+ , π») |
8 | | dvradcnv2.h |
. . . . . . . 8
β’ π» = (π β β β¦ ((π Β· (π΄βπ)) Β· (πβ(π β 1)))) |
9 | | ovex 7439 |
. . . . . . . 8
β’ ((π Β· (π΄βπ)) Β· (πβ(π β 1))) β V |
10 | | id 22 |
. . . . . . . . . 10
β’ (π = (π β -1) β π = (π β -1)) |
11 | | fveq2 6889 |
. . . . . . . . . 10
β’ (π = (π β -1) β (π΄βπ) = (π΄β(π β -1))) |
12 | 10, 11 | oveq12d 7424 |
. . . . . . . . 9
β’ (π = (π β -1) β (π Β· (π΄βπ)) = ((π β -1) Β· (π΄β(π β -1)))) |
13 | | oveq1 7413 |
. . . . . . . . . 10
β’ (π = (π β -1) β (π β 1) = ((π β -1) β 1)) |
14 | 13 | oveq2d 7422 |
. . . . . . . . 9
β’ (π = (π β -1) β (πβ(π β 1)) = (πβ((π β -1) β 1))) |
15 | 12, 14 | oveq12d 7424 |
. . . . . . . 8
β’ (π = (π β -1) β ((π Β· (π΄βπ)) Β· (πβ(π β 1))) = (((π β -1) Β· (π΄β(π β -1))) Β· (πβ((π β -1) β 1)))) |
16 | | nnuz 12862 |
. . . . . . . 8
β’ β =
(β€β₯β1) |
17 | | nn0uz 12861 |
. . . . . . . . 9
β’
β0 = (β€β₯β0) |
18 | | 1pneg1e0 12328 |
. . . . . . . . . 10
β’ (1 + -1)
= 0 |
19 | 18 | fveq2i 6892 |
. . . . . . . . 9
β’
(β€β₯β(1 + -1)) =
(β€β₯β0) |
20 | 17, 19 | eqtr4i 2764 |
. . . . . . . 8
β’
β0 = (β€β₯β(1 +
-1)) |
21 | | 1zzd 12590 |
. . . . . . . 8
β’ (π β 1 β
β€) |
22 | 21 | znegcld 12665 |
. . . . . . . 8
β’ (π β -1 β
β€) |
23 | 8, 9, 15, 16, 20, 21, 22 | uzmptshftfval 43091 |
. . . . . . 7
β’ (π β (π» shift -1) = (π β β0 β¦ (((π β -1) Β· (π΄β(π β -1))) Β· (πβ((π β -1) β 1))))) |
24 | | nn0cn 12479 |
. . . . . . . . . . . 12
β’ (π β β0
β π β
β) |
25 | 24 | adantl 483 |
. . . . . . . . . . 11
β’ ((π β§ π β β0) β π β
β) |
26 | | 1cnd 11206 |
. . . . . . . . . . 11
β’ ((π β§ π β β0) β 1 β
β) |
27 | 25, 26 | subnegd 11575 |
. . . . . . . . . 10
β’ ((π β§ π β β0) β (π β -1) = (π + 1)) |
28 | 27 | fveq2d 6893 |
. . . . . . . . . 10
β’ ((π β§ π β β0) β (π΄β(π β -1)) = (π΄β(π + 1))) |
29 | 27, 28 | oveq12d 7424 |
. . . . . . . . 9
β’ ((π β§ π β β0) β ((π β -1) Β· (π΄β(π β -1))) = ((π + 1) Β· (π΄β(π + 1)))) |
30 | 27 | oveq1d 7421 |
. . . . . . . . . . 11
β’ ((π β§ π β β0) β ((π β -1) β 1) =
((π + 1) β
1)) |
31 | 25, 26 | pncand 11569 |
. . . . . . . . . . 11
β’ ((π β§ π β β0) β ((π + 1) β 1) = π) |
32 | 30, 31 | eqtrd 2773 |
. . . . . . . . . 10
β’ ((π β§ π β β0) β ((π β -1) β 1) = π) |
33 | 32 | oveq2d 7422 |
. . . . . . . . 9
β’ ((π β§ π β β0) β (πβ((π β -1) β 1)) = (πβπ)) |
34 | 29, 33 | oveq12d 7424 |
. . . . . . . 8
β’ ((π β§ π β β0) β (((π β -1) Β· (π΄β(π β -1))) Β· (πβ((π β -1) β 1))) = (((π + 1) Β· (π΄β(π + 1))) Β· (πβπ))) |
35 | 34 | mpteq2dva 5248 |
. . . . . . 7
β’ (π β (π β β0 β¦ (((π β -1) Β· (π΄β(π β -1))) Β· (πβ((π β -1) β 1)))) = (π β β0
β¦ (((π + 1) Β·
(π΄β(π + 1))) Β· (πβπ)))) |
36 | 23, 35 | eqtrd 2773 |
. . . . . 6
β’ (π β (π» shift -1) = (π β β0 β¦ (((π + 1) Β· (π΄β(π + 1))) Β· (πβπ)))) |
37 | 36 | seqeq3d 13971 |
. . . . 5
β’ (π β seq0( + , (π» shift -1)) = seq0( + , (π β β0
β¦ (((π + 1) Β·
(π΄β(π + 1))) Β· (πβπ))))) |
38 | | dvradcnv2.g |
. . . . . . 7
β’ πΊ = (π₯ β β β¦ (π β β0 β¦ ((π΄βπ) Β· (π₯βπ)))) |
39 | | fveq2 6889 |
. . . . . . . . . 10
β’ (π = π β (π΄βπ) = (π΄βπ)) |
40 | | oveq2 7414 |
. . . . . . . . . 10
β’ (π = π β (π₯βπ) = (π₯βπ)) |
41 | 39, 40 | oveq12d 7424 |
. . . . . . . . 9
β’ (π = π β ((π΄βπ) Β· (π₯βπ)) = ((π΄βπ) Β· (π₯βπ))) |
42 | 41 | cbvmptv 5261 |
. . . . . . . 8
β’ (π β β0
β¦ ((π΄βπ) Β· (π₯βπ))) = (π β β0 β¦ ((π΄βπ) Β· (π₯βπ))) |
43 | 42 | mpteq2i 5253 |
. . . . . . 7
β’ (π₯ β β β¦ (π β β0
β¦ ((π΄βπ) Β· (π₯βπ)))) = (π₯ β β β¦ (π β β0 β¦ ((π΄βπ) Β· (π₯βπ)))) |
44 | 38, 43 | eqtri 2761 |
. . . . . 6
β’ πΊ = (π₯ β β β¦ (π β β0 β¦ ((π΄βπ) Β· (π₯βπ)))) |
45 | | dvradcnv2.r |
. . . . . 6
β’ π
= sup({π β β β£ seq0( + , (πΊβπ)) β dom β }, β*,
< ) |
46 | | eqid 2733 |
. . . . . 6
β’ (π β β0
β¦ (((π + 1) Β·
(π΄β(π + 1))) Β· (πβπ))) = (π β β0 β¦ (((π + 1) Β· (π΄β(π + 1))) Β· (πβπ))) |
47 | | dvradcnv2.a |
. . . . . 6
β’ (π β π΄:β0βΆβ) |
48 | | dvradcnv2.x |
. . . . . 6
β’ (π β π β β) |
49 | | dvradcnv2.l |
. . . . . 6
β’ (π β (absβπ) < π
) |
50 | 44, 45, 46, 47, 48, 49 | dvradcnv 25925 |
. . . . 5
β’ (π β seq0( + , (π β β0
β¦ (((π + 1) Β·
(π΄β(π + 1))) Β· (πβπ)))) β dom β ) |
51 | 37, 50 | eqeltrd 2834 |
. . . 4
β’ (π β seq0( + , (π» shift -1)) β dom β
) |
52 | | climdm 15495 |
. . . 4
β’ (seq0( +
, (π» shift -1)) β dom
β β seq0( + , (π»
shift -1)) β ( β βseq0( + , (π» shift -1)))) |
53 | 51, 52 | sylib 217 |
. . 3
β’ (π β seq0( + , (π» shift -1)) β ( β
βseq0( + , (π» shift
-1)))) |
54 | | 0z 12566 |
. . . . . . 7
β’ 0 β
β€ |
55 | | neg1z 12595 |
. . . . . . 7
β’ -1 β
β€ |
56 | | nnex 12215 |
. . . . . . . . . 10
β’ β
β V |
57 | 56 | mptex 7222 |
. . . . . . . . 9
β’ (π β β β¦ ((π Β· (π΄βπ)) Β· (πβ(π β 1)))) β V |
58 | 8, 57 | eqeltri 2830 |
. . . . . . . 8
β’ π» β V |
59 | 58 | seqshft 15029 |
. . . . . . 7
β’ ((0
β β€ β§ -1 β β€) β seq0( + , (π» shift -1)) = (seq(0 β -1)( + , π») shift -1)) |
60 | 54, 55, 59 | mp2an 691 |
. . . . . 6
β’ seq0( + ,
(π» shift -1)) = (seq(0
β -1)( + , π») shift
-1) |
61 | 60 | breq1i 5155 |
. . . . 5
β’ (seq0( +
, (π» shift -1)) β (
β βseq0( + , (π»
shift -1))) β (seq(0 β -1)( + , π») shift -1) β ( β βseq0( +
, (π» shift
-1)))) |
62 | | seqex 13965 |
. . . . . 6
β’ seq(0
β -1)( + , π») β
V |
63 | | climshft 15517 |
. . . . . 6
β’ ((-1
β β€ β§ seq(0 β -1)( + , π») β V) β ((seq(0 β -1)( + ,
π») shift -1) β (
β βseq0( + , (π»
shift -1))) β seq(0 β -1)( + , π») β ( β βseq0( + , (π» shift -1))))) |
64 | 55, 62, 63 | mp2an 691 |
. . . . 5
β’ ((seq(0
β -1)( + , π») shift
-1) β ( β βseq0( + , (π» shift -1))) β seq(0 β -1)( + ,
π») β ( β
βseq0( + , (π» shift
-1)))) |
65 | 61, 64 | bitri 275 |
. . . 4
β’ (seq0( +
, (π» shift -1)) β (
β βseq0( + , (π»
shift -1))) β seq(0 β -1)( + , π») β ( β βseq0( + , (π» shift -1)))) |
66 | | fvex 6902 |
. . . . 5
β’ ( β
βseq0( + , (π» shift
-1))) β V |
67 | 62, 66 | breldm 5907 |
. . . 4
β’ (seq(0
β -1)( + , π») β
( β βseq0( + , (π» shift -1))) β seq(0 β -1)( + ,
π») β dom β
) |
68 | 65, 67 | sylbi 216 |
. . 3
β’ (seq0( +
, (π» shift -1)) β (
β βseq0( + , (π»
shift -1))) β seq(0 β -1)( + , π») β dom β ) |
69 | 53, 68 | syl 17 |
. 2
β’ (π β seq(0 β -1)( + ,
π») β dom β
) |
70 | 7, 69 | eqeltrrid 2839 |
1
β’ (π β seq1( + , π») β dom β
) |