Step | Hyp | Ref
| Expression |
1 | | rge0ssre 13430 |
. . . . . . . 8
β’
(0[,)+β) β β |
2 | | ax-resscn 11164 |
. . . . . . . 8
β’ β
β β |
3 | 1, 2 | sstri 3991 |
. . . . . . 7
β’
(0[,)+β) β β |
4 | 3 | sseli 3978 |
. . . . . 6
β’ (π₯ β (0[,)+β) β
π₯ β
β) |
5 | | simpll 766 |
. . . . . . . . . . 11
β’ (((π΄ β β β§ π₯ β β) β§ Β¬
π₯ = 0) β π΄ β
β) |
6 | | 1cnd 11206 |
. . . . . . . . . . 11
β’ (((π΄ β β β§ π₯ β β) β§ Β¬
π₯ = 0) β 1 β
β) |
7 | | simplr 768 |
. . . . . . . . . . 11
β’ (((π΄ β β β§ π₯ β β) β§ Β¬
π₯ = 0) β π₯ β
β) |
8 | | ax-1ne0 11176 |
. . . . . . . . . . . 12
β’ 1 β
0 |
9 | 8 | a1i 11 |
. . . . . . . . . . 11
β’ (((π΄ β β β§ π₯ β β) β§ Β¬
π₯ = 0) β 1 β
0) |
10 | | simpr 486 |
. . . . . . . . . . . 12
β’ (((π΄ β β β§ π₯ β β) β§ Β¬
π₯ = 0) β Β¬ π₯ = 0) |
11 | 10 | neqned 2948 |
. . . . . . . . . . 11
β’ (((π΄ β β β§ π₯ β β) β§ Β¬
π₯ = 0) β π₯ β 0) |
12 | 5, 6, 7, 9, 11 | divdiv2d 12019 |
. . . . . . . . . 10
β’ (((π΄ β β β§ π₯ β β) β§ Β¬
π₯ = 0) β (π΄ / (1 / π₯)) = ((π΄ Β· π₯) / 1)) |
13 | | mulcl 11191 |
. . . . . . . . . . . 12
β’ ((π΄ β β β§ π₯ β β) β (π΄ Β· π₯) β β) |
14 | 13 | adantr 482 |
. . . . . . . . . . 11
β’ (((π΄ β β β§ π₯ β β) β§ Β¬
π₯ = 0) β (π΄ Β· π₯) β β) |
15 | 14 | div1d 11979 |
. . . . . . . . . 10
β’ (((π΄ β β β§ π₯ β β) β§ Β¬
π₯ = 0) β ((π΄ Β· π₯) / 1) = (π΄ Β· π₯)) |
16 | 12, 15 | eqtrd 2773 |
. . . . . . . . 9
β’ (((π΄ β β β§ π₯ β β) β§ Β¬
π₯ = 0) β (π΄ / (1 / π₯)) = (π΄ Β· π₯)) |
17 | 16 | oveq2d 7422 |
. . . . . . . 8
β’ (((π΄ β β β§ π₯ β β) β§ Β¬
π₯ = 0) β (1 + (π΄ / (1 / π₯))) = (1 + (π΄ Β· π₯))) |
18 | 17 | oveq1d 7421 |
. . . . . . 7
β’ (((π΄ β β β§ π₯ β β) β§ Β¬
π₯ = 0) β ((1 + (π΄ / (1 / π₯)))βπ(1 / π₯)) = ((1 + (π΄ Β· π₯))βπ(1 / π₯))) |
19 | 18 | ifeq2da 4560 |
. . . . . 6
β’ ((π΄ β β β§ π₯ β β) β if(π₯ = 0, (expβπ΄), ((1 + (π΄ / (1 / π₯)))βπ(1 / π₯))) = if(π₯ = 0, (expβπ΄), ((1 + (π΄ Β· π₯))βπ(1 / π₯)))) |
20 | 4, 19 | sylan2 594 |
. . . . 5
β’ ((π΄ β β β§ π₯ β (0[,)+β)) β
if(π₯ = 0, (expβπ΄), ((1 + (π΄ / (1 / π₯)))βπ(1 / π₯))) = if(π₯ = 0, (expβπ΄), ((1 + (π΄ Β· π₯))βπ(1 / π₯)))) |
21 | 20 | mpteq2dva 5248 |
. . . 4
β’ (π΄ β β β (π₯ β (0[,)+β) β¦
if(π₯ = 0, (expβπ΄), ((1 + (π΄ / (1 / π₯)))βπ(1 / π₯)))) = (π₯ β (0[,)+β) β¦ if(π₯ = 0, (expβπ΄), ((1 + (π΄ Β· π₯))βπ(1 / π₯))))) |
22 | | resmpt 6036 |
. . . . 5
β’
((0[,)+β) β β β ((π₯ β β β¦ if(π₯ = 0, (expβπ΄), ((1 + (π΄ Β· π₯))βπ(1 / π₯)))) βΎ (0[,)+β)) =
(π₯ β (0[,)+β)
β¦ if(π₯ = 0,
(expβπ΄), ((1 + (π΄ Β· π₯))βπ(1 / π₯))))) |
23 | 3, 22 | ax-mp 5 |
. . . 4
β’ ((π₯ β β β¦ if(π₯ = 0, (expβπ΄), ((1 + (π΄ Β· π₯))βπ(1 / π₯)))) βΎ (0[,)+β)) =
(π₯ β (0[,)+β)
β¦ if(π₯ = 0,
(expβπ΄), ((1 + (π΄ Β· π₯))βπ(1 / π₯)))) |
24 | 21, 23 | eqtr4di 2791 |
. . 3
β’ (π΄ β β β (π₯ β (0[,)+β) β¦
if(π₯ = 0, (expβπ΄), ((1 + (π΄ / (1 / π₯)))βπ(1 / π₯)))) = ((π₯ β β β¦ if(π₯ = 0, (expβπ΄), ((1 + (π΄ Β· π₯))βπ(1 / π₯)))) βΎ
(0[,)+β))) |
25 | | 0e0icopnf 13432 |
. . . . 5
β’ 0 β
(0[,)+β) |
26 | 25 | a1i 11 |
. . . 4
β’ (π΄ β β β 0 β
(0[,)+β)) |
27 | | eqeq2 2745 |
. . . . . . . . 9
β’
((expβ(π΄
Β· 1)) = if((π΄
Β· π₯) = 0,
(expβ(π΄ Β· 1)),
(expβ(π΄ Β·
((logβ(1 + (π΄
Β· π₯))) / (π΄ Β· π₯))))) β (if(π₯ = 0, (expβπ΄), ((1 + (π΄ Β· π₯))βπ(1 / π₯))) = (expβ(π΄ Β· 1)) β if(π₯ = 0, (expβπ΄), ((1 + (π΄ Β· π₯))βπ(1 / π₯))) = if((π΄ Β· π₯) = 0, (expβ(π΄ Β· 1)), (expβ(π΄ Β· ((logβ(1 + (π΄ Β· π₯))) / (π΄ Β· π₯))))))) |
28 | | eqeq2 2745 |
. . . . . . . . 9
β’
((expβ(π΄
Β· ((logβ(1 + (π΄ Β· π₯))) / (π΄ Β· π₯)))) = if((π΄ Β· π₯) = 0, (expβ(π΄ Β· 1)), (expβ(π΄ Β· ((logβ(1 + (π΄ Β· π₯))) / (π΄ Β· π₯))))) β (if(π₯ = 0, (expβπ΄), ((1 + (π΄ Β· π₯))βπ(1 / π₯))) = (expβ(π΄ Β· ((logβ(1 +
(π΄ Β· π₯))) / (π΄ Β· π₯)))) β if(π₯ = 0, (expβπ΄), ((1 + (π΄ Β· π₯))βπ(1 / π₯))) = if((π΄ Β· π₯) = 0, (expβ(π΄ Β· 1)), (expβ(π΄ Β· ((logβ(1 + (π΄ Β· π₯))) / (π΄ Β· π₯))))))) |
29 | | efrlim.1 |
. . . . . . . . . . . . . 14
β’ π = (0(ballβ(abs β
β ))(1 / ((absβπ΄) + 1))) |
30 | | cnxmet 24281 |
. . . . . . . . . . . . . . 15
β’ (abs
β β ) β (βMetββ) |
31 | | 0cnd 11204 |
. . . . . . . . . . . . . . 15
β’ (π΄ β β β 0 β
β) |
32 | | abscl 15222 |
. . . . . . . . . . . . . . . . . . 19
β’ (π΄ β β β
(absβπ΄) β
β) |
33 | | peano2re 11384 |
. . . . . . . . . . . . . . . . . . 19
β’
((absβπ΄)
β β β ((absβπ΄) + 1) β β) |
34 | 32, 33 | syl 17 |
. . . . . . . . . . . . . . . . . 18
β’ (π΄ β β β
((absβπ΄) + 1) β
β) |
35 | | 0red 11214 |
. . . . . . . . . . . . . . . . . . 19
β’ (π΄ β β β 0 β
β) |
36 | | absge0 15231 |
. . . . . . . . . . . . . . . . . . 19
β’ (π΄ β β β 0 β€
(absβπ΄)) |
37 | 32 | ltp1d 12141 |
. . . . . . . . . . . . . . . . . . 19
β’ (π΄ β β β
(absβπ΄) <
((absβπ΄) +
1)) |
38 | 35, 32, 34, 36, 37 | lelttrd 11369 |
. . . . . . . . . . . . . . . . . 18
β’ (π΄ β β β 0 <
((absβπ΄) +
1)) |
39 | 34, 38 | elrpd 13010 |
. . . . . . . . . . . . . . . . 17
β’ (π΄ β β β
((absβπ΄) + 1) β
β+) |
40 | 39 | rpreccld 13023 |
. . . . . . . . . . . . . . . 16
β’ (π΄ β β β (1 /
((absβπ΄) + 1)) β
β+) |
41 | 40 | rpxrd 13014 |
. . . . . . . . . . . . . . 15
β’ (π΄ β β β (1 /
((absβπ΄) + 1)) β
β*) |
42 | | blssm 23916 |
. . . . . . . . . . . . . . 15
β’ (((abs
β β ) β (βMetββ) β§ 0 β β
β§ (1 / ((absβπ΄) +
1)) β β*) β (0(ballβ(abs β β ))(1
/ ((absβπ΄) + 1)))
β β) |
43 | 30, 31, 41, 42 | mp3an2i 1467 |
. . . . . . . . . . . . . 14
β’ (π΄ β β β
(0(ballβ(abs β β ))(1 / ((absβπ΄) + 1))) β β) |
44 | 29, 43 | eqsstrid 4030 |
. . . . . . . . . . . . 13
β’ (π΄ β β β π β
β) |
45 | 44 | sselda 3982 |
. . . . . . . . . . . 12
β’ ((π΄ β β β§ π₯ β π) β π₯ β β) |
46 | | mul0or 11851 |
. . . . . . . . . . . 12
β’ ((π΄ β β β§ π₯ β β) β ((π΄ Β· π₯) = 0 β (π΄ = 0 β¨ π₯ = 0))) |
47 | 45, 46 | syldan 592 |
. . . . . . . . . . 11
β’ ((π΄ β β β§ π₯ β π) β ((π΄ Β· π₯) = 0 β (π΄ = 0 β¨ π₯ = 0))) |
48 | 47 | biimpa 478 |
. . . . . . . . . 10
β’ (((π΄ β β β§ π₯ β π) β§ (π΄ Β· π₯) = 0) β (π΄ = 0 β¨ π₯ = 0)) |
49 | 7, 11 | reccld 11980 |
. . . . . . . . . . . . . . . . . 18
β’ (((π΄ β β β§ π₯ β β) β§ Β¬
π₯ = 0) β (1 / π₯) β
β) |
50 | 45, 49 | syldanl 603 |
. . . . . . . . . . . . . . . . 17
β’ (((π΄ β β β§ π₯ β π) β§ Β¬ π₯ = 0) β (1 / π₯) β β) |
51 | 50 | adantlr 714 |
. . . . . . . . . . . . . . . 16
β’ ((((π΄ β β β§ π₯ β π) β§ π΄ = 0) β§ Β¬ π₯ = 0) β (1 / π₯) β β) |
52 | 51 | 1cxpd 26207 |
. . . . . . . . . . . . . . 15
β’ ((((π΄ β β β§ π₯ β π) β§ π΄ = 0) β§ Β¬ π₯ = 0) β (1βπ(1 /
π₯)) = 1) |
53 | | simplr 768 |
. . . . . . . . . . . . . . . . . . . 20
β’ ((((π΄ β β β§ π₯ β π) β§ π΄ = 0) β§ Β¬ π₯ = 0) β π΄ = 0) |
54 | 53 | oveq1d 7421 |
. . . . . . . . . . . . . . . . . . 19
β’ ((((π΄ β β β§ π₯ β π) β§ π΄ = 0) β§ Β¬ π₯ = 0) β (π΄ Β· π₯) = (0 Β· π₯)) |
55 | 45 | ad2antrr 725 |
. . . . . . . . . . . . . . . . . . . 20
β’ ((((π΄ β β β§ π₯ β π) β§ π΄ = 0) β§ Β¬ π₯ = 0) β π₯ β β) |
56 | 55 | mul02d 11409 |
. . . . . . . . . . . . . . . . . . 19
β’ ((((π΄ β β β§ π₯ β π) β§ π΄ = 0) β§ Β¬ π₯ = 0) β (0 Β· π₯) = 0) |
57 | 54, 56 | eqtrd 2773 |
. . . . . . . . . . . . . . . . . 18
β’ ((((π΄ β β β§ π₯ β π) β§ π΄ = 0) β§ Β¬ π₯ = 0) β (π΄ Β· π₯) = 0) |
58 | 57 | oveq2d 7422 |
. . . . . . . . . . . . . . . . 17
β’ ((((π΄ β β β§ π₯ β π) β§ π΄ = 0) β§ Β¬ π₯ = 0) β (1 + (π΄ Β· π₯)) = (1 + 0)) |
59 | | 1p0e1 12333 |
. . . . . . . . . . . . . . . . 17
β’ (1 + 0) =
1 |
60 | 58, 59 | eqtrdi 2789 |
. . . . . . . . . . . . . . . 16
β’ ((((π΄ β β β§ π₯ β π) β§ π΄ = 0) β§ Β¬ π₯ = 0) β (1 + (π΄ Β· π₯)) = 1) |
61 | 60 | oveq1d 7421 |
. . . . . . . . . . . . . . 15
β’ ((((π΄ β β β§ π₯ β π) β§ π΄ = 0) β§ Β¬ π₯ = 0) β ((1 + (π΄ Β· π₯))βπ(1 / π₯)) =
(1βπ(1 / π₯))) |
62 | 53 | fveq2d 6893 |
. . . . . . . . . . . . . . . 16
β’ ((((π΄ β β β§ π₯ β π) β§ π΄ = 0) β§ Β¬ π₯ = 0) β (expβπ΄) = (expβ0)) |
63 | | ef0 16031 |
. . . . . . . . . . . . . . . 16
β’
(expβ0) = 1 |
64 | 62, 63 | eqtrdi 2789 |
. . . . . . . . . . . . . . 15
β’ ((((π΄ β β β§ π₯ β π) β§ π΄ = 0) β§ Β¬ π₯ = 0) β (expβπ΄) = 1) |
65 | 52, 61, 64 | 3eqtr4d 2783 |
. . . . . . . . . . . . . 14
β’ ((((π΄ β β β§ π₯ β π) β§ π΄ = 0) β§ Β¬ π₯ = 0) β ((1 + (π΄ Β· π₯))βπ(1 / π₯)) = (expβπ΄)) |
66 | 65 | ifeq2da 4560 |
. . . . . . . . . . . . 13
β’ (((π΄ β β β§ π₯ β π) β§ π΄ = 0) β if(π₯ = 0, (expβπ΄), ((1 + (π΄ Β· π₯))βπ(1 / π₯))) = if(π₯ = 0, (expβπ΄), (expβπ΄))) |
67 | | ifid 4568 |
. . . . . . . . . . . . 13
β’ if(π₯ = 0, (expβπ΄), (expβπ΄)) = (expβπ΄) |
68 | 66, 67 | eqtrdi 2789 |
. . . . . . . . . . . 12
β’ (((π΄ β β β§ π₯ β π) β§ π΄ = 0) β if(π₯ = 0, (expβπ΄), ((1 + (π΄ Β· π₯))βπ(1 / π₯))) = (expβπ΄)) |
69 | | iftrue 4534 |
. . . . . . . . . . . . 13
β’ (π₯ = 0 β if(π₯ = 0, (expβπ΄), ((1 + (π΄ Β· π₯))βπ(1 / π₯))) = (expβπ΄)) |
70 | 69 | adantl 483 |
. . . . . . . . . . . 12
β’ (((π΄ β β β§ π₯ β π) β§ π₯ = 0) β if(π₯ = 0, (expβπ΄), ((1 + (π΄ Β· π₯))βπ(1 / π₯))) = (expβπ΄)) |
71 | 68, 70 | jaodan 957 |
. . . . . . . . . . 11
β’ (((π΄ β β β§ π₯ β π) β§ (π΄ = 0 β¨ π₯ = 0)) β if(π₯ = 0, (expβπ΄), ((1 + (π΄ Β· π₯))βπ(1 / π₯))) = (expβπ΄)) |
72 | | mulrid 11209 |
. . . . . . . . . . . . 13
β’ (π΄ β β β (π΄ Β· 1) = π΄) |
73 | 72 | ad2antrr 725 |
. . . . . . . . . . . 12
β’ (((π΄ β β β§ π₯ β π) β§ (π΄ = 0 β¨ π₯ = 0)) β (π΄ Β· 1) = π΄) |
74 | 73 | fveq2d 6893 |
. . . . . . . . . . 11
β’ (((π΄ β β β§ π₯ β π) β§ (π΄ = 0 β¨ π₯ = 0)) β (expβ(π΄ Β· 1)) = (expβπ΄)) |
75 | 71, 74 | eqtr4d 2776 |
. . . . . . . . . 10
β’ (((π΄ β β β§ π₯ β π) β§ (π΄ = 0 β¨ π₯ = 0)) β if(π₯ = 0, (expβπ΄), ((1 + (π΄ Β· π₯))βπ(1 / π₯))) = (expβ(π΄ Β· 1))) |
76 | 48, 75 | syldan 592 |
. . . . . . . . 9
β’ (((π΄ β β β§ π₯ β π) β§ (π΄ Β· π₯) = 0) β if(π₯ = 0, (expβπ΄), ((1 + (π΄ Β· π₯))βπ(1 / π₯))) = (expβ(π΄ Β· 1))) |
77 | | mulne0b 11852 |
. . . . . . . . . . . . 13
β’ ((π΄ β β β§ π₯ β β) β ((π΄ β 0 β§ π₯ β 0) β (π΄ Β· π₯) β 0)) |
78 | 45, 77 | syldan 592 |
. . . . . . . . . . . 12
β’ ((π΄ β β β§ π₯ β π) β ((π΄ β 0 β§ π₯ β 0) β (π΄ Β· π₯) β 0)) |
79 | | df-ne 2942 |
. . . . . . . . . . . 12
β’ ((π΄ Β· π₯) β 0 β Β¬ (π΄ Β· π₯) = 0) |
80 | 78, 79 | bitrdi 287 |
. . . . . . . . . . 11
β’ ((π΄ β β β§ π₯ β π) β ((π΄ β 0 β§ π₯ β 0) β Β¬ (π΄ Β· π₯) = 0)) |
81 | | simprr 772 |
. . . . . . . . . . . . . . 15
β’ (((π΄ β β β§ π₯ β π) β§ (π΄ β 0 β§ π₯ β 0)) β π₯ β 0) |
82 | 81 | neneqd 2946 |
. . . . . . . . . . . . . 14
β’ (((π΄ β β β§ π₯ β π) β§ (π΄ β 0 β§ π₯ β 0)) β Β¬ π₯ = 0) |
83 | 82 | iffalsed 4539 |
. . . . . . . . . . . . 13
β’ (((π΄ β β β§ π₯ β π) β§ (π΄ β 0 β§ π₯ β 0)) β if(π₯ = 0, (expβπ΄), ((1 + (π΄ Β· π₯))βπ(1 / π₯))) = ((1 + (π΄ Β· π₯))βπ(1 / π₯))) |
84 | | ax-1cn 11165 |
. . . . . . . . . . . . . . . 16
β’ 1 β
β |
85 | 45, 13 | syldan 592 |
. . . . . . . . . . . . . . . 16
β’ ((π΄ β β β§ π₯ β π) β (π΄ Β· π₯) β β) |
86 | | addcl 11189 |
. . . . . . . . . . . . . . . 16
β’ ((1
β β β§ (π΄
Β· π₯) β β)
β (1 + (π΄ Β·
π₯)) β
β) |
87 | 84, 85, 86 | sylancr 588 |
. . . . . . . . . . . . . . 15
β’ ((π΄ β β β§ π₯ β π) β (1 + (π΄ Β· π₯)) β β) |
88 | 87 | adantr 482 |
. . . . . . . . . . . . . 14
β’ (((π΄ β β β§ π₯ β π) β§ (π΄ β 0 β§ π₯ β 0)) β (1 + (π΄ Β· π₯)) β β) |
89 | | eqid 2733 |
. . . . . . . . . . . . . . . . . . 19
β’
(1(ballβ(abs β β ))1) = (1(ballβ(abs β
β ))1) |
90 | 89 | dvlog2lem 26152 |
. . . . . . . . . . . . . . . . . 18
β’
(1(ballβ(abs β β ))1) β (β β
(-β(,]0)) |
91 | | eqid 2733 |
. . . . . . . . . . . . . . . . . . 19
β’ (β
β (-β(,]0)) = (β β (-β(,]0)) |
92 | 91 | logdmss 26142 |
. . . . . . . . . . . . . . . . . 18
β’ (β
β (-β(,]0)) β (β β {0}) |
93 | 90, 92 | sstri 3991 |
. . . . . . . . . . . . . . . . 17
β’
(1(ballβ(abs β β ))1) β (β β
{0}) |
94 | | eqid 2733 |
. . . . . . . . . . . . . . . . . . . . . 22
β’ (abs
β β ) = (abs β β ) |
95 | 94 | cnmetdval 24279 |
. . . . . . . . . . . . . . . . . . . . 21
β’ (((1 +
(π΄ Β· π₯)) β β β§ 1 β
β) β ((1 + (π΄
Β· π₯))(abs β
β )1) = (absβ((1 + (π΄ Β· π₯)) β 1))) |
96 | 87, 84, 95 | sylancl 587 |
. . . . . . . . . . . . . . . . . . . 20
β’ ((π΄ β β β§ π₯ β π) β ((1 + (π΄ Β· π₯))(abs β β )1) = (absβ((1 +
(π΄ Β· π₯)) β 1))) |
97 | | pncan2 11464 |
. . . . . . . . . . . . . . . . . . . . . 22
β’ ((1
β β β§ (π΄
Β· π₯) β β)
β ((1 + (π΄ Β·
π₯)) β 1) = (π΄ Β· π₯)) |
98 | 84, 85, 97 | sylancr 588 |
. . . . . . . . . . . . . . . . . . . . 21
β’ ((π΄ β β β§ π₯ β π) β ((1 + (π΄ Β· π₯)) β 1) = (π΄ Β· π₯)) |
99 | 98 | fveq2d 6893 |
. . . . . . . . . . . . . . . . . . . 20
β’ ((π΄ β β β§ π₯ β π) β (absβ((1 + (π΄ Β· π₯)) β 1)) = (absβ(π΄ Β· π₯))) |
100 | 96, 99 | eqtrd 2773 |
. . . . . . . . . . . . . . . . . . 19
β’ ((π΄ β β β§ π₯ β π) β ((1 + (π΄ Β· π₯))(abs β β )1) =
(absβ(π΄ Β·
π₯))) |
101 | 85 | abscld 15380 |
. . . . . . . . . . . . . . . . . . . 20
β’ ((π΄ β β β§ π₯ β π) β (absβ(π΄ Β· π₯)) β β) |
102 | 34 | adantr 482 |
. . . . . . . . . . . . . . . . . . . . 21
β’ ((π΄ β β β§ π₯ β π) β ((absβπ΄) + 1) β β) |
103 | 45 | abscld 15380 |
. . . . . . . . . . . . . . . . . . . . 21
β’ ((π΄ β β β§ π₯ β π) β (absβπ₯) β β) |
104 | 102, 103 | remulcld 11241 |
. . . . . . . . . . . . . . . . . . . 20
β’ ((π΄ β β β§ π₯ β π) β (((absβπ΄) + 1) Β· (absβπ₯)) β
β) |
105 | | 1red 11212 |
. . . . . . . . . . . . . . . . . . . 20
β’ ((π΄ β β β§ π₯ β π) β 1 β β) |
106 | | absmul 15238 |
. . . . . . . . . . . . . . . . . . . . . 22
β’ ((π΄ β β β§ π₯ β β) β
(absβ(π΄ Β·
π₯)) = ((absβπ΄) Β· (absβπ₯))) |
107 | 45, 106 | syldan 592 |
. . . . . . . . . . . . . . . . . . . . 21
β’ ((π΄ β β β§ π₯ β π) β (absβ(π΄ Β· π₯)) = ((absβπ΄) Β· (absβπ₯))) |
108 | 32 | adantr 482 |
. . . . . . . . . . . . . . . . . . . . . 22
β’ ((π΄ β β β§ π₯ β π) β (absβπ΄) β β) |
109 | 108, 33 | syl 17 |
. . . . . . . . . . . . . . . . . . . . . 22
β’ ((π΄ β β β§ π₯ β π) β ((absβπ΄) + 1) β β) |
110 | 45 | absge0d 15388 |
. . . . . . . . . . . . . . . . . . . . . 22
β’ ((π΄ β β β§ π₯ β π) β 0 β€ (absβπ₯)) |
111 | 108 | lep1d 12142 |
. . . . . . . . . . . . . . . . . . . . . 22
β’ ((π΄ β β β§ π₯ β π) β (absβπ΄) β€ ((absβπ΄) + 1)) |
112 | 108, 109,
103, 110, 111 | lemul1ad 12150 |
. . . . . . . . . . . . . . . . . . . . 21
β’ ((π΄ β β β§ π₯ β π) β ((absβπ΄) Β· (absβπ₯)) β€ (((absβπ΄) + 1) Β· (absβπ₯))) |
113 | 107, 112 | eqbrtrd 5170 |
. . . . . . . . . . . . . . . . . . . 20
β’ ((π΄ β β β§ π₯ β π) β (absβ(π΄ Β· π₯)) β€ (((absβπ΄) + 1) Β· (absβπ₯))) |
114 | | 0cn 11203 |
. . . . . . . . . . . . . . . . . . . . . . . 24
β’ 0 β
β |
115 | 94 | cnmetdval 24279 |
. . . . . . . . . . . . . . . . . . . . . . . 24
β’ ((π₯ β β β§ 0 β
β) β (π₯(abs
β β )0) = (absβ(π₯ β 0))) |
116 | 45, 114, 115 | sylancl 587 |
. . . . . . . . . . . . . . . . . . . . . . 23
β’ ((π΄ β β β§ π₯ β π) β (π₯(abs β β )0) = (absβ(π₯ β 0))) |
117 | 45 | subid1d 11557 |
. . . . . . . . . . . . . . . . . . . . . . . 24
β’ ((π΄ β β β§ π₯ β π) β (π₯ β 0) = π₯) |
118 | 117 | fveq2d 6893 |
. . . . . . . . . . . . . . . . . . . . . . 23
β’ ((π΄ β β β§ π₯ β π) β (absβ(π₯ β 0)) = (absβπ₯)) |
119 | 116, 118 | eqtrd 2773 |
. . . . . . . . . . . . . . . . . . . . . 22
β’ ((π΄ β β β§ π₯ β π) β (π₯(abs β β )0) = (absβπ₯)) |
120 | | simpr 486 |
. . . . . . . . . . . . . . . . . . . . . . . 24
β’ ((π΄ β β β§ π₯ β π) β π₯ β π) |
121 | 120, 29 | eleqtrdi 2844 |
. . . . . . . . . . . . . . . . . . . . . . 23
β’ ((π΄ β β β§ π₯ β π) β π₯ β (0(ballβ(abs β β
))(1 / ((absβπ΄) +
1)))) |
122 | 30 | a1i 11 |
. . . . . . . . . . . . . . . . . . . . . . . 24
β’ ((π΄ β β β§ π₯ β π) β (abs β β ) β
(βMetββ)) |
123 | 41 | adantr 482 |
. . . . . . . . . . . . . . . . . . . . . . . 24
β’ ((π΄ β β β§ π₯ β π) β (1 / ((absβπ΄) + 1)) β
β*) |
124 | | 0cnd 11204 |
. . . . . . . . . . . . . . . . . . . . . . . 24
β’ ((π΄ β β β§ π₯ β π) β 0 β β) |
125 | | elbl3 23890 |
. . . . . . . . . . . . . . . . . . . . . . . 24
β’ ((((abs
β β ) β (βMetββ) β§ (1 /
((absβπ΄) + 1)) β
β*) β§ (0 β β β§ π₯ β β)) β (π₯ β (0(ballβ(abs β β
))(1 / ((absβπ΄) +
1))) β (π₯(abs β
β )0) < (1 / ((absβπ΄) + 1)))) |
126 | 122, 123,
124, 45, 125 | syl22anc 838 |
. . . . . . . . . . . . . . . . . . . . . . 23
β’ ((π΄ β β β§ π₯ β π) β (π₯ β (0(ballβ(abs β β
))(1 / ((absβπ΄) +
1))) β (π₯(abs β
β )0) < (1 / ((absβπ΄) + 1)))) |
127 | 121, 126 | mpbid 231 |
. . . . . . . . . . . . . . . . . . . . . 22
β’ ((π΄ β β β§ π₯ β π) β (π₯(abs β β )0) < (1 /
((absβπ΄) +
1))) |
128 | 119, 127 | eqbrtrrd 5172 |
. . . . . . . . . . . . . . . . . . . . 21
β’ ((π΄ β β β§ π₯ β π) β (absβπ₯) < (1 / ((absβπ΄) + 1))) |
129 | 38 | adantr 482 |
. . . . . . . . . . . . . . . . . . . . . 22
β’ ((π΄ β β β§ π₯ β π) β 0 < ((absβπ΄) + 1)) |
130 | | ltmuldiv2 12085 |
. . . . . . . . . . . . . . . . . . . . . 22
β’
(((absβπ₯)
β β β§ 1 β β β§ (((absβπ΄) + 1) β β β§ 0 <
((absβπ΄) + 1)))
β ((((absβπ΄) +
1) Β· (absβπ₯))
< 1 β (absβπ₯)
< (1 / ((absβπ΄) +
1)))) |
131 | 103, 105,
109, 129, 130 | syl112anc 1375 |
. . . . . . . . . . . . . . . . . . . . 21
β’ ((π΄ β β β§ π₯ β π) β ((((absβπ΄) + 1) Β· (absβπ₯)) < 1 β
(absβπ₯) < (1 /
((absβπ΄) +
1)))) |
132 | 128, 131 | mpbird 257 |
. . . . . . . . . . . . . . . . . . . 20
β’ ((π΄ β β β§ π₯ β π) β (((absβπ΄) + 1) Β· (absβπ₯)) < 1) |
133 | 101, 104,
105, 113, 132 | lelttrd 11369 |
. . . . . . . . . . . . . . . . . . 19
β’ ((π΄ β β β§ π₯ β π) β (absβ(π΄ Β· π₯)) < 1) |
134 | 100, 133 | eqbrtrd 5170 |
. . . . . . . . . . . . . . . . . 18
β’ ((π΄ β β β§ π₯ β π) β ((1 + (π΄ Β· π₯))(abs β β )1) <
1) |
135 | | 1rp 12975 |
. . . . . . . . . . . . . . . . . . . 20
β’ 1 β
β+ |
136 | | rpxr 12980 |
. . . . . . . . . . . . . . . . . . . 20
β’ (1 β
β+ β 1 β β*) |
137 | 135, 136 | mp1i 13 |
. . . . . . . . . . . . . . . . . . 19
β’ ((π΄ β β β§ π₯ β π) β 1 β
β*) |
138 | | 1cnd 11206 |
. . . . . . . . . . . . . . . . . . 19
β’ ((π΄ β β β§ π₯ β π) β 1 β β) |
139 | | elbl3 23890 |
. . . . . . . . . . . . . . . . . . 19
β’ ((((abs
β β ) β (βMetββ) β§ 1 β
β*) β§ (1 β β β§ (1 + (π΄ Β· π₯)) β β)) β ((1 + (π΄ Β· π₯)) β (1(ballβ(abs β β
))1) β ((1 + (π΄
Β· π₯))(abs β
β )1) < 1)) |
140 | 122, 137,
138, 87, 139 | syl22anc 838 |
. . . . . . . . . . . . . . . . . 18
β’ ((π΄ β β β§ π₯ β π) β ((1 + (π΄ Β· π₯)) β (1(ballβ(abs β β
))1) β ((1 + (π΄
Β· π₯))(abs β
β )1) < 1)) |
141 | 134, 140 | mpbird 257 |
. . . . . . . . . . . . . . . . 17
β’ ((π΄ β β β§ π₯ β π) β (1 + (π΄ Β· π₯)) β (1(ballβ(abs β β
))1)) |
142 | 93, 141 | sselid 3980 |
. . . . . . . . . . . . . . . 16
β’ ((π΄ β β β§ π₯ β π) β (1 + (π΄ Β· π₯)) β (β β
{0})) |
143 | | eldifsni 4793 |
. . . . . . . . . . . . . . . 16
β’ ((1 +
(π΄ Β· π₯)) β (β β {0})
β (1 + (π΄ Β·
π₯)) β
0) |
144 | 142, 143 | syl 17 |
. . . . . . . . . . . . . . 15
β’ ((π΄ β β β§ π₯ β π) β (1 + (π΄ Β· π₯)) β 0) |
145 | 144 | adantr 482 |
. . . . . . . . . . . . . 14
β’ (((π΄ β β β§ π₯ β π) β§ (π΄ β 0 β§ π₯ β 0)) β (1 + (π΄ Β· π₯)) β 0) |
146 | 45 | adantr 482 |
. . . . . . . . . . . . . . 15
β’ (((π΄ β β β§ π₯ β π) β§ (π΄ β 0 β§ π₯ β 0)) β π₯ β β) |
147 | 146, 81 | reccld 11980 |
. . . . . . . . . . . . . 14
β’ (((π΄ β β β§ π₯ β π) β§ (π΄ β 0 β§ π₯ β 0)) β (1 / π₯) β β) |
148 | 88, 145, 147 | cxpefd 26212 |
. . . . . . . . . . . . 13
β’ (((π΄ β β β§ π₯ β π) β§ (π΄ β 0 β§ π₯ β 0)) β ((1 + (π΄ Β· π₯))βπ(1 / π₯)) = (expβ((1 / π₯) Β· (logβ(1 +
(π΄ Β· π₯)))))) |
149 | 87, 144 | logcld 26071 |
. . . . . . . . . . . . . . . . 17
β’ ((π΄ β β β§ π₯ β π) β (logβ(1 + (π΄ Β· π₯))) β β) |
150 | 149 | adantr 482 |
. . . . . . . . . . . . . . . 16
β’ (((π΄ β β β§ π₯ β π) β§ (π΄ β 0 β§ π₯ β 0)) β (logβ(1 + (π΄ Β· π₯))) β β) |
151 | 147, 150 | mulcomd 11232 |
. . . . . . . . . . . . . . 15
β’ (((π΄ β β β§ π₯ β π) β§ (π΄ β 0 β§ π₯ β 0)) β ((1 / π₯) Β· (logβ(1 + (π΄ Β· π₯)))) = ((logβ(1 + (π΄ Β· π₯))) Β· (1 / π₯))) |
152 | | simpll 766 |
. . . . . . . . . . . . . . . . . . 19
β’ (((π΄ β β β§ π₯ β π) β§ (π΄ β 0 β§ π₯ β 0)) β π΄ β β) |
153 | | simprl 770 |
. . . . . . . . . . . . . . . . . . 19
β’ (((π΄ β β β§ π₯ β π) β§ (π΄ β 0 β§ π₯ β 0)) β π΄ β 0) |
154 | 152, 153 | dividd 11985 |
. . . . . . . . . . . . . . . . . 18
β’ (((π΄ β β β§ π₯ β π) β§ (π΄ β 0 β§ π₯ β 0)) β (π΄ / π΄) = 1) |
155 | 154 | oveq1d 7421 |
. . . . . . . . . . . . . . . . 17
β’ (((π΄ β β β§ π₯ β π) β§ (π΄ β 0 β§ π₯ β 0)) β ((π΄ / π΄) / π₯) = (1 / π₯)) |
156 | 152, 152,
146, 153, 81 | divdiv1d 12018 |
. . . . . . . . . . . . . . . . 17
β’ (((π΄ β β β§ π₯ β π) β§ (π΄ β 0 β§ π₯ β 0)) β ((π΄ / π΄) / π₯) = (π΄ / (π΄ Β· π₯))) |
157 | 155, 156 | eqtr3d 2775 |
. . . . . . . . . . . . . . . 16
β’ (((π΄ β β β§ π₯ β π) β§ (π΄ β 0 β§ π₯ β 0)) β (1 / π₯) = (π΄ / (π΄ Β· π₯))) |
158 | 157 | oveq2d 7422 |
. . . . . . . . . . . . . . 15
β’ (((π΄ β β β§ π₯ β π) β§ (π΄ β 0 β§ π₯ β 0)) β ((logβ(1 + (π΄ Β· π₯))) Β· (1 / π₯)) = ((logβ(1 + (π΄ Β· π₯))) Β· (π΄ / (π΄ Β· π₯)))) |
159 | 85 | adantr 482 |
. . . . . . . . . . . . . . . 16
β’ (((π΄ β β β§ π₯ β π) β§ (π΄ β 0 β§ π₯ β 0)) β (π΄ Β· π₯) β β) |
160 | 78 | biimpa 478 |
. . . . . . . . . . . . . . . 16
β’ (((π΄ β β β§ π₯ β π) β§ (π΄ β 0 β§ π₯ β 0)) β (π΄ Β· π₯) β 0) |
161 | 150, 152,
159, 160 | div12d 12023 |
. . . . . . . . . . . . . . 15
β’ (((π΄ β β β§ π₯ β π) β§ (π΄ β 0 β§ π₯ β 0)) β ((logβ(1 + (π΄ Β· π₯))) Β· (π΄ / (π΄ Β· π₯))) = (π΄ Β· ((logβ(1 + (π΄ Β· π₯))) / (π΄ Β· π₯)))) |
162 | 151, 158,
161 | 3eqtrd 2777 |
. . . . . . . . . . . . . 14
β’ (((π΄ β β β§ π₯ β π) β§ (π΄ β 0 β§ π₯ β 0)) β ((1 / π₯) Β· (logβ(1 + (π΄ Β· π₯)))) = (π΄ Β· ((logβ(1 + (π΄ Β· π₯))) / (π΄ Β· π₯)))) |
163 | 162 | fveq2d 6893 |
. . . . . . . . . . . . 13
β’ (((π΄ β β β§ π₯ β π) β§ (π΄ β 0 β§ π₯ β 0)) β (expβ((1 / π₯) Β· (logβ(1 +
(π΄ Β· π₯))))) = (expβ(π΄ Β· ((logβ(1 +
(π΄ Β· π₯))) / (π΄ Β· π₯))))) |
164 | 83, 148, 163 | 3eqtrd 2777 |
. . . . . . . . . . . 12
β’ (((π΄ β β β§ π₯ β π) β§ (π΄ β 0 β§ π₯ β 0)) β if(π₯ = 0, (expβπ΄), ((1 + (π΄ Β· π₯))βπ(1 / π₯))) = (expβ(π΄ Β· ((logβ(1 +
(π΄ Β· π₯))) / (π΄ Β· π₯))))) |
165 | 164 | ex 414 |
. . . . . . . . . . 11
β’ ((π΄ β β β§ π₯ β π) β ((π΄ β 0 β§ π₯ β 0) β if(π₯ = 0, (expβπ΄), ((1 + (π΄ Β· π₯))βπ(1 / π₯))) = (expβ(π΄ Β· ((logβ(1 +
(π΄ Β· π₯))) / (π΄ Β· π₯)))))) |
166 | 80, 165 | sylbird 260 |
. . . . . . . . . 10
β’ ((π΄ β β β§ π₯ β π) β (Β¬ (π΄ Β· π₯) = 0 β if(π₯ = 0, (expβπ΄), ((1 + (π΄ Β· π₯))βπ(1 / π₯))) = (expβ(π΄ Β· ((logβ(1 +
(π΄ Β· π₯))) / (π΄ Β· π₯)))))) |
167 | 166 | imp 408 |
. . . . . . . . 9
β’ (((π΄ β β β§ π₯ β π) β§ Β¬ (π΄ Β· π₯) = 0) β if(π₯ = 0, (expβπ΄), ((1 + (π΄ Β· π₯))βπ(1 / π₯))) = (expβ(π΄ Β· ((logβ(1 +
(π΄ Β· π₯))) / (π΄ Β· π₯))))) |
168 | 27, 28, 76, 167 | ifbothda 4566 |
. . . . . . . 8
β’ ((π΄ β β β§ π₯ β π) β if(π₯ = 0, (expβπ΄), ((1 + (π΄ Β· π₯))βπ(1 / π₯))) = if((π΄ Β· π₯) = 0, (expβ(π΄ Β· 1)), (expβ(π΄ Β· ((logβ(1 + (π΄ Β· π₯))) / (π΄ Β· π₯)))))) |
169 | 168 | mpteq2dva 5248 |
. . . . . . 7
β’ (π΄ β β β (π₯ β π β¦ if(π₯ = 0, (expβπ΄), ((1 + (π΄ Β· π₯))βπ(1 / π₯)))) = (π₯ β π β¦ if((π΄ Β· π₯) = 0, (expβ(π΄ Β· 1)), (expβ(π΄ Β· ((logβ(1 + (π΄ Β· π₯))) / (π΄ Β· π₯))))))) |
170 | 44 | resmptd 6039 |
. . . . . . 7
β’ (π΄ β β β ((π₯ β β β¦ if(π₯ = 0, (expβπ΄), ((1 + (π΄ Β· π₯))βπ(1 / π₯)))) βΎ π) = (π₯ β π β¦ if(π₯ = 0, (expβπ΄), ((1 + (π΄ Β· π₯))βπ(1 / π₯))))) |
171 | | 1cnd 11206 |
. . . . . . . . 9
β’ (((π΄ β β β§ π₯ β π) β§ (π΄ Β· π₯) = 0) β 1 β
β) |
172 | 149 | adantr 482 |
. . . . . . . . . 10
β’ (((π΄ β β β§ π₯ β π) β§ Β¬ (π΄ Β· π₯) = 0) β (logβ(1 + (π΄ Β· π₯))) β β) |
173 | 85 | adantr 482 |
. . . . . . . . . 10
β’ (((π΄ β β β§ π₯ β π) β§ Β¬ (π΄ Β· π₯) = 0) β (π΄ Β· π₯) β β) |
174 | | simpr 486 |
. . . . . . . . . . 11
β’ (((π΄ β β β§ π₯ β π) β§ Β¬ (π΄ Β· π₯) = 0) β Β¬ (π΄ Β· π₯) = 0) |
175 | 174 | neqned 2948 |
. . . . . . . . . 10
β’ (((π΄ β β β§ π₯ β π) β§ Β¬ (π΄ Β· π₯) = 0) β (π΄ Β· π₯) β 0) |
176 | 172, 173,
175 | divcld 11987 |
. . . . . . . . 9
β’ (((π΄ β β β§ π₯ β π) β§ Β¬ (π΄ Β· π₯) = 0) β ((logβ(1 + (π΄ Β· π₯))) / (π΄ Β· π₯)) β β) |
177 | 171, 176 | ifclda 4563 |
. . . . . . . 8
β’ ((π΄ β β β§ π₯ β π) β if((π΄ Β· π₯) = 0, 1, ((logβ(1 + (π΄ Β· π₯))) / (π΄ Β· π₯))) β β) |
178 | | eqidd 2734 |
. . . . . . . 8
β’ (π΄ β β β (π₯ β π β¦ if((π΄ Β· π₯) = 0, 1, ((logβ(1 + (π΄ Β· π₯))) / (π΄ Β· π₯)))) = (π₯ β π β¦ if((π΄ Β· π₯) = 0, 1, ((logβ(1 + (π΄ Β· π₯))) / (π΄ Β· π₯))))) |
179 | | eqidd 2734 |
. . . . . . . 8
β’ (π΄ β β β (π¦ β β β¦
(expβ(π΄ Β·
π¦))) = (π¦ β β β¦ (expβ(π΄ Β· π¦)))) |
180 | | oveq2 7414 |
. . . . . . . . . 10
β’ (π¦ = if((π΄ Β· π₯) = 0, 1, ((logβ(1 + (π΄ Β· π₯))) / (π΄ Β· π₯))) β (π΄ Β· π¦) = (π΄ Β· if((π΄ Β· π₯) = 0, 1, ((logβ(1 + (π΄ Β· π₯))) / (π΄ Β· π₯))))) |
181 | 180 | fveq2d 6893 |
. . . . . . . . 9
β’ (π¦ = if((π΄ Β· π₯) = 0, 1, ((logβ(1 + (π΄ Β· π₯))) / (π΄ Β· π₯))) β (expβ(π΄ Β· π¦)) = (expβ(π΄ Β· if((π΄ Β· π₯) = 0, 1, ((logβ(1 + (π΄ Β· π₯))) / (π΄ Β· π₯)))))) |
182 | | oveq2 7414 |
. . . . . . . . . . 11
β’
(if((π΄ Β·
π₯) = 0, 1, ((logβ(1 +
(π΄ Β· π₯))) / (π΄ Β· π₯))) = 1 β (π΄ Β· if((π΄ Β· π₯) = 0, 1, ((logβ(1 + (π΄ Β· π₯))) / (π΄ Β· π₯)))) = (π΄ Β· 1)) |
183 | 182 | fveq2d 6893 |
. . . . . . . . . 10
β’
(if((π΄ Β·
π₯) = 0, 1, ((logβ(1 +
(π΄ Β· π₯))) / (π΄ Β· π₯))) = 1 β (expβ(π΄ Β· if((π΄ Β· π₯) = 0, 1, ((logβ(1 + (π΄ Β· π₯))) / (π΄ Β· π₯))))) = (expβ(π΄ Β· 1))) |
184 | | oveq2 7414 |
. . . . . . . . . . 11
β’
(if((π΄ Β·
π₯) = 0, 1, ((logβ(1 +
(π΄ Β· π₯))) / (π΄ Β· π₯))) = ((logβ(1 + (π΄ Β· π₯))) / (π΄ Β· π₯)) β (π΄ Β· if((π΄ Β· π₯) = 0, 1, ((logβ(1 + (π΄ Β· π₯))) / (π΄ Β· π₯)))) = (π΄ Β· ((logβ(1 + (π΄ Β· π₯))) / (π΄ Β· π₯)))) |
185 | 184 | fveq2d 6893 |
. . . . . . . . . 10
β’
(if((π΄ Β·
π₯) = 0, 1, ((logβ(1 +
(π΄ Β· π₯))) / (π΄ Β· π₯))) = ((logβ(1 + (π΄ Β· π₯))) / (π΄ Β· π₯)) β (expβ(π΄ Β· if((π΄ Β· π₯) = 0, 1, ((logβ(1 + (π΄ Β· π₯))) / (π΄ Β· π₯))))) = (expβ(π΄ Β· ((logβ(1 + (π΄ Β· π₯))) / (π΄ Β· π₯))))) |
186 | 183, 185 | ifsb 4541 |
. . . . . . . . 9
β’
(expβ(π΄
Β· if((π΄ Β·
π₯) = 0, 1, ((logβ(1 +
(π΄ Β· π₯))) / (π΄ Β· π₯))))) = if((π΄ Β· π₯) = 0, (expβ(π΄ Β· 1)), (expβ(π΄ Β· ((logβ(1 + (π΄ Β· π₯))) / (π΄ Β· π₯))))) |
187 | 181, 186 | eqtrdi 2789 |
. . . . . . . 8
β’ (π¦ = if((π΄ Β· π₯) = 0, 1, ((logβ(1 + (π΄ Β· π₯))) / (π΄ Β· π₯))) β (expβ(π΄ Β· π¦)) = if((π΄ Β· π₯) = 0, (expβ(π΄ Β· 1)), (expβ(π΄ Β· ((logβ(1 + (π΄ Β· π₯))) / (π΄ Β· π₯)))))) |
188 | 177, 178,
179, 187 | fmptco 7124 |
. . . . . . 7
β’ (π΄ β β β ((π¦ β β β¦
(expβ(π΄ Β·
π¦))) β (π₯ β π β¦ if((π΄ Β· π₯) = 0, 1, ((logβ(1 + (π΄ Β· π₯))) / (π΄ Β· π₯))))) = (π₯ β π β¦ if((π΄ Β· π₯) = 0, (expβ(π΄ Β· 1)), (expβ(π΄ Β· ((logβ(1 + (π΄ Β· π₯))) / (π΄ Β· π₯))))))) |
189 | 169, 170,
188 | 3eqtr4d 2783 |
. . . . . 6
β’ (π΄ β β β ((π₯ β β β¦ if(π₯ = 0, (expβπ΄), ((1 + (π΄ Β· π₯))βπ(1 / π₯)))) βΎ π) = ((π¦ β β β¦ (expβ(π΄ Β· π¦))) β (π₯ β π β¦ if((π΄ Β· π₯) = 0, 1, ((logβ(1 + (π΄ Β· π₯))) / (π΄ Β· π₯)))))) |
190 | | eqidd 2734 |
. . . . . . . . . 10
β’ (π΄ β β β (π₯ β π β¦ (1 + (π΄ Β· π₯))) = (π₯ β π β¦ (1 + (π΄ Β· π₯)))) |
191 | | eqidd 2734 |
. . . . . . . . . 10
β’ (π΄ β β β (π¦ β (1(ballβ(abs
β β ))1) β¦ if(π¦ = 1, 1, ((logβπ¦) / (π¦ β 1)))) = (π¦ β (1(ballβ(abs β β
))1) β¦ if(π¦ = 1, 1,
((logβπ¦) / (π¦ β 1))))) |
192 | | eqeq1 2737 |
. . . . . . . . . . 11
β’ (π¦ = (1 + (π΄ Β· π₯)) β (π¦ = 1 β (1 + (π΄ Β· π₯)) = 1)) |
193 | | fveq2 6889 |
. . . . . . . . . . . 12
β’ (π¦ = (1 + (π΄ Β· π₯)) β (logβπ¦) = (logβ(1 + (π΄ Β· π₯)))) |
194 | | oveq1 7413 |
. . . . . . . . . . . 12
β’ (π¦ = (1 + (π΄ Β· π₯)) β (π¦ β 1) = ((1 + (π΄ Β· π₯)) β 1)) |
195 | 193, 194 | oveq12d 7424 |
. . . . . . . . . . 11
β’ (π¦ = (1 + (π΄ Β· π₯)) β ((logβπ¦) / (π¦ β 1)) = ((logβ(1 + (π΄ Β· π₯))) / ((1 + (π΄ Β· π₯)) β 1))) |
196 | 192, 195 | ifbieq2d 4554 |
. . . . . . . . . 10
β’ (π¦ = (1 + (π΄ Β· π₯)) β if(π¦ = 1, 1, ((logβπ¦) / (π¦ β 1))) = if((1 + (π΄ Β· π₯)) = 1, 1, ((logβ(1 + (π΄ Β· π₯))) / ((1 + (π΄ Β· π₯)) β 1)))) |
197 | 141, 190,
191, 196 | fmptco 7124 |
. . . . . . . . 9
β’ (π΄ β β β ((π¦ β (1(ballβ(abs
β β ))1) β¦ if(π¦ = 1, 1, ((logβπ¦) / (π¦ β 1)))) β (π₯ β π β¦ (1 + (π΄ Β· π₯)))) = (π₯ β π β¦ if((1 + (π΄ Β· π₯)) = 1, 1, ((logβ(1 + (π΄ Β· π₯))) / ((1 + (π΄ Β· π₯)) β 1))))) |
198 | 59 | eqeq2i 2746 |
. . . . . . . . . . . 12
β’ ((1 +
(π΄ Β· π₯)) = (1 + 0) β (1 + (π΄ Β· π₯)) = 1) |
199 | 138, 85, 124 | addcand 11414 |
. . . . . . . . . . . 12
β’ ((π΄ β β β§ π₯ β π) β ((1 + (π΄ Β· π₯)) = (1 + 0) β (π΄ Β· π₯) = 0)) |
200 | 198, 199 | bitr3id 285 |
. . . . . . . . . . 11
β’ ((π΄ β β β§ π₯ β π) β ((1 + (π΄ Β· π₯)) = 1 β (π΄ Β· π₯) = 0)) |
201 | 98 | oveq2d 7422 |
. . . . . . . . . . 11
β’ ((π΄ β β β§ π₯ β π) β ((logβ(1 + (π΄ Β· π₯))) / ((1 + (π΄ Β· π₯)) β 1)) = ((logβ(1 + (π΄ Β· π₯))) / (π΄ Β· π₯))) |
202 | 200, 201 | ifbieq2d 4554 |
. . . . . . . . . 10
β’ ((π΄ β β β§ π₯ β π) β if((1 + (π΄ Β· π₯)) = 1, 1, ((logβ(1 + (π΄ Β· π₯))) / ((1 + (π΄ Β· π₯)) β 1))) = if((π΄ Β· π₯) = 0, 1, ((logβ(1 + (π΄ Β· π₯))) / (π΄ Β· π₯)))) |
203 | 202 | mpteq2dva 5248 |
. . . . . . . . 9
β’ (π΄ β β β (π₯ β π β¦ if((1 + (π΄ Β· π₯)) = 1, 1, ((logβ(1 + (π΄ Β· π₯))) / ((1 + (π΄ Β· π₯)) β 1)))) = (π₯ β π β¦ if((π΄ Β· π₯) = 0, 1, ((logβ(1 + (π΄ Β· π₯))) / (π΄ Β· π₯))))) |
204 | 197, 203 | eqtrd 2773 |
. . . . . . . 8
β’ (π΄ β β β ((π¦ β (1(ballβ(abs
β β ))1) β¦ if(π¦ = 1, 1, ((logβπ¦) / (π¦ β 1)))) β (π₯ β π β¦ (1 + (π΄ Β· π₯)))) = (π₯ β π β¦ if((π΄ Β· π₯) = 0, 1, ((logβ(1 + (π΄ Β· π₯))) / (π΄ Β· π₯))))) |
205 | | eqid 2733 |
. . . . . . . . . . . 12
β’
((TopOpenββfld) βΎt π) =
((TopOpenββfld) βΎt π) |
206 | | eqid 2733 |
. . . . . . . . . . . . . 14
β’
(TopOpenββfld) =
(TopOpenββfld) |
207 | 206 | cnfldtopon 24291 |
. . . . . . . . . . . . 13
β’
(TopOpenββfld) β
(TopOnββ) |
208 | 207 | a1i 11 |
. . . . . . . . . . . 12
β’ (π΄ β β β
(TopOpenββfld) β
(TopOnββ)) |
209 | | 1cnd 11206 |
. . . . . . . . . . . . . 14
β’ (π΄ β β β 1 β
β) |
210 | 208, 208,
209 | cnmptc 23158 |
. . . . . . . . . . . . 13
β’ (π΄ β β β (π₯ β β β¦ 1)
β ((TopOpenββfld) Cn
(TopOpenββfld))) |
211 | | id 22 |
. . . . . . . . . . . . . . 15
β’ (π΄ β β β π΄ β
β) |
212 | 208, 208,
211 | cnmptc 23158 |
. . . . . . . . . . . . . 14
β’ (π΄ β β β (π₯ β β β¦ π΄) β
((TopOpenββfld) Cn
(TopOpenββfld))) |
213 | 208 | cnmptid 23157 |
. . . . . . . . . . . . . 14
β’ (π΄ β β β (π₯ β β β¦ π₯) β
((TopOpenββfld) Cn
(TopOpenββfld))) |
214 | 206 | mulcn 24375 |
. . . . . . . . . . . . . . 15
β’ Β·
β (((TopOpenββfld) Γt
(TopOpenββfld)) Cn
(TopOpenββfld)) |
215 | 214 | a1i 11 |
. . . . . . . . . . . . . 14
β’ (π΄ β β β Β·
β (((TopOpenββfld) Γt
(TopOpenββfld)) Cn
(TopOpenββfld))) |
216 | 208, 212,
213, 215 | cnmpt12f 23162 |
. . . . . . . . . . . . 13
β’ (π΄ β β β (π₯ β β β¦ (π΄ Β· π₯)) β
((TopOpenββfld) Cn
(TopOpenββfld))) |
217 | 206 | addcn 24373 |
. . . . . . . . . . . . . 14
β’ + β
(((TopOpenββfld) Γt
(TopOpenββfld)) Cn
(TopOpenββfld)) |
218 | 217 | a1i 11 |
. . . . . . . . . . . . 13
β’ (π΄ β β β + β
(((TopOpenββfld) Γt
(TopOpenββfld)) Cn
(TopOpenββfld))) |
219 | 208, 210,
216, 218 | cnmpt12f 23162 |
. . . . . . . . . . . 12
β’ (π΄ β β β (π₯ β β β¦ (1 +
(π΄ Β· π₯))) β
((TopOpenββfld) Cn
(TopOpenββfld))) |
220 | 205, 208,
44, 219 | cnmpt1res 23172 |
. . . . . . . . . . 11
β’ (π΄ β β β (π₯ β π β¦ (1 + (π΄ Β· π₯))) β
(((TopOpenββfld) βΎt π) Cn
(TopOpenββfld))) |
221 | 141 | fmpttd 7112 |
. . . . . . . . . . . . 13
β’ (π΄ β β β (π₯ β π β¦ (1 + (π΄ Β· π₯))):πβΆ(1(ballβ(abs β β
))1)) |
222 | 221 | frnd 6723 |
. . . . . . . . . . . 12
β’ (π΄ β β β ran
(π₯ β π β¦ (1 + (π΄ Β· π₯))) β (1(ballβ(abs β
β ))1)) |
223 | | difss 4131 |
. . . . . . . . . . . . . 14
β’ (β
β {0}) β β |
224 | 93, 223 | sstri 3991 |
. . . . . . . . . . . . 13
β’
(1(ballβ(abs β β ))1) β β |
225 | 224 | a1i 11 |
. . . . . . . . . . . 12
β’ (π΄ β β β
(1(ballβ(abs β β ))1) β β) |
226 | | cnrest2 22782 |
. . . . . . . . . . . 12
β’
(((TopOpenββfld) β (TopOnββ)
β§ ran (π₯ β π β¦ (1 + (π΄ Β· π₯))) β (1(ballβ(abs β
β ))1) β§ (1(ballβ(abs β β ))1) β β)
β ((π₯ β π β¦ (1 + (π΄ Β· π₯))) β
(((TopOpenββfld) βΎt π) Cn (TopOpenββfld))
β (π₯ β π β¦ (1 + (π΄ Β· π₯))) β
(((TopOpenββfld) βΎt π) Cn ((TopOpenββfld)
βΎt (1(ballβ(abs β β
))1))))) |
227 | 207, 222,
225, 226 | mp3an2i 1467 |
. . . . . . . . . . 11
β’ (π΄ β β β ((π₯ β π β¦ (1 + (π΄ Β· π₯))) β
(((TopOpenββfld) βΎt π) Cn (TopOpenββfld))
β (π₯ β π β¦ (1 + (π΄ Β· π₯))) β
(((TopOpenββfld) βΎt π) Cn ((TopOpenββfld)
βΎt (1(ballβ(abs β β
))1))))) |
228 | 220, 227 | mpbid 231 |
. . . . . . . . . 10
β’ (π΄ β β β (π₯ β π β¦ (1 + (π΄ Β· π₯))) β
(((TopOpenββfld) βΎt π) Cn ((TopOpenββfld)
βΎt (1(ballβ(abs β β ))1)))) |
229 | | blcntr 23911 |
. . . . . . . . . . . . 13
β’ (((abs
β β ) β (βMetββ) β§ 0 β β
β§ (1 / ((absβπ΄) +
1)) β β+) β 0 β (0(ballβ(abs β
β ))(1 / ((absβπ΄) + 1)))) |
230 | 30, 31, 40, 229 | mp3an2i 1467 |
. . . . . . . . . . . 12
β’ (π΄ β β β 0 β
(0(ballβ(abs β β ))(1 / ((absβπ΄) + 1)))) |
231 | 230, 29 | eleqtrrdi 2845 |
. . . . . . . . . . 11
β’ (π΄ β β β 0 β
π) |
232 | | resttopon 22657 |
. . . . . . . . . . . . 13
β’
(((TopOpenββfld) β (TopOnββ)
β§ π β β)
β ((TopOpenββfld) βΎt π) β (TopOnβπ)) |
233 | 207, 44, 232 | sylancr 588 |
. . . . . . . . . . . 12
β’ (π΄ β β β
((TopOpenββfld) βΎt π) β (TopOnβπ)) |
234 | | toponuni 22408 |
. . . . . . . . . . . 12
β’
(((TopOpenββfld) βΎt π) β (TopOnβπ) β π = βͺ
((TopOpenββfld) βΎt π)) |
235 | 233, 234 | syl 17 |
. . . . . . . . . . 11
β’ (π΄ β β β π = βͺ
((TopOpenββfld) βΎt π)) |
236 | 231, 235 | eleqtrd 2836 |
. . . . . . . . . 10
β’ (π΄ β β β 0 β
βͺ ((TopOpenββfld)
βΎt π)) |
237 | | eqid 2733 |
. . . . . . . . . . 11
β’ βͺ ((TopOpenββfld)
βΎt π) =
βͺ ((TopOpenββfld)
βΎt π) |
238 | 237 | cncnpi 22774 |
. . . . . . . . . 10
β’ (((π₯ β π β¦ (1 + (π΄ Β· π₯))) β
(((TopOpenββfld) βΎt π) Cn ((TopOpenββfld)
βΎt (1(ballβ(abs β β ))1))) β§ 0 β
βͺ ((TopOpenββfld)
βΎt π))
β (π₯ β π β¦ (1 + (π΄ Β· π₯))) β
((((TopOpenββfld) βΎt π) CnP ((TopOpenββfld)
βΎt (1(ballβ(abs β β
))1)))β0)) |
239 | 228, 236,
238 | syl2anc 585 |
. . . . . . . . 9
β’ (π΄ β β β (π₯ β π β¦ (1 + (π΄ Β· π₯))) β
((((TopOpenββfld) βΎt π) CnP ((TopOpenββfld)
βΎt (1(ballβ(abs β β
))1)))β0)) |
240 | | cnelprrecn 11200 |
. . . . . . . . . . 11
β’ β
β {β, β} |
241 | | logf1o 26065 |
. . . . . . . . . . . . . 14
β’
log:(β β {0})β1-1-ontoβran
log |
242 | | f1of 6831 |
. . . . . . . . . . . . . 14
β’
(log:(β β {0})β1-1-ontoβran
log β log:(β β {0})βΆran log) |
243 | 241, 242 | ax-mp 5 |
. . . . . . . . . . . . 13
β’
log:(β β {0})βΆran log |
244 | | logrncn 26063 |
. . . . . . . . . . . . . 14
β’ (π₯ β ran log β π₯ β
β) |
245 | 244 | ssriv 3986 |
. . . . . . . . . . . . 13
β’ ran log
β β |
246 | | fss 6732 |
. . . . . . . . . . . . 13
β’
((log:(β β {0})βΆran log β§ ran log β
β) β log:(β β {0})βΆβ) |
247 | 243, 245,
246 | mp2an 691 |
. . . . . . . . . . . 12
β’
log:(β β {0})βΆβ |
248 | | fssres 6755 |
. . . . . . . . . . . 12
β’
((log:(β β {0})βΆβ β§ (1(ballβ(abs
β β ))1) β (β β {0})) β (log βΎ
(1(ballβ(abs β β ))1)):(1(ballβ(abs β β
))1)βΆβ) |
249 | 247, 93, 248 | mp2an 691 |
. . . . . . . . . . 11
β’ (log
βΎ (1(ballβ(abs β β ))1)):(1(ballβ(abs β
β ))1)βΆβ |
250 | | blcntr 23911 |
. . . . . . . . . . . . . 14
β’ (((abs
β β ) β (βMetββ) β§ 1 β β
β§ 1 β β+) β 1 β (1(ballβ(abs β
β ))1)) |
251 | 30, 84, 135, 250 | mp3an 1462 |
. . . . . . . . . . . . 13
β’ 1 β
(1(ballβ(abs β β ))1) |
252 | | ovex 7439 |
. . . . . . . . . . . . . 14
β’ (1 /
π¦) β
V |
253 | 89 | dvlog2 26153 |
. . . . . . . . . . . . . 14
β’ (β
D (log βΎ (1(ballβ(abs β β ))1))) = (π¦ β (1(ballβ(abs β β
))1) β¦ (1 / π¦)) |
254 | 252, 253 | dmmpti 6692 |
. . . . . . . . . . . . 13
β’ dom
(β D (log βΎ (1(ballβ(abs β β ))1))) =
(1(ballβ(abs β β ))1) |
255 | 251, 254 | eleqtrri 2833 |
. . . . . . . . . . . 12
β’ 1 β
dom (β D (log βΎ (1(ballβ(abs β β
))1))) |
256 | | eqid 2733 |
. . . . . . . . . . . . 13
β’
((TopOpenββfld) βΎt
(1(ballβ(abs β β ))1)) =
((TopOpenββfld) βΎt (1(ballβ(abs
β β ))1)) |
257 | 253 | fveq1i 6890 |
. . . . . . . . . . . . . . . . 17
β’ ((β
D (log βΎ (1(ballβ(abs β β ))1)))β1) = ((π¦ β (1(ballβ(abs
β β ))1) β¦ (1 / π¦))β1) |
258 | | oveq2 7414 |
. . . . . . . . . . . . . . . . . . . 20
β’ (π¦ = 1 β (1 / π¦) = (1 / 1)) |
259 | | 1div1e1 11901 |
. . . . . . . . . . . . . . . . . . . 20
β’ (1 / 1) =
1 |
260 | 258, 259 | eqtrdi 2789 |
. . . . . . . . . . . . . . . . . . 19
β’ (π¦ = 1 β (1 / π¦) = 1) |
261 | | eqid 2733 |
. . . . . . . . . . . . . . . . . . 19
β’ (π¦ β (1(ballβ(abs
β β ))1) β¦ (1 / π¦)) = (π¦ β (1(ballβ(abs β β
))1) β¦ (1 / π¦)) |
262 | | 1ex 11207 |
. . . . . . . . . . . . . . . . . . 19
β’ 1 β
V |
263 | 260, 261,
262 | fvmpt 6996 |
. . . . . . . . . . . . . . . . . 18
β’ (1 β
(1(ballβ(abs β β ))1) β ((π¦ β (1(ballβ(abs β β
))1) β¦ (1 / π¦))β1) = 1) |
264 | 251, 263 | ax-mp 5 |
. . . . . . . . . . . . . . . . 17
β’ ((π¦ β (1(ballβ(abs
β β ))1) β¦ (1 / π¦))β1) = 1 |
265 | 257, 264 | eqtr2i 2762 |
. . . . . . . . . . . . . . . 16
β’ 1 =
((β D (log βΎ (1(ballβ(abs β β
))1)))β1) |
266 | 265 | a1i 11 |
. . . . . . . . . . . . . . 15
β’ (π¦ β (1(ballβ(abs
β β ))1) β 1 = ((β D (log βΎ (1(ballβ(abs
β β ))1)))β1)) |
267 | | fvres 6908 |
. . . . . . . . . . . . . . . . . 18
β’ (π¦ β (1(ballβ(abs
β β ))1) β ((log βΎ (1(ballβ(abs β β
))1))βπ¦) =
(logβπ¦)) |
268 | | fvres 6908 |
. . . . . . . . . . . . . . . . . . . 20
β’ (1 β
(1(ballβ(abs β β ))1) β ((log βΎ (1(ballβ(abs
β β ))1))β1) = (logβ1)) |
269 | 251, 268 | mp1i 13 |
. . . . . . . . . . . . . . . . . . 19
β’ (π¦ β (1(ballβ(abs
β β ))1) β ((log βΎ (1(ballβ(abs β β
))1))β1) = (logβ1)) |
270 | | log1 26086 |
. . . . . . . . . . . . . . . . . . 19
β’
(logβ1) = 0 |
271 | 269, 270 | eqtrdi 2789 |
. . . . . . . . . . . . . . . . . 18
β’ (π¦ β (1(ballβ(abs
β β ))1) β ((log βΎ (1(ballβ(abs β β
))1))β1) = 0) |
272 | 267, 271 | oveq12d 7424 |
. . . . . . . . . . . . . . . . 17
β’ (π¦ β (1(ballβ(abs
β β ))1) β (((log βΎ (1(ballβ(abs β β
))1))βπ¦) β
((log βΎ (1(ballβ(abs β β ))1))β1)) =
((logβπ¦) β
0)) |
273 | 93 | sseli 3978 |
. . . . . . . . . . . . . . . . . . . 20
β’ (π¦ β (1(ballβ(abs
β β ))1) β π¦ β (β β
{0})) |
274 | | eldifsn 4790 |
. . . . . . . . . . . . . . . . . . . 20
β’ (π¦ β (β β {0})
β (π¦ β β
β§ π¦ β
0)) |
275 | 273, 274 | sylib 217 |
. . . . . . . . . . . . . . . . . . 19
β’ (π¦ β (1(ballβ(abs
β β ))1) β (π¦ β β β§ π¦ β 0)) |
276 | | logcl 26069 |
. . . . . . . . . . . . . . . . . . 19
β’ ((π¦ β β β§ π¦ β 0) β (logβπ¦) β
β) |
277 | 275, 276 | syl 17 |
. . . . . . . . . . . . . . . . . 18
β’ (π¦ β (1(ballβ(abs
β β ))1) β (logβπ¦) β β) |
278 | 277 | subid1d 11557 |
. . . . . . . . . . . . . . . . 17
β’ (π¦ β (1(ballβ(abs
β β ))1) β ((logβπ¦) β 0) = (logβπ¦)) |
279 | 272, 278 | eqtr2d 2774 |
. . . . . . . . . . . . . . . 16
β’ (π¦ β (1(ballβ(abs
β β ))1) β (logβπ¦) = (((log βΎ (1(ballβ(abs β
β ))1))βπ¦)
β ((log βΎ (1(ballβ(abs β β
))1))β1))) |
280 | 279 | oveq1d 7421 |
. . . . . . . . . . . . . . 15
β’ (π¦ β (1(ballβ(abs
β β ))1) β ((logβπ¦) / (π¦ β 1)) = ((((log βΎ
(1(ballβ(abs β β ))1))βπ¦) β ((log βΎ (1(ballβ(abs
β β ))1))β1)) / (π¦ β 1))) |
281 | 266, 280 | ifeq12d 4549 |
. . . . . . . . . . . . . 14
β’ (π¦ β (1(ballβ(abs
β β ))1) β if(π¦ = 1, 1, ((logβπ¦) / (π¦ β 1))) = if(π¦ = 1, ((β D (log βΎ
(1(ballβ(abs β β ))1)))β1), ((((log βΎ
(1(ballβ(abs β β ))1))βπ¦) β ((log βΎ (1(ballβ(abs
β β ))1))β1)) / (π¦ β 1)))) |
282 | 281 | mpteq2ia 5251 |
. . . . . . . . . . . . 13
β’ (π¦ β (1(ballβ(abs
β β ))1) β¦ if(π¦ = 1, 1, ((logβπ¦) / (π¦ β 1)))) = (π¦ β (1(ballβ(abs β β
))1) β¦ if(π¦ = 1,
((β D (log βΎ (1(ballβ(abs β β ))1)))β1),
((((log βΎ (1(ballβ(abs β β ))1))βπ¦) β ((log βΎ
(1(ballβ(abs β β ))1))β1)) / (π¦ β 1)))) |
283 | 256, 206,
282 | dvcnp 25428 |
. . . . . . . . . . . 12
β’
(((β β {β, β} β§ (log βΎ
(1(ballβ(abs β β ))1)):(1(ballβ(abs β β
))1)βΆβ β§ (1(ballβ(abs β β ))1) β
β) β§ 1 β dom (β D (log βΎ (1(ballβ(abs β
β ))1)))) β (π¦
β (1(ballβ(abs β β ))1) β¦ if(π¦ = 1, 1, ((logβπ¦) / (π¦ β 1)))) β
((((TopOpenββfld) βΎt (1(ballβ(abs
β β ))1)) CnP
(TopOpenββfld))β1)) |
284 | 255, 283 | mpan2 690 |
. . . . . . . . . . 11
β’ ((β
β {β, β} β§ (log βΎ (1(ballβ(abs β β
))1)):(1(ballβ(abs β β ))1)βΆβ β§
(1(ballβ(abs β β ))1) β β) β (π¦ β (1(ballβ(abs
β β ))1) β¦ if(π¦ = 1, 1, ((logβπ¦) / (π¦ β 1)))) β
((((TopOpenββfld) βΎt (1(ballβ(abs
β β ))1)) CnP
(TopOpenββfld))β1)) |
285 | 240, 249,
224, 284 | mp3an 1462 |
. . . . . . . . . 10
β’ (π¦ β (1(ballβ(abs
β β ))1) β¦ if(π¦ = 1, 1, ((logβπ¦) / (π¦ β 1)))) β
((((TopOpenββfld) βΎt (1(ballβ(abs
β β ))1)) CnP
(TopOpenββfld))β1) |
286 | | oveq2 7414 |
. . . . . . . . . . . . . . 15
β’ (π₯ = 0 β (π΄ Β· π₯) = (π΄ Β· 0)) |
287 | 286 | oveq2d 7422 |
. . . . . . . . . . . . . 14
β’ (π₯ = 0 β (1 + (π΄ Β· π₯)) = (1 + (π΄ Β· 0))) |
288 | | eqid 2733 |
. . . . . . . . . . . . . 14
β’ (π₯ β π β¦ (1 + (π΄ Β· π₯))) = (π₯ β π β¦ (1 + (π΄ Β· π₯))) |
289 | | ovex 7439 |
. . . . . . . . . . . . . 14
β’ (1 +
(π΄ Β· 0)) β
V |
290 | 287, 288,
289 | fvmpt 6996 |
. . . . . . . . . . . . 13
β’ (0 β
π β ((π₯ β π β¦ (1 + (π΄ Β· π₯)))β0) = (1 + (π΄ Β· 0))) |
291 | 231, 290 | syl 17 |
. . . . . . . . . . . 12
β’ (π΄ β β β ((π₯ β π β¦ (1 + (π΄ Β· π₯)))β0) = (1 + (π΄ Β· 0))) |
292 | | mul01 11390 |
. . . . . . . . . . . . . 14
β’ (π΄ β β β (π΄ Β· 0) =
0) |
293 | 292 | oveq2d 7422 |
. . . . . . . . . . . . 13
β’ (π΄ β β β (1 +
(π΄ Β· 0)) = (1 +
0)) |
294 | 293, 59 | eqtrdi 2789 |
. . . . . . . . . . . 12
β’ (π΄ β β β (1 +
(π΄ Β· 0)) =
1) |
295 | 291, 294 | eqtrd 2773 |
. . . . . . . . . . 11
β’ (π΄ β β β ((π₯ β π β¦ (1 + (π΄ Β· π₯)))β0) = 1) |
296 | 295 | fveq2d 6893 |
. . . . . . . . . 10
β’ (π΄ β β β
((((TopOpenββfld) βΎt (1(ballβ(abs
β β ))1)) CnP (TopOpenββfld))β((π₯ β π β¦ (1 + (π΄ Β· π₯)))β0)) =
((((TopOpenββfld) βΎt (1(ballβ(abs
β β ))1)) CnP
(TopOpenββfld))β1)) |
297 | 285, 296 | eleqtrrid 2841 |
. . . . . . . . 9
β’ (π΄ β β β (π¦ β (1(ballβ(abs
β β ))1) β¦ if(π¦ = 1, 1, ((logβπ¦) / (π¦ β 1)))) β
((((TopOpenββfld) βΎt (1(ballβ(abs
β β ))1)) CnP (TopOpenββfld))β((π₯ β π β¦ (1 + (π΄ Β· π₯)))β0))) |
298 | | cnpco 22763 |
. . . . . . . . 9
β’ (((π₯ β π β¦ (1 + (π΄ Β· π₯))) β
((((TopOpenββfld) βΎt π) CnP ((TopOpenββfld)
βΎt (1(ballβ(abs β β ))1)))β0) β§
(π¦ β
(1(ballβ(abs β β ))1) β¦ if(π¦ = 1, 1, ((logβπ¦) / (π¦ β 1)))) β
((((TopOpenββfld) βΎt (1(ballβ(abs
β β ))1)) CnP (TopOpenββfld))β((π₯ β π β¦ (1 + (π΄ Β· π₯)))β0))) β ((π¦ β (1(ballβ(abs β β
))1) β¦ if(π¦ = 1, 1,
((logβπ¦) / (π¦ β 1)))) β (π₯ β π β¦ (1 + (π΄ Β· π₯)))) β
((((TopOpenββfld) βΎt π) CnP
(TopOpenββfld))β0)) |
299 | 239, 297,
298 | syl2anc 585 |
. . . . . . . 8
β’ (π΄ β β β ((π¦ β (1(ballβ(abs
β β ))1) β¦ if(π¦ = 1, 1, ((logβπ¦) / (π¦ β 1)))) β (π₯ β π β¦ (1 + (π΄ Β· π₯)))) β
((((TopOpenββfld) βΎt π) CnP
(TopOpenββfld))β0)) |
300 | 204, 299 | eqeltrrd 2835 |
. . . . . . 7
β’ (π΄ β β β (π₯ β π β¦ if((π΄ Β· π₯) = 0, 1, ((logβ(1 + (π΄ Β· π₯))) / (π΄ Β· π₯)))) β
((((TopOpenββfld) βΎt π) CnP
(TopOpenββfld))β0)) |
301 | 208, 208,
211 | cnmptc 23158 |
. . . . . . . . . 10
β’ (π΄ β β β (π¦ β β β¦ π΄) β
((TopOpenββfld) Cn
(TopOpenββfld))) |
302 | 208 | cnmptid 23157 |
. . . . . . . . . 10
β’ (π΄ β β β (π¦ β β β¦ π¦) β
((TopOpenββfld) Cn
(TopOpenββfld))) |
303 | 208, 301,
302, 215 | cnmpt12f 23162 |
. . . . . . . . 9
β’ (π΄ β β β (π¦ β β β¦ (π΄ Β· π¦)) β
((TopOpenββfld) Cn
(TopOpenββfld))) |
304 | | efcn 25947 |
. . . . . . . . . . 11
β’ exp
β (ββcnββ) |
305 | 206 | cncfcn1 24419 |
. . . . . . . . . . 11
β’
(ββcnββ) =
((TopOpenββfld) Cn
(TopOpenββfld)) |
306 | 304, 305 | eleqtri 2832 |
. . . . . . . . . 10
β’ exp
β ((TopOpenββfld) Cn
(TopOpenββfld)) |
307 | 306 | a1i 11 |
. . . . . . . . 9
β’ (π΄ β β β exp
β ((TopOpenββfld) Cn
(TopOpenββfld))) |
308 | 208, 303,
307 | cnmpt11f 23160 |
. . . . . . . 8
β’ (π΄ β β β (π¦ β β β¦
(expβ(π΄ Β·
π¦))) β
((TopOpenββfld) Cn
(TopOpenββfld))) |
309 | 177 | fmpttd 7112 |
. . . . . . . . 9
β’ (π΄ β β β (π₯ β π β¦ if((π΄ Β· π₯) = 0, 1, ((logβ(1 + (π΄ Β· π₯))) / (π΄ Β· π₯)))):πβΆβ) |
310 | 309, 231 | ffvelcdmd 7085 |
. . . . . . . 8
β’ (π΄ β β β ((π₯ β π β¦ if((π΄ Β· π₯) = 0, 1, ((logβ(1 + (π΄ Β· π₯))) / (π΄ Β· π₯))))β0) β
β) |
311 | | unicntop 24294 |
. . . . . . . . 9
β’ β =
βͺ
(TopOpenββfld) |
312 | 311 | cncnpi 22774 |
. . . . . . . 8
β’ (((π¦ β β β¦
(expβ(π΄ Β·
π¦))) β
((TopOpenββfld) Cn
(TopOpenββfld)) β§ ((π₯ β π β¦ if((π΄ Β· π₯) = 0, 1, ((logβ(1 + (π΄ Β· π₯))) / (π΄ Β· π₯))))β0) β β) β (π¦ β β β¦
(expβ(π΄ Β·
π¦))) β
(((TopOpenββfld) CnP
(TopOpenββfld))β((π₯ β π β¦ if((π΄ Β· π₯) = 0, 1, ((logβ(1 + (π΄ Β· π₯))) / (π΄ Β· π₯))))β0))) |
313 | 308, 310,
312 | syl2anc 585 |
. . . . . . 7
β’ (π΄ β β β (π¦ β β β¦
(expβ(π΄ Β·
π¦))) β
(((TopOpenββfld) CnP
(TopOpenββfld))β((π₯ β π β¦ if((π΄ Β· π₯) = 0, 1, ((logβ(1 + (π΄ Β· π₯))) / (π΄ Β· π₯))))β0))) |
314 | | cnpco 22763 |
. . . . . . 7
β’ (((π₯ β π β¦ if((π΄ Β· π₯) = 0, 1, ((logβ(1 + (π΄ Β· π₯))) / (π΄ Β· π₯)))) β
((((TopOpenββfld) βΎt π) CnP
(TopOpenββfld))β0) β§ (π¦ β β β¦ (expβ(π΄ Β· π¦))) β
(((TopOpenββfld) CnP
(TopOpenββfld))β((π₯ β π β¦ if((π΄ Β· π₯) = 0, 1, ((logβ(1 + (π΄ Β· π₯))) / (π΄ Β· π₯))))β0))) β ((π¦ β β β¦ (expβ(π΄ Β· π¦))) β (π₯ β π β¦ if((π΄ Β· π₯) = 0, 1, ((logβ(1 + (π΄ Β· π₯))) / (π΄ Β· π₯))))) β
((((TopOpenββfld) βΎt π) CnP
(TopOpenββfld))β0)) |
315 | 300, 313,
314 | syl2anc 585 |
. . . . . 6
β’ (π΄ β β β ((π¦ β β β¦
(expβ(π΄ Β·
π¦))) β (π₯ β π β¦ if((π΄ Β· π₯) = 0, 1, ((logβ(1 + (π΄ Β· π₯))) / (π΄ Β· π₯))))) β
((((TopOpenββfld) βΎt π) CnP
(TopOpenββfld))β0)) |
316 | 189, 315 | eqeltrd 2834 |
. . . . 5
β’ (π΄ β β β ((π₯ β β β¦ if(π₯ = 0, (expβπ΄), ((1 + (π΄ Β· π₯))βπ(1 / π₯)))) βΎ π) β
((((TopOpenββfld) βΎt π) CnP
(TopOpenββfld))β0)) |
317 | 206 | cnfldtop 24292 |
. . . . . . 7
β’
(TopOpenββfld) β Top |
318 | 317 | a1i 11 |
. . . . . 6
β’ (π΄ β β β
(TopOpenββfld) β Top) |
319 | 206 | cnfldtopn 24290 |
. . . . . . . . . . 11
β’
(TopOpenββfld) = (MetOpenβ(abs β
β )) |
320 | 319 | blopn 24001 |
. . . . . . . . . 10
β’ (((abs
β β ) β (βMetββ) β§ 0 β β
β§ (1 / ((absβπ΄) +
1)) β β*) β (0(ballβ(abs β β ))(1
/ ((absβπ΄) + 1)))
β (TopOpenββfld)) |
321 | 30, 31, 41, 320 | mp3an2i 1467 |
. . . . . . . . 9
β’ (π΄ β β β
(0(ballβ(abs β β ))(1 / ((absβπ΄) + 1))) β
(TopOpenββfld)) |
322 | 29, 321 | eqeltrid 2838 |
. . . . . . . 8
β’ (π΄ β β β π β
(TopOpenββfld)) |
323 | | isopn3i 22578 |
. . . . . . . 8
β’
(((TopOpenββfld) β Top β§ π β
(TopOpenββfld)) β
((intβ(TopOpenββfld))βπ) = π) |
324 | 317, 322,
323 | sylancr 588 |
. . . . . . 7
β’ (π΄ β β β
((intβ(TopOpenββfld))βπ) = π) |
325 | 231, 324 | eleqtrrd 2837 |
. . . . . 6
β’ (π΄ β β β 0 β
((intβ(TopOpenββfld))βπ)) |
326 | | efcl 16023 |
. . . . . . . . 9
β’ (π΄ β β β
(expβπ΄) β
β) |
327 | 326 | ad2antrr 725 |
. . . . . . . 8
β’ (((π΄ β β β§ π₯ β β) β§ π₯ = 0) β (expβπ΄) β
β) |
328 | 84, 14, 86 | sylancr 588 |
. . . . . . . . 9
β’ (((π΄ β β β§ π₯ β β) β§ Β¬
π₯ = 0) β (1 + (π΄ Β· π₯)) β β) |
329 | 328, 49 | cxpcld 26208 |
. . . . . . . 8
β’ (((π΄ β β β§ π₯ β β) β§ Β¬
π₯ = 0) β ((1 + (π΄ Β· π₯))βπ(1 / π₯)) β
β) |
330 | 327, 329 | ifclda 4563 |
. . . . . . 7
β’ ((π΄ β β β§ π₯ β β) β if(π₯ = 0, (expβπ΄), ((1 + (π΄ Β· π₯))βπ(1 / π₯))) β
β) |
331 | 330 | fmpttd 7112 |
. . . . . 6
β’ (π΄ β β β (π₯ β β β¦ if(π₯ = 0, (expβπ΄), ((1 + (π΄ Β· π₯))βπ(1 / π₯)))):ββΆβ) |
332 | 311, 311 | cnprest 22785 |
. . . . . 6
β’
((((TopOpenββfld) β Top β§ π β β) β§ (0
β ((intβ(TopOpenββfld))βπ) β§ (π₯ β β β¦ if(π₯ = 0, (expβπ΄), ((1 + (π΄ Β· π₯))βπ(1 / π₯)))):ββΆβ))
β ((π₯ β β
β¦ if(π₯ = 0,
(expβπ΄), ((1 + (π΄ Β· π₯))βπ(1 / π₯)))) β
(((TopOpenββfld) CnP
(TopOpenββfld))β0) β ((π₯ β β β¦ if(π₯ = 0, (expβπ΄), ((1 + (π΄ Β· π₯))βπ(1 / π₯)))) βΎ π) β
((((TopOpenββfld) βΎt π) CnP
(TopOpenββfld))β0))) |
333 | 318, 44, 325, 331, 332 | syl22anc 838 |
. . . . 5
β’ (π΄ β β β ((π₯ β β β¦ if(π₯ = 0, (expβπ΄), ((1 + (π΄ Β· π₯))βπ(1 / π₯)))) β
(((TopOpenββfld) CnP
(TopOpenββfld))β0) β ((π₯ β β β¦ if(π₯ = 0, (expβπ΄), ((1 + (π΄ Β· π₯))βπ(1 / π₯)))) βΎ π) β
((((TopOpenββfld) βΎt π) CnP
(TopOpenββfld))β0))) |
334 | 316, 333 | mpbird 257 |
. . . 4
β’ (π΄ β β β (π₯ β β β¦ if(π₯ = 0, (expβπ΄), ((1 + (π΄ Β· π₯))βπ(1 / π₯)))) β
(((TopOpenββfld) CnP
(TopOpenββfld))β0)) |
335 | 311 | cnpresti 22784 |
. . . 4
β’
(((0[,)+β) β β β§ 0 β (0[,)+β) β§
(π₯ β β β¦
if(π₯ = 0, (expβπ΄), ((1 + (π΄ Β· π₯))βπ(1 / π₯)))) β
(((TopOpenββfld) CnP
(TopOpenββfld))β0)) β ((π₯ β β β¦ if(π₯ = 0, (expβπ΄), ((1 + (π΄ Β· π₯))βπ(1 / π₯)))) βΎ (0[,)+β))
β ((((TopOpenββfld) βΎt
(0[,)+β)) CnP
(TopOpenββfld))β0)) |
336 | 3, 26, 334, 335 | mp3an2i 1467 |
. . 3
β’ (π΄ β β β ((π₯ β β β¦ if(π₯ = 0, (expβπ΄), ((1 + (π΄ Β· π₯))βπ(1 / π₯)))) βΎ (0[,)+β))
β ((((TopOpenββfld) βΎt
(0[,)+β)) CnP
(TopOpenββfld))β0)) |
337 | 24, 336 | eqeltrd 2834 |
. 2
β’ (π΄ β β β (π₯ β (0[,)+β) β¦
if(π₯ = 0, (expβπ΄), ((1 + (π΄ / (1 / π₯)))βπ(1 / π₯)))) β
((((TopOpenββfld) βΎt (0[,)+β))
CnP (TopOpenββfld))β0)) |
338 | | simpl 484 |
. . . . . 6
β’ ((π΄ β β β§ π β β+)
β π΄ β
β) |
339 | | rpcn 12981 |
. . . . . . 7
β’ (π β β+
β π β
β) |
340 | 339 | adantl 483 |
. . . . . 6
β’ ((π΄ β β β§ π β β+)
β π β
β) |
341 | | rpne0 12987 |
. . . . . . 7
β’ (π β β+
β π β
0) |
342 | 341 | adantl 483 |
. . . . . 6
β’ ((π΄ β β β§ π β β+)
β π β
0) |
343 | 338, 340,
342 | divcld 11987 |
. . . . 5
β’ ((π΄ β β β§ π β β+)
β (π΄ / π) β
β) |
344 | | addcl 11189 |
. . . . 5
β’ ((1
β β β§ (π΄ /
π) β β) β
(1 + (π΄ / π)) β
β) |
345 | 84, 343, 344 | sylancr 588 |
. . . 4
β’ ((π΄ β β β§ π β β+)
β (1 + (π΄ / π)) β
β) |
346 | 345, 340 | cxpcld 26208 |
. . 3
β’ ((π΄ β β β§ π β β+)
β ((1 + (π΄ / π))βππ) β
β) |
347 | | oveq2 7414 |
. . . . 5
β’ (π = (1 / π₯) β (π΄ / π) = (π΄ / (1 / π₯))) |
348 | 347 | oveq2d 7422 |
. . . 4
β’ (π = (1 / π₯) β (1 + (π΄ / π)) = (1 + (π΄ / (1 / π₯)))) |
349 | | id 22 |
. . . 4
β’ (π = (1 / π₯) β π = (1 / π₯)) |
350 | 348, 349 | oveq12d 7424 |
. . 3
β’ (π = (1 / π₯) β ((1 + (π΄ / π))βππ) = ((1 + (π΄ / (1 / π₯)))βπ(1 / π₯))) |
351 | | eqid 2733 |
. . 3
β’
((TopOpenββfld) βΎt
(0[,)+β)) = ((TopOpenββfld) βΎt
(0[,)+β)) |
352 | 326, 346,
350, 206, 351 | rlimcnp3 26462 |
. 2
β’ (π΄ β β β ((π β β+
β¦ ((1 + (π΄ / π))βππ)) βπ
(expβπ΄) β (π₯ β (0[,)+β) β¦
if(π₯ = 0, (expβπ΄), ((1 + (π΄ / (1 / π₯)))βπ(1 / π₯)))) β
((((TopOpenββfld) βΎt (0[,)+β))
CnP (TopOpenββfld))β0))) |
353 | 337, 352 | mpbird 257 |
1
β’ (π΄ β β β (π β β+
β¦ ((1 + (π΄ / π))βππ)) βπ
(expβπ΄)) |