ILE Home Intuitionistic Logic Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  ILE Home  >  Th. List  >  dveflem Unicode version

Theorem dveflem 15537
Description: Derivative of the exponential function at 0. The key step in the proof is eftlub 12331, to show that  abs ( exp ( x )  - 
1  -  x )  <_  abs ( x ) ^ 2  x.  (
3  /  4 ). (Contributed by Mario Carneiro, 9-Aug-2014.) (Revised by Mario Carneiro, 28-Dec-2016.)
Assertion
Ref Expression
dveflem  |-  0
( CC  _D  exp ) 1

Proof of Theorem dveflem
Dummy variables  k  n  w  u  x  y  z are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 0cn 8231 . . 3  |-  0  e.  CC
2 eqid 2231 . . . . 5  |-  ( MetOpen `  ( abs  o.  -  )
)  =  ( MetOpen `  ( abs  o.  -  )
)
32cntoptop 15344 . . . 4  |-  ( MetOpen `  ( abs  o.  -  )
)  e.  Top
4 unicntopcntop 15353 . . . . 5  |-  CC  =  U. ( MetOpen `  ( abs  o. 
-  ) )
54ntrtop 14939 . . . 4  |-  ( (
MetOpen `  ( abs  o.  -  ) )  e. 
Top  ->  ( ( int `  ( MetOpen `  ( abs  o. 
-  ) ) ) `
 CC )  =  CC )
63, 5ax-mp 5 . . 3  |-  ( ( int `  ( MetOpen `  ( abs  o.  -  )
) ) `  CC )  =  CC
71, 6eleqtrri 2307 . 2  |-  0  e.  ( ( int `  ( MetOpen
`  ( abs  o.  -  ) ) ) `
 CC )
8 ax-1cn 8185 . . 3  |-  1  e.  CC
9 1rp 9953 . . . . . 6  |-  1  e.  RR+
10 rpmincl 11878 . . . . . 6  |-  ( ( x  e.  RR+  /\  1  e.  RR+ )  -> inf ( { x ,  1 } ,  RR ,  <  )  e.  RR+ )
119, 10mpan2 425 . . . . 5  |-  ( x  e.  RR+  -> inf ( { x ,  1 } ,  RR ,  <  )  e.  RR+ )
12 breq1 4096 . . . . . . . 8  |-  ( u  =  w  ->  (
u #  0  <->  w #  0
) )
1312elrab 2963 . . . . . . 7  |-  ( w  e.  { u  e.  CC  |  u #  0 }  <->  ( w  e.  CC  /\  w #  0 ) )
14 simprl 531 . . . . . . . . . . . . 13  |-  ( ( x  e.  RR+  /\  (
w  e.  CC  /\  w #  0 ) )  ->  w  e.  CC )
1514subid1d 8538 . . . . . . . . . . . 12  |-  ( ( x  e.  RR+  /\  (
w  e.  CC  /\  w #  0 ) )  -> 
( w  -  0 )  =  w )
1615fveq2d 5652 . . . . . . . . . . 11  |-  ( ( x  e.  RR+  /\  (
w  e.  CC  /\  w #  0 ) )  -> 
( abs `  (
w  -  0 ) )  =  ( abs `  w ) )
1716breq1d 4103 . . . . . . . . . 10  |-  ( ( x  e.  RR+  /\  (
w  e.  CC  /\  w #  0 ) )  -> 
( ( abs `  (
w  -  0 ) )  < inf ( {
x ,  1 } ,  RR ,  <  )  <-> 
( abs `  w
)  < inf ( {
x ,  1 } ,  RR ,  <  ) ) )
1814abscld 11821 . . . . . . . . . . 11  |-  ( ( x  e.  RR+  /\  (
w  e.  CC  /\  w #  0 ) )  -> 
( abs `  w
)  e.  RR )
19 rpre 9956 . . . . . . . . . . . 12  |-  ( x  e.  RR+  ->  x  e.  RR )
2019adantr 276 . . . . . . . . . . 11  |-  ( ( x  e.  RR+  /\  (
w  e.  CC  /\  w #  0 ) )  ->  x  e.  RR )
21 1red 8254 . . . . . . . . . . 11  |-  ( ( x  e.  RR+  /\  (
w  e.  CC  /\  w #  0 ) )  -> 
1  e.  RR )
22 ltmininf 11875 . . . . . . . . . . 11  |-  ( ( ( abs `  w
)  e.  RR  /\  x  e.  RR  /\  1  e.  RR )  ->  (
( abs `  w
)  < inf ( {
x ,  1 } ,  RR ,  <  )  <-> 
( ( abs `  w
)  <  x  /\  ( abs `  w )  <  1 ) ) )
2318, 20, 21, 22syl3anc 1274 . . . . . . . . . 10  |-  ( ( x  e.  RR+  /\  (
w  e.  CC  /\  w #  0 ) )  -> 
( ( abs `  w
)  < inf ( {
x ,  1 } ,  RR ,  <  )  <-> 
( ( abs `  w
)  <  x  /\  ( abs `  w )  <  1 ) ) )
2417, 23bitrd 188 . . . . . . . . 9  |-  ( ( x  e.  RR+  /\  (
w  e.  CC  /\  w #  0 ) )  -> 
( ( abs `  (
w  -  0 ) )  < inf ( {
x ,  1 } ,  RR ,  <  )  <-> 
( ( abs `  w
)  <  x  /\  ( abs `  w )  <  1 ) ) )
25 eqid 2231 . . . . . . . . . . . . 13  |-  ( z  e.  { u  e.  CC  |  u #  0 }  |->  ( ( ( exp `  z )  -  1 )  / 
z ) )  =  ( z  e.  {
u  e.  CC  |  u #  0 }  |->  ( ( ( exp `  z
)  -  1 )  /  z ) )
26 fveq2 5648 . . . . . . . . . . . . . . 15  |-  ( z  =  w  ->  ( exp `  z )  =  ( exp `  w
) )
2726oveq1d 6043 . . . . . . . . . . . . . 14  |-  ( z  =  w  ->  (
( exp `  z
)  -  1 )  =  ( ( exp `  w )  -  1 ) )
28 id 19 . . . . . . . . . . . . . 14  |-  ( z  =  w  ->  z  =  w )
2927, 28oveq12d 6046 . . . . . . . . . . . . 13  |-  ( z  =  w  ->  (
( ( exp `  z
)  -  1 )  /  z )  =  ( ( ( exp `  w )  -  1 )  /  w ) )
30 simplr 529 . . . . . . . . . . . . . 14  |-  ( ( ( x  e.  RR+  /\  ( w  e.  CC  /\  w #  0 ) )  /\  ( ( abs `  w )  <  x  /\  ( abs `  w
)  <  1 ) )  ->  ( w  e.  CC  /\  w #  0 ) )
3130, 13sylibr 134 . . . . . . . . . . . . 13  |-  ( ( ( x  e.  RR+  /\  ( w  e.  CC  /\  w #  0 ) )  /\  ( ( abs `  w )  <  x  /\  ( abs `  w
)  <  1 ) )  ->  w  e.  { u  e.  CC  |  u #  0 } )
32 efcl 12305 . . . . . . . . . . . . . . . 16  |-  ( w  e.  CC  ->  ( exp `  w )  e.  CC )
33 peano2cnm 8504 . . . . . . . . . . . . . . . 16  |-  ( ( exp `  w )  e.  CC  ->  (
( exp `  w
)  -  1 )  e.  CC )
3414, 32, 333syl 17 . . . . . . . . . . . . . . 15  |-  ( ( x  e.  RR+  /\  (
w  e.  CC  /\  w #  0 ) )  -> 
( ( exp `  w
)  -  1 )  e.  CC )
35 simprr 533 . . . . . . . . . . . . . . 15  |-  ( ( x  e.  RR+  /\  (
w  e.  CC  /\  w #  0 ) )  ->  w #  0 )
3634, 14, 35divclapd 9029 . . . . . . . . . . . . . 14  |-  ( ( x  e.  RR+  /\  (
w  e.  CC  /\  w #  0 ) )  -> 
( ( ( exp `  w )  -  1 )  /  w )  e.  CC )
3736adantr 276 . . . . . . . . . . . . 13  |-  ( ( ( x  e.  RR+  /\  ( w  e.  CC  /\  w #  0 ) )  /\  ( ( abs `  w )  <  x  /\  ( abs `  w
)  <  1 ) )  ->  ( (
( exp `  w
)  -  1 )  /  w )  e.  CC )
3825, 29, 31, 37fvmptd3 5749 . . . . . . . . . . . 12  |-  ( ( ( x  e.  RR+  /\  ( w  e.  CC  /\  w #  0 ) )  /\  ( ( abs `  w )  <  x  /\  ( abs `  w
)  <  1 ) )  ->  ( (
z  e.  { u  e.  CC  |  u #  0 }  |->  ( ( ( exp `  z )  -  1 )  / 
z ) ) `  w )  =  ( ( ( exp `  w
)  -  1 )  /  w ) )
3938fvoveq1d 6050 . . . . . . . . . . 11  |-  ( ( ( x  e.  RR+  /\  ( w  e.  CC  /\  w #  0 ) )  /\  ( ( abs `  w )  <  x  /\  ( abs `  w
)  <  1 ) )  ->  ( abs `  ( ( ( z  e.  { u  e.  CC  |  u #  0 }  |->  ( ( ( exp `  z )  -  1 )  / 
z ) ) `  w )  -  1 ) )  =  ( abs `  ( ( ( ( exp `  w
)  -  1 )  /  w )  - 
1 ) ) )
40 1cnd 8255 . . . . . . . . . . . . . 14  |-  ( ( ( x  e.  RR+  /\  ( w  e.  CC  /\  w #  0 ) )  /\  ( ( abs `  w )  <  x  /\  ( abs `  w
)  <  1 ) )  ->  1  e.  CC )
4137, 40subcld 8549 . . . . . . . . . . . . 13  |-  ( ( ( x  e.  RR+  /\  ( w  e.  CC  /\  w #  0 ) )  /\  ( ( abs `  w )  <  x  /\  ( abs `  w
)  <  1 ) )  ->  ( (
( ( exp `  w
)  -  1 )  /  w )  - 
1 )  e.  CC )
4241abscld 11821 . . . . . . . . . . . 12  |-  ( ( ( x  e.  RR+  /\  ( w  e.  CC  /\  w #  0 ) )  /\  ( ( abs `  w )  <  x  /\  ( abs `  w
)  <  1 ) )  ->  ( abs `  ( ( ( ( exp `  w )  -  1 )  /  w )  -  1 ) )  e.  RR )
43 simplrl 537 . . . . . . . . . . . . 13  |-  ( ( ( x  e.  RR+  /\  ( w  e.  CC  /\  w #  0 ) )  /\  ( ( abs `  w )  <  x  /\  ( abs `  w
)  <  1 ) )  ->  w  e.  CC )
4443abscld 11821 . . . . . . . . . . . 12  |-  ( ( ( x  e.  RR+  /\  ( w  e.  CC  /\  w #  0 ) )  /\  ( ( abs `  w )  <  x  /\  ( abs `  w
)  <  1 ) )  ->  ( abs `  w )  e.  RR )
45 simpll 527 . . . . . . . . . . . . 13  |-  ( ( ( x  e.  RR+  /\  ( w  e.  CC  /\  w #  0 ) )  /\  ( ( abs `  w )  <  x  /\  ( abs `  w
)  <  1 ) )  ->  x  e.  RR+ )
4645rpred 9992 . . . . . . . . . . . 12  |-  ( ( ( x  e.  RR+  /\  ( w  e.  CC  /\  w #  0 ) )  /\  ( ( abs `  w )  <  x  /\  ( abs `  w
)  <  1 ) )  ->  x  e.  RR )
47 abscl 11691 . . . . . . . . . . . . . . . . . 18  |-  ( w  e.  CC  ->  ( abs `  w )  e.  RR )
4847ad2antrr 488 . . . . . . . . . . . . . . . . 17  |-  ( ( ( w  e.  CC  /\  w #  0 )  /\  ( abs `  w )  <  1 )  -> 
( abs `  w
)  e.  RR )
4932ad2antrr 488 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( ( w  e.  CC  /\  w #  0 )  /\  ( abs `  w )  <  1 )  -> 
( exp `  w
)  e.  CC )
50 subcl 8437 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( ( exp `  w
)  e.  CC  /\  1  e.  CC )  ->  ( ( exp `  w
)  -  1 )  e.  CC )
5149, 8, 50sylancl 413 . . . . . . . . . . . . . . . . . . . 20  |-  ( ( ( w  e.  CC  /\  w #  0 )  /\  ( abs `  w )  <  1 )  -> 
( ( exp `  w
)  -  1 )  e.  CC )
52 simpll 527 . . . . . . . . . . . . . . . . . . . 20  |-  ( ( ( w  e.  CC  /\  w #  0 )  /\  ( abs `  w )  <  1 )  ->  w  e.  CC )
53 simplr 529 . . . . . . . . . . . . . . . . . . . 20  |-  ( ( ( w  e.  CC  /\  w #  0 )  /\  ( abs `  w )  <  1 )  ->  w #  0 )
5451, 52, 53divclapd 9029 . . . . . . . . . . . . . . . . . . 19  |-  ( ( ( w  e.  CC  /\  w #  0 )  /\  ( abs `  w )  <  1 )  -> 
( ( ( exp `  w )  -  1 )  /  w )  e.  CC )
55 1cnd 8255 . . . . . . . . . . . . . . . . . . 19  |-  ( ( ( w  e.  CC  /\  w #  0 )  /\  ( abs `  w )  <  1 )  -> 
1  e.  CC )
5654, 55subcld 8549 . . . . . . . . . . . . . . . . . 18  |-  ( ( ( w  e.  CC  /\  w #  0 )  /\  ( abs `  w )  <  1 )  -> 
( ( ( ( exp `  w )  -  1 )  /  w )  -  1 )  e.  CC )
5756abscld 11821 . . . . . . . . . . . . . . . . 17  |-  ( ( ( w  e.  CC  /\  w #  0 )  /\  ( abs `  w )  <  1 )  -> 
( abs `  (
( ( ( exp `  w )  -  1 )  /  w )  -  1 ) )  e.  RR )
5848, 57remulcld 8269 . . . . . . . . . . . . . . . 16  |-  ( ( ( w  e.  CC  /\  w #  0 )  /\  ( abs `  w )  <  1 )  -> 
( ( abs `  w
)  x.  ( abs `  ( ( ( ( exp `  w )  -  1 )  /  w )  -  1 ) ) )  e.  RR )
5948resqcld 11024 . . . . . . . . . . . . . . . . 17  |-  ( ( ( w  e.  CC  /\  w #  0 )  /\  ( abs `  w )  <  1 )  -> 
( ( abs `  w
) ^ 2 )  e.  RR )
60 3re 9276 . . . . . . . . . . . . . . . . . 18  |-  3  e.  RR
61 4nn 9366 . . . . . . . . . . . . . . . . . 18  |-  4  e.  NN
62 nndivre 9238 . . . . . . . . . . . . . . . . . 18  |-  ( ( 3  e.  RR  /\  4  e.  NN )  ->  ( 3  /  4
)  e.  RR )
6360, 61, 62mp2an 426 . . . . . . . . . . . . . . . . 17  |-  ( 3  /  4 )  e.  RR
64 remulcl 8220 . . . . . . . . . . . . . . . . 17  |-  ( ( ( ( abs `  w
) ^ 2 )  e.  RR  /\  (
3  /  4 )  e.  RR )  -> 
( ( ( abs `  w ) ^ 2 )  x.  ( 3  /  4 ) )  e.  RR )
6559, 63, 64sylancl 413 . . . . . . . . . . . . . . . 16  |-  ( ( ( w  e.  CC  /\  w #  0 )  /\  ( abs `  w )  <  1 )  -> 
( ( ( abs `  w ) ^ 2 )  x.  ( 3  /  4 ) )  e.  RR )
6651, 52subcld 8549 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( ( w  e.  CC  /\  w #  0 )  /\  ( abs `  w )  <  1 )  -> 
( ( ( exp `  w )  -  1 )  -  w )  e.  CC )
6766, 52, 53divcanap2d 9031 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( ( w  e.  CC  /\  w #  0 )  /\  ( abs `  w )  <  1 )  -> 
( w  x.  (
( ( ( exp `  w )  -  1 )  -  w )  /  w ) )  =  ( ( ( exp `  w )  -  1 )  -  w ) )
6851, 52, 52, 53divsubdirapd 9069 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( ( ( w  e.  CC  /\  w #  0 )  /\  ( abs `  w )  <  1 )  -> 
( ( ( ( exp `  w )  -  1 )  -  w )  /  w
)  =  ( ( ( ( exp `  w
)  -  1 )  /  w )  -  ( w  /  w
) ) )
6952, 53dividapd 9025 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( ( ( w  e.  CC  /\  w #  0 )  /\  ( abs `  w )  <  1 )  -> 
( w  /  w
)  =  1 )
7069oveq2d 6044 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( ( ( w  e.  CC  /\  w #  0 )  /\  ( abs `  w )  <  1 )  -> 
( ( ( ( exp `  w )  -  1 )  /  w )  -  (
w  /  w ) )  =  ( ( ( ( exp `  w
)  -  1 )  /  w )  - 
1 ) )
7168, 70eqtrd 2264 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( ( w  e.  CC  /\  w #  0 )  /\  ( abs `  w )  <  1 )  -> 
( ( ( ( exp `  w )  -  1 )  -  w )  /  w
)  =  ( ( ( ( exp `  w
)  -  1 )  /  w )  - 
1 ) )
7271oveq2d 6044 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( ( w  e.  CC  /\  w #  0 )  /\  ( abs `  w )  <  1 )  -> 
( w  x.  (
( ( ( exp `  w )  -  1 )  -  w )  /  w ) )  =  ( w  x.  ( ( ( ( exp `  w )  -  1 )  /  w )  -  1 ) ) )
7349, 55, 52subsub4d 8580 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( ( w  e.  CC  /\  w #  0 )  /\  ( abs `  w )  <  1 )  -> 
( ( ( exp `  w )  -  1 )  -  w )  =  ( ( exp `  w )  -  (
1  +  w ) ) )
74 addcl 8217 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( ( 1  e.  CC  /\  w  e.  CC )  ->  ( 1  +  w
)  e.  CC )
758, 52, 74sylancr 414 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( ( ( w  e.  CC  /\  w #  0 )  /\  ( abs `  w )  <  1 )  -> 
( 1  +  w
)  e.  CC )
76 2nn0 9478 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  2  e.  NN0
77 eqid 2231 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( n  e.  NN0  |->  ( ( w ^ n )  /  ( ! `  n ) ) )  =  ( n  e. 
NN0  |->  ( ( w ^ n )  / 
( ! `  n
) ) )
7877eftlcl 12329 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( ( w  e.  CC  /\  2  e.  NN0 )  ->  sum_ k  e.  ( ZZ>= ` 
2 ) ( ( n  e.  NN0  |->  ( ( w ^ n )  /  ( ! `  n ) ) ) `
 k )  e.  CC )
7952, 76, 78sylancl 413 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( ( ( w  e.  CC  /\  w #  0 )  /\  ( abs `  w )  <  1 )  ->  sum_ k  e.  ( ZZ>= ` 
2 ) ( ( n  e.  NN0  |->  ( ( w ^ n )  /  ( ! `  n ) ) ) `
 k )  e.  CC )
80 df-2 9261 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  2  =  ( 1  +  1 )
81 1nn0 9477 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  1  e.  NN0
82 1e0p1 9713 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  1  =  ( 0  +  1 )
83 0nn0 9476 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  0  e.  NN0
84 0cnd 8232 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( ( ( w  e.  CC  /\  w #  0 )  /\  ( abs `  w )  <  1 )  -> 
0  e.  CC )
8577efval2 12306 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29  |-  ( w  e.  CC  ->  ( exp `  w )  = 
sum_ k  e.  NN0  ( ( n  e. 
NN0  |->  ( ( w ^ n )  / 
( ! `  n
) ) ) `  k ) )
8685ad2antrr 488 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28  |-  ( ( ( w  e.  CC  /\  w #  0 )  /\  ( abs `  w )  <  1 )  -> 
( exp `  w
)  =  sum_ k  e.  NN0  ( ( n  e.  NN0  |->  ( ( w ^ n )  /  ( ! `  n ) ) ) `
 k ) )
87 nn0uz 9852 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29  |-  NN0  =  ( ZZ>= `  0 )
8887sumeq1i 12003 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28  |-  sum_ k  e.  NN0  ( ( n  e.  NN0  |->  ( ( w ^ n )  /  ( ! `  n ) ) ) `
 k )  = 
sum_ k  e.  (
ZZ>= `  0 ) ( ( n  e.  NN0  |->  ( ( w ^
n )  /  ( ! `  n )
) ) `  k
)
8986, 88eqtr2di 2281 . . . . . . . . . . . . . . . . . . . . . . . . . . 27  |-  ( ( ( w  e.  CC  /\  w #  0 )  /\  ( abs `  w )  <  1 )  ->  sum_ k  e.  ( ZZ>= ` 
0 ) ( ( n  e.  NN0  |->  ( ( w ^ n )  /  ( ! `  n ) ) ) `
 k )  =  ( exp `  w
) )
9089oveq2d 6044 . . . . . . . . . . . . . . . . . . . . . . . . . 26  |-  ( ( ( w  e.  CC  /\  w #  0 )  /\  ( abs `  w )  <  1 )  -> 
( 0  +  sum_ k  e.  ( ZZ>= ` 
0 ) ( ( n  e.  NN0  |->  ( ( w ^ n )  /  ( ! `  n ) ) ) `
 k ) )  =  ( 0  +  ( exp `  w
) ) )
9149addlidd 8388 . . . . . . . . . . . . . . . . . . . . . . . . . 26  |-  ( ( ( w  e.  CC  /\  w #  0 )  /\  ( abs `  w )  <  1 )  -> 
( 0  +  ( exp `  w ) )  =  ( exp `  w ) )
9290, 91eqtr2d 2265 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( ( ( w  e.  CC  /\  w #  0 )  /\  ( abs `  w )  <  1 )  -> 
( exp `  w
)  =  ( 0  +  sum_ k  e.  (
ZZ>= `  0 ) ( ( n  e.  NN0  |->  ( ( w ^
n )  /  ( ! `  n )
) ) `  k
) ) )
93 eft0val 12334 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28  |-  ( w  e.  CC  ->  (
( w ^ 0 )  /  ( ! `
 0 ) )  =  1 )
9493ad2antrr 488 . . . . . . . . . . . . . . . . . . . . . . . . . . 27  |-  ( ( ( w  e.  CC  /\  w #  0 )  /\  ( abs `  w )  <  1 )  -> 
( ( w ^
0 )  /  ( ! `  0 )
)  =  1 )
9594oveq2d 6044 . . . . . . . . . . . . . . . . . . . . . . . . . 26  |-  ( ( ( w  e.  CC  /\  w #  0 )  /\  ( abs `  w )  <  1 )  -> 
( 0  +  ( ( w ^ 0 )  /  ( ! `
 0 ) ) )  =  ( 0  +  1 ) )
9695, 82eqtr4di 2282 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( ( ( w  e.  CC  /\  w #  0 )  /\  ( abs `  w )  <  1 )  -> 
( 0  +  ( ( w ^ 0 )  /  ( ! `
 0 ) ) )  =  1 )
9777, 82, 83, 52, 84, 92, 96efsep 12332 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( ( ( w  e.  CC  /\  w #  0 )  /\  ( abs `  w )  <  1 )  -> 
( exp `  w
)  =  ( 1  +  sum_ k  e.  (
ZZ>= `  1 ) ( ( n  e.  NN0  |->  ( ( w ^
n )  /  ( ! `  n )
) ) `  k
) ) )
98 exp1 10870 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29  |-  ( w  e.  CC  ->  (
w ^ 1 )  =  w )
9998ad2antrr 488 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28  |-  ( ( ( w  e.  CC  /\  w #  0 )  /\  ( abs `  w )  <  1 )  -> 
( w ^ 1 )  =  w )
10099oveq1d 6043 . . . . . . . . . . . . . . . . . . . . . . . . . . 27  |-  ( ( ( w  e.  CC  /\  w #  0 )  /\  ( abs `  w )  <  1 )  -> 
( ( w ^
1 )  /  ( ! `  1 )
)  =  ( w  /  ( ! ` 
1 ) ) )
101 fac1 11054 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28  |-  ( ! `
 1 )  =  1
102101oveq2i 6039 . . . . . . . . . . . . . . . . . . . . . . . . . . 27  |-  ( w  /  ( ! ` 
1 ) )  =  ( w  /  1
)
103100, 102eqtrdi 2280 . . . . . . . . . . . . . . . . . . . . . . . . . 26  |-  ( ( ( w  e.  CC  /\  w #  0 )  /\  ( abs `  w )  <  1 )  -> 
( ( w ^
1 )  /  ( ! `  1 )
)  =  ( w  /  1 ) )
104 div1 8942 . . . . . . . . . . . . . . . . . . . . . . . . . . 27  |-  ( w  e.  CC  ->  (
w  /  1 )  =  w )
105104ad2antrr 488 . . . . . . . . . . . . . . . . . . . . . . . . . 26  |-  ( ( ( w  e.  CC  /\  w #  0 )  /\  ( abs `  w )  <  1 )  -> 
( w  /  1
)  =  w )
106103, 105eqtrd 2264 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( ( ( w  e.  CC  /\  w #  0 )  /\  ( abs `  w )  <  1 )  -> 
( ( w ^
1 )  /  ( ! `  1 )
)  =  w )
107106oveq2d 6044 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( ( ( w  e.  CC  /\  w #  0 )  /\  ( abs `  w )  <  1 )  -> 
( 1  +  ( ( w ^ 1 )  /  ( ! `
 1 ) ) )  =  ( 1  +  w ) )
10877, 80, 81, 52, 55, 97, 107efsep 12332 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( ( ( w  e.  CC  /\  w #  0 )  /\  ( abs `  w )  <  1 )  -> 
( exp `  w
)  =  ( ( 1  +  w )  +  sum_ k  e.  (
ZZ>= `  2 ) ( ( n  e.  NN0  |->  ( ( w ^
n )  /  ( ! `  n )
) ) `  k
) ) )
10975, 79, 108mvrladdd 8605 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( ( w  e.  CC  /\  w #  0 )  /\  ( abs `  w )  <  1 )  -> 
( ( exp `  w
)  -  ( 1  +  w ) )  =  sum_ k  e.  (
ZZ>= `  2 ) ( ( n  e.  NN0  |->  ( ( w ^
n )  /  ( ! `  n )
) ) `  k
) )
11073, 109eqtrd 2264 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( ( w  e.  CC  /\  w #  0 )  /\  ( abs `  w )  <  1 )  -> 
( ( ( exp `  w )  -  1 )  -  w )  =  sum_ k  e.  (
ZZ>= `  2 ) ( ( n  e.  NN0  |->  ( ( w ^
n )  /  ( ! `  n )
) ) `  k
) )
11167, 72, 1103eqtr3d 2272 . . . . . . . . . . . . . . . . . . . 20  |-  ( ( ( w  e.  CC  /\  w #  0 )  /\  ( abs `  w )  <  1 )  -> 
( w  x.  (
( ( ( exp `  w )  -  1 )  /  w )  -  1 ) )  =  sum_ k  e.  (
ZZ>= `  2 ) ( ( n  e.  NN0  |->  ( ( w ^
n )  /  ( ! `  n )
) ) `  k
) )
112111fveq2d 5652 . . . . . . . . . . . . . . . . . . 19  |-  ( ( ( w  e.  CC  /\  w #  0 )  /\  ( abs `  w )  <  1 )  -> 
( abs `  (
w  x.  ( ( ( ( exp `  w
)  -  1 )  /  w )  - 
1 ) ) )  =  ( abs `  sum_ k  e.  ( ZZ>= ` 
2 ) ( ( n  e.  NN0  |->  ( ( w ^ n )  /  ( ! `  n ) ) ) `
 k ) ) )
11352, 56absmuld 11834 . . . . . . . . . . . . . . . . . . 19  |-  ( ( ( w  e.  CC  /\  w #  0 )  /\  ( abs `  w )  <  1 )  -> 
( abs `  (
w  x.  ( ( ( ( exp `  w
)  -  1 )  /  w )  - 
1 ) ) )  =  ( ( abs `  w )  x.  ( abs `  ( ( ( ( exp `  w
)  -  1 )  /  w )  - 
1 ) ) ) )
114112, 113eqtr3d 2266 . . . . . . . . . . . . . . . . . 18  |-  ( ( ( w  e.  CC  /\  w #  0 )  /\  ( abs `  w )  <  1 )  -> 
( abs `  sum_ k  e.  ( ZZ>= ` 
2 ) ( ( n  e.  NN0  |->  ( ( w ^ n )  /  ( ! `  n ) ) ) `
 k ) )  =  ( ( abs `  w )  x.  ( abs `  ( ( ( ( exp `  w
)  -  1 )  /  w )  - 
1 ) ) ) )
115 eqid 2231 . . . . . . . . . . . . . . . . . . 19  |-  ( n  e.  NN0  |->  ( ( ( abs `  w
) ^ n )  /  ( ! `  n ) ) )  =  ( n  e. 
NN0  |->  ( ( ( abs `  w ) ^ n )  / 
( ! `  n
) ) )
116 eqid 2231 . . . . . . . . . . . . . . . . . . 19  |-  ( n  e.  NN0  |->  ( ( ( ( abs `  w
) ^ 2 )  /  ( ! ` 
2 ) )  x.  ( ( 1  / 
( 2  +  1 ) ) ^ n
) ) )  =  ( n  e.  NN0  |->  ( ( ( ( abs `  w ) ^ 2 )  / 
( ! `  2
) )  x.  (
( 1  /  (
2  +  1 ) ) ^ n ) ) )
117 2nn 9364 . . . . . . . . . . . . . . . . . . . 20  |-  2  e.  NN
118117a1i 9 . . . . . . . . . . . . . . . . . . 19  |-  ( ( ( w  e.  CC  /\  w #  0 )  /\  ( abs `  w )  <  1 )  -> 
2  e.  NN )
119 1red 8254 . . . . . . . . . . . . . . . . . . . 20  |-  ( ( ( w  e.  CC  /\  w #  0 )  /\  ( abs `  w )  <  1 )  -> 
1  e.  RR )
120 simpr 110 . . . . . . . . . . . . . . . . . . . 20  |-  ( ( ( w  e.  CC  /\  w #  0 )  /\  ( abs `  w )  <  1 )  -> 
( abs `  w
)  <  1 )
12148, 119, 120ltled 8357 . . . . . . . . . . . . . . . . . . 19  |-  ( ( ( w  e.  CC  /\  w #  0 )  /\  ( abs `  w )  <  1 )  -> 
( abs `  w
)  <_  1 )
12277, 115, 116, 118, 52, 121eftlub 12331 . . . . . . . . . . . . . . . . . 18  |-  ( ( ( w  e.  CC  /\  w #  0 )  /\  ( abs `  w )  <  1 )  -> 
( abs `  sum_ k  e.  ( ZZ>= ` 
2 ) ( ( n  e.  NN0  |->  ( ( w ^ n )  /  ( ! `  n ) ) ) `
 k ) )  <_  ( ( ( abs `  w ) ^ 2 )  x.  ( ( 2  +  1 )  /  (
( ! `  2
)  x.  2 ) ) ) )
123114, 122eqbrtrrd 4117 . . . . . . . . . . . . . . . . 17  |-  ( ( ( w  e.  CC  /\  w #  0 )  /\  ( abs `  w )  <  1 )  -> 
( ( abs `  w
)  x.  ( abs `  ( ( ( ( exp `  w )  -  1 )  /  w )  -  1 ) ) )  <_ 
( ( ( abs `  w ) ^ 2 )  x.  ( ( 2  +  1 )  /  ( ( ! `
 2 )  x.  2 ) ) ) )
124 df-3 9262 . . . . . . . . . . . . . . . . . . 19  |-  3  =  ( 2  +  1 )
125 fac2 11056 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ! `
 2 )  =  2
126125oveq1i 6038 . . . . . . . . . . . . . . . . . . . 20  |-  ( ( ! `  2 )  x.  2 )  =  ( 2  x.  2 )
127 2t2e4 9357 . . . . . . . . . . . . . . . . . . . 20  |-  ( 2  x.  2 )  =  4
128126, 127eqtr2i 2253 . . . . . . . . . . . . . . . . . . 19  |-  4  =  ( ( ! `
 2 )  x.  2 )
129124, 128oveq12i 6040 . . . . . . . . . . . . . . . . . 18  |-  ( 3  /  4 )  =  ( ( 2  +  1 )  /  (
( ! `  2
)  x.  2 ) )
130129oveq2i 6039 . . . . . . . . . . . . . . . . 17  |-  ( ( ( abs `  w
) ^ 2 )  x.  ( 3  / 
4 ) )  =  ( ( ( abs `  w ) ^ 2 )  x.  ( ( 2  +  1 )  /  ( ( ! `
 2 )  x.  2 ) ) )
131123, 130breqtrrdi 4135 . . . . . . . . . . . . . . . 16  |-  ( ( ( w  e.  CC  /\  w #  0 )  /\  ( abs `  w )  <  1 )  -> 
( ( abs `  w
)  x.  ( abs `  ( ( ( ( exp `  w )  -  1 )  /  w )  -  1 ) ) )  <_ 
( ( ( abs `  w ) ^ 2 )  x.  ( 3  /  4 ) ) )
13263a1i 9 . . . . . . . . . . . . . . . . . 18  |-  ( ( ( w  e.  CC  /\  w #  0 )  /\  ( abs `  w )  <  1 )  -> 
( 3  /  4
)  e.  RR )
13348sqge0d 11025 . . . . . . . . . . . . . . . . . 18  |-  ( ( ( w  e.  CC  /\  w #  0 )  /\  ( abs `  w )  <  1 )  -> 
0  <_  ( ( abs `  w ) ^
2 ) )
134 1re 8238 . . . . . . . . . . . . . . . . . . . 20  |-  1  e.  RR
135 3lt4 9375 . . . . . . . . . . . . . . . . . . . . . 22  |-  3  <  4
136 4cn 9280 . . . . . . . . . . . . . . . . . . . . . . 23  |-  4  e.  CC
137136mulridi 8241 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( 4  x.  1 )  =  4
138135, 137breqtrri 4120 . . . . . . . . . . . . . . . . . . . . 21  |-  3  <  ( 4  x.  1 )
139 4re 9279 . . . . . . . . . . . . . . . . . . . . . . 23  |-  4  e.  RR
140 4pos 9299 . . . . . . . . . . . . . . . . . . . . . . 23  |-  0  <  4
141139, 140pm3.2i 272 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( 4  e.  RR  /\  0  <  4 )
142 ltdivmul 9115 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( 3  e.  RR  /\  1  e.  RR  /\  (
4  e.  RR  /\  0  <  4 ) )  ->  ( ( 3  /  4 )  <  1  <->  3  <  (
4  x.  1 ) ) )
14360, 134, 141, 142mp3an 1374 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( 3  /  4 )  <  1  <->  3  <  ( 4  x.  1 ) )
144138, 143mpbir 146 . . . . . . . . . . . . . . . . . . . 20  |-  ( 3  /  4 )  <  1
14563, 134, 144ltleii 8341 . . . . . . . . . . . . . . . . . . 19  |-  ( 3  /  4 )  <_ 
1
146145a1i 9 . . . . . . . . . . . . . . . . . 18  |-  ( ( ( w  e.  CC  /\  w #  0 )  /\  ( abs `  w )  <  1 )  -> 
( 3  /  4
)  <_  1 )
147132, 119, 59, 133, 146lemul2ad 9179 . . . . . . . . . . . . . . . . 17  |-  ( ( ( w  e.  CC  /\  w #  0 )  /\  ( abs `  w )  <  1 )  -> 
( ( ( abs `  w ) ^ 2 )  x.  ( 3  /  4 ) )  <_  ( ( ( abs `  w ) ^ 2 )  x.  1 ) )
14848recnd 8267 . . . . . . . . . . . . . . . . . . 19  |-  ( ( ( w  e.  CC  /\  w #  0 )  /\  ( abs `  w )  <  1 )  -> 
( abs `  w
)  e.  CC )
149148sqcld 10996 . . . . . . . . . . . . . . . . . 18  |-  ( ( ( w  e.  CC  /\  w #  0 )  /\  ( abs `  w )  <  1 )  -> 
( ( abs `  w
) ^ 2 )  e.  CC )
150149mulridd 8256 . . . . . . . . . . . . . . . . 17  |-  ( ( ( w  e.  CC  /\  w #  0 )  /\  ( abs `  w )  <  1 )  -> 
( ( ( abs `  w ) ^ 2 )  x.  1 )  =  ( ( abs `  w ) ^ 2 ) )
151147, 150breqtrd 4119 . . . . . . . . . . . . . . . 16  |-  ( ( ( w  e.  CC  /\  w #  0 )  /\  ( abs `  w )  <  1 )  -> 
( ( ( abs `  w ) ^ 2 )  x.  ( 3  /  4 ) )  <_  ( ( abs `  w ) ^ 2 ) )
15258, 65, 59, 131, 151letrd 8362 . . . . . . . . . . . . . . 15  |-  ( ( ( w  e.  CC  /\  w #  0 )  /\  ( abs `  w )  <  1 )  -> 
( ( abs `  w
)  x.  ( abs `  ( ( ( ( exp `  w )  -  1 )  /  w )  -  1 ) ) )  <_ 
( ( abs `  w
) ^ 2 ) )
153148sqvald 10995 . . . . . . . . . . . . . . 15  |-  ( ( ( w  e.  CC  /\  w #  0 )  /\  ( abs `  w )  <  1 )  -> 
( ( abs `  w
) ^ 2 )  =  ( ( abs `  w )  x.  ( abs `  w ) ) )
154152, 153breqtrd 4119 . . . . . . . . . . . . . 14  |-  ( ( ( w  e.  CC  /\  w #  0 )  /\  ( abs `  w )  <  1 )  -> 
( ( abs `  w
)  x.  ( abs `  ( ( ( ( exp `  w )  -  1 )  /  w )  -  1 ) ) )  <_ 
( ( abs `  w
)  x.  ( abs `  w ) ) )
155 absgt0ap 11739 . . . . . . . . . . . . . . . . . 18  |-  ( w  e.  CC  ->  (
w #  0  <->  0  <  ( abs `  w ) ) )
156155ad2antrr 488 . . . . . . . . . . . . . . . . 17  |-  ( ( ( w  e.  CC  /\  w #  0 )  /\  ( abs `  w )  <  1 )  -> 
( w #  0  <->  0  <  ( abs `  w
) ) )
15753, 156mpbid 147 . . . . . . . . . . . . . . . 16  |-  ( ( ( w  e.  CC  /\  w #  0 )  /\  ( abs `  w )  <  1 )  -> 
0  <  ( abs `  w ) )
15848, 157elrpd 9989 . . . . . . . . . . . . . . 15  |-  ( ( ( w  e.  CC  /\  w #  0 )  /\  ( abs `  w )  <  1 )  -> 
( abs `  w
)  e.  RR+ )
15957, 48, 158lemul2d 10037 . . . . . . . . . . . . . 14  |-  ( ( ( w  e.  CC  /\  w #  0 )  /\  ( abs `  w )  <  1 )  -> 
( ( abs `  (
( ( ( exp `  w )  -  1 )  /  w )  -  1 ) )  <_  ( abs `  w
)  <->  ( ( abs `  w )  x.  ( abs `  ( ( ( ( exp `  w
)  -  1 )  /  w )  - 
1 ) ) )  <_  ( ( abs `  w )  x.  ( abs `  w ) ) ) )
160154, 159mpbird 167 . . . . . . . . . . . . 13  |-  ( ( ( w  e.  CC  /\  w #  0 )  /\  ( abs `  w )  <  1 )  -> 
( abs `  (
( ( ( exp `  w )  -  1 )  /  w )  -  1 ) )  <_  ( abs `  w
) )
161160ad2ant2l 508 . . . . . . . . . . . 12  |-  ( ( ( x  e.  RR+  /\  ( w  e.  CC  /\  w #  0 ) )  /\  ( ( abs `  w )  <  x  /\  ( abs `  w
)  <  1 ) )  ->  ( abs `  ( ( ( ( exp `  w )  -  1 )  /  w )  -  1 ) )  <_  ( abs `  w ) )
162 simprl 531 . . . . . . . . . . . 12  |-  ( ( ( x  e.  RR+  /\  ( w  e.  CC  /\  w #  0 ) )  /\  ( ( abs `  w )  <  x  /\  ( abs `  w
)  <  1 ) )  ->  ( abs `  w )  <  x
)
16342, 44, 46, 161, 162lelttrd 8363 . . . . . . . . . . 11  |-  ( ( ( x  e.  RR+  /\  ( w  e.  CC  /\  w #  0 ) )  /\  ( ( abs `  w )  <  x  /\  ( abs `  w
)  <  1 ) )  ->  ( abs `  ( ( ( ( exp `  w )  -  1 )  /  w )  -  1 ) )  <  x
)
16439, 163eqbrtrd 4115 . . . . . . . . . 10  |-  ( ( ( x  e.  RR+  /\  ( w  e.  CC  /\  w #  0 ) )  /\  ( ( abs `  w )  <  x  /\  ( abs `  w
)  <  1 ) )  ->  ( abs `  ( ( ( z  e.  { u  e.  CC  |  u #  0 }  |->  ( ( ( exp `  z )  -  1 )  / 
z ) ) `  w )  -  1 ) )  <  x
)
165164ex 115 . . . . . . . . 9  |-  ( ( x  e.  RR+  /\  (
w  e.  CC  /\  w #  0 ) )  -> 
( ( ( abs `  w )  <  x  /\  ( abs `  w
)  <  1 )  ->  ( abs `  (
( ( z  e. 
{ u  e.  CC  |  u #  0 }  |->  ( ( ( exp `  z )  -  1 )  /  z ) ) `  w )  -  1 ) )  <  x ) )
16624, 165sylbid 150 . . . . . . . 8  |-  ( ( x  e.  RR+  /\  (
w  e.  CC  /\  w #  0 ) )  -> 
( ( abs `  (
w  -  0 ) )  < inf ( {
x ,  1 } ,  RR ,  <  )  ->  ( abs `  (
( ( z  e. 
{ u  e.  CC  |  u #  0 }  |->  ( ( ( exp `  z )  -  1 )  /  z ) ) `  w )  -  1 ) )  <  x ) )
167166adantld 278 . . . . . . 7  |-  ( ( x  e.  RR+  /\  (
w  e.  CC  /\  w #  0 ) )  -> 
( ( w #  0  /\  ( abs `  (
w  -  0 ) )  < inf ( {
x ,  1 } ,  RR ,  <  ) )  ->  ( abs `  ( ( ( z  e.  { u  e.  CC  |  u #  0 }  |->  ( ( ( exp `  z )  -  1 )  / 
z ) ) `  w )  -  1 ) )  <  x
) )
16813, 167sylan2b 287 . . . . . 6  |-  ( ( x  e.  RR+  /\  w  e.  { u  e.  CC  |  u #  0 }
)  ->  ( (
w #  0  /\  ( abs `  ( w  - 
0 ) )  < inf ( { x ,  1 } ,  RR ,  <  ) )  ->  ( abs `  ( ( ( z  e.  { u  e.  CC  |  u #  0 }  |->  ( ( ( exp `  z )  -  1 )  / 
z ) ) `  w )  -  1 ) )  <  x
) )
169168ralrimiva 2606 . . . . 5  |-  ( x  e.  RR+  ->  A. w  e.  { u  e.  CC  |  u #  0 } 
( ( w #  0  /\  ( abs `  (
w  -  0 ) )  < inf ( {
x ,  1 } ,  RR ,  <  ) )  ->  ( abs `  ( ( ( z  e.  { u  e.  CC  |  u #  0 }  |->  ( ( ( exp `  z )  -  1 )  / 
z ) ) `  w )  -  1 ) )  <  x
) )
170 brimralrspcev 4153 . . . . 5  |-  ( (inf ( { x ,  1 } ,  RR ,  <  )  e.  RR+  /\ 
A. w  e.  {
u  e.  CC  |  u #  0 }  ( ( w #  0  /\  ( abs `  ( w  - 
0 ) )  < inf ( { x ,  1 } ,  RR ,  <  ) )  ->  ( abs `  ( ( ( z  e.  { u  e.  CC  |  u #  0 }  |->  ( ( ( exp `  z )  -  1 )  / 
z ) ) `  w )  -  1 ) )  <  x
) )  ->  E. y  e.  RR+  A. w  e. 
{ u  e.  CC  |  u #  0 } 
( ( w #  0  /\  ( abs `  (
w  -  0 ) )  <  y )  ->  ( abs `  (
( ( z  e. 
{ u  e.  CC  |  u #  0 }  |->  ( ( ( exp `  z )  -  1 )  /  z ) ) `  w )  -  1 ) )  <  x ) )
17111, 169, 170syl2anc 411 . . . 4  |-  ( x  e.  RR+  ->  E. y  e.  RR+  A. w  e. 
{ u  e.  CC  |  u #  0 } 
( ( w #  0  /\  ( abs `  (
w  -  0 ) )  <  y )  ->  ( abs `  (
( ( z  e. 
{ u  e.  CC  |  u #  0 }  |->  ( ( ( exp `  z )  -  1 )  /  z ) ) `  w )  -  1 ) )  <  x ) )
172171rgen 2586 . . 3  |-  A. x  e.  RR+  E. y  e.  RR+  A. w  e.  {
u  e.  CC  |  u #  0 }  ( ( w #  0  /\  ( abs `  ( w  - 
0 ) )  < 
y )  ->  ( abs `  ( ( ( z  e.  { u  e.  CC  |  u #  0 }  |->  ( ( ( exp `  z )  -  1 )  / 
z ) ) `  w )  -  1 ) )  <  x
)
173 elrabi 2960 . . . . . . . . . 10  |-  ( z  e.  { u  e.  CC  |  u #  0 }  ->  z  e.  CC )
174 efcl 12305 . . . . . . . . . 10  |-  ( z  e.  CC  ->  ( exp `  z )  e.  CC )
175173, 174syl 14 . . . . . . . . 9  |-  ( z  e.  { u  e.  CC  |  u #  0 }  ->  ( exp `  z )  e.  CC )
176 1cnd 8255 . . . . . . . . 9  |-  ( z  e.  { u  e.  CC  |  u #  0 }  ->  1  e.  CC )
177175, 176subcld 8549 . . . . . . . 8  |-  ( z  e.  { u  e.  CC  |  u #  0 }  ->  ( ( exp `  z )  - 
1 )  e.  CC )
178 breq1 4096 . . . . . . . . . 10  |-  ( u  =  z  ->  (
u #  0  <->  z #  0
) )
179178elrab 2963 . . . . . . . . 9  |-  ( z  e.  { u  e.  CC  |  u #  0 }  <->  ( z  e.  CC  /\  z #  0 ) )
180179simprbi 275 . . . . . . . 8  |-  ( z  e.  { u  e.  CC  |  u #  0 }  ->  z #  0
)
181177, 173, 180divclapd 9029 . . . . . . 7  |-  ( z  e.  { u  e.  CC  |  u #  0 }  ->  ( (
( exp `  z
)  -  1 )  /  z )  e.  CC )
18225, 181fmpti 5807 . . . . . 6  |-  ( z  e.  { u  e.  CC  |  u #  0 }  |->  ( ( ( exp `  z )  -  1 )  / 
z ) ) : { u  e.  CC  |  u #  0 } --> CC
183182a1i 9 . . . . 5  |-  ( T. 
->  ( z  e.  {
u  e.  CC  |  u #  0 }  |->  ( ( ( exp `  z
)  -  1 )  /  z ) ) : { u  e.  CC  |  u #  0 } --> CC )
184 apsscn 8886 . . . . . 6  |-  { u  e.  CC  |  u #  0 }  C_  CC
185184a1i 9 . . . . 5  |-  ( T. 
->  { u  e.  CC  |  u #  0 }  C_  CC )
186 0cnd 8232 . . . . 5  |-  ( T. 
->  0  e.  CC )
187183, 185, 186ellimc3ap 15472 . . . 4  |-  ( T. 
->  ( 1  e.  ( ( z  e.  {
u  e.  CC  |  u #  0 }  |->  ( ( ( exp `  z
)  -  1 )  /  z ) ) lim
CC  0 )  <->  ( 1  e.  CC  /\  A. x  e.  RR+  E. y  e.  RR+  A. w  e. 
{ u  e.  CC  |  u #  0 } 
( ( w #  0  /\  ( abs `  (
w  -  0 ) )  <  y )  ->  ( abs `  (
( ( z  e. 
{ u  e.  CC  |  u #  0 }  |->  ( ( ( exp `  z )  -  1 )  /  z ) ) `  w )  -  1 ) )  <  x ) ) ) )
188187mptru 1407 . . 3  |-  ( 1  e.  ( ( z  e.  { u  e.  CC  |  u #  0 }  |->  ( ( ( exp `  z )  -  1 )  / 
z ) ) lim CC  0 )  <->  ( 1  e.  CC  /\  A. x  e.  RR+  E. y  e.  RR+  A. w  e. 
{ u  e.  CC  |  u #  0 } 
( ( w #  0  /\  ( abs `  (
w  -  0 ) )  <  y )  ->  ( abs `  (
( ( z  e. 
{ u  e.  CC  |  u #  0 }  |->  ( ( ( exp `  z )  -  1 )  /  z ) ) `  w )  -  1 ) )  <  x ) ) )
1898, 172, 188mpbir2an 951 . 2  |-  1  e.  ( ( z  e. 
{ u  e.  CC  |  u #  0 }  |->  ( ( ( exp `  z )  -  1 )  /  z ) ) lim CC  0 )
1902cntoptopon 15343 . . . . 5  |-  ( MetOpen `  ( abs  o.  -  )
)  e.  (TopOn `  CC )
191190toponrestid 14832 . . . 4  |-  ( MetOpen `  ( abs  o.  -  )
)  =  ( (
MetOpen `  ( abs  o.  -  ) )t  CC )
192173subid1d 8538 . . . . . . 7  |-  ( z  e.  { u  e.  CC  |  u #  0 }  ->  ( z  -  0 )  =  z )
193192oveq2d 6044 . . . . . 6  |-  ( z  e.  { u  e.  CC  |  u #  0 }  ->  ( (
( exp `  z
)  -  ( exp `  0 ) )  /  ( z  - 
0 ) )  =  ( ( ( exp `  z )  -  ( exp `  0 ) )  /  z ) )
194 ef0 12313 . . . . . . . 8  |-  ( exp `  0 )  =  1
195194oveq2i 6039 . . . . . . 7  |-  ( ( exp `  z )  -  ( exp `  0
) )  =  ( ( exp `  z
)  -  1 )
196195oveq1i 6038 . . . . . 6  |-  ( ( ( exp `  z
)  -  ( exp `  0 ) )  /  z )  =  ( ( ( exp `  z )  -  1 )  /  z )
197193, 196eqtr2di 2281 . . . . 5  |-  ( z  e.  { u  e.  CC  |  u #  0 }  ->  ( (
( exp `  z
)  -  1 )  /  z )  =  ( ( ( exp `  z )  -  ( exp `  0 ) )  /  ( z  - 
0 ) ) )
198197mpteq2ia 4180 . . . 4  |-  ( z  e.  { u  e.  CC  |  u #  0 }  |->  ( ( ( exp `  z )  -  1 )  / 
z ) )  =  ( z  e.  {
u  e.  CC  |  u #  0 }  |->  ( ( ( exp `  z
)  -  ( exp `  0 ) )  /  ( z  - 
0 ) ) )
199 ssidd 3249 . . . 4  |-  ( T. 
->  CC  C_  CC )
200 eff 12304 . . . . 5  |-  exp : CC
--> CC
201200a1i 9 . . . 4  |-  ( T. 
->  exp : CC --> CC )
202191, 2, 198, 199, 201, 199eldvap 15493 . . 3  |-  ( T. 
->  ( 0 ( CC 
_D  exp ) 1  <->  (
0  e.  ( ( int `  ( MetOpen `  ( abs  o.  -  )
) ) `  CC )  /\  1  e.  ( ( z  e.  {
u  e.  CC  |  u #  0 }  |->  ( ( ( exp `  z
)  -  1 )  /  z ) ) lim
CC  0 ) ) ) )
203202mptru 1407 . 2  |-  ( 0 ( CC  _D  exp ) 1  <->  ( 0  e.  ( ( int `  ( MetOpen `  ( abs  o. 
-  ) ) ) `
 CC )  /\  1  e.  ( (
z  e.  { u  e.  CC  |  u #  0 }  |->  ( ( ( exp `  z )  -  1 )  / 
z ) ) lim CC  0 ) ) )
2047, 189, 203mpbir2an 951 1  |-  0
( CC  _D  exp ) 1
Colors of variables: wff set class
Syntax hints:    -> wi 4    /\ wa 104    <-> wb 105    = wceq 1398   T. wtru 1399    e. wcel 2202   A.wral 2511   E.wrex 2512   {crab 2515    C_ wss 3201   {cpr 3674   class class class wbr 4093    |-> cmpt 4155    o. ccom 4735   -->wf 5329   ` cfv 5333  (class class class)co 6028  infcinf 7242   CCcc 8090   RRcr 8091   0cc0 8092   1c1 8093    + caddc 8095    x. cmul 8097    < clt 8273    <_ cle 8274    - cmin 8409   # cap 8820    / cdiv 8911   NNcn 9202   2c2 9253   3c3 9254   4c4 9255   NN0cn0 9461   ZZ>=cuz 9816   RR+crp 9949   ^cexp 10863   !cfa 11050   abscabs 11637   sum_csu 11993   expce 12283   MetOpencmopn 14637   Topctop 14808   intcnt 14904   lim CC climc 15465    _D cdv 15466
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-ia1 106  ax-ia2 107  ax-ia3 108  ax-in1 619  ax-in2 620  ax-io 717  ax-5 1496  ax-7 1497  ax-gen 1498  ax-ie1 1542  ax-ie2 1543  ax-8 1553  ax-10 1554  ax-11 1555  ax-i12 1556  ax-bndl 1558  ax-4 1559  ax-17 1575  ax-i9 1579  ax-ial 1583  ax-i5r 1584  ax-13 2204  ax-14 2205  ax-ext 2213  ax-coll 4209  ax-sep 4212  ax-nul 4220  ax-pow 4270  ax-pr 4305  ax-un 4536  ax-setind 4641  ax-iinf 4692  ax-cnex 8183  ax-resscn 8184  ax-1cn 8185  ax-1re 8186  ax-icn 8187  ax-addcl 8188  ax-addrcl 8189  ax-mulcl 8190  ax-mulrcl 8191  ax-addcom 8192  ax-mulcom 8193  ax-addass 8194  ax-mulass 8195  ax-distr 8196  ax-i2m1 8197  ax-0lt1 8198  ax-1rid 8199  ax-0id 8200  ax-rnegex 8201  ax-precex 8202  ax-cnre 8203  ax-pre-ltirr 8204  ax-pre-ltwlin 8205  ax-pre-lttrn 8206  ax-pre-apti 8207  ax-pre-ltadd 8208  ax-pre-mulgt0 8209  ax-pre-mulext 8210  ax-arch 8211  ax-caucvg 8212
This theorem depends on definitions:  df-bi 117  df-stab 839  df-dc 843  df-3or 1006  df-3an 1007  df-tru 1401  df-fal 1404  df-nf 1510  df-sb 1811  df-eu 2082  df-mo 2083  df-clab 2218  df-cleq 2224  df-clel 2227  df-nfc 2364  df-ne 2404  df-nel 2499  df-ral 2516  df-rex 2517  df-reu 2518  df-rmo 2519  df-rab 2520  df-v 2805  df-sbc 3033  df-csb 3129  df-dif 3203  df-un 3205  df-in 3207  df-ss 3214  df-nul 3497  df-if 3608  df-pw 3658  df-sn 3679  df-pr 3680  df-op 3682  df-uni 3899  df-int 3934  df-iun 3977  df-br 4094  df-opab 4156  df-mpt 4157  df-tr 4193  df-id 4396  df-po 4399  df-iso 4400  df-iord 4469  df-on 4471  df-ilim 4472  df-suc 4474  df-iom 4695  df-xp 4737  df-rel 4738  df-cnv 4739  df-co 4740  df-dm 4741  df-rn 4742  df-res 4743  df-ima 4744  df-iota 5293  df-fun 5335  df-fn 5336  df-f 5337  df-f1 5338  df-fo 5339  df-f1o 5340  df-fv 5341  df-isom 5342  df-riota 5981  df-ov 6031  df-oprab 6032  df-mpo 6033  df-1st 6312  df-2nd 6313  df-recs 6514  df-irdg 6579  df-frec 6600  df-1o 6625  df-oadd 6629  df-er 6745  df-map 6862  df-pm 6863  df-en 6953  df-dom 6954  df-fin 6955  df-sup 7243  df-inf 7244  df-pnf 8275  df-mnf 8276  df-xr 8277  df-ltxr 8278  df-le 8279  df-sub 8411  df-neg 8412  df-reap 8814  df-ap 8821  df-div 8912  df-inn 9203  df-2 9261  df-3 9262  df-4 9263  df-n0 9462  df-z 9541  df-uz 9817  df-q 9915  df-rp 9950  df-xneg 10068  df-xadd 10069  df-ico 10190  df-fz 10306  df-fzo 10440  df-seqfrec 10773  df-exp 10864  df-fac 11051  df-ihash 11101  df-shft 11455  df-cj 11482  df-re 11483  df-im 11484  df-rsqrt 11638  df-abs 11639  df-clim 11919  df-sumdc 11994  df-ef 12289  df-rest 13404  df-topgen 13423  df-psmet 14639  df-xmet 14640  df-met 14641  df-bl 14642  df-mopn 14643  df-top 14809  df-topon 14822  df-bases 14854  df-ntr 14907  df-limced 15467  df-dvap 15468
This theorem is referenced by:  dvef  15538
  Copyright terms: Public domain W3C validator