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

Theorem dveflem 14872
Description: Derivative of the exponential function at 0. The key step in the proof is eftlub 11833, 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 8011 . . 3  |-  0  e.  CC
2 eqid 2193 . . . . 5  |-  ( MetOpen `  ( abs  o.  -  )
)  =  ( MetOpen `  ( abs  o.  -  )
)
32cntoptop 14701 . . . 4  |-  ( MetOpen `  ( abs  o.  -  )
)  e.  Top
4 unicntopcntop 14704 . . . . 5  |-  CC  =  U. ( MetOpen `  ( abs  o. 
-  ) )
54ntrtop 14296 . . . 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 2269 . 2  |-  0  e.  ( ( int `  ( MetOpen
`  ( abs  o.  -  ) ) ) `
 CC )
8 ax-1cn 7965 . . 3  |-  1  e.  CC
9 1rp 9723 . . . . . 6  |-  1  e.  RR+
10 rpmincl 11381 . . . . . 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 4032 . . . . . . . 8  |-  ( u  =  w  ->  (
u #  0  <->  w #  0
) )
1312elrab 2916 . . . . . . 7  |-  ( w  e.  { u  e.  CC  |  u #  0 }  <->  ( w  e.  CC  /\  w #  0 ) )
14 simprl 529 . . . . . . . . . . . . 13  |-  ( ( x  e.  RR+  /\  (
w  e.  CC  /\  w #  0 ) )  ->  w  e.  CC )
1514subid1d 8319 . . . . . . . . . . . 12  |-  ( ( x  e.  RR+  /\  (
w  e.  CC  /\  w #  0 ) )  -> 
( w  -  0 )  =  w )
1615fveq2d 5558 . . . . . . . . . . 11  |-  ( ( x  e.  RR+  /\  (
w  e.  CC  /\  w #  0 ) )  -> 
( abs `  (
w  -  0 ) )  =  ( abs `  w ) )
1716breq1d 4039 . . . . . . . . . 10  |-  ( ( x  e.  RR+  /\  (
w  e.  CC  /\  w #  0 ) )  -> 
( ( abs `  (
w  -  0 ) )  < inf ( {
x ,  1 } ,  RR ,  <  )  <-> 
( abs `  w
)  < inf ( {
x ,  1 } ,  RR ,  <  ) ) )
1814abscld 11325 . . . . . . . . . . 11  |-  ( ( x  e.  RR+  /\  (
w  e.  CC  /\  w #  0 ) )  -> 
( abs `  w
)  e.  RR )
19 rpre 9726 . . . . . . . . . . . 12  |-  ( x  e.  RR+  ->  x  e.  RR )
2019adantr 276 . . . . . . . . . . 11  |-  ( ( x  e.  RR+  /\  (
w  e.  CC  /\  w #  0 ) )  ->  x  e.  RR )
21 1red 8034 . . . . . . . . . . 11  |-  ( ( x  e.  RR+  /\  (
w  e.  CC  /\  w #  0 ) )  -> 
1  e.  RR )
22 ltmininf 11378 . . . . . . . . . . 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 1249 . . . . . . . . . 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 2193 . . . . . . . . . . . . 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 5554 . . . . . . . . . . . . . . 15  |-  ( z  =  w  ->  ( exp `  z )  =  ( exp `  w
) )
2726oveq1d 5933 . . . . . . . . . . . . . 14  |-  ( z  =  w  ->  (
( exp `  z
)  -  1 )  =  ( ( exp `  w )  -  1 ) )
28 id 19 . . . . . . . . . . . . . 14  |-  ( z  =  w  ->  z  =  w )
2927, 28oveq12d 5936 . . . . . . . . . . . . 13  |-  ( z  =  w  ->  (
( ( exp `  z
)  -  1 )  /  z )  =  ( ( ( exp `  w )  -  1 )  /  w ) )
30 simplr 528 . . . . . . . . . . . . . 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 11807 . . . . . . . . . . . . . . . 16  |-  ( w  e.  CC  ->  ( exp `  w )  e.  CC )
33 peano2cnm 8285 . . . . . . . . . . . . . . . 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 531 . . . . . . . . . . . . . . 15  |-  ( ( x  e.  RR+  /\  (
w  e.  CC  /\  w #  0 ) )  ->  w #  0 )
3634, 14, 35divclapd 8809 . . . . . . . . . . . . . 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 5651 . . . . . . . . . . . 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 5940 . . . . . . . . . . 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 8035 . . . . . . . . . . . . . 14  |-  ( ( ( x  e.  RR+  /\  ( w  e.  CC  /\  w #  0 ) )  /\  ( ( abs `  w )  <  x  /\  ( abs `  w
)  <  1 ) )  ->  1  e.  CC )
4137, 40subcld 8330 . . . . . . . . . . . . 13  |-  ( ( ( x  e.  RR+  /\  ( w  e.  CC  /\  w #  0 ) )  /\  ( ( abs `  w )  <  x  /\  ( abs `  w
)  <  1 ) )  ->  ( (
( ( exp `  w
)  -  1 )  /  w )  - 
1 )  e.  CC )
4241abscld 11325 . . . . . . . . . . . 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 535 . . . . . . . . . . . . 13  |-  ( ( ( x  e.  RR+  /\  ( w  e.  CC  /\  w #  0 ) )  /\  ( ( abs `  w )  <  x  /\  ( abs `  w
)  <  1 ) )  ->  w  e.  CC )
4443abscld 11325 . . . . . . . . . . . 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 9762 . . . . . . . . . . . 12  |-  ( ( ( x  e.  RR+  /\  ( w  e.  CC  /\  w #  0 ) )  /\  ( ( abs `  w )  <  x  /\  ( abs `  w
)  <  1 ) )  ->  x  e.  RR )
47 abscl 11195 . . . . . . . . . . . . . . . . . 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 8218 . . . . . . . . . . . . . . . . . . . . 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 528 . . . . . . . . . . . . . . . . . . . 20  |-  ( ( ( w  e.  CC  /\  w #  0 )  /\  ( abs `  w )  <  1 )  ->  w #  0 )
5451, 52, 53divclapd 8809 . . . . . . . . . . . . . . . . . . 19  |-  ( ( ( w  e.  CC  /\  w #  0 )  /\  ( abs `  w )  <  1 )  -> 
( ( ( exp `  w )  -  1 )  /  w )  e.  CC )
55 1cnd 8035 . . . . . . . . . . . . . . . . . . 19  |-  ( ( ( w  e.  CC  /\  w #  0 )  /\  ( abs `  w )  <  1 )  -> 
1  e.  CC )
5654, 55subcld 8330 . . . . . . . . . . . . . . . . . 18  |-  ( ( ( w  e.  CC  /\  w #  0 )  /\  ( abs `  w )  <  1 )  -> 
( ( ( ( exp `  w )  -  1 )  /  w )  -  1 )  e.  CC )
5756abscld 11325 . . . . . . . . . . . . . . . . 17  |-  ( ( ( w  e.  CC  /\  w #  0 )  /\  ( abs `  w )  <  1 )  -> 
( abs `  (
( ( ( exp `  w )  -  1 )  /  w )  -  1 ) )  e.  RR )
5848, 57remulcld 8050 . . . . . . . . . . . . . . . 16  |-  ( ( ( w  e.  CC  /\  w #  0 )  /\  ( abs `  w )  <  1 )  -> 
( ( abs `  w
)  x.  ( abs `  ( ( ( ( exp `  w )  -  1 )  /  w )  -  1 ) ) )  e.  RR )
5948resqcld 10770 . . . . . . . . . . . . . . . . 17  |-  ( ( ( w  e.  CC  /\  w #  0 )  /\  ( abs `  w )  <  1 )  -> 
( ( abs `  w
) ^ 2 )  e.  RR )
60 3re 9056 . . . . . . . . . . . . . . . . . 18  |-  3  e.  RR
61 4nn 9145 . . . . . . . . . . . . . . . . . 18  |-  4  e.  NN
62 nndivre 9018 . . . . . . . . . . . . . . . . . 18  |-  ( ( 3  e.  RR  /\  4  e.  NN )  ->  ( 3  /  4
)  e.  RR )
6360, 61, 62mp2an 426 . . . . . . . . . . . . . . . . 17  |-  ( 3  /  4 )  e.  RR
64 remulcl 8000 . . . . . . . . . . . . . . . . 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 8330 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( ( w  e.  CC  /\  w #  0 )  /\  ( abs `  w )  <  1 )  -> 
( ( ( exp `  w )  -  1 )  -  w )  e.  CC )
6766, 52, 53divcanap2d 8811 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( ( w  e.  CC  /\  w #  0 )  /\  ( abs `  w )  <  1 )  -> 
( w  x.  (
( ( ( exp `  w )  -  1 )  -  w )  /  w ) )  =  ( ( ( exp `  w )  -  1 )  -  w ) )
6851, 52, 52, 53divsubdirapd 8849 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( ( ( w  e.  CC  /\  w #  0 )  /\  ( abs `  w )  <  1 )  -> 
( ( ( ( exp `  w )  -  1 )  -  w )  /  w
)  =  ( ( ( ( exp `  w
)  -  1 )  /  w )  -  ( w  /  w
) ) )
6952, 53dividapd 8805 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( ( ( w  e.  CC  /\  w #  0 )  /\  ( abs `  w )  <  1 )  -> 
( w  /  w
)  =  1 )
7069oveq2d 5934 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( ( ( w  e.  CC  /\  w #  0 )  /\  ( abs `  w )  <  1 )  -> 
( ( ( ( exp `  w )  -  1 )  /  w )  -  (
w  /  w ) )  =  ( ( ( ( exp `  w
)  -  1 )  /  w )  - 
1 ) )
7168, 70eqtrd 2226 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( ( w  e.  CC  /\  w #  0 )  /\  ( abs `  w )  <  1 )  -> 
( ( ( ( exp `  w )  -  1 )  -  w )  /  w
)  =  ( ( ( ( exp `  w
)  -  1 )  /  w )  - 
1 ) )
7271oveq2d 5934 . . . . . . . . . . . . . . . . . . . . 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 8361 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( ( w  e.  CC  /\  w #  0 )  /\  ( abs `  w )  <  1 )  -> 
( ( ( exp `  w )  -  1 )  -  w )  =  ( ( exp `  w )  -  (
1  +  w ) ) )
74 addcl 7997 . . . . . . . . . . . . . . . . . . . . . . . 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 9257 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  2  e.  NN0
77 eqid 2193 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( n  e.  NN0  |->  ( ( w ^ n )  /  ( ! `  n ) ) )  =  ( n  e. 
NN0  |->  ( ( w ^ n )  / 
( ! `  n
) ) )
7877eftlcl 11831 . . . . . . . . . . . . . . . . . . . . . . . 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 9041 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  2  =  ( 1  +  1 )
81 1nn0 9256 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  1  e.  NN0
82 1e0p1 9489 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  1  =  ( 0  +  1 )
83 0nn0 9255 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  0  e.  NN0
84 0cnd 8012 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( ( ( w  e.  CC  /\  w #  0 )  /\  ( abs `  w )  <  1 )  -> 
0  e.  CC )
8577efval2 11808 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 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 9627 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29  |-  NN0  =  ( ZZ>= `  0 )
8887sumeq1i 11506 . . . . . . . . . . . . . . . . . . . . . . . . . . . 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 2243 . . . . . . . . . . . . . . . . . . . . . . . . . . 27  |-  ( ( ( w  e.  CC  /\  w #  0 )  /\  ( abs `  w )  <  1 )  ->  sum_ k  e.  ( ZZ>= ` 
0 ) ( ( n  e.  NN0  |->  ( ( w ^ n )  /  ( ! `  n ) ) ) `
 k )  =  ( exp `  w
) )
9089oveq2d 5934 . . . . . . . . . . . . . . . . . . . . . . . . . 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 8169 . . . . . . . . . . . . . . . . . . . . . . . . . 26  |-  ( ( ( w  e.  CC  /\  w #  0 )  /\  ( abs `  w )  <  1 )  -> 
( 0  +  ( exp `  w ) )  =  ( exp `  w ) )
9290, 91eqtr2d 2227 . . . . . . . . . . . . . . . . . . . . . . . . 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 11836 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28  |-  ( w  e.  CC  ->  (
( w ^ 0 )  /  ( ! `
 0 ) )  =  1 )
9493ad2antrr 488 . . . . . . . . . . . . . . . . . . . . . . . . . . 27  |-  ( ( ( w  e.  CC  /\  w #  0 )  /\  ( abs `  w )  <  1 )  -> 
( ( w ^
0 )  /  ( ! `  0 )
)  =  1 )
9594oveq2d 5934 . . . . . . . . . . . . . . . . . . . . . . . . . 26  |-  ( ( ( w  e.  CC  /\  w #  0 )  /\  ( abs `  w )  <  1 )  -> 
( 0  +  ( ( w ^ 0 )  /  ( ! `
 0 ) ) )  =  ( 0  +  1 ) )
9695, 82eqtr4di 2244 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( ( ( w  e.  CC  /\  w #  0 )  /\  ( abs `  w )  <  1 )  -> 
( 0  +  ( ( w ^ 0 )  /  ( ! `
 0 ) ) )  =  1 )
9777, 82, 83, 52, 84, 92, 96efsep 11834 . . . . . . . . . . . . . . . . . . . . . . . 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 10616 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29  |-  ( w  e.  CC  ->  (
w ^ 1 )  =  w )
9998ad2antrr 488 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28  |-  ( ( ( w  e.  CC  /\  w #  0 )  /\  ( abs `  w )  <  1 )  -> 
( w ^ 1 )  =  w )
10099oveq1d 5933 . . . . . . . . . . . . . . . . . . . . . . . . . . 27  |-  ( ( ( w  e.  CC  /\  w #  0 )  /\  ( abs `  w )  <  1 )  -> 
( ( w ^
1 )  /  ( ! `  1 )
)  =  ( w  /  ( ! ` 
1 ) ) )
101 fac1 10800 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28  |-  ( ! `
 1 )  =  1
102101oveq2i 5929 . . . . . . . . . . . . . . . . . . . . . . . . . . 27  |-  ( w  /  ( ! ` 
1 ) )  =  ( w  /  1
)
103100, 102eqtrdi 2242 . . . . . . . . . . . . . . . . . . . . . . . . . 26  |-  ( ( ( w  e.  CC  /\  w #  0 )  /\  ( abs `  w )  <  1 )  -> 
( ( w ^
1 )  /  ( ! `  1 )
)  =  ( w  /  1 ) )
104 div1 8722 . . . . . . . . . . . . . . . . . . . . . . . . . . 27  |-  ( w  e.  CC  ->  (
w  /  1 )  =  w )
105104ad2antrr 488 . . . . . . . . . . . . . . . . . . . . . . . . . 26  |-  ( ( ( w  e.  CC  /\  w #  0 )  /\  ( abs `  w )  <  1 )  -> 
( w  /  1
)  =  w )
106103, 105eqtrd 2226 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( ( ( w  e.  CC  /\  w #  0 )  /\  ( abs `  w )  <  1 )  -> 
( ( w ^
1 )  /  ( ! `  1 )
)  =  w )
107106oveq2d 5934 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( ( ( w  e.  CC  /\  w #  0 )  /\  ( abs `  w )  <  1 )  -> 
( 1  +  ( ( w ^ 1 )  /  ( ! `
 1 ) ) )  =  ( 1  +  w ) )
10877, 80, 81, 52, 55, 97, 107efsep 11834 . . . . . . . . . . . . . . . . . . . . . . 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 8386 . . . . . . . . . . . . . . . . . . . . . 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 2226 . . . . . . . . . . . . . . . . . . . . 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 2234 . . . . . . . . . . . . . . . . . . . 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 5558 . . . . . . . . . . . . . . . . . . 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 11338 . . . . . . . . . . . . . . . . . . 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 2228 . . . . . . . . . . . . . . . . . 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 2193 . . . . . . . . . . . . . . . . . . 19  |-  ( n  e.  NN0  |->  ( ( ( abs `  w
) ^ n )  /  ( ! `  n ) ) )  =  ( n  e. 
NN0  |->  ( ( ( abs `  w ) ^ n )  / 
( ! `  n
) ) )
116 eqid 2193 . . . . . . . . . . . . . . . . . . 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 9143 . . . . . . . . . . . . . . . . . . . 20  |-  2  e.  NN
118117a1i 9 . . . . . . . . . . . . . . . . . . 19  |-  ( ( ( w  e.  CC  /\  w #  0 )  /\  ( abs `  w )  <  1 )  -> 
2  e.  NN )
119 1red 8034 . . . . . . . . . . . . . . . . . . . 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 8138 . . . . . . . . . . . . . . . . . . 19  |-  ( ( ( w  e.  CC  /\  w #  0 )  /\  ( abs `  w )  <  1 )  -> 
( abs `  w
)  <_  1 )
12277, 115, 116, 118, 52, 121eftlub 11833 . . . . . . . . . . . . . . . . . 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 4053 . . . . . . . . . . . . . . . . 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 9042 . . . . . . . . . . . . . . . . . . 19  |-  3  =  ( 2  +  1 )
125 fac2 10802 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ! `
 2 )  =  2
126125oveq1i 5928 . . . . . . . . . . . . . . . . . . . 20  |-  ( ( ! `  2 )  x.  2 )  =  ( 2  x.  2 )
127 2t2e4 9136 . . . . . . . . . . . . . . . . . . . 20  |-  ( 2  x.  2 )  =  4
128126, 127eqtr2i 2215 . . . . . . . . . . . . . . . . . . 19  |-  4  =  ( ( ! `
 2 )  x.  2 )
129124, 128oveq12i 5930 . . . . . . . . . . . . . . . . . 18  |-  ( 3  /  4 )  =  ( ( 2  +  1 )  /  (
( ! `  2
)  x.  2 ) )
130129oveq2i 5929 . . . . . . . . . . . . . . . . 17  |-  ( ( ( abs `  w
) ^ 2 )  x.  ( 3  / 
4 ) )  =  ( ( ( abs `  w ) ^ 2 )  x.  ( ( 2  +  1 )  /  ( ( ! `
 2 )  x.  2 ) ) )
131123, 130breqtrrdi 4071 . . . . . . . . . . . . . . . 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 10771 . . . . . . . . . . . . . . . . . 18  |-  ( ( ( w  e.  CC  /\  w #  0 )  /\  ( abs `  w )  <  1 )  -> 
0  <_  ( ( abs `  w ) ^
2 ) )
134 1re 8018 . . . . . . . . . . . . . . . . . . . 20  |-  1  e.  RR
135 3lt4 9154 . . . . . . . . . . . . . . . . . . . . . 22  |-  3  <  4
136 4cn 9060 . . . . . . . . . . . . . . . . . . . . . . 23  |-  4  e.  CC
137136mulid1i 8021 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( 4  x.  1 )  =  4
138135, 137breqtrri 4056 . . . . . . . . . . . . . . . . . . . . 21  |-  3  <  ( 4  x.  1 )
139 4re 9059 . . . . . . . . . . . . . . . . . . . . . . 23  |-  4  e.  RR
140 4pos 9079 . . . . . . . . . . . . . . . . . . . . . . 23  |-  0  <  4
141139, 140pm3.2i 272 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( 4  e.  RR  /\  0  <  4 )
142 ltdivmul 8895 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( 3  e.  RR  /\  1  e.  RR  /\  (
4  e.  RR  /\  0  <  4 ) )  ->  ( ( 3  /  4 )  <  1  <->  3  <  (
4  x.  1 ) ) )
14360, 134, 141, 142mp3an 1348 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( 3  /  4 )  <  1  <->  3  <  ( 4  x.  1 ) )
144138, 143mpbir 146 . . . . . . . . . . . . . . . . . . . 20  |-  ( 3  /  4 )  <  1
14563, 134, 144ltleii 8122 . . . . . . . . . . . . . . . . . . 19  |-  ( 3  /  4 )  <_ 
1
146145a1i 9 . . . . . . . . . . . . . . . . . 18  |-  ( ( ( w  e.  CC  /\  w #  0 )  /\  ( abs `  w )  <  1 )  -> 
( 3  /  4
)  <_  1 )
147132, 119, 59, 133, 146lemul2ad 8959 . . . . . . . . . . . . . . . . 17  |-  ( ( ( w  e.  CC  /\  w #  0 )  /\  ( abs `  w )  <  1 )  -> 
( ( ( abs `  w ) ^ 2 )  x.  ( 3  /  4 ) )  <_  ( ( ( abs `  w ) ^ 2 )  x.  1 ) )
14848recnd 8048 . . . . . . . . . . . . . . . . . . 19  |-  ( ( ( w  e.  CC  /\  w #  0 )  /\  ( abs `  w )  <  1 )  -> 
( abs `  w
)  e.  CC )
149148sqcld 10742 . . . . . . . . . . . . . . . . . 18  |-  ( ( ( w  e.  CC  /\  w #  0 )  /\  ( abs `  w )  <  1 )  -> 
( ( abs `  w
) ^ 2 )  e.  CC )
150149mulridd 8036 . . . . . . . . . . . . . . . . 17  |-  ( ( ( w  e.  CC  /\  w #  0 )  /\  ( abs `  w )  <  1 )  -> 
( ( ( abs `  w ) ^ 2 )  x.  1 )  =  ( ( abs `  w ) ^ 2 ) )
151147, 150breqtrd 4055 . . . . . . . . . . . . . . . 16  |-  ( ( ( w  e.  CC  /\  w #  0 )  /\  ( abs `  w )  <  1 )  -> 
( ( ( abs `  w ) ^ 2 )  x.  ( 3  /  4 ) )  <_  ( ( abs `  w ) ^ 2 ) )
15258, 65, 59, 131, 151letrd 8143 . . . . . . . . . . . . . . 15  |-  ( ( ( w  e.  CC  /\  w #  0 )  /\  ( abs `  w )  <  1 )  -> 
( ( abs `  w
)  x.  ( abs `  ( ( ( ( exp `  w )  -  1 )  /  w )  -  1 ) ) )  <_ 
( ( abs `  w
) ^ 2 ) )
153148sqvald 10741 . . . . . . . . . . . . . . 15  |-  ( ( ( w  e.  CC  /\  w #  0 )  /\  ( abs `  w )  <  1 )  -> 
( ( abs `  w
) ^ 2 )  =  ( ( abs `  w )  x.  ( abs `  w ) ) )
154152, 153breqtrd 4055 . . . . . . . . . . . . . 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 11243 . . . . . . . . . . . . . . . . . 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 9759 . . . . . . . . . . . . . . 15  |-  ( ( ( w  e.  CC  /\  w #  0 )  /\  ( abs `  w )  <  1 )  -> 
( abs `  w
)  e.  RR+ )
15957, 48, 158lemul2d 9807 . . . . . . . . . . . . . 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 529 . . . . . . . . . . . 12  |-  ( ( ( x  e.  RR+  /\  ( w  e.  CC  /\  w #  0 ) )  /\  ( ( abs `  w )  <  x  /\  ( abs `  w
)  <  1 ) )  ->  ( abs `  w )  <  x
)
16342, 44, 46, 161, 162lelttrd 8144 . . . . . . . . . . 11  |-  ( ( ( x  e.  RR+  /\  ( w  e.  CC  /\  w #  0 ) )  /\  ( ( abs `  w )  <  x  /\  ( abs `  w
)  <  1 ) )  ->  ( abs `  ( ( ( ( exp `  w )  -  1 )  /  w )  -  1 ) )  <  x
)
16439, 163eqbrtrd 4051 . . . . . . . . . 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 2567 . . . . 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 4088 . . . . 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 2547 . . 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 2913 . . . . . . . . . 10  |-  ( z  e.  { u  e.  CC  |  u #  0 }  ->  z  e.  CC )
174 efcl 11807 . . . . . . . . . 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 8035 . . . . . . . . 9  |-  ( z  e.  { u  e.  CC  |  u #  0 }  ->  1  e.  CC )
177175, 176subcld 8330 . . . . . . . 8  |-  ( z  e.  { u  e.  CC  |  u #  0 }  ->  ( ( exp `  z )  - 
1 )  e.  CC )
178 breq1 4032 . . . . . . . . . 10  |-  ( u  =  z  ->  (
u #  0  <->  z #  0
) )
179178elrab 2916 . . . . . . . . 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 8809 . . . . . . 7  |-  ( z  e.  { u  e.  CC  |  u #  0 }  ->  ( (
( exp `  z
)  -  1 )  /  z )  e.  CC )
18225, 181fmpti 5710 . . . . . 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 8666 . . . . . 6  |-  { u  e.  CC  |  u #  0 }  C_  CC
185184a1i 9 . . . . 5  |-  ( T. 
->  { u  e.  CC  |  u #  0 }  C_  CC )
186 0cnd 8012 . . . . 5  |-  ( T. 
->  0  e.  CC )
187183, 185, 186ellimc3ap 14815 . . . 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 1373 . . 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 944 . 2  |-  1  e.  ( ( z  e. 
{ u  e.  CC  |  u #  0 }  |->  ( ( ( exp `  z )  -  1 )  /  z ) ) lim CC  0 )
1902cntoptopon 14700 . . . . 5  |-  ( MetOpen `  ( abs  o.  -  )
)  e.  (TopOn `  CC )
191190toponrestid 14189 . . . 4  |-  ( MetOpen `  ( abs  o.  -  )
)  =  ( (
MetOpen `  ( abs  o.  -  ) )t  CC )
192173subid1d 8319 . . . . . . 7  |-  ( z  e.  { u  e.  CC  |  u #  0 }  ->  ( z  -  0 )  =  z )
193192oveq2d 5934 . . . . . 6  |-  ( z  e.  { u  e.  CC  |  u #  0 }  ->  ( (
( exp `  z
)  -  ( exp `  0 ) )  /  ( z  - 
0 ) )  =  ( ( ( exp `  z )  -  ( exp `  0 ) )  /  z ) )
194 ef0 11815 . . . . . . . 8  |-  ( exp `  0 )  =  1
195194oveq2i 5929 . . . . . . 7  |-  ( ( exp `  z )  -  ( exp `  0
) )  =  ( ( exp `  z
)  -  1 )
196195oveq1i 5928 . . . . . 6  |-  ( ( ( exp `  z
)  -  ( exp `  0 ) )  /  z )  =  ( ( ( exp `  z )  -  1 )  /  z )
197193, 196eqtr2di 2243 . . . . 5  |-  ( z  e.  { u  e.  CC  |  u #  0 }  ->  ( (
( exp `  z
)  -  1 )  /  z )  =  ( ( ( exp `  z )  -  ( exp `  0 ) )  /  ( z  - 
0 ) ) )
198197mpteq2ia 4115 . . . 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 3200 . . . 4  |-  ( T. 
->  CC  C_  CC )
200 eff 11806 . . . . 5  |-  exp : CC
--> CC
201200a1i 9 . . . 4  |-  ( T. 
->  exp : CC --> CC )
202191, 2, 198, 199, 201, 199eldvap 14836 . . 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 1373 . 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 944 1  |-  0
( CC  _D  exp ) 1
Colors of variables: wff set class
Syntax hints:    -> wi 4    /\ wa 104    <-> wb 105    = wceq 1364   T. wtru 1365    e. wcel 2164   A.wral 2472   E.wrex 2473   {crab 2476    C_ wss 3153   {cpr 3619   class class class wbr 4029    |-> cmpt 4090    o. ccom 4663   -->wf 5250   ` cfv 5254  (class class class)co 5918  infcinf 7042   CCcc 7870   RRcr 7871   0cc0 7872   1c1 7873    + caddc 7875    x. cmul 7877    < clt 8054    <_ cle 8055    - cmin 8190   # cap 8600    / cdiv 8691   NNcn 8982   2c2 9033   3c3 9034   4c4 9035   NN0cn0 9240   ZZ>=cuz 9592   RR+crp 9719   ^cexp 10609   !cfa 10796   abscabs 11141   sum_csu 11496   expce 11785   MetOpencmopn 14037   Topctop 14165   intcnt 14261   lim CC climc 14808    _D cdv 14809
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 615  ax-in2 616  ax-io 710  ax-5 1458  ax-7 1459  ax-gen 1460  ax-ie1 1504  ax-ie2 1505  ax-8 1515  ax-10 1516  ax-11 1517  ax-i12 1518  ax-bndl 1520  ax-4 1521  ax-17 1537  ax-i9 1541  ax-ial 1545  ax-i5r 1546  ax-13 2166  ax-14 2167  ax-ext 2175  ax-coll 4144  ax-sep 4147  ax-nul 4155  ax-pow 4203  ax-pr 4238  ax-un 4464  ax-setind 4569  ax-iinf 4620  ax-cnex 7963  ax-resscn 7964  ax-1cn 7965  ax-1re 7966  ax-icn 7967  ax-addcl 7968  ax-addrcl 7969  ax-mulcl 7970  ax-mulrcl 7971  ax-addcom 7972  ax-mulcom 7973  ax-addass 7974  ax-mulass 7975  ax-distr 7976  ax-i2m1 7977  ax-0lt1 7978  ax-1rid 7979  ax-0id 7980  ax-rnegex 7981  ax-precex 7982  ax-cnre 7983  ax-pre-ltirr 7984  ax-pre-ltwlin 7985  ax-pre-lttrn 7986  ax-pre-apti 7987  ax-pre-ltadd 7988  ax-pre-mulgt0 7989  ax-pre-mulext 7990  ax-arch 7991  ax-caucvg 7992
This theorem depends on definitions:  df-bi 117  df-stab 832  df-dc 836  df-3or 981  df-3an 982  df-tru 1367  df-fal 1370  df-nf 1472  df-sb 1774  df-eu 2045  df-mo 2046  df-clab 2180  df-cleq 2186  df-clel 2189  df-nfc 2325  df-ne 2365  df-nel 2460  df-ral 2477  df-rex 2478  df-reu 2479  df-rmo 2480  df-rab 2481  df-v 2762  df-sbc 2986  df-csb 3081  df-dif 3155  df-un 3157  df-in 3159  df-ss 3166  df-nul 3447  df-if 3558  df-pw 3603  df-sn 3624  df-pr 3625  df-op 3627  df-uni 3836  df-int 3871  df-iun 3914  df-br 4030  df-opab 4091  df-mpt 4092  df-tr 4128  df-id 4324  df-po 4327  df-iso 4328  df-iord 4397  df-on 4399  df-ilim 4400  df-suc 4402  df-iom 4623  df-xp 4665  df-rel 4666  df-cnv 4667  df-co 4668  df-dm 4669  df-rn 4670  df-res 4671  df-ima 4672  df-iota 5215  df-fun 5256  df-fn 5257  df-f 5258  df-f1 5259  df-fo 5260  df-f1o 5261  df-fv 5262  df-isom 5263  df-riota 5873  df-ov 5921  df-oprab 5922  df-mpo 5923  df-1st 6193  df-2nd 6194  df-recs 6358  df-irdg 6423  df-frec 6444  df-1o 6469  df-oadd 6473  df-er 6587  df-map 6704  df-pm 6705  df-en 6795  df-dom 6796  df-fin 6797  df-sup 7043  df-inf 7044  df-pnf 8056  df-mnf 8057  df-xr 8058  df-ltxr 8059  df-le 8060  df-sub 8192  df-neg 8193  df-reap 8594  df-ap 8601  df-div 8692  df-inn 8983  df-2 9041  df-3 9042  df-4 9043  df-n0 9241  df-z 9318  df-uz 9593  df-q 9685  df-rp 9720  df-xneg 9838  df-xadd 9839  df-ico 9960  df-fz 10075  df-fzo 10209  df-seqfrec 10519  df-exp 10610  df-fac 10797  df-ihash 10847  df-shft 10959  df-cj 10986  df-re 10987  df-im 10988  df-rsqrt 11142  df-abs 11143  df-clim 11422  df-sumdc 11497  df-ef 11791  df-rest 12852  df-topgen 12871  df-psmet 14039  df-xmet 14040  df-met 14041  df-bl 14042  df-mopn 14043  df-top 14166  df-topon 14179  df-bases 14211  df-ntr 14264  df-limced 14810  df-dvap 14811
This theorem is referenced by:  dvef  14873
  Copyright terms: Public domain W3C validator