Step |
Hyp |
Ref |
Expression |
1 |
|
efrlim.1 |
β’ π = ( 0 ( ball β ( abs β β ) ) ( 1 / ( ( abs β π΄ ) + 1 ) ) ) |
2 |
|
rge0ssre |
β’ ( 0 [,) +β ) β β |
3 |
|
ax-resscn |
β’ β β β |
4 |
2 3
|
sstri |
β’ ( 0 [,) +β ) β β |
5 |
4
|
sseli |
β’ ( π₯ β ( 0 [,) +β ) β π₯ β β ) |
6 |
|
simpll |
β’ ( ( ( π΄ β β β§ π₯ β β ) β§ Β¬ π₯ = 0 ) β π΄ β β ) |
7 |
|
1cnd |
β’ ( ( ( π΄ β β β§ π₯ β β ) β§ Β¬ π₯ = 0 ) β 1 β β ) |
8 |
|
simplr |
β’ ( ( ( π΄ β β β§ π₯ β β ) β§ Β¬ π₯ = 0 ) β π₯ β β ) |
9 |
|
ax-1ne0 |
β’ 1 β 0 |
10 |
9
|
a1i |
β’ ( ( ( π΄ β β β§ π₯ β β ) β§ Β¬ π₯ = 0 ) β 1 β 0 ) |
11 |
|
simpr |
β’ ( ( ( π΄ β β β§ π₯ β β ) β§ Β¬ π₯ = 0 ) β Β¬ π₯ = 0 ) |
12 |
11
|
neqned |
β’ ( ( ( π΄ β β β§ π₯ β β ) β§ Β¬ π₯ = 0 ) β π₯ β 0 ) |
13 |
6 7 8 10 12
|
divdiv2d |
β’ ( ( ( π΄ β β β§ π₯ β β ) β§ Β¬ π₯ = 0 ) β ( π΄ / ( 1 / π₯ ) ) = ( ( π΄ Β· π₯ ) / 1 ) ) |
14 |
|
mulcl |
β’ ( ( π΄ β β β§ π₯ β β ) β ( π΄ Β· π₯ ) β β ) |
15 |
14
|
adantr |
β’ ( ( ( π΄ β β β§ π₯ β β ) β§ Β¬ π₯ = 0 ) β ( π΄ Β· π₯ ) β β ) |
16 |
15
|
div1d |
β’ ( ( ( π΄ β β β§ π₯ β β ) β§ Β¬ π₯ = 0 ) β ( ( π΄ Β· π₯ ) / 1 ) = ( π΄ Β· π₯ ) ) |
17 |
13 16
|
eqtrd |
β’ ( ( ( π΄ β β β§ π₯ β β ) β§ Β¬ π₯ = 0 ) β ( π΄ / ( 1 / π₯ ) ) = ( π΄ Β· π₯ ) ) |
18 |
17
|
oveq2d |
β’ ( ( ( π΄ β β β§ π₯ β β ) β§ Β¬ π₯ = 0 ) β ( 1 + ( π΄ / ( 1 / π₯ ) ) ) = ( 1 + ( π΄ Β· π₯ ) ) ) |
19 |
18
|
oveq1d |
β’ ( ( ( π΄ β β β§ π₯ β β ) β§ Β¬ π₯ = 0 ) β ( ( 1 + ( π΄ / ( 1 / π₯ ) ) ) βπ ( 1 / π₯ ) ) = ( ( 1 + ( π΄ Β· π₯ ) ) βπ ( 1 / π₯ ) ) ) |
20 |
19
|
ifeq2da |
β’ ( ( π΄ β β β§ π₯ β β ) β if ( π₯ = 0 , ( exp β π΄ ) , ( ( 1 + ( π΄ / ( 1 / π₯ ) ) ) βπ ( 1 / π₯ ) ) ) = if ( π₯ = 0 , ( exp β π΄ ) , ( ( 1 + ( π΄ Β· π₯ ) ) βπ ( 1 / π₯ ) ) ) ) |
21 |
5 20
|
sylan2 |
β’ ( ( π΄ β β β§ π₯ β ( 0 [,) +β ) ) β if ( π₯ = 0 , ( exp β π΄ ) , ( ( 1 + ( π΄ / ( 1 / π₯ ) ) ) βπ ( 1 / π₯ ) ) ) = if ( π₯ = 0 , ( exp β π΄ ) , ( ( 1 + ( π΄ Β· π₯ ) ) βπ ( 1 / π₯ ) ) ) ) |
22 |
21
|
mpteq2dva |
β’ ( π΄ β β β ( π₯ β ( 0 [,) +β ) β¦ if ( π₯ = 0 , ( exp β π΄ ) , ( ( 1 + ( π΄ / ( 1 / π₯ ) ) ) βπ ( 1 / π₯ ) ) ) ) = ( π₯ β ( 0 [,) +β ) β¦ if ( π₯ = 0 , ( exp β π΄ ) , ( ( 1 + ( π΄ Β· π₯ ) ) βπ ( 1 / π₯ ) ) ) ) ) |
23 |
|
resmpt |
β’ ( ( 0 [,) +β ) β β β ( ( π₯ β β β¦ if ( π₯ = 0 , ( exp β π΄ ) , ( ( 1 + ( π΄ Β· π₯ ) ) βπ ( 1 / π₯ ) ) ) ) βΎ ( 0 [,) +β ) ) = ( π₯ β ( 0 [,) +β ) β¦ if ( π₯ = 0 , ( exp β π΄ ) , ( ( 1 + ( π΄ Β· π₯ ) ) βπ ( 1 / π₯ ) ) ) ) ) |
24 |
4 23
|
ax-mp |
β’ ( ( π₯ β β β¦ if ( π₯ = 0 , ( exp β π΄ ) , ( ( 1 + ( π΄ Β· π₯ ) ) βπ ( 1 / π₯ ) ) ) ) βΎ ( 0 [,) +β ) ) = ( π₯ β ( 0 [,) +β ) β¦ if ( π₯ = 0 , ( exp β π΄ ) , ( ( 1 + ( π΄ Β· π₯ ) ) βπ ( 1 / π₯ ) ) ) ) |
25 |
22 24
|
eqtr4di |
β’ ( π΄ β β β ( π₯ β ( 0 [,) +β ) β¦ if ( π₯ = 0 , ( exp β π΄ ) , ( ( 1 + ( π΄ / ( 1 / π₯ ) ) ) βπ ( 1 / π₯ ) ) ) ) = ( ( π₯ β β β¦ if ( π₯ = 0 , ( exp β π΄ ) , ( ( 1 + ( π΄ Β· π₯ ) ) βπ ( 1 / π₯ ) ) ) ) βΎ ( 0 [,) +β ) ) ) |
26 |
|
0e0icopnf |
β’ 0 β ( 0 [,) +β ) |
27 |
26
|
a1i |
β’ ( π΄ β β β 0 β ( 0 [,) +β ) ) |
28 |
|
eqeq2 |
β’ ( ( 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 + ( π΄ Β· π₯ ) ) ) / ( π΄ Β· π₯ ) ) ) ) ) ) ) |
29 |
|
eqeq2 |
β’ ( ( 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 + ( π΄ Β· π₯ ) ) ) / ( π΄ Β· π₯ ) ) ) ) ) ) ) |
30 |
|
cnxmet |
β’ ( abs β β ) β ( βMet β β ) |
31 |
|
0cnd |
β’ ( π΄ β β β 0 β β ) |
32 |
|
abscl |
β’ ( π΄ β β β ( abs β π΄ ) β β ) |
33 |
|
peano2re |
β’ ( ( abs β π΄ ) β β β ( ( abs β π΄ ) + 1 ) β β ) |
34 |
32 33
|
syl |
β’ ( π΄ β β β ( ( abs β π΄ ) + 1 ) β β ) |
35 |
|
0red |
β’ ( π΄ β β β 0 β β ) |
36 |
|
absge0 |
β’ ( π΄ β β β 0 β€ ( abs β π΄ ) ) |
37 |
32
|
ltp1d |
β’ ( π΄ β β β ( abs β π΄ ) < ( ( abs β π΄ ) + 1 ) ) |
38 |
35 32 34 36 37
|
lelttrd |
β’ ( π΄ β β β 0 < ( ( abs β π΄ ) + 1 ) ) |
39 |
34 38
|
elrpd |
β’ ( π΄ β β β ( ( abs β π΄ ) + 1 ) β β+ ) |
40 |
39
|
rpreccld |
β’ ( π΄ β β β ( 1 / ( ( abs β π΄ ) + 1 ) ) β β+ ) |
41 |
40
|
rpxrd |
β’ ( π΄ β β β ( 1 / ( ( abs β π΄ ) + 1 ) ) β β* ) |
42 |
|
blssm |
β’ ( ( ( abs β β ) β ( βMet β β ) β§ 0 β β β§ ( 1 / ( ( abs β π΄ ) + 1 ) ) β β* ) β ( 0 ( ball β ( abs β β ) ) ( 1 / ( ( abs β π΄ ) + 1 ) ) ) β β ) |
43 |
30 31 41 42
|
mp3an2i |
β’ ( π΄ β β β ( 0 ( ball β ( abs β β ) ) ( 1 / ( ( abs β π΄ ) + 1 ) ) ) β β ) |
44 |
1 43
|
eqsstrid |
β’ ( π΄ β β β π β β ) |
45 |
44
|
sselda |
β’ ( ( π΄ β β β§ π₯ β π ) β π₯ β β ) |
46 |
|
mul0or |
β’ ( ( π΄ β β β§ π₯ β β ) β ( ( π΄ Β· π₯ ) = 0 β ( π΄ = 0 β¨ π₯ = 0 ) ) ) |
47 |
45 46
|
syldan |
β’ ( ( π΄ β β β§ π₯ β π ) β ( ( π΄ Β· π₯ ) = 0 β ( π΄ = 0 β¨ π₯ = 0 ) ) ) |
48 |
47
|
biimpa |
β’ ( ( ( π΄ β β β§ π₯ β π ) β§ ( π΄ Β· π₯ ) = 0 ) β ( π΄ = 0 β¨ π₯ = 0 ) ) |
49 |
8 12
|
reccld |
β’ ( ( ( π΄ β β β§ π₯ β β ) β§ Β¬ π₯ = 0 ) β ( 1 / π₯ ) β β ) |
50 |
45 49
|
syldanl |
β’ ( ( ( π΄ β β β§ π₯ β π ) β§ Β¬ π₯ = 0 ) β ( 1 / π₯ ) β β ) |
51 |
50
|
adantlr |
β’ ( ( ( ( π΄ β β β§ π₯ β π ) β§ π΄ = 0 ) β§ Β¬ π₯ = 0 ) β ( 1 / π₯ ) β β ) |
52 |
51
|
1cxpd |
β’ ( ( ( ( π΄ β β β§ π₯ β π ) β§ π΄ = 0 ) β§ Β¬ π₯ = 0 ) β ( 1 βπ ( 1 / π₯ ) ) = 1 ) |
53 |
|
simplr |
β’ ( ( ( ( π΄ β β β§ π₯ β π ) β§ π΄ = 0 ) β§ Β¬ π₯ = 0 ) β π΄ = 0 ) |
54 |
53
|
oveq1d |
β’ ( ( ( ( π΄ β β β§ π₯ β π ) β§ π΄ = 0 ) β§ Β¬ π₯ = 0 ) β ( π΄ Β· π₯ ) = ( 0 Β· π₯ ) ) |
55 |
45
|
ad2antrr |
β’ ( ( ( ( π΄ β β β§ π₯ β π ) β§ π΄ = 0 ) β§ Β¬ π₯ = 0 ) β π₯ β β ) |
56 |
55
|
mul02d |
β’ ( ( ( ( π΄ β β β§ π₯ β π ) β§ π΄ = 0 ) β§ Β¬ π₯ = 0 ) β ( 0 Β· π₯ ) = 0 ) |
57 |
54 56
|
eqtrd |
β’ ( ( ( ( π΄ β β β§ π₯ β π ) β§ π΄ = 0 ) β§ Β¬ π₯ = 0 ) β ( π΄ Β· π₯ ) = 0 ) |
58 |
57
|
oveq2d |
β’ ( ( ( ( π΄ β β β§ π₯ β π ) β§ π΄ = 0 ) β§ Β¬ π₯ = 0 ) β ( 1 + ( π΄ Β· π₯ ) ) = ( 1 + 0 ) ) |
59 |
|
1p0e1 |
β’ ( 1 + 0 ) = 1 |
60 |
58 59
|
eqtrdi |
β’ ( ( ( ( π΄ β β β§ π₯ β π ) β§ π΄ = 0 ) β§ Β¬ π₯ = 0 ) β ( 1 + ( π΄ Β· π₯ ) ) = 1 ) |
61 |
60
|
oveq1d |
β’ ( ( ( ( π΄ β β β§ π₯ β π ) β§ π΄ = 0 ) β§ Β¬ π₯ = 0 ) β ( ( 1 + ( π΄ Β· π₯ ) ) βπ ( 1 / π₯ ) ) = ( 1 βπ ( 1 / π₯ ) ) ) |
62 |
53
|
fveq2d |
β’ ( ( ( ( π΄ β β β§ π₯ β π ) β§ π΄ = 0 ) β§ Β¬ π₯ = 0 ) β ( exp β π΄ ) = ( exp β 0 ) ) |
63 |
|
ef0 |
β’ ( exp β 0 ) = 1 |
64 |
62 63
|
eqtrdi |
β’ ( ( ( ( π΄ β β β§ π₯ β π ) β§ π΄ = 0 ) β§ Β¬ π₯ = 0 ) β ( exp β π΄ ) = 1 ) |
65 |
52 61 64
|
3eqtr4d |
β’ ( ( ( ( π΄ β β β§ π₯ β π ) β§ π΄ = 0 ) β§ Β¬ π₯ = 0 ) β ( ( 1 + ( π΄ Β· π₯ ) ) βπ ( 1 / π₯ ) ) = ( exp β π΄ ) ) |
66 |
65
|
ifeq2da |
β’ ( ( ( π΄ β β β§ π₯ β π ) β§ π΄ = 0 ) β if ( π₯ = 0 , ( exp β π΄ ) , ( ( 1 + ( π΄ Β· π₯ ) ) βπ ( 1 / π₯ ) ) ) = if ( π₯ = 0 , ( exp β π΄ ) , ( exp β π΄ ) ) ) |
67 |
|
ifid |
β’ if ( π₯ = 0 , ( exp β π΄ ) , ( exp β π΄ ) ) = ( exp β π΄ ) |
68 |
66 67
|
eqtrdi |
β’ ( ( ( π΄ β β β§ π₯ β π ) β§ π΄ = 0 ) β if ( π₯ = 0 , ( exp β π΄ ) , ( ( 1 + ( π΄ Β· π₯ ) ) βπ ( 1 / π₯ ) ) ) = ( exp β π΄ ) ) |
69 |
|
iftrue |
β’ ( π₯ = 0 β if ( π₯ = 0 , ( exp β π΄ ) , ( ( 1 + ( π΄ Β· π₯ ) ) βπ ( 1 / π₯ ) ) ) = ( exp β π΄ ) ) |
70 |
69
|
adantl |
β’ ( ( ( π΄ β β β§ π₯ β π ) β§ π₯ = 0 ) β if ( π₯ = 0 , ( exp β π΄ ) , ( ( 1 + ( π΄ Β· π₯ ) ) βπ ( 1 / π₯ ) ) ) = ( exp β π΄ ) ) |
71 |
68 70
|
jaodan |
β’ ( ( ( π΄ β β β§ π₯ β π ) β§ ( π΄ = 0 β¨ π₯ = 0 ) ) β if ( π₯ = 0 , ( exp β π΄ ) , ( ( 1 + ( π΄ Β· π₯ ) ) βπ ( 1 / π₯ ) ) ) = ( exp β π΄ ) ) |
72 |
|
mulrid |
β’ ( π΄ β β β ( π΄ Β· 1 ) = π΄ ) |
73 |
72
|
ad2antrr |
β’ ( ( ( π΄ β β β§ π₯ β π ) β§ ( π΄ = 0 β¨ π₯ = 0 ) ) β ( π΄ Β· 1 ) = π΄ ) |
74 |
73
|
fveq2d |
β’ ( ( ( π΄ β β β§ π₯ β π ) β§ ( π΄ = 0 β¨ π₯ = 0 ) ) β ( exp β ( π΄ Β· 1 ) ) = ( exp β π΄ ) ) |
75 |
71 74
|
eqtr4d |
β’ ( ( ( π΄ β β β§ π₯ β π ) β§ ( π΄ = 0 β¨ π₯ = 0 ) ) β if ( π₯ = 0 , ( exp β π΄ ) , ( ( 1 + ( π΄ Β· π₯ ) ) βπ ( 1 / π₯ ) ) ) = ( exp β ( π΄ Β· 1 ) ) ) |
76 |
48 75
|
syldan |
β’ ( ( ( π΄ β β β§ π₯ β π ) β§ ( π΄ Β· π₯ ) = 0 ) β if ( π₯ = 0 , ( exp β π΄ ) , ( ( 1 + ( π΄ Β· π₯ ) ) βπ ( 1 / π₯ ) ) ) = ( exp β ( π΄ Β· 1 ) ) ) |
77 |
|
mulne0b |
β’ ( ( π΄ β β β§ π₯ β β ) β ( ( π΄ β 0 β§ π₯ β 0 ) β ( π΄ Β· π₯ ) β 0 ) ) |
78 |
45 77
|
syldan |
β’ ( ( π΄ β β β§ π₯ β π ) β ( ( π΄ β 0 β§ π₯ β 0 ) β ( π΄ Β· π₯ ) β 0 ) ) |
79 |
|
df-ne |
β’ ( ( π΄ Β· π₯ ) β 0 β Β¬ ( π΄ Β· π₯ ) = 0 ) |
80 |
78 79
|
bitrdi |
β’ ( ( π΄ β β β§ π₯ β π ) β ( ( π΄ β 0 β§ π₯ β 0 ) β Β¬ ( π΄ Β· π₯ ) = 0 ) ) |
81 |
|
simprr |
β’ ( ( ( π΄ β β β§ π₯ β π ) β§ ( π΄ β 0 β§ π₯ β 0 ) ) β π₯ β 0 ) |
82 |
81
|
neneqd |
β’ ( ( ( π΄ β β β§ π₯ β π ) β§ ( π΄ β 0 β§ π₯ β 0 ) ) β Β¬ π₯ = 0 ) |
83 |
82
|
iffalsed |
β’ ( ( ( π΄ β β β§ π₯ β π ) β§ ( π΄ β 0 β§ π₯ β 0 ) ) β if ( π₯ = 0 , ( exp β π΄ ) , ( ( 1 + ( π΄ Β· π₯ ) ) βπ ( 1 / π₯ ) ) ) = ( ( 1 + ( π΄ Β· π₯ ) ) βπ ( 1 / π₯ ) ) ) |
84 |
|
ax-1cn |
β’ 1 β β |
85 |
45 14
|
syldan |
β’ ( ( π΄ β β β§ π₯ β π ) β ( π΄ Β· π₯ ) β β ) |
86 |
|
addcl |
β’ ( ( 1 β β β§ ( π΄ Β· π₯ ) β β ) β ( 1 + ( π΄ Β· π₯ ) ) β β ) |
87 |
84 85 86
|
sylancr |
β’ ( ( π΄ β β β§ π₯ β π ) β ( 1 + ( π΄ Β· π₯ ) ) β β ) |
88 |
87
|
adantr |
β’ ( ( ( π΄ β β β§ π₯ β π ) β§ ( π΄ β 0 β§ π₯ β 0 ) ) β ( 1 + ( π΄ Β· π₯ ) ) β β ) |
89 |
|
eqid |
β’ ( 1 ( ball β ( abs β β ) ) 1 ) = ( 1 ( ball β ( abs β β ) ) 1 ) |
90 |
89
|
dvlog2lem |
β’ ( 1 ( ball β ( abs β β ) ) 1 ) β ( β β ( -β (,] 0 ) ) |
91 |
|
eqid |
β’ ( β β ( -β (,] 0 ) ) = ( β β ( -β (,] 0 ) ) |
92 |
91
|
logdmss |
β’ ( β β ( -β (,] 0 ) ) β ( β β { 0 } ) |
93 |
90 92
|
sstri |
β’ ( 1 ( ball β ( abs β β ) ) 1 ) β ( β β { 0 } ) |
94 |
|
eqid |
β’ ( abs β β ) = ( abs β β ) |
95 |
94
|
cnmetdval |
β’ ( ( ( 1 + ( π΄ Β· π₯ ) ) β β β§ 1 β β ) β ( ( 1 + ( π΄ Β· π₯ ) ) ( abs β β ) 1 ) = ( abs β ( ( 1 + ( π΄ Β· π₯ ) ) β 1 ) ) ) |
96 |
87 84 95
|
sylancl |
β’ ( ( π΄ β β β§ π₯ β π ) β ( ( 1 + ( π΄ Β· π₯ ) ) ( abs β β ) 1 ) = ( abs β ( ( 1 + ( π΄ Β· π₯ ) ) β 1 ) ) ) |
97 |
|
pncan2 |
β’ ( ( 1 β β β§ ( π΄ Β· π₯ ) β β ) β ( ( 1 + ( π΄ Β· π₯ ) ) β 1 ) = ( π΄ Β· π₯ ) ) |
98 |
84 85 97
|
sylancr |
β’ ( ( π΄ β β β§ π₯ β π ) β ( ( 1 + ( π΄ Β· π₯ ) ) β 1 ) = ( π΄ Β· π₯ ) ) |
99 |
98
|
fveq2d |
β’ ( ( π΄ β β β§ π₯ β π ) β ( abs β ( ( 1 + ( π΄ Β· π₯ ) ) β 1 ) ) = ( abs β ( π΄ Β· π₯ ) ) ) |
100 |
96 99
|
eqtrd |
β’ ( ( π΄ β β β§ π₯ β π ) β ( ( 1 + ( π΄ Β· π₯ ) ) ( abs β β ) 1 ) = ( abs β ( π΄ Β· π₯ ) ) ) |
101 |
85
|
abscld |
β’ ( ( π΄ β β β§ π₯ β π ) β ( abs β ( π΄ Β· π₯ ) ) β β ) |
102 |
34
|
adantr |
β’ ( ( π΄ β β β§ π₯ β π ) β ( ( abs β π΄ ) + 1 ) β β ) |
103 |
45
|
abscld |
β’ ( ( π΄ β β β§ π₯ β π ) β ( abs β π₯ ) β β ) |
104 |
102 103
|
remulcld |
β’ ( ( π΄ β β β§ π₯ β π ) β ( ( ( abs β π΄ ) + 1 ) Β· ( abs β π₯ ) ) β β ) |
105 |
|
1red |
β’ ( ( π΄ β β β§ π₯ β π ) β 1 β β ) |
106 |
|
absmul |
β’ ( ( π΄ β β β§ π₯ β β ) β ( abs β ( π΄ Β· π₯ ) ) = ( ( abs β π΄ ) Β· ( abs β π₯ ) ) ) |
107 |
45 106
|
syldan |
β’ ( ( π΄ β β β§ π₯ β π ) β ( abs β ( π΄ Β· π₯ ) ) = ( ( abs β π΄ ) Β· ( abs β π₯ ) ) ) |
108 |
32
|
adantr |
β’ ( ( π΄ β β β§ π₯ β π ) β ( abs β π΄ ) β β ) |
109 |
108 33
|
syl |
β’ ( ( π΄ β β β§ π₯ β π ) β ( ( abs β π΄ ) + 1 ) β β ) |
110 |
45
|
absge0d |
β’ ( ( π΄ β β β§ π₯ β π ) β 0 β€ ( abs β π₯ ) ) |
111 |
108
|
lep1d |
β’ ( ( π΄ β β β§ π₯ β π ) β ( abs β π΄ ) β€ ( ( abs β π΄ ) + 1 ) ) |
112 |
108 109 103 110 111
|
lemul1ad |
β’ ( ( π΄ β β β§ π₯ β π ) β ( ( abs β π΄ ) Β· ( abs β π₯ ) ) β€ ( ( ( abs β π΄ ) + 1 ) Β· ( abs β π₯ ) ) ) |
113 |
107 112
|
eqbrtrd |
β’ ( ( π΄ β β β§ π₯ β π ) β ( abs β ( π΄ Β· π₯ ) ) β€ ( ( ( abs β π΄ ) + 1 ) Β· ( abs β π₯ ) ) ) |
114 |
|
0cn |
β’ 0 β β |
115 |
94
|
cnmetdval |
β’ ( ( π₯ β β β§ 0 β β ) β ( π₯ ( abs β β ) 0 ) = ( abs β ( π₯ β 0 ) ) ) |
116 |
45 114 115
|
sylancl |
β’ ( ( π΄ β β β§ π₯ β π ) β ( π₯ ( abs β β ) 0 ) = ( abs β ( π₯ β 0 ) ) ) |
117 |
45
|
subid1d |
β’ ( ( π΄ β β β§ π₯ β π ) β ( π₯ β 0 ) = π₯ ) |
118 |
117
|
fveq2d |
β’ ( ( π΄ β β β§ π₯ β π ) β ( abs β ( π₯ β 0 ) ) = ( abs β π₯ ) ) |
119 |
116 118
|
eqtrd |
β’ ( ( π΄ β β β§ π₯ β π ) β ( π₯ ( abs β β ) 0 ) = ( abs β π₯ ) ) |
120 |
|
simpr |
β’ ( ( π΄ β β β§ π₯ β π ) β π₯ β π ) |
121 |
120 1
|
eleqtrdi |
β’ ( ( π΄ β β β§ π₯ β π ) β π₯ β ( 0 ( ball β ( abs β β ) ) ( 1 / ( ( abs β π΄ ) + 1 ) ) ) ) |
122 |
30
|
a1i |
β’ ( ( π΄ β β β§ π₯ β π ) β ( abs β β ) β ( βMet β β ) ) |
123 |
41
|
adantr |
β’ ( ( π΄ β β β§ π₯ β π ) β ( 1 / ( ( abs β π΄ ) + 1 ) ) β β* ) |
124 |
|
0cnd |
β’ ( ( π΄ β β β§ π₯ β π ) β 0 β β ) |
125 |
|
elbl3 |
β’ ( ( ( ( abs β β ) β ( βMet β β ) β§ ( 1 / ( ( abs β π΄ ) + 1 ) ) β β* ) β§ ( 0 β β β§ π₯ β β ) ) β ( π₯ β ( 0 ( ball β ( abs β β ) ) ( 1 / ( ( abs β π΄ ) + 1 ) ) ) β ( π₯ ( abs β β ) 0 ) < ( 1 / ( ( abs β π΄ ) + 1 ) ) ) ) |
126 |
122 123 124 45 125
|
syl22anc |
β’ ( ( π΄ β β β§ π₯ β π ) β ( π₯ β ( 0 ( ball β ( abs β β ) ) ( 1 / ( ( abs β π΄ ) + 1 ) ) ) β ( π₯ ( abs β β ) 0 ) < ( 1 / ( ( abs β π΄ ) + 1 ) ) ) ) |
127 |
121 126
|
mpbid |
β’ ( ( π΄ β β β§ π₯ β π ) β ( π₯ ( abs β β ) 0 ) < ( 1 / ( ( abs β π΄ ) + 1 ) ) ) |
128 |
119 127
|
eqbrtrrd |
β’ ( ( π΄ β β β§ π₯ β π ) β ( abs β π₯ ) < ( 1 / ( ( abs β π΄ ) + 1 ) ) ) |
129 |
38
|
adantr |
β’ ( ( π΄ β β β§ π₯ β π ) β 0 < ( ( abs β π΄ ) + 1 ) ) |
130 |
|
ltmuldiv2 |
β’ ( ( ( abs β π₯ ) β β β§ 1 β β β§ ( ( ( abs β π΄ ) + 1 ) β β β§ 0 < ( ( abs β π΄ ) + 1 ) ) ) β ( ( ( ( abs β π΄ ) + 1 ) Β· ( abs β π₯ ) ) < 1 β ( abs β π₯ ) < ( 1 / ( ( abs β π΄ ) + 1 ) ) ) ) |
131 |
103 105 109 129 130
|
syl112anc |
β’ ( ( π΄ β β β§ π₯ β π ) β ( ( ( ( abs β π΄ ) + 1 ) Β· ( abs β π₯ ) ) < 1 β ( abs β π₯ ) < ( 1 / ( ( abs β π΄ ) + 1 ) ) ) ) |
132 |
128 131
|
mpbird |
β’ ( ( π΄ β β β§ π₯ β π ) β ( ( ( abs β π΄ ) + 1 ) Β· ( abs β π₯ ) ) < 1 ) |
133 |
101 104 105 113 132
|
lelttrd |
β’ ( ( π΄ β β β§ π₯ β π ) β ( abs β ( π΄ Β· π₯ ) ) < 1 ) |
134 |
100 133
|
eqbrtrd |
β’ ( ( π΄ β β β§ π₯ β π ) β ( ( 1 + ( π΄ Β· π₯ ) ) ( abs β β ) 1 ) < 1 ) |
135 |
|
1rp |
β’ 1 β β+ |
136 |
|
rpxr |
β’ ( 1 β β+ β 1 β β* ) |
137 |
135 136
|
mp1i |
β’ ( ( π΄ β β β§ π₯ β π ) β 1 β β* ) |
138 |
|
1cnd |
β’ ( ( π΄ β β β§ π₯ β π ) β 1 β β ) |
139 |
|
elbl3 |
β’ ( ( ( ( abs β β ) β ( βMet β β ) β§ 1 β β* ) β§ ( 1 β β β§ ( 1 + ( π΄ Β· π₯ ) ) β β ) ) β ( ( 1 + ( π΄ Β· π₯ ) ) β ( 1 ( ball β ( abs β β ) ) 1 ) β ( ( 1 + ( π΄ Β· π₯ ) ) ( abs β β ) 1 ) < 1 ) ) |
140 |
122 137 138 87 139
|
syl22anc |
β’ ( ( π΄ β β β§ π₯ β π ) β ( ( 1 + ( π΄ Β· π₯ ) ) β ( 1 ( ball β ( abs β β ) ) 1 ) β ( ( 1 + ( π΄ Β· π₯ ) ) ( abs β β ) 1 ) < 1 ) ) |
141 |
134 140
|
mpbird |
β’ ( ( π΄ β β β§ π₯ β π ) β ( 1 + ( π΄ Β· π₯ ) ) β ( 1 ( ball β ( abs β β ) ) 1 ) ) |
142 |
93 141
|
sselid |
β’ ( ( π΄ β β β§ π₯ β π ) β ( 1 + ( π΄ Β· π₯ ) ) β ( β β { 0 } ) ) |
143 |
|
eldifsni |
β’ ( ( 1 + ( π΄ Β· π₯ ) ) β ( β β { 0 } ) β ( 1 + ( π΄ Β· π₯ ) ) β 0 ) |
144 |
142 143
|
syl |
β’ ( ( π΄ β β β§ π₯ β π ) β ( 1 + ( π΄ Β· π₯ ) ) β 0 ) |
145 |
144
|
adantr |
β’ ( ( ( π΄ β β β§ π₯ β π ) β§ ( π΄ β 0 β§ π₯ β 0 ) ) β ( 1 + ( π΄ Β· π₯ ) ) β 0 ) |
146 |
45
|
adantr |
β’ ( ( ( π΄ β β β§ π₯ β π ) β§ ( π΄ β 0 β§ π₯ β 0 ) ) β π₯ β β ) |
147 |
146 81
|
reccld |
β’ ( ( ( π΄ β β β§ π₯ β π ) β§ ( π΄ β 0 β§ π₯ β 0 ) ) β ( 1 / π₯ ) β β ) |
148 |
88 145 147
|
cxpefd |
β’ ( ( ( π΄ β β β§ π₯ β π ) β§ ( π΄ β 0 β§ π₯ β 0 ) ) β ( ( 1 + ( π΄ Β· π₯ ) ) βπ ( 1 / π₯ ) ) = ( exp β ( ( 1 / π₯ ) Β· ( log β ( 1 + ( π΄ Β· π₯ ) ) ) ) ) ) |
149 |
87 144
|
logcld |
β’ ( ( π΄ β β β§ π₯ β π ) β ( log β ( 1 + ( π΄ Β· π₯ ) ) ) β β ) |
150 |
149
|
adantr |
β’ ( ( ( π΄ β β β§ π₯ β π ) β§ ( π΄ β 0 β§ π₯ β 0 ) ) β ( log β ( 1 + ( π΄ Β· π₯ ) ) ) β β ) |
151 |
147 150
|
mulcomd |
β’ ( ( ( π΄ β β β§ π₯ β π ) β§ ( π΄ β 0 β§ π₯ β 0 ) ) β ( ( 1 / π₯ ) Β· ( log β ( 1 + ( π΄ Β· π₯ ) ) ) ) = ( ( log β ( 1 + ( π΄ Β· π₯ ) ) ) Β· ( 1 / π₯ ) ) ) |
152 |
|
simpll |
β’ ( ( ( π΄ β β β§ π₯ β π ) β§ ( π΄ β 0 β§ π₯ β 0 ) ) β π΄ β β ) |
153 |
|
simprl |
β’ ( ( ( π΄ β β β§ π₯ β π ) β§ ( π΄ β 0 β§ π₯ β 0 ) ) β π΄ β 0 ) |
154 |
152 153
|
dividd |
β’ ( ( ( π΄ β β β§ π₯ β π ) β§ ( π΄ β 0 β§ π₯ β 0 ) ) β ( π΄ / π΄ ) = 1 ) |
155 |
154
|
oveq1d |
β’ ( ( ( π΄ β β β§ π₯ β π ) β§ ( π΄ β 0 β§ π₯ β 0 ) ) β ( ( π΄ / π΄ ) / π₯ ) = ( 1 / π₯ ) ) |
156 |
152 152 146 153 81
|
divdiv1d |
β’ ( ( ( π΄ β β β§ π₯ β π ) β§ ( π΄ β 0 β§ π₯ β 0 ) ) β ( ( π΄ / π΄ ) / π₯ ) = ( π΄ / ( π΄ Β· π₯ ) ) ) |
157 |
155 156
|
eqtr3d |
β’ ( ( ( π΄ β β β§ π₯ β π ) β§ ( π΄ β 0 β§ π₯ β 0 ) ) β ( 1 / π₯ ) = ( π΄ / ( π΄ Β· π₯ ) ) ) |
158 |
157
|
oveq2d |
β’ ( ( ( π΄ β β β§ π₯ β π ) β§ ( π΄ β 0 β§ π₯ β 0 ) ) β ( ( log β ( 1 + ( π΄ Β· π₯ ) ) ) Β· ( 1 / π₯ ) ) = ( ( log β ( 1 + ( π΄ Β· π₯ ) ) ) Β· ( π΄ / ( π΄ Β· π₯ ) ) ) ) |
159 |
85
|
adantr |
β’ ( ( ( π΄ β β β§ π₯ β π ) β§ ( π΄ β 0 β§ π₯ β 0 ) ) β ( π΄ Β· π₯ ) β β ) |
160 |
78
|
biimpa |
β’ ( ( ( π΄ β β β§ π₯ β π ) β§ ( π΄ β 0 β§ π₯ β 0 ) ) β ( π΄ Β· π₯ ) β 0 ) |
161 |
150 152 159 160
|
div12d |
β’ ( ( ( π΄ β β β§ π₯ β π ) β§ ( π΄ β 0 β§ π₯ β 0 ) ) β ( ( log β ( 1 + ( π΄ Β· π₯ ) ) ) Β· ( π΄ / ( π΄ Β· π₯ ) ) ) = ( π΄ Β· ( ( log β ( 1 + ( π΄ Β· π₯ ) ) ) / ( π΄ Β· π₯ ) ) ) ) |
162 |
151 158 161
|
3eqtrd |
β’ ( ( ( π΄ β β β§ π₯ β π ) β§ ( π΄ β 0 β§ π₯ β 0 ) ) β ( ( 1 / π₯ ) Β· ( log β ( 1 + ( π΄ Β· π₯ ) ) ) ) = ( π΄ Β· ( ( log β ( 1 + ( π΄ Β· π₯ ) ) ) / ( π΄ Β· π₯ ) ) ) ) |
163 |
162
|
fveq2d |
β’ ( ( ( π΄ β β β§ π₯ β π ) β§ ( π΄ β 0 β§ π₯ β 0 ) ) β ( exp β ( ( 1 / π₯ ) Β· ( log β ( 1 + ( π΄ Β· π₯ ) ) ) ) ) = ( exp β ( π΄ Β· ( ( log β ( 1 + ( π΄ Β· π₯ ) ) ) / ( π΄ Β· π₯ ) ) ) ) ) |
164 |
83 148 163
|
3eqtrd |
β’ ( ( ( π΄ β β β§ π₯ β π ) β§ ( π΄ β 0 β§ π₯ β 0 ) ) β if ( π₯ = 0 , ( exp β π΄ ) , ( ( 1 + ( π΄ Β· π₯ ) ) βπ ( 1 / π₯ ) ) ) = ( exp β ( π΄ Β· ( ( log β ( 1 + ( π΄ Β· π₯ ) ) ) / ( π΄ Β· π₯ ) ) ) ) ) |
165 |
164
|
ex |
β’ ( ( π΄ β β β§ π₯ β π ) β ( ( π΄ β 0 β§ π₯ β 0 ) β if ( π₯ = 0 , ( exp β π΄ ) , ( ( 1 + ( π΄ Β· π₯ ) ) βπ ( 1 / π₯ ) ) ) = ( exp β ( π΄ Β· ( ( log β ( 1 + ( π΄ Β· π₯ ) ) ) / ( π΄ Β· π₯ ) ) ) ) ) ) |
166 |
80 165
|
sylbird |
β’ ( ( π΄ β β β§ π₯ β π ) β ( Β¬ ( π΄ Β· π₯ ) = 0 β if ( π₯ = 0 , ( exp β π΄ ) , ( ( 1 + ( π΄ Β· π₯ ) ) βπ ( 1 / π₯ ) ) ) = ( exp β ( π΄ Β· ( ( log β ( 1 + ( π΄ Β· π₯ ) ) ) / ( π΄ Β· π₯ ) ) ) ) ) ) |
167 |
166
|
imp |
β’ ( ( ( π΄ β β β§ π₯ β π ) β§ Β¬ ( π΄ Β· π₯ ) = 0 ) β if ( π₯ = 0 , ( exp β π΄ ) , ( ( 1 + ( π΄ Β· π₯ ) ) βπ ( 1 / π₯ ) ) ) = ( exp β ( π΄ Β· ( ( log β ( 1 + ( π΄ Β· π₯ ) ) ) / ( π΄ Β· π₯ ) ) ) ) ) |
168 |
28 29 76 167
|
ifbothda |
β’ ( ( π΄ β β β§ π₯ β π ) β if ( π₯ = 0 , ( exp β π΄ ) , ( ( 1 + ( π΄ Β· π₯ ) ) βπ ( 1 / π₯ ) ) ) = if ( ( π΄ Β· π₯ ) = 0 , ( exp β ( π΄ Β· 1 ) ) , ( exp β ( π΄ Β· ( ( log β ( 1 + ( π΄ Β· π₯ ) ) ) / ( π΄ Β· π₯ ) ) ) ) ) ) |
169 |
168
|
mpteq2dva |
β’ ( π΄ β β β ( π₯ β π β¦ if ( π₯ = 0 , ( exp β π΄ ) , ( ( 1 + ( π΄ Β· π₯ ) ) βπ ( 1 / π₯ ) ) ) ) = ( π₯ β π β¦ if ( ( π΄ Β· π₯ ) = 0 , ( exp β ( π΄ Β· 1 ) ) , ( exp β ( π΄ Β· ( ( log β ( 1 + ( π΄ Β· π₯ ) ) ) / ( π΄ Β· π₯ ) ) ) ) ) ) ) |
170 |
44
|
resmptd |
β’ ( π΄ β β β ( ( π₯ β β β¦ if ( π₯ = 0 , ( exp β π΄ ) , ( ( 1 + ( π΄ Β· π₯ ) ) βπ ( 1 / π₯ ) ) ) ) βΎ π ) = ( π₯ β π β¦ if ( π₯ = 0 , ( exp β π΄ ) , ( ( 1 + ( π΄ Β· π₯ ) ) βπ ( 1 / π₯ ) ) ) ) ) |
171 |
|
1cnd |
β’ ( ( ( π΄ β β β§ π₯ β π ) β§ ( π΄ Β· π₯ ) = 0 ) β 1 β β ) |
172 |
149
|
adantr |
β’ ( ( ( π΄ β β β§ π₯ β π ) β§ Β¬ ( π΄ Β· π₯ ) = 0 ) β ( log β ( 1 + ( π΄ Β· π₯ ) ) ) β β ) |
173 |
85
|
adantr |
β’ ( ( ( π΄ β β β§ π₯ β π ) β§ Β¬ ( π΄ Β· π₯ ) = 0 ) β ( π΄ Β· π₯ ) β β ) |
174 |
|
simpr |
β’ ( ( ( π΄ β β β§ π₯ β π ) β§ Β¬ ( π΄ Β· π₯ ) = 0 ) β Β¬ ( π΄ Β· π₯ ) = 0 ) |
175 |
174
|
neqned |
β’ ( ( ( π΄ β β β§ π₯ β π ) β§ Β¬ ( π΄ Β· π₯ ) = 0 ) β ( π΄ Β· π₯ ) β 0 ) |
176 |
172 173 175
|
divcld |
β’ ( ( ( π΄ β β β§ π₯ β π ) β§ Β¬ ( π΄ Β· π₯ ) = 0 ) β ( ( log β ( 1 + ( π΄ Β· π₯ ) ) ) / ( π΄ Β· π₯ ) ) β β ) |
177 |
171 176
|
ifclda |
β’ ( ( π΄ β β β§ π₯ β π ) β if ( ( π΄ Β· π₯ ) = 0 , 1 , ( ( log β ( 1 + ( π΄ Β· π₯ ) ) ) / ( π΄ Β· π₯ ) ) ) β β ) |
178 |
|
eqidd |
β’ ( π΄ β β β ( π₯ β π β¦ if ( ( π΄ Β· π₯ ) = 0 , 1 , ( ( log β ( 1 + ( π΄ Β· π₯ ) ) ) / ( π΄ Β· π₯ ) ) ) ) = ( π₯ β π β¦ if ( ( π΄ Β· π₯ ) = 0 , 1 , ( ( log β ( 1 + ( π΄ Β· π₯ ) ) ) / ( π΄ Β· π₯ ) ) ) ) ) |
179 |
|
eqidd |
β’ ( π΄ β β β ( π¦ β β β¦ ( exp β ( π΄ Β· π¦ ) ) ) = ( π¦ β β β¦ ( exp β ( π΄ Β· π¦ ) ) ) ) |
180 |
|
oveq2 |
β’ ( π¦ = if ( ( π΄ Β· π₯ ) = 0 , 1 , ( ( log β ( 1 + ( π΄ Β· π₯ ) ) ) / ( π΄ Β· π₯ ) ) ) β ( π΄ Β· π¦ ) = ( π΄ Β· if ( ( π΄ Β· π₯ ) = 0 , 1 , ( ( log β ( 1 + ( π΄ Β· π₯ ) ) ) / ( π΄ Β· π₯ ) ) ) ) ) |
181 |
180
|
fveq2d |
β’ ( π¦ = if ( ( π΄ Β· π₯ ) = 0 , 1 , ( ( log β ( 1 + ( π΄ Β· π₯ ) ) ) / ( π΄ Β· π₯ ) ) ) β ( exp β ( π΄ Β· π¦ ) ) = ( exp β ( π΄ Β· if ( ( π΄ Β· π₯ ) = 0 , 1 , ( ( log β ( 1 + ( π΄ Β· π₯ ) ) ) / ( π΄ Β· π₯ ) ) ) ) ) ) |
182 |
|
oveq2 |
β’ ( if ( ( π΄ Β· π₯ ) = 0 , 1 , ( ( log β ( 1 + ( π΄ Β· π₯ ) ) ) / ( π΄ Β· π₯ ) ) ) = 1 β ( π΄ Β· if ( ( π΄ Β· π₯ ) = 0 , 1 , ( ( log β ( 1 + ( π΄ Β· π₯ ) ) ) / ( π΄ Β· π₯ ) ) ) ) = ( π΄ Β· 1 ) ) |
183 |
182
|
fveq2d |
β’ ( if ( ( π΄ Β· π₯ ) = 0 , 1 , ( ( log β ( 1 + ( π΄ Β· π₯ ) ) ) / ( π΄ Β· π₯ ) ) ) = 1 β ( exp β ( π΄ Β· if ( ( π΄ Β· π₯ ) = 0 , 1 , ( ( log β ( 1 + ( π΄ Β· π₯ ) ) ) / ( π΄ Β· π₯ ) ) ) ) ) = ( exp β ( π΄ Β· 1 ) ) ) |
184 |
|
oveq2 |
β’ ( if ( ( π΄ Β· π₯ ) = 0 , 1 , ( ( log β ( 1 + ( π΄ Β· π₯ ) ) ) / ( π΄ Β· π₯ ) ) ) = ( ( log β ( 1 + ( π΄ Β· π₯ ) ) ) / ( π΄ Β· π₯ ) ) β ( π΄ Β· if ( ( π΄ Β· π₯ ) = 0 , 1 , ( ( log β ( 1 + ( π΄ Β· π₯ ) ) ) / ( π΄ Β· π₯ ) ) ) ) = ( π΄ Β· ( ( log β ( 1 + ( π΄ Β· π₯ ) ) ) / ( π΄ Β· π₯ ) ) ) ) |
185 |
184
|
fveq2d |
β’ ( if ( ( π΄ Β· π₯ ) = 0 , 1 , ( ( log β ( 1 + ( π΄ Β· π₯ ) ) ) / ( π΄ Β· π₯ ) ) ) = ( ( log β ( 1 + ( π΄ Β· π₯ ) ) ) / ( π΄ Β· π₯ ) ) β ( exp β ( π΄ Β· if ( ( π΄ Β· π₯ ) = 0 , 1 , ( ( log β ( 1 + ( π΄ Β· π₯ ) ) ) / ( π΄ Β· π₯ ) ) ) ) ) = ( exp β ( π΄ Β· ( ( log β ( 1 + ( π΄ Β· π₯ ) ) ) / ( π΄ Β· π₯ ) ) ) ) ) |
186 |
183 185
|
ifsb |
β’ ( exp β ( π΄ Β· if ( ( π΄ Β· π₯ ) = 0 , 1 , ( ( log β ( 1 + ( π΄ Β· π₯ ) ) ) / ( π΄ Β· π₯ ) ) ) ) ) = if ( ( π΄ Β· π₯ ) = 0 , ( exp β ( π΄ Β· 1 ) ) , ( exp β ( π΄ Β· ( ( log β ( 1 + ( π΄ Β· π₯ ) ) ) / ( π΄ Β· π₯ ) ) ) ) ) |
187 |
181 186
|
eqtrdi |
β’ ( π¦ = if ( ( π΄ Β· π₯ ) = 0 , 1 , ( ( log β ( 1 + ( π΄ Β· π₯ ) ) ) / ( π΄ Β· π₯ ) ) ) β ( exp β ( π΄ Β· π¦ ) ) = if ( ( π΄ Β· π₯ ) = 0 , ( exp β ( π΄ Β· 1 ) ) , ( exp β ( π΄ Β· ( ( log β ( 1 + ( π΄ Β· π₯ ) ) ) / ( π΄ Β· π₯ ) ) ) ) ) ) |
188 |
177 178 179 187
|
fmptco |
β’ ( π΄ β β β ( ( π¦ β β β¦ ( exp β ( π΄ Β· π¦ ) ) ) β ( π₯ β π β¦ if ( ( π΄ Β· π₯ ) = 0 , 1 , ( ( log β ( 1 + ( π΄ Β· π₯ ) ) ) / ( π΄ Β· π₯ ) ) ) ) ) = ( π₯ β π β¦ if ( ( π΄ Β· π₯ ) = 0 , ( exp β ( π΄ Β· 1 ) ) , ( exp β ( π΄ Β· ( ( log β ( 1 + ( π΄ Β· π₯ ) ) ) / ( π΄ Β· π₯ ) ) ) ) ) ) ) |
189 |
169 170 188
|
3eqtr4d |
β’ ( π΄ β β β ( ( π₯ β β β¦ if ( π₯ = 0 , ( exp β π΄ ) , ( ( 1 + ( π΄ Β· π₯ ) ) βπ ( 1 / π₯ ) ) ) ) βΎ π ) = ( ( π¦ β β β¦ ( exp β ( π΄ Β· π¦ ) ) ) β ( π₯ β π β¦ if ( ( π΄ Β· π₯ ) = 0 , 1 , ( ( log β ( 1 + ( π΄ Β· π₯ ) ) ) / ( π΄ Β· π₯ ) ) ) ) ) ) |
190 |
|
eqidd |
β’ ( π΄ β β β ( π₯ β π β¦ ( 1 + ( π΄ Β· π₯ ) ) ) = ( π₯ β π β¦ ( 1 + ( π΄ Β· π₯ ) ) ) ) |
191 |
|
eqidd |
β’ ( π΄ β β β ( π¦ β ( 1 ( ball β ( abs β β ) ) 1 ) β¦ if ( π¦ = 1 , 1 , ( ( log β π¦ ) / ( π¦ β 1 ) ) ) ) = ( π¦ β ( 1 ( ball β ( abs β β ) ) 1 ) β¦ if ( π¦ = 1 , 1 , ( ( log β π¦ ) / ( π¦ β 1 ) ) ) ) ) |
192 |
|
eqeq1 |
β’ ( π¦ = ( 1 + ( π΄ Β· π₯ ) ) β ( π¦ = 1 β ( 1 + ( π΄ Β· π₯ ) ) = 1 ) ) |
193 |
|
fveq2 |
β’ ( π¦ = ( 1 + ( π΄ Β· π₯ ) ) β ( log β π¦ ) = ( log β ( 1 + ( π΄ Β· π₯ ) ) ) ) |
194 |
|
oveq1 |
β’ ( π¦ = ( 1 + ( π΄ Β· π₯ ) ) β ( π¦ β 1 ) = ( ( 1 + ( π΄ Β· π₯ ) ) β 1 ) ) |
195 |
193 194
|
oveq12d |
β’ ( π¦ = ( 1 + ( π΄ Β· π₯ ) ) β ( ( log β π¦ ) / ( π¦ β 1 ) ) = ( ( log β ( 1 + ( π΄ Β· π₯ ) ) ) / ( ( 1 + ( π΄ Β· π₯ ) ) β 1 ) ) ) |
196 |
192 195
|
ifbieq2d |
β’ ( π¦ = ( 1 + ( π΄ Β· π₯ ) ) β if ( π¦ = 1 , 1 , ( ( log β π¦ ) / ( π¦ β 1 ) ) ) = if ( ( 1 + ( π΄ Β· π₯ ) ) = 1 , 1 , ( ( log β ( 1 + ( π΄ Β· π₯ ) ) ) / ( ( 1 + ( π΄ Β· π₯ ) ) β 1 ) ) ) ) |
197 |
141 190 191 196
|
fmptco |
β’ ( π΄ β β β ( ( π¦ β ( 1 ( ball β ( abs β β ) ) 1 ) β¦ if ( π¦ = 1 , 1 , ( ( log β π¦ ) / ( π¦ β 1 ) ) ) ) β ( π₯ β π β¦ ( 1 + ( π΄ Β· π₯ ) ) ) ) = ( π₯ β π β¦ if ( ( 1 + ( π΄ Β· π₯ ) ) = 1 , 1 , ( ( log β ( 1 + ( π΄ Β· π₯ ) ) ) / ( ( 1 + ( π΄ Β· π₯ ) ) β 1 ) ) ) ) ) |
198 |
59
|
eqeq2i |
β’ ( ( 1 + ( π΄ Β· π₯ ) ) = ( 1 + 0 ) β ( 1 + ( π΄ Β· π₯ ) ) = 1 ) |
199 |
138 85 124
|
addcand |
β’ ( ( π΄ β β β§ π₯ β π ) β ( ( 1 + ( π΄ Β· π₯ ) ) = ( 1 + 0 ) β ( π΄ Β· π₯ ) = 0 ) ) |
200 |
198 199
|
bitr3id |
β’ ( ( π΄ β β β§ π₯ β π ) β ( ( 1 + ( π΄ Β· π₯ ) ) = 1 β ( π΄ Β· π₯ ) = 0 ) ) |
201 |
98
|
oveq2d |
β’ ( ( π΄ β β β§ π₯ β π ) β ( ( log β ( 1 + ( π΄ Β· π₯ ) ) ) / ( ( 1 + ( π΄ Β· π₯ ) ) β 1 ) ) = ( ( log β ( 1 + ( π΄ Β· π₯ ) ) ) / ( π΄ Β· π₯ ) ) ) |
202 |
200 201
|
ifbieq2d |
β’ ( ( π΄ β β β§ π₯ β π ) β if ( ( 1 + ( π΄ Β· π₯ ) ) = 1 , 1 , ( ( log β ( 1 + ( π΄ Β· π₯ ) ) ) / ( ( 1 + ( π΄ Β· π₯ ) ) β 1 ) ) ) = if ( ( π΄ Β· π₯ ) = 0 , 1 , ( ( log β ( 1 + ( π΄ Β· π₯ ) ) ) / ( π΄ Β· π₯ ) ) ) ) |
203 |
202
|
mpteq2dva |
β’ ( π΄ β β β ( π₯ β π β¦ if ( ( 1 + ( π΄ Β· π₯ ) ) = 1 , 1 , ( ( log β ( 1 + ( π΄ Β· π₯ ) ) ) / ( ( 1 + ( π΄ Β· π₯ ) ) β 1 ) ) ) ) = ( π₯ β π β¦ if ( ( π΄ Β· π₯ ) = 0 , 1 , ( ( log β ( 1 + ( π΄ Β· π₯ ) ) ) / ( π΄ Β· π₯ ) ) ) ) ) |
204 |
197 203
|
eqtrd |
β’ ( π΄ β β β ( ( π¦ β ( 1 ( ball β ( abs β β ) ) 1 ) β¦ if ( π¦ = 1 , 1 , ( ( log β π¦ ) / ( π¦ β 1 ) ) ) ) β ( π₯ β π β¦ ( 1 + ( π΄ Β· π₯ ) ) ) ) = ( π₯ β π β¦ if ( ( π΄ Β· π₯ ) = 0 , 1 , ( ( log β ( 1 + ( π΄ Β· π₯ ) ) ) / ( π΄ Β· π₯ ) ) ) ) ) |
205 |
|
eqid |
β’ ( ( TopOpen β βfld ) βΎt π ) = ( ( TopOpen β βfld ) βΎt π ) |
206 |
|
eqid |
β’ ( TopOpen β βfld ) = ( TopOpen β βfld ) |
207 |
206
|
cnfldtopon |
β’ ( TopOpen β βfld ) β ( TopOn β β ) |
208 |
207
|
a1i |
β’ ( π΄ β β β ( TopOpen β βfld ) β ( TopOn β β ) ) |
209 |
|
1cnd |
β’ ( π΄ β β β 1 β β ) |
210 |
208 208 209
|
cnmptc |
β’ ( π΄ β β β ( π₯ β β β¦ 1 ) β ( ( TopOpen β βfld ) Cn ( TopOpen β βfld ) ) ) |
211 |
|
id |
β’ ( π΄ β β β π΄ β β ) |
212 |
208 208 211
|
cnmptc |
β’ ( π΄ β β β ( π₯ β β β¦ π΄ ) β ( ( TopOpen β βfld ) Cn ( TopOpen β βfld ) ) ) |
213 |
208
|
cnmptid |
β’ ( π΄ β β β ( π₯ β β β¦ π₯ ) β ( ( TopOpen β βfld ) Cn ( TopOpen β βfld ) ) ) |
214 |
206
|
mulcn |
β’ Β· β ( ( ( TopOpen β βfld ) Γt ( TopOpen β βfld ) ) Cn ( TopOpen β βfld ) ) |
215 |
214
|
a1i |
β’ ( π΄ β β β Β· β ( ( ( TopOpen β βfld ) Γt ( TopOpen β βfld ) ) Cn ( TopOpen β βfld ) ) ) |
216 |
208 212 213 215
|
cnmpt12f |
β’ ( π΄ β β β ( π₯ β β β¦ ( π΄ Β· π₯ ) ) β ( ( TopOpen β βfld ) Cn ( TopOpen β βfld ) ) ) |
217 |
206
|
addcn |
β’ + β ( ( ( TopOpen β βfld ) Γt ( TopOpen β βfld ) ) Cn ( TopOpen β βfld ) ) |
218 |
217
|
a1i |
β’ ( π΄ β β β + β ( ( ( TopOpen β βfld ) Γt ( TopOpen β βfld ) ) Cn ( TopOpen β βfld ) ) ) |
219 |
208 210 216 218
|
cnmpt12f |
β’ ( π΄ β β β ( π₯ β β β¦ ( 1 + ( π΄ Β· π₯ ) ) ) β ( ( TopOpen β βfld ) Cn ( TopOpen β βfld ) ) ) |
220 |
205 208 44 219
|
cnmpt1res |
β’ ( π΄ β β β ( π₯ β π β¦ ( 1 + ( π΄ Β· π₯ ) ) ) β ( ( ( TopOpen β βfld ) βΎt π ) Cn ( TopOpen β βfld ) ) ) |
221 |
141
|
fmpttd |
β’ ( π΄ β β β ( π₯ β π β¦ ( 1 + ( π΄ Β· π₯ ) ) ) : π βΆ ( 1 ( ball β ( abs β β ) ) 1 ) ) |
222 |
221
|
frnd |
β’ ( π΄ β β β ran ( π₯ β π β¦ ( 1 + ( π΄ Β· π₯ ) ) ) β ( 1 ( ball β ( abs β β ) ) 1 ) ) |
223 |
|
difss |
β’ ( β β { 0 } ) β β |
224 |
93 223
|
sstri |
β’ ( 1 ( ball β ( abs β β ) ) 1 ) β β |
225 |
224
|
a1i |
β’ ( π΄ β β β ( 1 ( ball β ( abs β β ) ) 1 ) β β ) |
226 |
|
cnrest2 |
β’ ( ( ( 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 |
β’ ( π΄ β β β ( ( π₯ β π β¦ ( 1 + ( π΄ Β· π₯ ) ) ) β ( ( ( TopOpen β βfld ) βΎt π ) Cn ( TopOpen β βfld ) ) β ( π₯ β π β¦ ( 1 + ( π΄ Β· π₯ ) ) ) β ( ( ( TopOpen β βfld ) βΎt π ) Cn ( ( TopOpen β βfld ) βΎt ( 1 ( ball β ( abs β β ) ) 1 ) ) ) ) ) |
228 |
220 227
|
mpbid |
β’ ( π΄ β β β ( π₯ β π β¦ ( 1 + ( π΄ Β· π₯ ) ) ) β ( ( ( TopOpen β βfld ) βΎt π ) Cn ( ( TopOpen β βfld ) βΎt ( 1 ( ball β ( abs β β ) ) 1 ) ) ) ) |
229 |
|
blcntr |
β’ ( ( ( abs β β ) β ( βMet β β ) β§ 0 β β β§ ( 1 / ( ( abs β π΄ ) + 1 ) ) β β+ ) β 0 β ( 0 ( ball β ( abs β β ) ) ( 1 / ( ( abs β π΄ ) + 1 ) ) ) ) |
230 |
30 31 40 229
|
mp3an2i |
β’ ( π΄ β β β 0 β ( 0 ( ball β ( abs β β ) ) ( 1 / ( ( abs β π΄ ) + 1 ) ) ) ) |
231 |
230 1
|
eleqtrrdi |
β’ ( π΄ β β β 0 β π ) |
232 |
|
resttopon |
β’ ( ( ( TopOpen β βfld ) β ( TopOn β β ) β§ π β β ) β ( ( TopOpen β βfld ) βΎt π ) β ( TopOn β π ) ) |
233 |
207 44 232
|
sylancr |
β’ ( π΄ β β β ( ( TopOpen β βfld ) βΎt π ) β ( TopOn β π ) ) |
234 |
|
toponuni |
β’ ( ( ( TopOpen β βfld ) βΎt π ) β ( TopOn β π ) β π = βͺ ( ( TopOpen β βfld ) βΎt π ) ) |
235 |
233 234
|
syl |
β’ ( π΄ β β β π = βͺ ( ( TopOpen β βfld ) βΎt π ) ) |
236 |
231 235
|
eleqtrd |
β’ ( π΄ β β β 0 β βͺ ( ( TopOpen β βfld ) βΎt π ) ) |
237 |
|
eqid |
β’ βͺ ( ( TopOpen β βfld ) βΎt π ) = βͺ ( ( TopOpen β βfld ) βΎt π ) |
238 |
237
|
cncnpi |
β’ ( ( ( π₯ β π β¦ ( 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 |
β’ ( π΄ β β β ( π₯ β π β¦ ( 1 + ( π΄ Β· π₯ ) ) ) β ( ( ( ( TopOpen β βfld ) βΎt π ) CnP ( ( TopOpen β βfld ) βΎt ( 1 ( ball β ( abs β β ) ) 1 ) ) ) β 0 ) ) |
240 |
|
cnelprrecn |
β’ β β { β , β } |
241 |
|
logf1o |
β’ log : ( β β { 0 } ) β1-1-ontoβ ran log |
242 |
|
f1of |
β’ ( log : ( β β { 0 } ) β1-1-ontoβ ran log β log : ( β β { 0 } ) βΆ ran log ) |
243 |
241 242
|
ax-mp |
β’ log : ( β β { 0 } ) βΆ ran log |
244 |
|
logrncn |
β’ ( π₯ β ran log β π₯ β β ) |
245 |
244
|
ssriv |
β’ ran log β β |
246 |
|
fss |
β’ ( ( log : ( β β { 0 } ) βΆ ran log β§ ran log β β ) β log : ( β β { 0 } ) βΆ β ) |
247 |
243 245 246
|
mp2an |
β’ log : ( β β { 0 } ) βΆ β |
248 |
|
fssres |
β’ ( ( log : ( β β { 0 } ) βΆ β β§ ( 1 ( ball β ( abs β β ) ) 1 ) β ( β β { 0 } ) ) β ( log βΎ ( 1 ( ball β ( abs β β ) ) 1 ) ) : ( 1 ( ball β ( abs β β ) ) 1 ) βΆ β ) |
249 |
247 93 248
|
mp2an |
β’ ( log βΎ ( 1 ( ball β ( abs β β ) ) 1 ) ) : ( 1 ( ball β ( abs β β ) ) 1 ) βΆ β |
250 |
|
blcntr |
β’ ( ( ( abs β β ) β ( βMet β β ) β§ 1 β β β§ 1 β β+ ) β 1 β ( 1 ( ball β ( abs β β ) ) 1 ) ) |
251 |
30 84 135 250
|
mp3an |
β’ 1 β ( 1 ( ball β ( abs β β ) ) 1 ) |
252 |
|
ovex |
β’ ( 1 / π¦ ) β V |
253 |
89
|
dvlog2 |
β’ ( β D ( log βΎ ( 1 ( ball β ( abs β β ) ) 1 ) ) ) = ( π¦ β ( 1 ( ball β ( abs β β ) ) 1 ) β¦ ( 1 / π¦ ) ) |
254 |
252 253
|
dmmpti |
β’ dom ( β D ( log βΎ ( 1 ( ball β ( abs β β ) ) 1 ) ) ) = ( 1 ( ball β ( abs β β ) ) 1 ) |
255 |
251 254
|
eleqtrri |
β’ 1 β dom ( β D ( log βΎ ( 1 ( ball β ( abs β β ) ) 1 ) ) ) |
256 |
|
eqid |
β’ ( ( TopOpen β βfld ) βΎt ( 1 ( ball β ( abs β β ) ) 1 ) ) = ( ( TopOpen β βfld ) βΎt ( 1 ( ball β ( abs β β ) ) 1 ) ) |
257 |
253
|
fveq1i |
β’ ( ( β D ( log βΎ ( 1 ( ball β ( abs β β ) ) 1 ) ) ) β 1 ) = ( ( π¦ β ( 1 ( ball β ( abs β β ) ) 1 ) β¦ ( 1 / π¦ ) ) β 1 ) |
258 |
|
oveq2 |
β’ ( π¦ = 1 β ( 1 / π¦ ) = ( 1 / 1 ) ) |
259 |
|
1div1e1 |
β’ ( 1 / 1 ) = 1 |
260 |
258 259
|
eqtrdi |
β’ ( π¦ = 1 β ( 1 / π¦ ) = 1 ) |
261 |
|
eqid |
β’ ( π¦ β ( 1 ( ball β ( abs β β ) ) 1 ) β¦ ( 1 / π¦ ) ) = ( π¦ β ( 1 ( ball β ( abs β β ) ) 1 ) β¦ ( 1 / π¦ ) ) |
262 |
|
1ex |
β’ 1 β V |
263 |
260 261 262
|
fvmpt |
β’ ( 1 β ( 1 ( ball β ( abs β β ) ) 1 ) β ( ( π¦ β ( 1 ( ball β ( abs β β ) ) 1 ) β¦ ( 1 / π¦ ) ) β 1 ) = 1 ) |
264 |
251 263
|
ax-mp |
β’ ( ( π¦ β ( 1 ( ball β ( abs β β ) ) 1 ) β¦ ( 1 / π¦ ) ) β 1 ) = 1 |
265 |
257 264
|
eqtr2i |
β’ 1 = ( ( β D ( log βΎ ( 1 ( ball β ( abs β β ) ) 1 ) ) ) β 1 ) |
266 |
265
|
a1i |
β’ ( π¦ β ( 1 ( ball β ( abs β β ) ) 1 ) β 1 = ( ( β D ( log βΎ ( 1 ( ball β ( abs β β ) ) 1 ) ) ) β 1 ) ) |
267 |
|
fvres |
β’ ( π¦ β ( 1 ( ball β ( abs β β ) ) 1 ) β ( ( log βΎ ( 1 ( ball β ( abs β β ) ) 1 ) ) β π¦ ) = ( log β π¦ ) ) |
268 |
|
fvres |
β’ ( 1 β ( 1 ( ball β ( abs β β ) ) 1 ) β ( ( log βΎ ( 1 ( ball β ( abs β β ) ) 1 ) ) β 1 ) = ( log β 1 ) ) |
269 |
251 268
|
mp1i |
β’ ( π¦ β ( 1 ( ball β ( abs β β ) ) 1 ) β ( ( log βΎ ( 1 ( ball β ( abs β β ) ) 1 ) ) β 1 ) = ( log β 1 ) ) |
270 |
|
log1 |
β’ ( log β 1 ) = 0 |
271 |
269 270
|
eqtrdi |
β’ ( π¦ β ( 1 ( ball β ( abs β β ) ) 1 ) β ( ( log βΎ ( 1 ( ball β ( abs β β ) ) 1 ) ) β 1 ) = 0 ) |
272 |
267 271
|
oveq12d |
β’ ( π¦ β ( 1 ( ball β ( abs β β ) ) 1 ) β ( ( ( log βΎ ( 1 ( ball β ( abs β β ) ) 1 ) ) β π¦ ) β ( ( log βΎ ( 1 ( ball β ( abs β β ) ) 1 ) ) β 1 ) ) = ( ( log β π¦ ) β 0 ) ) |
273 |
93
|
sseli |
β’ ( π¦ β ( 1 ( ball β ( abs β β ) ) 1 ) β π¦ β ( β β { 0 } ) ) |
274 |
|
eldifsn |
β’ ( π¦ β ( β β { 0 } ) β ( π¦ β β β§ π¦ β 0 ) ) |
275 |
273 274
|
sylib |
β’ ( π¦ β ( 1 ( ball β ( abs β β ) ) 1 ) β ( π¦ β β β§ π¦ β 0 ) ) |
276 |
|
logcl |
β’ ( ( π¦ β β β§ π¦ β 0 ) β ( log β π¦ ) β β ) |
277 |
275 276
|
syl |
β’ ( π¦ β ( 1 ( ball β ( abs β β ) ) 1 ) β ( log β π¦ ) β β ) |
278 |
277
|
subid1d |
β’ ( π¦ β ( 1 ( ball β ( abs β β ) ) 1 ) β ( ( log β π¦ ) β 0 ) = ( log β π¦ ) ) |
279 |
272 278
|
eqtr2d |
β’ ( π¦ β ( 1 ( ball β ( abs β β ) ) 1 ) β ( log β π¦ ) = ( ( ( log βΎ ( 1 ( ball β ( abs β β ) ) 1 ) ) β π¦ ) β ( ( log βΎ ( 1 ( ball β ( abs β β ) ) 1 ) ) β 1 ) ) ) |
280 |
279
|
oveq1d |
β’ ( π¦ β ( 1 ( ball β ( abs β β ) ) 1 ) β ( ( log β π¦ ) / ( π¦ β 1 ) ) = ( ( ( ( log βΎ ( 1 ( ball β ( abs β β ) ) 1 ) ) β π¦ ) β ( ( log βΎ ( 1 ( ball β ( abs β β ) ) 1 ) ) β 1 ) ) / ( π¦ β 1 ) ) ) |
281 |
266 280
|
ifeq12d |
β’ ( π¦ β ( 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 |
β’ ( π¦ β ( 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 |
β’ ( ( ( β β { β , β } β§ ( 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 |
β’ ( ( β β { β , β } β§ ( 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 |
β’ ( π¦ β ( 1 ( ball β ( abs β β ) ) 1 ) β¦ if ( π¦ = 1 , 1 , ( ( log β π¦ ) / ( π¦ β 1 ) ) ) ) β ( ( ( ( TopOpen β βfld ) βΎt ( 1 ( ball β ( abs β β ) ) 1 ) ) CnP ( TopOpen β βfld ) ) β 1 ) |
286 |
|
oveq2 |
β’ ( π₯ = 0 β ( π΄ Β· π₯ ) = ( π΄ Β· 0 ) ) |
287 |
286
|
oveq2d |
β’ ( π₯ = 0 β ( 1 + ( π΄ Β· π₯ ) ) = ( 1 + ( π΄ Β· 0 ) ) ) |
288 |
|
eqid |
β’ ( π₯ β π β¦ ( 1 + ( π΄ Β· π₯ ) ) ) = ( π₯ β π β¦ ( 1 + ( π΄ Β· π₯ ) ) ) |
289 |
|
ovex |
β’ ( 1 + ( π΄ Β· 0 ) ) β V |
290 |
287 288 289
|
fvmpt |
β’ ( 0 β π β ( ( π₯ β π β¦ ( 1 + ( π΄ Β· π₯ ) ) ) β 0 ) = ( 1 + ( π΄ Β· 0 ) ) ) |
291 |
231 290
|
syl |
β’ ( π΄ β β β ( ( π₯ β π β¦ ( 1 + ( π΄ Β· π₯ ) ) ) β 0 ) = ( 1 + ( π΄ Β· 0 ) ) ) |
292 |
|
mul01 |
β’ ( π΄ β β β ( π΄ Β· 0 ) = 0 ) |
293 |
292
|
oveq2d |
β’ ( π΄ β β β ( 1 + ( π΄ Β· 0 ) ) = ( 1 + 0 ) ) |
294 |
293 59
|
eqtrdi |
β’ ( π΄ β β β ( 1 + ( π΄ Β· 0 ) ) = 1 ) |
295 |
291 294
|
eqtrd |
β’ ( π΄ β β β ( ( π₯ β π β¦ ( 1 + ( π΄ Β· π₯ ) ) ) β 0 ) = 1 ) |
296 |
295
|
fveq2d |
β’ ( π΄ β β β ( ( ( ( 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 |
β’ ( π΄ β β β ( π¦ β ( 1 ( ball β ( abs β β ) ) 1 ) β¦ if ( π¦ = 1 , 1 , ( ( log β π¦ ) / ( π¦ β 1 ) ) ) ) β ( ( ( ( TopOpen β βfld ) βΎt ( 1 ( ball β ( abs β β ) ) 1 ) ) CnP ( TopOpen β βfld ) ) β ( ( π₯ β π β¦ ( 1 + ( π΄ Β· π₯ ) ) ) β 0 ) ) ) |
298 |
|
cnpco |
β’ ( ( ( π₯ β π β¦ ( 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 |
β’ ( π΄ β β β ( ( π¦ β ( 1 ( ball β ( abs β β ) ) 1 ) β¦ if ( π¦ = 1 , 1 , ( ( log β π¦ ) / ( π¦ β 1 ) ) ) ) β ( π₯ β π β¦ ( 1 + ( π΄ Β· π₯ ) ) ) ) β ( ( ( ( TopOpen β βfld ) βΎt π ) CnP ( TopOpen β βfld ) ) β 0 ) ) |
300 |
204 299
|
eqeltrrd |
β’ ( π΄ β β β ( π₯ β π β¦ if ( ( π΄ Β· π₯ ) = 0 , 1 , ( ( log β ( 1 + ( π΄ Β· π₯ ) ) ) / ( π΄ Β· π₯ ) ) ) ) β ( ( ( ( TopOpen β βfld ) βΎt π ) CnP ( TopOpen β βfld ) ) β 0 ) ) |
301 |
208 208 211
|
cnmptc |
β’ ( π΄ β β β ( π¦ β β β¦ π΄ ) β ( ( TopOpen β βfld ) Cn ( TopOpen β βfld ) ) ) |
302 |
208
|
cnmptid |
β’ ( π΄ β β β ( π¦ β β β¦ π¦ ) β ( ( TopOpen β βfld ) Cn ( TopOpen β βfld ) ) ) |
303 |
208 301 302 215
|
cnmpt12f |
β’ ( π΄ β β β ( π¦ β β β¦ ( π΄ Β· π¦ ) ) β ( ( TopOpen β βfld ) Cn ( TopOpen β βfld ) ) ) |
304 |
|
efcn |
β’ exp β ( β βcnβ β ) |
305 |
206
|
cncfcn1 |
β’ ( β βcnβ β ) = ( ( TopOpen β βfld ) Cn ( TopOpen β βfld ) ) |
306 |
304 305
|
eleqtri |
β’ exp β ( ( TopOpen β βfld ) Cn ( TopOpen β βfld ) ) |
307 |
306
|
a1i |
β’ ( π΄ β β β exp β ( ( TopOpen β βfld ) Cn ( TopOpen β βfld ) ) ) |
308 |
208 303 307
|
cnmpt11f |
β’ ( π΄ β β β ( π¦ β β β¦ ( exp β ( π΄ Β· π¦ ) ) ) β ( ( TopOpen β βfld ) Cn ( TopOpen β βfld ) ) ) |
309 |
177
|
fmpttd |
β’ ( π΄ β β β ( π₯ β π β¦ if ( ( π΄ Β· π₯ ) = 0 , 1 , ( ( log β ( 1 + ( π΄ Β· π₯ ) ) ) / ( π΄ Β· π₯ ) ) ) ) : π βΆ β ) |
310 |
309 231
|
ffvelcdmd |
β’ ( π΄ β β β ( ( π₯ β π β¦ if ( ( π΄ Β· π₯ ) = 0 , 1 , ( ( log β ( 1 + ( π΄ Β· π₯ ) ) ) / ( π΄ Β· π₯ ) ) ) ) β 0 ) β β ) |
311 |
|
unicntop |
β’ β = βͺ ( TopOpen β βfld ) |
312 |
311
|
cncnpi |
β’ ( ( ( π¦ β β β¦ ( 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 |
β’ ( π΄ β β β ( π¦ β β β¦ ( exp β ( π΄ Β· π¦ ) ) ) β ( ( ( TopOpen β βfld ) CnP ( TopOpen β βfld ) ) β ( ( π₯ β π β¦ if ( ( π΄ Β· π₯ ) = 0 , 1 , ( ( log β ( 1 + ( π΄ Β· π₯ ) ) ) / ( π΄ Β· π₯ ) ) ) ) β 0 ) ) ) |
314 |
|
cnpco |
β’ ( ( ( π₯ β π β¦ 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 |
β’ ( π΄ β β β ( ( π¦ β β β¦ ( exp β ( π΄ Β· π¦ ) ) ) β ( π₯ β π β¦ if ( ( π΄ Β· π₯ ) = 0 , 1 , ( ( log β ( 1 + ( π΄ Β· π₯ ) ) ) / ( π΄ Β· π₯ ) ) ) ) ) β ( ( ( ( TopOpen β βfld ) βΎt π ) CnP ( TopOpen β βfld ) ) β 0 ) ) |
316 |
189 315
|
eqeltrd |
β’ ( π΄ β β β ( ( π₯ β β β¦ if ( π₯ = 0 , ( exp β π΄ ) , ( ( 1 + ( π΄ Β· π₯ ) ) βπ ( 1 / π₯ ) ) ) ) βΎ π ) β ( ( ( ( TopOpen β βfld ) βΎt π ) CnP ( TopOpen β βfld ) ) β 0 ) ) |
317 |
206
|
cnfldtop |
β’ ( TopOpen β βfld ) β Top |
318 |
317
|
a1i |
β’ ( π΄ β β β ( TopOpen β βfld ) β Top ) |
319 |
206
|
cnfldtopn |
β’ ( TopOpen β βfld ) = ( MetOpen β ( abs β β ) ) |
320 |
319
|
blopn |
β’ ( ( ( abs β β ) β ( βMet β β ) β§ 0 β β β§ ( 1 / ( ( abs β π΄ ) + 1 ) ) β β* ) β ( 0 ( ball β ( abs β β ) ) ( 1 / ( ( abs β π΄ ) + 1 ) ) ) β ( TopOpen β βfld ) ) |
321 |
30 31 41 320
|
mp3an2i |
β’ ( π΄ β β β ( 0 ( ball β ( abs β β ) ) ( 1 / ( ( abs β π΄ ) + 1 ) ) ) β ( TopOpen β βfld ) ) |
322 |
1 321
|
eqeltrid |
β’ ( π΄ β β β π β ( TopOpen β βfld ) ) |
323 |
|
isopn3i |
β’ ( ( ( TopOpen β βfld ) β Top β§ π β ( TopOpen β βfld ) ) β ( ( int β ( TopOpen β βfld ) ) β π ) = π ) |
324 |
317 322 323
|
sylancr |
β’ ( π΄ β β β ( ( int β ( TopOpen β βfld ) ) β π ) = π ) |
325 |
231 324
|
eleqtrrd |
β’ ( π΄ β β β 0 β ( ( int β ( TopOpen β βfld ) ) β π ) ) |
326 |
|
efcl |
β’ ( π΄ β β β ( exp β π΄ ) β β ) |
327 |
326
|
ad2antrr |
β’ ( ( ( π΄ β β β§ π₯ β β ) β§ π₯ = 0 ) β ( exp β π΄ ) β β ) |
328 |
84 15 86
|
sylancr |
β’ ( ( ( π΄ β β β§ π₯ β β ) β§ Β¬ π₯ = 0 ) β ( 1 + ( π΄ Β· π₯ ) ) β β ) |
329 |
328 49
|
cxpcld |
β’ ( ( ( π΄ β β β§ π₯ β β ) β§ Β¬ π₯ = 0 ) β ( ( 1 + ( π΄ Β· π₯ ) ) βπ ( 1 / π₯ ) ) β β ) |
330 |
327 329
|
ifclda |
β’ ( ( π΄ β β β§ π₯ β β ) β if ( π₯ = 0 , ( exp β π΄ ) , ( ( 1 + ( π΄ Β· π₯ ) ) βπ ( 1 / π₯ ) ) ) β β ) |
331 |
330
|
fmpttd |
β’ ( π΄ β β β ( π₯ β β β¦ if ( π₯ = 0 , ( exp β π΄ ) , ( ( 1 + ( π΄ Β· π₯ ) ) βπ ( 1 / π₯ ) ) ) ) : β βΆ β ) |
332 |
311 311
|
cnprest |
β’ ( ( ( ( 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 |
β’ ( π΄ β β β ( ( π₯ β β β¦ 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 |
β’ ( π΄ β β β ( π₯ β β β¦ if ( π₯ = 0 , ( exp β π΄ ) , ( ( 1 + ( π΄ Β· π₯ ) ) βπ ( 1 / π₯ ) ) ) ) β ( ( ( TopOpen β βfld ) CnP ( TopOpen β βfld ) ) β 0 ) ) |
335 |
311
|
cnpresti |
β’ ( ( ( 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 |
4 27 334 335
|
mp3an2i |
β’ ( π΄ β β β ( ( π₯ β β β¦ if ( π₯ = 0 , ( exp β π΄ ) , ( ( 1 + ( π΄ Β· π₯ ) ) βπ ( 1 / π₯ ) ) ) ) βΎ ( 0 [,) +β ) ) β ( ( ( ( TopOpen β βfld ) βΎt ( 0 [,) +β ) ) CnP ( TopOpen β βfld ) ) β 0 ) ) |
337 |
25 336
|
eqeltrd |
β’ ( π΄ β β β ( π₯ β ( 0 [,) +β ) β¦ if ( π₯ = 0 , ( exp β π΄ ) , ( ( 1 + ( π΄ / ( 1 / π₯ ) ) ) βπ ( 1 / π₯ ) ) ) ) β ( ( ( ( TopOpen β βfld ) βΎt ( 0 [,) +β ) ) CnP ( TopOpen β βfld ) ) β 0 ) ) |
338 |
|
simpl |
β’ ( ( π΄ β β β§ π β β+ ) β π΄ β β ) |
339 |
|
rpcn |
β’ ( π β β+ β π β β ) |
340 |
339
|
adantl |
β’ ( ( π΄ β β β§ π β β+ ) β π β β ) |
341 |
|
rpne0 |
β’ ( π β β+ β π β 0 ) |
342 |
341
|
adantl |
β’ ( ( π΄ β β β§ π β β+ ) β π β 0 ) |
343 |
338 340 342
|
divcld |
β’ ( ( π΄ β β β§ π β β+ ) β ( π΄ / π ) β β ) |
344 |
|
addcl |
β’ ( ( 1 β β β§ ( π΄ / π ) β β ) β ( 1 + ( π΄ / π ) ) β β ) |
345 |
84 343 344
|
sylancr |
β’ ( ( π΄ β β β§ π β β+ ) β ( 1 + ( π΄ / π ) ) β β ) |
346 |
345 340
|
cxpcld |
β’ ( ( π΄ β β β§ π β β+ ) β ( ( 1 + ( π΄ / π ) ) βπ π ) β β ) |
347 |
|
oveq2 |
β’ ( π = ( 1 / π₯ ) β ( π΄ / π ) = ( π΄ / ( 1 / π₯ ) ) ) |
348 |
347
|
oveq2d |
β’ ( π = ( 1 / π₯ ) β ( 1 + ( π΄ / π ) ) = ( 1 + ( π΄ / ( 1 / π₯ ) ) ) ) |
349 |
|
id |
β’ ( π = ( 1 / π₯ ) β π = ( 1 / π₯ ) ) |
350 |
348 349
|
oveq12d |
β’ ( π = ( 1 / π₯ ) β ( ( 1 + ( π΄ / π ) ) βπ π ) = ( ( 1 + ( π΄ / ( 1 / π₯ ) ) ) βπ ( 1 / π₯ ) ) ) |
351 |
|
eqid |
β’ ( ( TopOpen β βfld ) βΎt ( 0 [,) +β ) ) = ( ( TopOpen β βfld ) βΎt ( 0 [,) +β ) ) |
352 |
326 346 350 206 351
|
rlimcnp3 |
β’ ( π΄ β β β ( ( π β β+ β¦ ( ( 1 + ( π΄ / π ) ) βπ π ) ) βπ ( exp β π΄ ) β ( π₯ β ( 0 [,) +β ) β¦ if ( π₯ = 0 , ( exp β π΄ ) , ( ( 1 + ( π΄ / ( 1 / π₯ ) ) ) βπ ( 1 / π₯ ) ) ) ) β ( ( ( ( TopOpen β βfld ) βΎt ( 0 [,) +β ) ) CnP ( TopOpen β βfld ) ) β 0 ) ) ) |
353 |
337 352
|
mpbird |
β’ ( π΄ β β β ( π β β+ β¦ ( ( 1 + ( π΄ / π ) ) βπ π ) ) βπ ( exp β π΄ ) ) |