Step | Hyp | Ref
| Expression |
1 | | nnuz 12862 |
. . 3
β’ β =
(β€β₯β1) |
2 | | 1zzd 12590 |
. . 3
β’ (π΄ β π β 1 β β€) |
3 | | neg1cn 12323 |
. . . 4
β’ -1 β
β |
4 | 3 | a1i 11 |
. . 3
β’ (π΄ β π β -1 β β) |
5 | | ax-1cn 11165 |
. . . . . 6
β’ 1 β
β |
6 | | logtayl2.s |
. . . . . . . . 9
β’ π = (1(ballβ(abs β
β ))1) |
7 | 6 | eleq2i 2826 |
. . . . . . . 8
β’ (π΄ β π β π΄ β (1(ballβ(abs β β
))1)) |
8 | | cnxmet 24281 |
. . . . . . . . 9
β’ (abs
β β ) β (βMetββ) |
9 | | 1xr 11270 |
. . . . . . . . 9
β’ 1 β
β* |
10 | | elbl 23886 |
. . . . . . . . 9
β’ (((abs
β β ) β (βMetββ) β§ 1 β β
β§ 1 β β*) β (π΄ β (1(ballβ(abs β β
))1) β (π΄ β
β β§ (1(abs β β )π΄) < 1))) |
11 | 8, 5, 9, 10 | mp3an 1462 |
. . . . . . . 8
β’ (π΄ β (1(ballβ(abs
β β ))1) β (π΄ β β β§ (1(abs β β
)π΄) <
1)) |
12 | 7, 11 | bitri 275 |
. . . . . . 7
β’ (π΄ β π β (π΄ β β β§ (1(abs β β
)π΄) <
1)) |
13 | 12 | simplbi 499 |
. . . . . 6
β’ (π΄ β π β π΄ β β) |
14 | | subcl 11456 |
. . . . . 6
β’ ((1
β β β§ π΄
β β) β (1 β π΄) β β) |
15 | 5, 13, 14 | sylancr 588 |
. . . . 5
β’ (π΄ β π β (1 β π΄) β β) |
16 | | eqid 2733 |
. . . . . . . 8
β’ (abs
β β ) = (abs β β ) |
17 | 16 | cnmetdval 24279 |
. . . . . . 7
β’ ((1
β β β§ π΄
β β) β (1(abs β β )π΄) = (absβ(1 β π΄))) |
18 | 5, 13, 17 | sylancr 588 |
. . . . . 6
β’ (π΄ β π β (1(abs β β )π΄) = (absβ(1 β π΄))) |
19 | 12 | simprbi 498 |
. . . . . 6
β’ (π΄ β π β (1(abs β β )π΄) < 1) |
20 | 18, 19 | eqbrtrrd 5172 |
. . . . 5
β’ (π΄ β π β (absβ(1 β π΄)) < 1) |
21 | | logtayl 26160 |
. . . . 5
β’ (((1
β π΄) β β
β§ (absβ(1 β π΄)) < 1) β seq1( + , (π β β β¦ (((1
β π΄)βπ) / π))) β -(logβ(1 β (1 β
π΄)))) |
22 | 15, 20, 21 | syl2anc 585 |
. . . 4
β’ (π΄ β π β seq1( + , (π β β β¦ (((1 β π΄)βπ) / π))) β -(logβ(1 β (1 β
π΄)))) |
23 | | nncan 11486 |
. . . . . . 7
β’ ((1
β β β§ π΄
β β) β (1 β (1 β π΄)) = π΄) |
24 | 5, 13, 23 | sylancr 588 |
. . . . . 6
β’ (π΄ β π β (1 β (1 β π΄)) = π΄) |
25 | 24 | fveq2d 6893 |
. . . . 5
β’ (π΄ β π β (logβ(1 β (1 β
π΄))) = (logβπ΄)) |
26 | 25 | negeqd 11451 |
. . . 4
β’ (π΄ β π β -(logβ(1 β (1 β
π΄))) = -(logβπ΄)) |
27 | 22, 26 | breqtrd 5174 |
. . 3
β’ (π΄ β π β seq1( + , (π β β β¦ (((1 β π΄)βπ) / π))) β -(logβπ΄)) |
28 | | oveq2 7414 |
. . . . . . 7
β’ (π = π β ((1 β π΄)βπ) = ((1 β π΄)βπ)) |
29 | | id 22 |
. . . . . . 7
β’ (π = π β π = π) |
30 | 28, 29 | oveq12d 7424 |
. . . . . 6
β’ (π = π β (((1 β π΄)βπ) / π) = (((1 β π΄)βπ) / π)) |
31 | | eqid 2733 |
. . . . . 6
β’ (π β β β¦ (((1
β π΄)βπ) / π)) = (π β β β¦ (((1 β π΄)βπ) / π)) |
32 | | ovex 7439 |
. . . . . 6
β’ (((1
β π΄)βπ) / π) β V |
33 | 30, 31, 32 | fvmpt 6996 |
. . . . 5
β’ (π β β β ((π β β β¦ (((1
β π΄)βπ) / π))βπ) = (((1 β π΄)βπ) / π)) |
34 | 33 | adantl 483 |
. . . 4
β’ ((π΄ β π β§ π β β) β ((π β β β¦ (((1 β π΄)βπ) / π))βπ) = (((1 β π΄)βπ) / π)) |
35 | | nnnn0 12476 |
. . . . . 6
β’ (π β β β π β
β0) |
36 | | expcl 14042 |
. . . . . 6
β’ (((1
β π΄) β β
β§ π β
β0) β ((1 β π΄)βπ) β β) |
37 | 15, 35, 36 | syl2an 597 |
. . . . 5
β’ ((π΄ β π β§ π β β) β ((1 β π΄)βπ) β β) |
38 | | nncn 12217 |
. . . . . 6
β’ (π β β β π β
β) |
39 | 38 | adantl 483 |
. . . . 5
β’ ((π΄ β π β§ π β β) β π β β) |
40 | | nnne0 12243 |
. . . . . 6
β’ (π β β β π β 0) |
41 | 40 | adantl 483 |
. . . . 5
β’ ((π΄ β π β§ π β β) β π β 0) |
42 | 37, 39, 41 | divcld 11987 |
. . . 4
β’ ((π΄ β π β§ π β β) β (((1 β π΄)βπ) / π) β β) |
43 | 34, 42 | eqeltrd 2834 |
. . 3
β’ ((π΄ β π β§ π β β) β ((π β β β¦ (((1 β π΄)βπ) / π))βπ) β β) |
44 | 37, 39, 41 | divnegd 12000 |
. . . . . 6
β’ ((π΄ β π β§ π β β) β -(((1 β π΄)βπ) / π) = (-((1 β π΄)βπ) / π)) |
45 | 42 | mulm1d 11663 |
. . . . . 6
β’ ((π΄ β π β§ π β β) β (-1 Β· (((1
β π΄)βπ) / π)) = -(((1 β π΄)βπ) / π)) |
46 | 35 | adantl 483 |
. . . . . . . . . 10
β’ ((π΄ β π β§ π β β) β π β β0) |
47 | | expcl 14042 |
. . . . . . . . . 10
β’ ((-1
β β β§ π
β β0) β (-1βπ) β β) |
48 | 3, 46, 47 | sylancr 588 |
. . . . . . . . 9
β’ ((π΄ β π β§ π β β) β (-1βπ) β
β) |
49 | | subcl 11456 |
. . . . . . . . . . 11
β’ ((π΄ β β β§ 1 β
β) β (π΄ β
1) β β) |
50 | 13, 5, 49 | sylancl 587 |
. . . . . . . . . 10
β’ (π΄ β π β (π΄ β 1) β β) |
51 | | expcl 14042 |
. . . . . . . . . 10
β’ (((π΄ β 1) β β β§
π β
β0) β ((π΄ β 1)βπ) β β) |
52 | 50, 35, 51 | syl2an 597 |
. . . . . . . . 9
β’ ((π΄ β π β§ π β β) β ((π΄ β 1)βπ) β β) |
53 | 48, 52 | mulneg1d 11664 |
. . . . . . . 8
β’ ((π΄ β π β§ π β β) β (-(-1βπ) Β· ((π΄ β 1)βπ)) = -((-1βπ) Β· ((π΄ β 1)βπ))) |
54 | 3 | a1i 11 |
. . . . . . . . . . 11
β’ ((π΄ β π β§ π β β) β -1 β
β) |
55 | | neg1ne0 12325 |
. . . . . . . . . . . 12
β’ -1 β
0 |
56 | 55 | a1i 11 |
. . . . . . . . . . 11
β’ ((π΄ β π β§ π β β) β -1 β
0) |
57 | | nnz 12576 |
. . . . . . . . . . . 12
β’ (π β β β π β
β€) |
58 | 57 | adantl 483 |
. . . . . . . . . . 11
β’ ((π΄ β π β§ π β β) β π β β€) |
59 | 54, 56, 58 | expm1d 14118 |
. . . . . . . . . 10
β’ ((π΄ β π β§ π β β) β (-1β(π β 1)) = ((-1βπ) / -1)) |
60 | 5 | a1i 11 |
. . . . . . . . . . 11
β’ ((π΄ β π β§ π β β) β 1 β
β) |
61 | | ax-1ne0 11176 |
. . . . . . . . . . . 12
β’ 1 β
0 |
62 | 61 | a1i 11 |
. . . . . . . . . . 11
β’ ((π΄ β π β§ π β β) β 1 β
0) |
63 | 48, 60, 62 | divneg2d 12001 |
. . . . . . . . . 10
β’ ((π΄ β π β§ π β β) β -((-1βπ) / 1) = ((-1βπ) / -1)) |
64 | 48 | div1d 11979 |
. . . . . . . . . . 11
β’ ((π΄ β π β§ π β β) β ((-1βπ) / 1) = (-1βπ)) |
65 | 64 | negeqd 11451 |
. . . . . . . . . 10
β’ ((π΄ β π β§ π β β) β -((-1βπ) / 1) = -(-1βπ)) |
66 | 59, 63, 65 | 3eqtr2d 2779 |
. . . . . . . . 9
β’ ((π΄ β π β§ π β β) β (-1β(π β 1)) = -(-1βπ)) |
67 | 66 | oveq1d 7421 |
. . . . . . . 8
β’ ((π΄ β π β§ π β β) β ((-1β(π β 1)) Β· ((π΄ β 1)βπ)) = (-(-1βπ) Β· ((π΄ β 1)βπ))) |
68 | 50 | mulm1d 11663 |
. . . . . . . . . . . . 13
β’ (π΄ β π β (-1 Β· (π΄ β 1)) = -(π΄ β 1)) |
69 | | negsubdi2 11516 |
. . . . . . . . . . . . . 14
β’ ((π΄ β β β§ 1 β
β) β -(π΄ β
1) = (1 β π΄)) |
70 | 13, 5, 69 | sylancl 587 |
. . . . . . . . . . . . 13
β’ (π΄ β π β -(π΄ β 1) = (1 β π΄)) |
71 | 68, 70 | eqtr2d 2774 |
. . . . . . . . . . . 12
β’ (π΄ β π β (1 β π΄) = (-1 Β· (π΄ β 1))) |
72 | 71 | oveq1d 7421 |
. . . . . . . . . . 11
β’ (π΄ β π β ((1 β π΄)βπ) = ((-1 Β· (π΄ β 1))βπ)) |
73 | 72 | adantr 482 |
. . . . . . . . . 10
β’ ((π΄ β π β§ π β β) β ((1 β π΄)βπ) = ((-1 Β· (π΄ β 1))βπ)) |
74 | | mulexp 14064 |
. . . . . . . . . . 11
β’ ((-1
β β β§ (π΄
β 1) β β β§ π β β0) β ((-1
Β· (π΄ β
1))βπ) =
((-1βπ) Β·
((π΄ β 1)βπ))) |
75 | 3, 50, 35, 74 | mp3an3an 1468 |
. . . . . . . . . 10
β’ ((π΄ β π β§ π β β) β ((-1 Β· (π΄ β 1))βπ) = ((-1βπ) Β· ((π΄ β 1)βπ))) |
76 | 73, 75 | eqtrd 2773 |
. . . . . . . . 9
β’ ((π΄ β π β§ π β β) β ((1 β π΄)βπ) = ((-1βπ) Β· ((π΄ β 1)βπ))) |
77 | 76 | negeqd 11451 |
. . . . . . . 8
β’ ((π΄ β π β§ π β β) β -((1 β π΄)βπ) = -((-1βπ) Β· ((π΄ β 1)βπ))) |
78 | 53, 67, 77 | 3eqtr4d 2783 |
. . . . . . 7
β’ ((π΄ β π β§ π β β) β ((-1β(π β 1)) Β· ((π΄ β 1)βπ)) = -((1 β π΄)βπ)) |
79 | 78 | oveq1d 7421 |
. . . . . 6
β’ ((π΄ β π β§ π β β) β (((-1β(π β 1)) Β· ((π΄ β 1)βπ)) / π) = (-((1 β π΄)βπ) / π)) |
80 | 44, 45, 79 | 3eqtr4d 2783 |
. . . . 5
β’ ((π΄ β π β§ π β β) β (-1 Β· (((1
β π΄)βπ) / π)) = (((-1β(π β 1)) Β· ((π΄ β 1)βπ)) / π)) |
81 | | nnm1nn0 12510 |
. . . . . . . 8
β’ (π β β β (π β 1) β
β0) |
82 | 81 | adantl 483 |
. . . . . . 7
β’ ((π΄ β π β§ π β β) β (π β 1) β
β0) |
83 | | expcl 14042 |
. . . . . . 7
β’ ((-1
β β β§ (π
β 1) β β0) β (-1β(π β 1)) β β) |
84 | 3, 82, 83 | sylancr 588 |
. . . . . 6
β’ ((π΄ β π β§ π β β) β (-1β(π β 1)) β
β) |
85 | 84, 52, 39, 41 | div23d 12024 |
. . . . 5
β’ ((π΄ β π β§ π β β) β (((-1β(π β 1)) Β· ((π΄ β 1)βπ)) / π) = (((-1β(π β 1)) / π) Β· ((π΄ β 1)βπ))) |
86 | 80, 85 | eqtr2d 2774 |
. . . 4
β’ ((π΄ β π β§ π β β) β (((-1β(π β 1)) / π) Β· ((π΄ β 1)βπ)) = (-1 Β· (((1 β π΄)βπ) / π))) |
87 | | oveq1 7413 |
. . . . . . . . 9
β’ (π = π β (π β 1) = (π β 1)) |
88 | 87 | oveq2d 7422 |
. . . . . . . 8
β’ (π = π β (-1β(π β 1)) = (-1β(π β 1))) |
89 | 88, 29 | oveq12d 7424 |
. . . . . . 7
β’ (π = π β ((-1β(π β 1)) / π) = ((-1β(π β 1)) / π)) |
90 | | oveq2 7414 |
. . . . . . 7
β’ (π = π β ((π΄ β 1)βπ) = ((π΄ β 1)βπ)) |
91 | 89, 90 | oveq12d 7424 |
. . . . . 6
β’ (π = π β (((-1β(π β 1)) / π) Β· ((π΄ β 1)βπ)) = (((-1β(π β 1)) / π) Β· ((π΄ β 1)βπ))) |
92 | | eqid 2733 |
. . . . . 6
β’ (π β β β¦
(((-1β(π β 1)) /
π) Β· ((π΄ β 1)βπ))) = (π β β β¦ (((-1β(π β 1)) / π) Β· ((π΄ β 1)βπ))) |
93 | | ovex 7439 |
. . . . . 6
β’
(((-1β(π
β 1)) / π) Β·
((π΄ β 1)βπ)) β V |
94 | 91, 92, 93 | fvmpt 6996 |
. . . . 5
β’ (π β β β ((π β β β¦
(((-1β(π β 1)) /
π) Β· ((π΄ β 1)βπ)))βπ) = (((-1β(π β 1)) / π) Β· ((π΄ β 1)βπ))) |
95 | 94 | adantl 483 |
. . . 4
β’ ((π΄ β π β§ π β β) β ((π β β β¦ (((-1β(π β 1)) / π) Β· ((π΄ β 1)βπ)))βπ) = (((-1β(π β 1)) / π) Β· ((π΄ β 1)βπ))) |
96 | 34 | oveq2d 7422 |
. . . 4
β’ ((π΄ β π β§ π β β) β (-1 Β· ((π β β β¦ (((1
β π΄)βπ) / π))βπ)) = (-1 Β· (((1 β π΄)βπ) / π))) |
97 | 86, 95, 96 | 3eqtr4d 2783 |
. . 3
β’ ((π΄ β π β§ π β β) β ((π β β β¦ (((-1β(π β 1)) / π) Β· ((π΄ β 1)βπ)))βπ) = (-1 Β· ((π β β β¦ (((1 β π΄)βπ) / π))βπ))) |
98 | 1, 2, 4, 27, 43, 97 | isermulc2 15601 |
. 2
β’ (π΄ β π β seq1( + , (π β β β¦ (((-1β(π β 1)) / π) Β· ((π΄ β 1)βπ)))) β (-1 Β· -(logβπ΄))) |
99 | 6 | dvlog2lem 26152 |
. . . . . . . 8
β’ π β (β β
(-β(,]0)) |
100 | 99 | sseli 3978 |
. . . . . . 7
β’ (π΄ β π β π΄ β (β β
(-β(,]0))) |
101 | | eqid 2733 |
. . . . . . . 8
β’ (β
β (-β(,]0)) = (β β (-β(,]0)) |
102 | 101 | logdmn0 26140 |
. . . . . . 7
β’ (π΄ β (β β
(-β(,]0)) β π΄
β 0) |
103 | 100, 102 | syl 17 |
. . . . . 6
β’ (π΄ β π β π΄ β 0) |
104 | 13, 103 | logcld 26071 |
. . . . 5
β’ (π΄ β π β (logβπ΄) β β) |
105 | 104 | negcld 11555 |
. . . 4
β’ (π΄ β π β -(logβπ΄) β β) |
106 | 105 | mulm1d 11663 |
. . 3
β’ (π΄ β π β (-1 Β· -(logβπ΄)) = --(logβπ΄)) |
107 | 104 | negnegd 11559 |
. . 3
β’ (π΄ β π β --(logβπ΄) = (logβπ΄)) |
108 | 106, 107 | eqtrd 2773 |
. 2
β’ (π΄ β π β (-1 Β· -(logβπ΄)) = (logβπ΄)) |
109 | 98, 108 | breqtrd 5174 |
1
β’ (π΄ β π β seq1( + , (π β β β¦ (((-1β(π β 1)) / π) Β· ((π΄ β 1)βπ)))) β (logβπ΄)) |