MPE Home Metamath Proof Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >  asinsin Unicode version

Theorem asinsin 20600
Description: The arcsine function composed with  sin is equal to the identity. This plus sinasin 20597 allow us to view  sin and arcsin as inverse operations to each other. For ease of use, we have not defined precisely the correct domain of correctness of this identity; in addition to the main region described here it is also true for some points on the branch cuts, namely when  A  =  ( pi 
/  2 )  -  _i y for non-negative real  y and also symmetrically at  A  =  _i y  -  ( pi  / 
2 ). In particular, when restricted to reals this identity extends to the closed interval  [ -u (
pi  /  2 ) ,  ( pi  / 
2 ) ], not just the open interval (see reasinsin 20604). (Contributed by Mario Carneiro, 2-Apr-2015.)
Assertion
Ref Expression
asinsin  |-  ( ( A  e.  CC  /\  ( Re `  A )  e.  ( -u (
pi  /  2 ) (,) ( pi  / 
2 ) ) )  ->  (arcsin `  ( sin `  A ) )  =  A )

Proof of Theorem asinsin
StepHypRef Expression
1 sincl 12655 . . . 4  |-  ( A  e.  CC  ->  ( sin `  A )  e.  CC )
21adantr 452 . . 3  |-  ( ( A  e.  CC  /\  ( Re `  A )  e.  ( -u (
pi  /  2 ) (,) ( pi  / 
2 ) ) )  ->  ( sin `  A
)  e.  CC )
3 asinval 20590 . . 3  |-  ( ( sin `  A )  e.  CC  ->  (arcsin `  ( sin `  A
) )  =  (
-u _i  x.  ( log `  ( ( _i  x.  ( sin `  A
) )  +  ( sqr `  ( 1  -  ( ( sin `  A ) ^ 2 ) ) ) ) ) ) )
42, 3syl 16 . 2  |-  ( ( A  e.  CC  /\  ( Re `  A )  e.  ( -u (
pi  /  2 ) (,) ( pi  / 
2 ) ) )  ->  (arcsin `  ( sin `  A ) )  =  ( -u _i  x.  ( log `  ( ( _i  x.  ( sin `  A ) )  +  ( sqr `  (
1  -  ( ( sin `  A ) ^ 2 ) ) ) ) ) ) )
5 ax-icn 8983 . . . . . . . 8  |-  _i  e.  CC
6 mulcl 9008 . . . . . . . 8  |-  ( ( _i  e.  CC  /\  ( sin `  A )  e.  CC )  -> 
( _i  x.  ( sin `  A ) )  e.  CC )
75, 2, 6sylancr 645 . . . . . . 7  |-  ( ( A  e.  CC  /\  ( Re `  A )  e.  ( -u (
pi  /  2 ) (,) ( pi  / 
2 ) ) )  ->  ( _i  x.  ( sin `  A ) )  e.  CC )
8 simpl 444 . . . . . . . . 9  |-  ( ( A  e.  CC  /\  ( Re `  A )  e.  ( -u (
pi  /  2 ) (,) ( pi  / 
2 ) ) )  ->  A  e.  CC )
9 mulcl 9008 . . . . . . . . 9  |-  ( ( _i  e.  CC  /\  A  e.  CC )  ->  ( _i  x.  A
)  e.  CC )
105, 8, 9sylancr 645 . . . . . . . 8  |-  ( ( A  e.  CC  /\  ( Re `  A )  e.  ( -u (
pi  /  2 ) (,) ( pi  / 
2 ) ) )  ->  ( _i  x.  A )  e.  CC )
11 efcl 12613 . . . . . . . 8  |-  ( ( _i  x.  A )  e.  CC  ->  ( exp `  ( _i  x.  A ) )  e.  CC )
1210, 11syl 16 . . . . . . 7  |-  ( ( A  e.  CC  /\  ( Re `  A )  e.  ( -u (
pi  /  2 ) (,) ( pi  / 
2 ) ) )  ->  ( exp `  (
_i  x.  A )
)  e.  CC )
137, 12pncan3d 9347 . . . . . 6  |-  ( ( A  e.  CC  /\  ( Re `  A )  e.  ( -u (
pi  /  2 ) (,) ( pi  / 
2 ) ) )  ->  ( ( _i  x.  ( sin `  A
) )  +  ( ( exp `  (
_i  x.  A )
)  -  ( _i  x.  ( sin `  A
) ) ) )  =  ( exp `  (
_i  x.  A )
) )
1412, 7subcld 9344 . . . . . . . 8  |-  ( ( A  e.  CC  /\  ( Re `  A )  e.  ( -u (
pi  /  2 ) (,) ( pi  / 
2 ) ) )  ->  ( ( exp `  ( _i  x.  A
) )  -  (
_i  x.  ( sin `  A ) ) )  e.  CC )
15 ax-1cn 8982 . . . . . . . . 9  |-  1  e.  CC
162sqcld 11449 . . . . . . . . 9  |-  ( ( A  e.  CC  /\  ( Re `  A )  e.  ( -u (
pi  /  2 ) (,) ( pi  / 
2 ) ) )  ->  ( ( sin `  A ) ^ 2 )  e.  CC )
17 subcl 9238 . . . . . . . . 9  |-  ( ( 1  e.  CC  /\  ( ( sin `  A
) ^ 2 )  e.  CC )  -> 
( 1  -  (
( sin `  A
) ^ 2 ) )  e.  CC )
1815, 16, 17sylancr 645 . . . . . . . 8  |-  ( ( A  e.  CC  /\  ( Re `  A )  e.  ( -u (
pi  /  2 ) (,) ( pi  / 
2 ) ) )  ->  ( 1  -  ( ( sin `  A
) ^ 2 ) )  e.  CC )
19 binom2sub 11426 . . . . . . . . . 10  |-  ( ( ( exp `  (
_i  x.  A )
)  e.  CC  /\  ( _i  x.  ( sin `  A ) )  e.  CC )  -> 
( ( ( exp `  ( _i  x.  A
) )  -  (
_i  x.  ( sin `  A ) ) ) ^ 2 )  =  ( ( ( ( exp `  ( _i  x.  A ) ) ^ 2 )  -  ( 2  x.  (
( exp `  (
_i  x.  A )
)  x.  ( _i  x.  ( sin `  A
) ) ) ) )  +  ( ( _i  x.  ( sin `  A ) ) ^
2 ) ) )
2012, 7, 19syl2anc 643 . . . . . . . . 9  |-  ( ( A  e.  CC  /\  ( Re `  A )  e.  ( -u (
pi  /  2 ) (,) ( pi  / 
2 ) ) )  ->  ( ( ( exp `  ( _i  x.  A ) )  -  ( _i  x.  ( sin `  A ) ) ) ^ 2 )  =  ( ( ( ( exp `  (
_i  x.  A )
) ^ 2 )  -  ( 2  x.  ( ( exp `  (
_i  x.  A )
)  x.  ( _i  x.  ( sin `  A
) ) ) ) )  +  ( ( _i  x.  ( sin `  A ) ) ^
2 ) ) )
2112sqvald 11448 . . . . . . . . . . . 12  |-  ( ( A  e.  CC  /\  ( Re `  A )  e.  ( -u (
pi  /  2 ) (,) ( pi  / 
2 ) ) )  ->  ( ( exp `  ( _i  x.  A
) ) ^ 2 )  =  ( ( exp `  ( _i  x.  A ) )  x.  ( exp `  (
_i  x.  A )
) ) )
22 2cn 10003 . . . . . . . . . . . . . 14  |-  2  e.  CC
2322a1i 11 . . . . . . . . . . . . 13  |-  ( ( A  e.  CC  /\  ( Re `  A )  e.  ( -u (
pi  /  2 ) (,) ( pi  / 
2 ) ) )  ->  2  e.  CC )
2423, 12, 7mul12d 9208 . . . . . . . . . . . 12  |-  ( ( A  e.  CC  /\  ( Re `  A )  e.  ( -u (
pi  /  2 ) (,) ( pi  / 
2 ) ) )  ->  ( 2  x.  ( ( exp `  (
_i  x.  A )
)  x.  ( _i  x.  ( sin `  A
) ) ) )  =  ( ( exp `  ( _i  x.  A
) )  x.  (
2  x.  ( _i  x.  ( sin `  A
) ) ) ) )
2521, 24oveq12d 6039 . . . . . . . . . . 11  |-  ( ( A  e.  CC  /\  ( Re `  A )  e.  ( -u (
pi  /  2 ) (,) ( pi  / 
2 ) ) )  ->  ( ( ( exp `  ( _i  x.  A ) ) ^ 2 )  -  ( 2  x.  (
( exp `  (
_i  x.  A )
)  x.  ( _i  x.  ( sin `  A
) ) ) ) )  =  ( ( ( exp `  (
_i  x.  A )
)  x.  ( exp `  ( _i  x.  A
) ) )  -  ( ( exp `  (
_i  x.  A )
)  x.  ( 2  x.  ( _i  x.  ( sin `  A ) ) ) ) ) )
26 coscl 12656 . . . . . . . . . . . . . 14  |-  ( A  e.  CC  ->  ( cos `  A )  e.  CC )
2726adantr 452 . . . . . . . . . . . . 13  |-  ( ( A  e.  CC  /\  ( Re `  A )  e.  ( -u (
pi  /  2 ) (,) ( pi  / 
2 ) ) )  ->  ( cos `  A
)  e.  CC )
28 subsq 11416 . . . . . . . . . . . . 13  |-  ( ( ( cos `  A
)  e.  CC  /\  ( _i  x.  ( sin `  A ) )  e.  CC )  -> 
( ( ( cos `  A ) ^ 2 )  -  ( ( _i  x.  ( sin `  A ) ) ^
2 ) )  =  ( ( ( cos `  A )  +  ( _i  x.  ( sin `  A ) ) )  x.  ( ( cos `  A )  -  (
_i  x.  ( sin `  A ) ) ) ) )
2927, 7, 28syl2anc 643 . . . . . . . . . . . 12  |-  ( ( A  e.  CC  /\  ( Re `  A )  e.  ( -u (
pi  /  2 ) (,) ( pi  / 
2 ) ) )  ->  ( ( ( cos `  A ) ^ 2 )  -  ( ( _i  x.  ( sin `  A ) ) ^ 2 ) )  =  ( ( ( cos `  A
)  +  ( _i  x.  ( sin `  A
) ) )  x.  ( ( cos `  A
)  -  ( _i  x.  ( sin `  A
) ) ) ) )
30 sqmul 11373 . . . . . . . . . . . . . . . 16  |-  ( ( _i  e.  CC  /\  ( sin `  A )  e.  CC )  -> 
( ( _i  x.  ( sin `  A ) ) ^ 2 )  =  ( ( _i
^ 2 )  x.  ( ( sin `  A
) ^ 2 ) ) )
315, 2, 30sylancr 645 . . . . . . . . . . . . . . 15  |-  ( ( A  e.  CC  /\  ( Re `  A )  e.  ( -u (
pi  /  2 ) (,) ( pi  / 
2 ) ) )  ->  ( ( _i  x.  ( sin `  A
) ) ^ 2 )  =  ( ( _i ^ 2 )  x.  ( ( sin `  A ) ^ 2 ) ) )
32 i2 11409 . . . . . . . . . . . . . . . . 17  |-  ( _i
^ 2 )  = 
-u 1
3332oveq1i 6031 . . . . . . . . . . . . . . . 16  |-  ( ( _i ^ 2 )  x.  ( ( sin `  A ) ^ 2 ) )  =  (
-u 1  x.  (
( sin `  A
) ^ 2 ) )
3416mulm1d 9418 . . . . . . . . . . . . . . . 16  |-  ( ( A  e.  CC  /\  ( Re `  A )  e.  ( -u (
pi  /  2 ) (,) ( pi  / 
2 ) ) )  ->  ( -u 1  x.  ( ( sin `  A
) ^ 2 ) )  =  -u (
( sin `  A
) ^ 2 ) )
3533, 34syl5eq 2432 . . . . . . . . . . . . . . 15  |-  ( ( A  e.  CC  /\  ( Re `  A )  e.  ( -u (
pi  /  2 ) (,) ( pi  / 
2 ) ) )  ->  ( ( _i
^ 2 )  x.  ( ( sin `  A
) ^ 2 ) )  =  -u (
( sin `  A
) ^ 2 ) )
3631, 35eqtrd 2420 . . . . . . . . . . . . . 14  |-  ( ( A  e.  CC  /\  ( Re `  A )  e.  ( -u (
pi  /  2 ) (,) ( pi  / 
2 ) ) )  ->  ( ( _i  x.  ( sin `  A
) ) ^ 2 )  =  -u (
( sin `  A
) ^ 2 ) )
3736oveq2d 6037 . . . . . . . . . . . . 13  |-  ( ( A  e.  CC  /\  ( Re `  A )  e.  ( -u (
pi  /  2 ) (,) ( pi  / 
2 ) ) )  ->  ( ( ( cos `  A ) ^ 2 )  -  ( ( _i  x.  ( sin `  A ) ) ^ 2 ) )  =  ( ( ( cos `  A
) ^ 2 )  -  -u ( ( sin `  A ) ^ 2 ) ) )
3827sqcld 11449 . . . . . . . . . . . . . 14  |-  ( ( A  e.  CC  /\  ( Re `  A )  e.  ( -u (
pi  /  2 ) (,) ( pi  / 
2 ) ) )  ->  ( ( cos `  A ) ^ 2 )  e.  CC )
3938, 16subnegd 9351 . . . . . . . . . . . . 13  |-  ( ( A  e.  CC  /\  ( Re `  A )  e.  ( -u (
pi  /  2 ) (,) ( pi  / 
2 ) ) )  ->  ( ( ( cos `  A ) ^ 2 )  -  -u ( ( sin `  A
) ^ 2 ) )  =  ( ( ( cos `  A
) ^ 2 )  +  ( ( sin `  A ) ^ 2 ) ) )
4038, 16addcomd 9201 . . . . . . . . . . . . 13  |-  ( ( A  e.  CC  /\  ( Re `  A )  e.  ( -u (
pi  /  2 ) (,) ( pi  / 
2 ) ) )  ->  ( ( ( cos `  A ) ^ 2 )  +  ( ( sin `  A
) ^ 2 ) )  =  ( ( ( sin `  A
) ^ 2 )  +  ( ( cos `  A ) ^ 2 ) ) )
4137, 39, 403eqtrd 2424 . . . . . . . . . . . 12  |-  ( ( A  e.  CC  /\  ( Re `  A )  e.  ( -u (
pi  /  2 ) (,) ( pi  / 
2 ) ) )  ->  ( ( ( cos `  A ) ^ 2 )  -  ( ( _i  x.  ( sin `  A ) ) ^ 2 ) )  =  ( ( ( sin `  A
) ^ 2 )  +  ( ( cos `  A ) ^ 2 ) ) )
42 efival 12681 . . . . . . . . . . . . . . 15  |-  ( A  e.  CC  ->  ( exp `  ( _i  x.  A ) )  =  ( ( cos `  A
)  +  ( _i  x.  ( sin `  A
) ) ) )
4342adantr 452 . . . . . . . . . . . . . 14  |-  ( ( A  e.  CC  /\  ( Re `  A )  e.  ( -u (
pi  /  2 ) (,) ( pi  / 
2 ) ) )  ->  ( exp `  (
_i  x.  A )
)  =  ( ( cos `  A )  +  ( _i  x.  ( sin `  A ) ) ) )
4472timesd 10143 . . . . . . . . . . . . . . . 16  |-  ( ( A  e.  CC  /\  ( Re `  A )  e.  ( -u (
pi  /  2 ) (,) ( pi  / 
2 ) ) )  ->  ( 2  x.  ( _i  x.  ( sin `  A ) ) )  =  ( ( _i  x.  ( sin `  A ) )  +  ( _i  x.  ( sin `  A ) ) ) )
4543, 44oveq12d 6039 . . . . . . . . . . . . . . 15  |-  ( ( A  e.  CC  /\  ( Re `  A )  e.  ( -u (
pi  /  2 ) (,) ( pi  / 
2 ) ) )  ->  ( ( exp `  ( _i  x.  A
) )  -  (
2  x.  ( _i  x.  ( sin `  A
) ) ) )  =  ( ( ( cos `  A )  +  ( _i  x.  ( sin `  A ) ) )  -  (
( _i  x.  ( sin `  A ) )  +  ( _i  x.  ( sin `  A ) ) ) ) )
4627, 7, 7pnpcan2d 9382 . . . . . . . . . . . . . . 15  |-  ( ( A  e.  CC  /\  ( Re `  A )  e.  ( -u (
pi  /  2 ) (,) ( pi  / 
2 ) ) )  ->  ( ( ( cos `  A )  +  ( _i  x.  ( sin `  A ) ) )  -  (
( _i  x.  ( sin `  A ) )  +  ( _i  x.  ( sin `  A ) ) ) )  =  ( ( cos `  A
)  -  ( _i  x.  ( sin `  A
) ) ) )
4745, 46eqtrd 2420 . . . . . . . . . . . . . 14  |-  ( ( A  e.  CC  /\  ( Re `  A )  e.  ( -u (
pi  /  2 ) (,) ( pi  / 
2 ) ) )  ->  ( ( exp `  ( _i  x.  A
) )  -  (
2  x.  ( _i  x.  ( sin `  A
) ) ) )  =  ( ( cos `  A )  -  (
_i  x.  ( sin `  A ) ) ) )
4843, 47oveq12d 6039 . . . . . . . . . . . . 13  |-  ( ( A  e.  CC  /\  ( Re `  A )  e.  ( -u (
pi  /  2 ) (,) ( pi  / 
2 ) ) )  ->  ( ( exp `  ( _i  x.  A
) )  x.  (
( exp `  (
_i  x.  A )
)  -  ( 2  x.  ( _i  x.  ( sin `  A ) ) ) ) )  =  ( ( ( cos `  A )  +  ( _i  x.  ( sin `  A ) ) )  x.  (
( cos `  A
)  -  ( _i  x.  ( sin `  A
) ) ) ) )
49 mulcl 9008 . . . . . . . . . . . . . . 15  |-  ( ( 2  e.  CC  /\  ( _i  x.  ( sin `  A ) )  e.  CC )  -> 
( 2  x.  (
_i  x.  ( sin `  A ) ) )  e.  CC )
5022, 7, 49sylancr 645 . . . . . . . . . . . . . 14  |-  ( ( A  e.  CC  /\  ( Re `  A )  e.  ( -u (
pi  /  2 ) (,) ( pi  / 
2 ) ) )  ->  ( 2  x.  ( _i  x.  ( sin `  A ) ) )  e.  CC )
5112, 12, 50subdid 9422 . . . . . . . . . . . . 13  |-  ( ( A  e.  CC  /\  ( Re `  A )  e.  ( -u (
pi  /  2 ) (,) ( pi  / 
2 ) ) )  ->  ( ( exp `  ( _i  x.  A
) )  x.  (
( exp `  (
_i  x.  A )
)  -  ( 2  x.  ( _i  x.  ( sin `  A ) ) ) ) )  =  ( ( ( exp `  ( _i  x.  A ) )  x.  ( exp `  (
_i  x.  A )
) )  -  (
( exp `  (
_i  x.  A )
)  x.  ( 2  x.  ( _i  x.  ( sin `  A ) ) ) ) ) )
5248, 51eqtr3d 2422 . . . . . . . . . . . 12  |-  ( ( A  e.  CC  /\  ( Re `  A )  e.  ( -u (
pi  /  2 ) (,) ( pi  / 
2 ) ) )  ->  ( ( ( cos `  A )  +  ( _i  x.  ( sin `  A ) ) )  x.  (
( cos `  A
)  -  ( _i  x.  ( sin `  A
) ) ) )  =  ( ( ( exp `  ( _i  x.  A ) )  x.  ( exp `  (
_i  x.  A )
) )  -  (
( exp `  (
_i  x.  A )
)  x.  ( 2  x.  ( _i  x.  ( sin `  A ) ) ) ) ) )
5329, 41, 523eqtr3d 2428 . . . . . . . . . . 11  |-  ( ( A  e.  CC  /\  ( Re `  A )  e.  ( -u (
pi  /  2 ) (,) ( pi  / 
2 ) ) )  ->  ( ( ( sin `  A ) ^ 2 )  +  ( ( cos `  A
) ^ 2 ) )  =  ( ( ( exp `  (
_i  x.  A )
)  x.  ( exp `  ( _i  x.  A
) ) )  -  ( ( exp `  (
_i  x.  A )
)  x.  ( 2  x.  ( _i  x.  ( sin `  A ) ) ) ) ) )
54 sincossq 12705 . . . . . . . . . . . 12  |-  ( A  e.  CC  ->  (
( ( sin `  A
) ^ 2 )  +  ( ( cos `  A ) ^ 2 ) )  =  1 )
5554adantr 452 . . . . . . . . . . 11  |-  ( ( A  e.  CC  /\  ( Re `  A )  e.  ( -u (
pi  /  2 ) (,) ( pi  / 
2 ) ) )  ->  ( ( ( sin `  A ) ^ 2 )  +  ( ( cos `  A
) ^ 2 ) )  =  1 )
5625, 53, 553eqtr2d 2426 . . . . . . . . . 10  |-  ( ( A  e.  CC  /\  ( Re `  A )  e.  ( -u (
pi  /  2 ) (,) ( pi  / 
2 ) ) )  ->  ( ( ( exp `  ( _i  x.  A ) ) ^ 2 )  -  ( 2  x.  (
( exp `  (
_i  x.  A )
)  x.  ( _i  x.  ( sin `  A
) ) ) ) )  =  1 )
5756, 36oveq12d 6039 . . . . . . . . 9  |-  ( ( A  e.  CC  /\  ( Re `  A )  e.  ( -u (
pi  /  2 ) (,) ( pi  / 
2 ) ) )  ->  ( ( ( ( exp `  (
_i  x.  A )
) ^ 2 )  -  ( 2  x.  ( ( exp `  (
_i  x.  A )
)  x.  ( _i  x.  ( sin `  A
) ) ) ) )  +  ( ( _i  x.  ( sin `  A ) ) ^
2 ) )  =  ( 1  +  -u ( ( sin `  A
) ^ 2 ) ) )
58 negsub 9282 . . . . . . . . . 10  |-  ( ( 1  e.  CC  /\  ( ( sin `  A
) ^ 2 )  e.  CC )  -> 
( 1  +  -u ( ( sin `  A
) ^ 2 ) )  =  ( 1  -  ( ( sin `  A ) ^ 2 ) ) )
5915, 16, 58sylancr 645 . . . . . . . . 9  |-  ( ( A  e.  CC  /\  ( Re `  A )  e.  ( -u (
pi  /  2 ) (,) ( pi  / 
2 ) ) )  ->  ( 1  + 
-u ( ( sin `  A ) ^ 2 ) )  =  ( 1  -  ( ( sin `  A ) ^ 2 ) ) )
6020, 57, 593eqtrd 2424 . . . . . . . 8  |-  ( ( A  e.  CC  /\  ( Re `  A )  e.  ( -u (
pi  /  2 ) (,) ( pi  / 
2 ) ) )  ->  ( ( ( exp `  ( _i  x.  A ) )  -  ( _i  x.  ( sin `  A ) ) ) ^ 2 )  =  ( 1  -  ( ( sin `  A ) ^ 2 ) ) )
61 1re 9024 . . . . . . . . . . . . 13  |-  1  e.  RR
6261rehalfcli 10149 . . . . . . . . . . . 12  |-  ( 1  /  2 )  e.  RR
6362a1i 11 . . . . . . . . . . 11  |-  ( ( A  e.  CC  /\  ( Re `  A )  e.  ( -u (
pi  /  2 ) (,) ( pi  / 
2 ) ) )  ->  ( 1  / 
2 )  e.  RR )
645negcli 9301 . . . . . . . . . . . . . . 15  |-  -u _i  e.  CC
65 mulcl 9008 . . . . . . . . . . . . . . 15  |-  ( (
-u _i  e.  CC  /\  A  e.  CC )  ->  ( -u _i  x.  A )  e.  CC )
6664, 8, 65sylancr 645 . . . . . . . . . . . . . 14  |-  ( ( A  e.  CC  /\  ( Re `  A )  e.  ( -u (
pi  /  2 ) (,) ( pi  / 
2 ) ) )  ->  ( -u _i  x.  A )  e.  CC )
67 efcl 12613 . . . . . . . . . . . . . 14  |-  ( (
-u _i  x.  A
)  e.  CC  ->  ( exp `  ( -u _i  x.  A ) )  e.  CC )
6866, 67syl 16 . . . . . . . . . . . . 13  |-  ( ( A  e.  CC  /\  ( Re `  A )  e.  ( -u (
pi  /  2 ) (,) ( pi  / 
2 ) ) )  ->  ( exp `  ( -u _i  x.  A ) )  e.  CC )
6912, 68addcld 9041 . . . . . . . . . . . 12  |-  ( ( A  e.  CC  /\  ( Re `  A )  e.  ( -u (
pi  /  2 ) (,) ( pi  / 
2 ) ) )  ->  ( ( exp `  ( _i  x.  A
) )  +  ( exp `  ( -u _i  x.  A ) ) )  e.  CC )
7069recld 11927 . . . . . . . . . . 11  |-  ( ( A  e.  CC  /\  ( Re `  A )  e.  ( -u (
pi  /  2 ) (,) ( pi  / 
2 ) ) )  ->  ( Re `  ( ( exp `  (
_i  x.  A )
)  +  ( exp `  ( -u _i  x.  A ) ) ) )  e.  RR )
71 halfgt0 10121 . . . . . . . . . . . 12  |-  0  <  ( 1  /  2
)
7271a1i 11 . . . . . . . . . . 11  |-  ( ( A  e.  CC  /\  ( Re `  A )  e.  ( -u (
pi  /  2 ) (,) ( pi  / 
2 ) ) )  ->  0  <  (
1  /  2 ) )
7312recld 11927 . . . . . . . . . . . . 13  |-  ( ( A  e.  CC  /\  ( Re `  A )  e.  ( -u (
pi  /  2 ) (,) ( pi  / 
2 ) ) )  ->  ( Re `  ( exp `  ( _i  x.  A ) ) )  e.  RR )
7468recld 11927 . . . . . . . . . . . . 13  |-  ( ( A  e.  CC  /\  ( Re `  A )  e.  ( -u (
pi  /  2 ) (,) ( pi  / 
2 ) ) )  ->  ( Re `  ( exp `  ( -u _i  x.  A ) ) )  e.  RR )
75 asinsinlem 20599 . . . . . . . . . . . . 13  |-  ( ( A  e.  CC  /\  ( Re `  A )  e.  ( -u (
pi  /  2 ) (,) ( pi  / 
2 ) ) )  ->  0  <  (
Re `  ( exp `  ( _i  x.  A
) ) ) )
76 negcl 9239 . . . . . . . . . . . . . . . 16  |-  ( A  e.  CC  ->  -u A  e.  CC )
7776adantr 452 . . . . . . . . . . . . . . 15  |-  ( ( A  e.  CC  /\  ( Re `  A )  e.  ( -u (
pi  /  2 ) (,) ( pi  / 
2 ) ) )  ->  -u A  e.  CC )
78 reneg 11858 . . . . . . . . . . . . . . . . 17  |-  ( A  e.  CC  ->  (
Re `  -u A )  =  -u ( Re `  A ) )
7978adantr 452 . . . . . . . . . . . . . . . 16  |-  ( ( A  e.  CC  /\  ( Re `  A )  e.  ( -u (
pi  /  2 ) (,) ( pi  / 
2 ) ) )  ->  ( Re `  -u A )  =  -u ( Re `  A ) )
80 recl 11843 . . . . . . . . . . . . . . . . . . 19  |-  ( A  e.  CC  ->  (
Re `  A )  e.  RR )
81 pire 20240 . . . . . . . . . . . . . . . . . . . . . 22  |-  pi  e.  RR
8281rehalfcli 10149 . . . . . . . . . . . . . . . . . . . . 21  |-  ( pi 
/  2 )  e.  RR
8382renegcli 9295 . . . . . . . . . . . . . . . . . . . 20  |-  -u (
pi  /  2 )  e.  RR
84 iooneg 10950 . . . . . . . . . . . . . . . . . . . 20  |-  ( (
-u ( pi  / 
2 )  e.  RR  /\  ( pi  /  2
)  e.  RR  /\  ( Re `  A )  e.  RR )  -> 
( ( Re `  A )  e.  (
-u ( pi  / 
2 ) (,) (
pi  /  2 ) )  <->  -u ( Re `  A )  e.  (
-u ( pi  / 
2 ) (,) -u -u (
pi  /  2 ) ) ) )
8583, 82, 84mp3an12 1269 . . . . . . . . . . . . . . . . . . 19  |-  ( ( Re `  A )  e.  RR  ->  (
( Re `  A
)  e.  ( -u ( pi  /  2
) (,) ( pi 
/  2 ) )  <->  -u ( Re `  A
)  e.  ( -u ( pi  /  2
) (,) -u -u (
pi  /  2 ) ) ) )
8680, 85syl 16 . . . . . . . . . . . . . . . . . 18  |-  ( A  e.  CC  ->  (
( Re `  A
)  e.  ( -u ( pi  /  2
) (,) ( pi 
/  2 ) )  <->  -u ( Re `  A
)  e.  ( -u ( pi  /  2
) (,) -u -u (
pi  /  2 ) ) ) )
8786biimpa 471 . . . . . . . . . . . . . . . . 17  |-  ( ( A  e.  CC  /\  ( Re `  A )  e.  ( -u (
pi  /  2 ) (,) ( pi  / 
2 ) ) )  ->  -u ( Re `  A )  e.  (
-u ( pi  / 
2 ) (,) -u -u (
pi  /  2 ) ) )
8882recni 9036 . . . . . . . . . . . . . . . . . . 19  |-  ( pi 
/  2 )  e.  CC
8988negnegi 9303 . . . . . . . . . . . . . . . . . 18  |-  -u -u (
pi  /  2 )  =  ( pi  / 
2 )
9089oveq2i 6032 . . . . . . . . . . . . . . . . 17  |-  ( -u ( pi  /  2
) (,) -u -u (
pi  /  2 ) )  =  ( -u ( pi  /  2
) (,) ( pi 
/  2 ) )
9187, 90syl6eleq 2478 . . . . . . . . . . . . . . . 16  |-  ( ( A  e.  CC  /\  ( Re `  A )  e.  ( -u (
pi  /  2 ) (,) ( pi  / 
2 ) ) )  ->  -u ( Re `  A )  e.  (
-u ( pi  / 
2 ) (,) (
pi  /  2 ) ) )
9279, 91eqeltrd 2462 . . . . . . . . . . . . . . 15  |-  ( ( A  e.  CC  /\  ( Re `  A )  e.  ( -u (
pi  /  2 ) (,) ( pi  / 
2 ) ) )  ->  ( Re `  -u A )  e.  (
-u ( pi  / 
2 ) (,) (
pi  /  2 ) ) )
93 asinsinlem 20599 . . . . . . . . . . . . . . 15  |-  ( (
-u A  e.  CC  /\  ( Re `  -u A
)  e.  ( -u ( pi  /  2
) (,) ( pi 
/  2 ) ) )  ->  0  <  ( Re `  ( exp `  ( _i  x.  -u A
) ) ) )
9477, 92, 93syl2anc 643 . . . . . . . . . . . . . 14  |-  ( ( A  e.  CC  /\  ( Re `  A )  e.  ( -u (
pi  /  2 ) (,) ( pi  / 
2 ) ) )  ->  0  <  (
Re `  ( exp `  ( _i  x.  -u A
) ) ) )
95 mulneg12 9405 . . . . . . . . . . . . . . . . 17  |-  ( ( _i  e.  CC  /\  A  e.  CC )  ->  ( -u _i  x.  A )  =  ( _i  x.  -u A
) )
965, 8, 95sylancr 645 . . . . . . . . . . . . . . . 16  |-  ( ( A  e.  CC  /\  ( Re `  A )  e.  ( -u (
pi  /  2 ) (,) ( pi  / 
2 ) ) )  ->  ( -u _i  x.  A )  =  ( _i  x.  -u A
) )
9796fveq2d 5673 . . . . . . . . . . . . . . 15  |-  ( ( A  e.  CC  /\  ( Re `  A )  e.  ( -u (
pi  /  2 ) (,) ( pi  / 
2 ) ) )  ->  ( exp `  ( -u _i  x.  A ) )  =  ( exp `  ( _i  x.  -u A
) ) )
9897fveq2d 5673 . . . . . . . . . . . . . 14  |-  ( ( A  e.  CC  /\  ( Re `  A )  e.  ( -u (
pi  /  2 ) (,) ( pi  / 
2 ) ) )  ->  ( Re `  ( exp `  ( -u _i  x.  A ) ) )  =  ( Re
`  ( exp `  (
_i  x.  -u A ) ) ) )
9994, 98breqtrrd 4180 . . . . . . . . . . . . 13  |-  ( ( A  e.  CC  /\  ( Re `  A )  e.  ( -u (
pi  /  2 ) (,) ( pi  / 
2 ) ) )  ->  0  <  (
Re `  ( exp `  ( -u _i  x.  A ) ) ) )
10073, 74, 75, 99addgt0d 9534 . . . . . . . . . . . 12  |-  ( ( A  e.  CC  /\  ( Re `  A )  e.  ( -u (
pi  /  2 ) (,) ( pi  / 
2 ) ) )  ->  0  <  (
( Re `  ( exp `  ( _i  x.  A ) ) )  +  ( Re `  ( exp `  ( -u _i  x.  A ) ) ) ) )
10112, 68readdd 11947 . . . . . . . . . . . 12  |-  ( ( A  e.  CC  /\  ( Re `  A )  e.  ( -u (
pi  /  2 ) (,) ( pi  / 
2 ) ) )  ->  ( Re `  ( ( exp `  (
_i  x.  A )
)  +  ( exp `  ( -u _i  x.  A ) ) ) )  =  ( ( Re `  ( exp `  ( _i  x.  A
) ) )  +  ( Re `  ( exp `  ( -u _i  x.  A ) ) ) ) )
102100, 101breqtrrd 4180 . . . . . . . . . . 11  |-  ( ( A  e.  CC  /\  ( Re `  A )  e.  ( -u (
pi  /  2 ) (,) ( pi  / 
2 ) ) )  ->  0  <  (
Re `  ( ( exp `  ( _i  x.  A ) )  +  ( exp `  ( -u _i  x.  A ) ) ) ) )
10363, 70, 72, 102mulgt0d 9158 . . . . . . . . . 10  |-  ( ( A  e.  CC  /\  ( Re `  A )  e.  ( -u (
pi  /  2 ) (,) ( pi  / 
2 ) ) )  ->  0  <  (
( 1  /  2
)  x.  ( Re
`  ( ( exp `  ( _i  x.  A
) )  +  ( exp `  ( -u _i  x.  A ) ) ) ) ) )
104 cosval 12652 . . . . . . . . . . . . . 14  |-  ( A  e.  CC  ->  ( cos `  A )  =  ( ( ( exp `  ( _i  x.  A
) )  +  ( exp `  ( -u _i  x.  A ) ) )  /  2 ) )
105104adantr 452 . . . . . . . . . . . . 13  |-  ( ( A  e.  CC  /\  ( Re `  A )  e.  ( -u (
pi  /  2 ) (,) ( pi  / 
2 ) ) )  ->  ( cos `  A
)  =  ( ( ( exp `  (
_i  x.  A )
)  +  ( exp `  ( -u _i  x.  A ) ) )  /  2 ) )
106 2ne0 10016 . . . . . . . . . . . . . . 15  |-  2  =/=  0
107106a1i 11 . . . . . . . . . . . . . 14  |-  ( ( A  e.  CC  /\  ( Re `  A )  e.  ( -u (
pi  /  2 ) (,) ( pi  / 
2 ) ) )  ->  2  =/=  0
)
10869, 23, 107divrec2d 9727 . . . . . . . . . . . . 13  |-  ( ( A  e.  CC  /\  ( Re `  A )  e.  ( -u (
pi  /  2 ) (,) ( pi  / 
2 ) ) )  ->  ( ( ( exp `  ( _i  x.  A ) )  +  ( exp `  ( -u _i  x.  A ) ) )  /  2
)  =  ( ( 1  /  2 )  x.  ( ( exp `  ( _i  x.  A
) )  +  ( exp `  ( -u _i  x.  A ) ) ) ) )
109105, 108eqtrd 2420 . . . . . . . . . . . 12  |-  ( ( A  e.  CC  /\  ( Re `  A )  e.  ( -u (
pi  /  2 ) (,) ( pi  / 
2 ) ) )  ->  ( cos `  A
)  =  ( ( 1  /  2 )  x.  ( ( exp `  ( _i  x.  A
) )  +  ( exp `  ( -u _i  x.  A ) ) ) ) )
110109fveq2d 5673 . . . . . . . . . . 11  |-  ( ( A  e.  CC  /\  ( Re `  A )  e.  ( -u (
pi  /  2 ) (,) ( pi  / 
2 ) ) )  ->  ( Re `  ( cos `  A ) )  =  ( Re
`  ( ( 1  /  2 )  x.  ( ( exp `  (
_i  x.  A )
)  +  ( exp `  ( -u _i  x.  A ) ) ) ) ) )
111 remul2 11863 . . . . . . . . . . . 12  |-  ( ( ( 1  /  2
)  e.  RR  /\  ( ( exp `  (
_i  x.  A )
)  +  ( exp `  ( -u _i  x.  A ) ) )  e.  CC )  -> 
( Re `  (
( 1  /  2
)  x.  ( ( exp `  ( _i  x.  A ) )  +  ( exp `  ( -u _i  x.  A ) ) ) ) )  =  ( ( 1  /  2 )  x.  ( Re `  (
( exp `  (
_i  x.  A )
)  +  ( exp `  ( -u _i  x.  A ) ) ) ) ) )
11262, 69, 111sylancr 645 . . . . . . . . . . 11  |-  ( ( A  e.  CC  /\  ( Re `  A )  e.  ( -u (
pi  /  2 ) (,) ( pi  / 
2 ) ) )  ->  ( Re `  ( ( 1  / 
2 )  x.  (
( exp `  (
_i  x.  A )
)  +  ( exp `  ( -u _i  x.  A ) ) ) ) )  =  ( ( 1  /  2
)  x.  ( Re
`  ( ( exp `  ( _i  x.  A
) )  +  ( exp `  ( -u _i  x.  A ) ) ) ) ) )
113110, 112eqtrd 2420 . . . . . . . . . 10  |-  ( ( A  e.  CC  /\  ( Re `  A )  e.  ( -u (
pi  /  2 ) (,) ( pi  / 
2 ) ) )  ->  ( Re `  ( cos `  A ) )  =  ( ( 1  /  2 )  x.  ( Re `  ( ( exp `  (
_i  x.  A )
)  +  ( exp `  ( -u _i  x.  A ) ) ) ) ) )
114103, 113breqtrrd 4180 . . . . . . . . 9  |-  ( ( A  e.  CC  /\  ( Re `  A )  e.  ( -u (
pi  /  2 ) (,) ( pi  / 
2 ) ) )  ->  0  <  (
Re `  ( cos `  A ) ) )
11543oveq1d 6036 . . . . . . . . . . 11  |-  ( ( A  e.  CC  /\  ( Re `  A )  e.  ( -u (
pi  /  2 ) (,) ( pi  / 
2 ) ) )  ->  ( ( exp `  ( _i  x.  A
) )  -  (
_i  x.  ( sin `  A ) ) )  =  ( ( ( cos `  A )  +  ( _i  x.  ( sin `  A ) ) )  -  (
_i  x.  ( sin `  A ) ) ) )
11627, 7pncand 9345 . . . . . . . . . . 11  |-  ( ( A  e.  CC  /\  ( Re `  A )  e.  ( -u (
pi  /  2 ) (,) ( pi  / 
2 ) ) )  ->  ( ( ( cos `  A )  +  ( _i  x.  ( sin `  A ) ) )  -  (
_i  x.  ( sin `  A ) ) )  =  ( cos `  A
) )
117115, 116eqtrd 2420 . . . . . . . . . 10  |-  ( ( A  e.  CC  /\  ( Re `  A )  e.  ( -u (
pi  /  2 ) (,) ( pi  / 
2 ) ) )  ->  ( ( exp `  ( _i  x.  A
) )  -  (
_i  x.  ( sin `  A ) ) )  =  ( cos `  A
) )
118117fveq2d 5673 . . . . . . . . 9  |-  ( ( A  e.  CC  /\  ( Re `  A )  e.  ( -u (
pi  /  2 ) (,) ( pi  / 
2 ) ) )  ->  ( Re `  ( ( exp `  (
_i  x.  A )
)  -  ( _i  x.  ( sin `  A
) ) ) )  =  ( Re `  ( cos `  A ) ) )
119114, 118breqtrrd 4180 . . . . . . . 8  |-  ( ( A  e.  CC  /\  ( Re `  A )  e.  ( -u (
pi  /  2 ) (,) ( pi  / 
2 ) ) )  ->  0  <  (
Re `  ( ( exp `  ( _i  x.  A ) )  -  ( _i  x.  ( sin `  A ) ) ) ) )
12014, 18, 60, 119eqsqr2d 12100 . . . . . . 7  |-  ( ( A  e.  CC  /\  ( Re `  A )  e.  ( -u (
pi  /  2 ) (,) ( pi  / 
2 ) ) )  ->  ( ( exp `  ( _i  x.  A
) )  -  (
_i  x.  ( sin `  A ) ) )  =  ( sqr `  (
1  -  ( ( sin `  A ) ^ 2 ) ) ) )
121120oveq2d 6037 . . . . . 6  |-  ( ( A  e.  CC  /\  ( Re `  A )  e.  ( -u (
pi  /  2 ) (,) ( pi  / 
2 ) ) )  ->  ( ( _i  x.  ( sin `  A
) )  +  ( ( exp `  (
_i  x.  A )
)  -  ( _i  x.  ( sin `  A
) ) ) )  =  ( ( _i  x.  ( sin `  A
) )  +  ( sqr `  ( 1  -  ( ( sin `  A ) ^ 2 ) ) ) ) )
12213, 121eqtr3d 2422 . . . . 5  |-  ( ( A  e.  CC  /\  ( Re `  A )  e.  ( -u (
pi  /  2 ) (,) ( pi  / 
2 ) ) )  ->  ( exp `  (
_i  x.  A )
)  =  ( ( _i  x.  ( sin `  A ) )  +  ( sqr `  (
1  -  ( ( sin `  A ) ^ 2 ) ) ) ) )
123122fveq2d 5673 . . . 4  |-  ( ( A  e.  CC  /\  ( Re `  A )  e.  ( -u (
pi  /  2 ) (,) ( pi  / 
2 ) ) )  ->  ( log `  ( exp `  ( _i  x.  A ) ) )  =  ( log `  (
( _i  x.  ( sin `  A ) )  +  ( sqr `  (
1  -  ( ( sin `  A ) ^ 2 ) ) ) ) ) )
12481renegcli 9295 . . . . . . . . 9  |-  -u pi  e.  RR
125124a1i 11 . . . . . . . 8  |-  ( ( A  e.  CC  /\  ( Re `  A )  e.  ( -u (
pi  /  2 ) (,) ( pi  / 
2 ) ) )  ->  -u pi  e.  RR )
12683a1i 11 . . . . . . . 8  |-  ( ( A  e.  CC  /\  ( Re `  A )  e.  ( -u (
pi  /  2 ) (,) ( pi  / 
2 ) ) )  ->  -u ( pi  / 
2 )  e.  RR )
127 elioore 10879 . . . . . . . . 9  |-  ( ( Re `  A )  e.  ( -u (
pi  /  2 ) (,) ( pi  / 
2 ) )  -> 
( Re `  A
)  e.  RR )
128127adantl 453 . . . . . . . 8  |-  ( ( A  e.  CC  /\  ( Re `  A )  e.  ( -u (
pi  /  2 ) (,) ( pi  / 
2 ) ) )  ->  ( Re `  A )  e.  RR )
129 pipos 20241 . . . . . . . . . . . 12  |-  0  <  pi
13081, 129elrpii 10548 . . . . . . . . . . 11  |-  pi  e.  RR+
131 rphalflt 10571 . . . . . . . . . . 11  |-  ( pi  e.  RR+  ->  ( pi 
/  2 )  < 
pi )
132130, 131ax-mp 8 . . . . . . . . . 10  |-  ( pi 
/  2 )  < 
pi
13382, 81ltnegi 9504 . . . . . . . . . 10  |-  ( ( pi  /  2 )  <  pi  <->  -u pi  <  -u ( pi  /  2
) )
134132, 133mpbi 200 . . . . . . . . 9  |-  -u pi  <  -u ( pi  / 
2 )
135134a1i 11 . . . . . . . 8  |-  ( ( A  e.  CC  /\  ( Re `  A )  e.  ( -u (
pi  /  2 ) (,) ( pi  / 
2 ) ) )  ->  -u pi  <  -u (
pi  /  2 ) )
136 eliooord 10903 . . . . . . . . . 10  |-  ( ( Re `  A )  e.  ( -u (
pi  /  2 ) (,) ( pi  / 
2 ) )  -> 
( -u ( pi  / 
2 )  <  (
Re `  A )  /\  ( Re `  A
)  <  ( pi  /  2 ) ) )
137136adantl 453 . . . . . . . . 9  |-  ( ( A  e.  CC  /\  ( Re `  A )  e.  ( -u (
pi  /  2 ) (,) ( pi  / 
2 ) ) )  ->  ( -u (
pi  /  2 )  <  ( Re `  A )  /\  (
Re `  A )  <  ( pi  /  2
) ) )
138137simpld 446 . . . . . . . 8  |-  ( ( A  e.  CC  /\  ( Re `  A )  e.  ( -u (
pi  /  2 ) (,) ( pi  / 
2 ) ) )  ->  -u ( pi  / 
2 )  <  (
Re `  A )
)
139125, 126, 128, 135, 138lttrd 9164 . . . . . . 7  |-  ( ( A  e.  CC  /\  ( Re `  A )  e.  ( -u (
pi  /  2 ) (,) ( pi  / 
2 ) ) )  ->  -u pi  <  (
Re `  A )
)
140 imre 11841 . . . . . . . . 9  |-  ( ( _i  x.  A )  e.  CC  ->  (
Im `  ( _i  x.  A ) )  =  ( Re `  ( -u _i  x.  ( _i  x.  A ) ) ) )
14110, 140syl 16 . . . . . . . 8  |-  ( ( A  e.  CC  /\  ( Re `  A )  e.  ( -u (
pi  /  2 ) (,) ( pi  / 
2 ) ) )  ->  ( Im `  ( _i  x.  A
) )  =  ( Re `  ( -u _i  x.  ( _i  x.  A ) ) ) )
1425, 5mulneg1i 9412 . . . . . . . . . . . 12  |-  ( -u _i  x.  _i )  = 
-u ( _i  x.  _i )
143 ixi 9584 . . . . . . . . . . . . 13  |-  ( _i  x.  _i )  = 
-u 1
144143negeqi 9232 . . . . . . . . . . . 12  |-  -u (
_i  x.  _i )  =  -u -u 1
14515negnegi 9303 . . . . . . . . . . . 12  |-  -u -u 1  =  1
146142, 144, 1453eqtri 2412 . . . . . . . . . . 11  |-  ( -u _i  x.  _i )  =  1
147146oveq1i 6031 . . . . . . . . . 10  |-  ( (
-u _i  x.  _i )  x.  A )  =  ( 1  x.  A )
14864a1i 11 . . . . . . . . . . 11  |-  ( ( A  e.  CC  /\  ( Re `  A )  e.  ( -u (
pi  /  2 ) (,) ( pi  / 
2 ) ) )  ->  -u _i  e.  CC )
1495a1i 11 . . . . . . . . . . 11  |-  ( ( A  e.  CC  /\  ( Re `  A )  e.  ( -u (
pi  /  2 ) (,) ( pi  / 
2 ) ) )  ->  _i  e.  CC )
150148, 149, 8mulassd 9045 . . . . . . . . . 10  |-  ( ( A  e.  CC  /\  ( Re `  A )  e.  ( -u (
pi  /  2 ) (,) ( pi  / 
2 ) ) )  ->  ( ( -u _i  x.  _i )  x.  A )  =  (
-u _i  x.  (
_i  x.  A )
) )
151 mulid2 9023 . . . . . . . . . . 11  |-  ( A  e.  CC  ->  (
1  x.  A )  =  A )
152151adantr 452 . . . . . . . . . 10  |-  ( ( A  e.  CC  /\  ( Re `  A )  e.  ( -u (
pi  /  2 ) (,) ( pi  / 
2 ) ) )  ->  ( 1  x.  A )  =  A )
153147, 150, 1523eqtr3a 2444 . . . . . . . . 9  |-  ( ( A  e.  CC  /\  ( Re `  A )  e.  ( -u (
pi  /  2 ) (,) ( pi  / 
2 ) ) )  ->  ( -u _i  x.  ( _i  x.  A
) )  =  A )
154153fveq2d 5673 . . . . . . . 8  |-  ( ( A  e.  CC  /\  ( Re `  A )  e.  ( -u (
pi  /  2 ) (,) ( pi  / 
2 ) ) )  ->  ( Re `  ( -u _i  x.  (
_i  x.  A )
) )  =  ( Re `  A ) )
155141, 154eqtrd 2420 . . . . . . 7  |-  ( ( A  e.  CC  /\  ( Re `  A )  e.  ( -u (
pi  /  2 ) (,) ( pi  / 
2 ) ) )  ->  ( Im `  ( _i  x.  A
) )  =  ( Re `  A ) )
156139, 155breqtrrd 4180 . . . . . 6  |-  ( ( A  e.  CC  /\  ( Re `  A )  e.  ( -u (
pi  /  2 ) (,) ( pi  / 
2 ) ) )  ->  -u pi  <  (
Im `  ( _i  x.  A ) ) )
15781a1i 11 . . . . . . . 8  |-  ( ( A  e.  CC  /\  ( Re `  A )  e.  ( -u (
pi  /  2 ) (,) ( pi  / 
2 ) ) )  ->  pi  e.  RR )
15882a1i 11 . . . . . . . . 9  |-  ( ( A  e.  CC  /\  ( Re `  A )  e.  ( -u (
pi  /  2 ) (,) ( pi  / 
2 ) ) )  ->  ( pi  / 
2 )  e.  RR )
159137simprd 450 . . . . . . . . 9  |-  ( ( A  e.  CC  /\  ( Re `  A )  e.  ( -u (
pi  /  2 ) (,) ( pi  / 
2 ) ) )  ->  ( Re `  A )  <  (
pi  /  2 ) )
160132a1i 11 . . . . . . . . 9  |-  ( ( A  e.  CC  /\  ( Re `  A )  e.  ( -u (
pi  /  2 ) (,) ( pi  / 
2 ) ) )  ->  ( pi  / 
2 )  <  pi )
161128, 158, 157, 159, 160lttrd 9164 . . . . . . . 8  |-  ( ( A  e.  CC  /\  ( Re `  A )  e.  ( -u (
pi  /  2 ) (,) ( pi  / 
2 ) ) )  ->  ( Re `  A )  <  pi )
162128, 157, 161ltled 9154 . . . . . . 7  |-  ( ( A  e.  CC  /\  ( Re `  A )  e.  ( -u (
pi  /  2 ) (,) ( pi  / 
2 ) ) )  ->  ( Re `  A )  <_  pi )
163155, 162eqbrtrd 4174 . . . . . 6  |-  ( ( A  e.  CC  /\  ( Re `  A )  e.  ( -u (
pi  /  2 ) (,) ( pi  / 
2 ) ) )  ->  ( Im `  ( _i  x.  A
) )  <_  pi )
164 ellogrn 20325 . . . . . 6  |-  ( ( _i  x.  A )  e.  ran  log  <->  ( (
_i  x.  A )  e.  CC  /\  -u pi  <  ( Im `  (
_i  x.  A )
)  /\  ( Im `  ( _i  x.  A
) )  <_  pi ) )
16510, 156, 163, 164syl3anbrc 1138 . . . . 5  |-  ( ( A  e.  CC  /\  ( Re `  A )  e.  ( -u (
pi  /  2 ) (,) ( pi  / 
2 ) ) )  ->  ( _i  x.  A )  e.  ran  log )
166 logef 20344 . . . . 5  |-  ( ( _i  x.  A )  e.  ran  log  ->  ( log `  ( exp `  ( _i  x.  A
) ) )  =  ( _i  x.  A
) )
167165, 166syl 16 . . . 4  |-  ( ( A  e.  CC  /\  ( Re `  A )  e.  ( -u (
pi  /  2 ) (,) ( pi  / 
2 ) ) )  ->  ( log `  ( exp `  ( _i  x.  A ) ) )  =  ( _i  x.  A ) )
168123, 167eqtr3d 2422 . . 3  |-  ( ( A  e.  CC  /\  ( Re `  A )  e.  ( -u (
pi  /  2 ) (,) ( pi  / 
2 ) ) )  ->  ( log `  (
( _i  x.  ( sin `  A ) )  +  ( sqr `  (
1  -  ( ( sin `  A ) ^ 2 ) ) ) ) )  =  ( _i  x.  A
) )
169168oveq2d 6037 . 2  |-  ( ( A  e.  CC  /\  ( Re `  A )  e.  ( -u (
pi  /  2 ) (,) ( pi  / 
2 ) ) )  ->  ( -u _i  x.  ( log `  (
( _i  x.  ( sin `  A ) )  +  ( sqr `  (
1  -  ( ( sin `  A ) ^ 2 ) ) ) ) ) )  =  ( -u _i  x.  ( _i  x.  A
) ) )
1704, 169, 1533eqtrd 2424 1  |-  ( ( A  e.  CC  /\  ( Re `  A )  e.  ( -u (
pi  /  2 ) (,) ( pi  / 
2 ) ) )  ->  (arcsin `  ( sin `  A ) )  =  A )
Colors of variables: wff set class
Syntax hints:    -> wi 4    <-> wb 177    /\ wa 359    = wceq 1649    e. wcel 1717    =/= wne 2551   class class class wbr 4154   ran crn 4820   ` cfv 5395  (class class class)co 6021   CCcc 8922   RRcr 8923   0cc0 8924   1c1 8925   _ici 8926    + caddc 8927    x. cmul 8929    < clt 9054    <_ cle 9055    - cmin 9224   -ucneg 9225    / cdiv 9610   2c2 9982   RR+crp 10545   (,)cioo 10849   ^cexp 11310   Recre 11830   Imcim 11831   sqrcsqr 11966   expce 12592   sincsin 12594   cosccos 12595   picpi 12597   logclog 20320  arcsincasin 20570
This theorem is referenced by:  acoscos  20601  reasinsin  20604  asinsinb  20605
This theorem was proved from axioms:  ax-1 5  ax-2 6  ax-3 7  ax-mp 8  ax-gen 1552  ax-5 1563  ax-17 1623  ax-9 1661  ax-8 1682  ax-13 1719  ax-14 1721  ax-6 1736  ax-7 1741  ax-11 1753  ax-12 1939  ax-ext 2369  ax-rep 4262  ax-sep 4272  ax-nul 4280  ax-pow 4319  ax-pr 4345  ax-un 4642  ax-inf2 7530  ax-cnex 8980  ax-resscn 8981  ax-1cn 8982  ax-icn 8983  ax-addcl 8984  ax-addrcl 8985  ax-mulcl 8986  ax-mulrcl 8987  ax-mulcom 8988  ax-addass 8989  ax-mulass 8990  ax-distr 8991  ax-i2m1 8992  ax-1ne0 8993  ax-1rid 8994  ax-rnegex 8995  ax-rrecex 8996  ax-cnre 8997  ax-pre-lttri 8998  ax-pre-lttrn 8999  ax-pre-ltadd 9000  ax-pre-mulgt0 9001  ax-pre-sup 9002  ax-addf 9003  ax-mulf 9004
This theorem depends on definitions:  df-bi 178  df-or 360  df-an 361  df-3or 937  df-3an 938  df-tru 1325  df-ex 1548  df-nf 1551  df-sb 1656  df-eu 2243  df-mo 2244  df-clab 2375  df-cleq 2381  df-clel 2384  df-nfc 2513  df-ne 2553  df-nel 2554  df-ral 2655  df-rex 2656  df-reu 2657  df-rmo 2658  df-rab 2659  df-v 2902  df-sbc 3106  df-csb 3196  df-dif 3267  df-un 3269  df-in 3271  df-ss 3278  df-pss 3280  df-nul 3573  df-if 3684  df-pw 3745  df-sn 3764  df-pr 3765  df-tp 3766  df-op 3767  df-uni 3959  df-int 3994  df-iun 4038  df-iin 4039  df-br 4155  df-opab 4209  df-mpt 4210  df-tr 4245  df-eprel 4436  df-id 4440  df-po 4445  df-so 4446  df-fr 4483  df-se 4484  df-we 4485  df-ord 4526  df-on 4527  df-lim 4528  df-suc 4529  df-om 4787  df-xp 4825  df-rel 4826  df-cnv 4827  df-co 4828  df-dm 4829  df-rn 4830  df-res 4831  df-ima 4832  df-iota 5359  df-fun 5397  df-fn 5398  df-f 5399  df-f1 5400  df-fo 5401  df-f1o 5402  df-fv 5403  df-isom 5404  df-ov 6024  df-oprab 6025  df-mpt2 6026  df-of 6245  df-1st 6289  df-2nd 6290  df-riota 6486  df-recs 6570  df-rdg 6605  df-1o 6661  df-2o 6662  df-oadd 6665  df-er 6842  df-map 6957  df-pm 6958  df-ixp 7001  df-en 7047  df-dom 7048  df-sdom 7049  df-fin 7050  df-fi 7352  df-sup 7382  df-oi 7413  df-card 7760  df-cda 7982  df-pnf 9056  df-mnf 9057  df-xr 9058  df-ltxr 9059  df-le 9060  df-sub 9226  df-neg 9227  df-div 9611  df-nn 9934  df-2 9991  df-3 9992  df-4 9993  df-5 9994  df-6 9995  df-7 9996  df-8 9997  df-9 9998  df-10 9999  df-n0 10155  df-z 10216  df-dec 10316  df-uz 10422  df-q 10508  df-rp 10546  df-xneg 10643  df-xadd 10644  df-xmul 10645  df-ioo 10853  df-ioc 10854  df-ico 10855  df-icc 10856  df-fz 10977  df-fzo 11067  df-fl 11130  df-mod 11179  df-seq 11252  df-exp 11311  df-fac 11495  df-bc 11522  df-hash 11547  df-shft 11810  df-cj 11832  df-re 11833  df-im 11834  df-sqr 11968  df-abs 11969  df-limsup 12193  df-clim 12210  df-rlim 12211  df-sum 12408  df-ef 12598  df-sin 12600  df-cos 12601  df-pi 12603  df-struct 13399  df-ndx 13400  df-slot 13401  df-base 13402  df-sets 13403  df-ress 13404  df-plusg 13470  df-mulr 13471  df-starv 13472  df-sca 13473  df-vsca 13474  df-tset 13476  df-ple 13477  df-ds 13479  df-unif 13480  df-hom 13481  df-cco 13482  df-rest 13578  df-topn 13579  df-topgen 13595  df-pt 13596  df-prds 13599  df-xrs 13654  df-0g 13655  df-gsum 13656  df-qtop 13661  df-imas 13662  df-xps 13664  df-mre 13739  df-mrc 13740  df-acs 13742  df-mnd 14618  df-submnd 14667  df-mulg 14743  df-cntz 15044  df-cmn 15342  df-xmet 16620  df-met 16621  df-bl 16622  df-mopn 16623  df-fbas 16624  df-fg 16625  df-cnfld 16628  df-top 16887  df-bases 16889  df-topon 16890  df-topsp 16891  df-cld 17007  df-ntr 17008  df-cls 17009  df-nei 17086  df-lp 17124  df-perf 17125  df-cn 17214  df-cnp 17215  df-haus 17302  df-tx 17516  df-hmeo 17709  df-fil 17800  df-fm 17892  df-flim 17893  df-flf 17894  df-xms 18260  df-ms 18261  df-tms 18262  df-cncf 18780  df-limc 19621  df-dv 19622  df-log 20322  df-asin 20573
  Copyright terms: Public domain W3C validator