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

Theorem logneg2 23563
Description: The logarithm of the negative of a number with positive imaginary part is  _i  x.  pi less than the original. (Compare logneg 23536.) (Contributed by Mario Carneiro, 3-Apr-2015.)
Assertion
Ref Expression
logneg2  |-  ( ( A  e.  CC  /\  0  <  ( Im `  A ) )  -> 
( log `  -u A
)  =  ( ( log `  A )  -  ( _i  x.  pi ) ) )

Proof of Theorem logneg2
StepHypRef Expression
1 imcl 13175 . . . . . . . 8  |-  ( A  e.  CC  ->  (
Im `  A )  e.  RR )
2 gt0ne0 10087 . . . . . . . 8  |-  ( ( ( Im `  A
)  e.  RR  /\  0  <  ( Im `  A ) )  -> 
( Im `  A
)  =/=  0 )
31, 2sylan 473 . . . . . . 7  |-  ( ( A  e.  CC  /\  0  <  ( Im `  A ) )  -> 
( Im `  A
)  =/=  0 )
4 fveq2 5882 . . . . . . . . 9  |-  ( A  =  0  ->  (
Im `  A )  =  ( Im ` 
0 ) )
5 im0 13217 . . . . . . . . 9  |-  ( Im
`  0 )  =  0
64, 5syl6eq 2479 . . . . . . . 8  |-  ( A  =  0  ->  (
Im `  A )  =  0 )
76necon3i 2660 . . . . . . 7  |-  ( ( Im `  A )  =/=  0  ->  A  =/=  0 )
83, 7syl 17 . . . . . 6  |-  ( ( A  e.  CC  /\  0  <  ( Im `  A ) )  ->  A  =/=  0 )
9 logcl 23517 . . . . . 6  |-  ( ( A  e.  CC  /\  A  =/=  0 )  -> 
( log `  A
)  e.  CC )
108, 9syldan 472 . . . . 5  |-  ( ( A  e.  CC  /\  0  <  ( Im `  A ) )  -> 
( log `  A
)  e.  CC )
11 ax-icn 9606 . . . . . 6  |-  _i  e.  CC
12 picn 23413 . . . . . 6  |-  pi  e.  CC
1311, 12mulcli 9656 . . . . 5  |-  ( _i  x.  pi )  e.  CC
14 efsub 14154 . . . . 5  |-  ( ( ( log `  A
)  e.  CC  /\  ( _i  x.  pi )  e.  CC )  ->  ( exp `  (
( log `  A
)  -  ( _i  x.  pi ) ) )  =  ( ( exp `  ( log `  A ) )  / 
( exp `  (
_i  x.  pi )
) ) )
1510, 13, 14sylancl 666 . . . 4  |-  ( ( A  e.  CC  /\  0  <  ( Im `  A ) )  -> 
( exp `  (
( log `  A
)  -  ( _i  x.  pi ) ) )  =  ( ( exp `  ( log `  A ) )  / 
( exp `  (
_i  x.  pi )
) ) )
16 eflog 23525 . . . . . 6  |-  ( ( A  e.  CC  /\  A  =/=  0 )  -> 
( exp `  ( log `  A ) )  =  A )
178, 16syldan 472 . . . . 5  |-  ( ( A  e.  CC  /\  0  <  ( Im `  A ) )  -> 
( exp `  ( log `  A ) )  =  A )
18 efipi 23427 . . . . . 6  |-  ( exp `  ( _i  x.  pi ) )  =  -u
1
1918a1i 11 . . . . 5  |-  ( ( A  e.  CC  /\  0  <  ( Im `  A ) )  -> 
( exp `  (
_i  x.  pi )
)  =  -u 1
)
2017, 19oveq12d 6324 . . . 4  |-  ( ( A  e.  CC  /\  0  <  ( Im `  A ) )  -> 
( ( exp `  ( log `  A ) )  /  ( exp `  (
_i  x.  pi )
) )  =  ( A  /  -u 1
) )
21 ax-1cn 9605 . . . . . . 7  |-  1  e.  CC
22 ax-1ne0 9616 . . . . . . 7  |-  1  =/=  0
23 divneg2 10339 . . . . . . 7  |-  ( ( A  e.  CC  /\  1  e.  CC  /\  1  =/=  0 )  ->  -u ( A  /  1 )  =  ( A  /  -u 1
) )
2421, 22, 23mp3an23 1352 . . . . . 6  |-  ( A  e.  CC  ->  -u ( A  /  1 )  =  ( A  /  -u 1
) )
25 div1 10307 . . . . . . 7  |-  ( A  e.  CC  ->  ( A  /  1 )  =  A )
2625negeqd 9877 . . . . . 6  |-  ( A  e.  CC  ->  -u ( A  /  1 )  = 
-u A )
2724, 26eqtr3d 2465 . . . . 5  |-  ( A  e.  CC  ->  ( A  /  -u 1 )  = 
-u A )
2827adantr 466 . . . 4  |-  ( ( A  e.  CC  /\  0  <  ( Im `  A ) )  -> 
( A  /  -u 1
)  =  -u A
)
2915, 20, 283eqtrd 2467 . . 3  |-  ( ( A  e.  CC  /\  0  <  ( Im `  A ) )  -> 
( exp `  (
( log `  A
)  -  ( _i  x.  pi ) ) )  =  -u A
)
3029fveq2d 5886 . 2  |-  ( ( A  e.  CC  /\  0  <  ( Im `  A ) )  -> 
( log `  ( exp `  ( ( log `  A )  -  (
_i  x.  pi )
) ) )  =  ( log `  -u A
) )
31 subcl 9882 . . . . 5  |-  ( ( ( log `  A
)  e.  CC  /\  ( _i  x.  pi )  e.  CC )  ->  ( ( log `  A
)  -  ( _i  x.  pi ) )  e.  CC )
3210, 13, 31sylancl 666 . . . 4  |-  ( ( A  e.  CC  /\  0  <  ( Im `  A ) )  -> 
( ( log `  A
)  -  ( _i  x.  pi ) )  e.  CC )
33 argimgt0 23560 . . . . . . . . 9  |-  ( ( A  e.  CC  /\  0  <  ( Im `  A ) )  -> 
( Im `  ( log `  A ) )  e.  ( 0 (,) pi ) )
34 eliooord 11702 . . . . . . . . 9  |-  ( ( Im `  ( log `  A ) )  e.  ( 0 (,) pi )  ->  ( 0  < 
( Im `  ( log `  A ) )  /\  ( Im `  ( log `  A ) )  <  pi ) )
3533, 34syl 17 . . . . . . . 8  |-  ( ( A  e.  CC  /\  0  <  ( Im `  A ) )  -> 
( 0  <  (
Im `  ( log `  A ) )  /\  ( Im `  ( log `  A ) )  < 
pi ) )
3635simpld 460 . . . . . . 7  |-  ( ( A  e.  CC  /\  0  <  ( Im `  A ) )  -> 
0  <  ( Im `  ( log `  A
) ) )
37 imcl 13175 . . . . . . . . 9  |-  ( ( log `  A )  e.  CC  ->  (
Im `  ( log `  A ) )  e.  RR )
3810, 37syl 17 . . . . . . . 8  |-  ( ( A  e.  CC  /\  0  <  ( Im `  A ) )  -> 
( Im `  ( log `  A ) )  e.  RR )
39 pire 23412 . . . . . . . . 9  |-  pi  e.  RR
4039renegcli 9943 . . . . . . . 8  |-  -u pi  e.  RR
41 ltaddpos2 10113 . . . . . . . 8  |-  ( ( ( Im `  ( log `  A ) )  e.  RR  /\  -u pi  e.  RR )  ->  (
0  <  ( Im `  ( log `  A
) )  <->  -u pi  <  ( ( Im `  ( log `  A ) )  +  -u pi ) ) )
4238, 40, 41sylancl 666 . . . . . . 7  |-  ( ( A  e.  CC  /\  0  <  ( Im `  A ) )  -> 
( 0  <  (
Im `  ( log `  A ) )  <->  -u pi  <  ( ( Im `  ( log `  A ) )  +  -u pi ) ) )
4336, 42mpbid 213 . . . . . 6  |-  ( ( A  e.  CC  /\  0  <  ( Im `  A ) )  ->  -u pi  <  ( ( Im `  ( log `  A ) )  + 
-u pi ) )
4438recnd 9677 . . . . . . 7  |-  ( ( A  e.  CC  /\  0  <  ( Im `  A ) )  -> 
( Im `  ( log `  A ) )  e.  CC )
45 negsub 9930 . . . . . . 7  |-  ( ( ( Im `  ( log `  A ) )  e.  CC  /\  pi  e.  CC )  ->  (
( Im `  ( log `  A ) )  +  -u pi )  =  ( ( Im `  ( log `  A ) )  -  pi ) )
4644, 12, 45sylancl 666 . . . . . 6  |-  ( ( A  e.  CC  /\  0  <  ( Im `  A ) )  -> 
( ( Im `  ( log `  A ) )  +  -u pi )  =  ( (
Im `  ( log `  A ) )  -  pi ) )
4743, 46breqtrd 4448 . . . . 5  |-  ( ( A  e.  CC  /\  0  <  ( Im `  A ) )  ->  -u pi  <  ( ( Im `  ( log `  A ) )  -  pi ) )
48 imsub 13199 . . . . . . 7  |-  ( ( ( log `  A
)  e.  CC  /\  ( _i  x.  pi )  e.  CC )  ->  ( Im `  (
( log `  A
)  -  ( _i  x.  pi ) ) )  =  ( ( Im `  ( log `  A ) )  -  ( Im `  ( _i  x.  pi ) ) ) )
4910, 13, 48sylancl 666 . . . . . 6  |-  ( ( A  e.  CC  /\  0  <  ( Im `  A ) )  -> 
( Im `  (
( log `  A
)  -  ( _i  x.  pi ) ) )  =  ( ( Im `  ( log `  A ) )  -  ( Im `  ( _i  x.  pi ) ) ) )
50 reim 13173 . . . . . . . . 9  |-  ( pi  e.  CC  ->  (
Re `  pi )  =  ( Im `  ( _i  x.  pi ) ) )
5112, 50ax-mp 5 . . . . . . . 8  |-  ( Re
`  pi )  =  ( Im `  (
_i  x.  pi )
)
52 rere 13186 . . . . . . . . 9  |-  ( pi  e.  RR  ->  (
Re `  pi )  =  pi )
5339, 52ax-mp 5 . . . . . . . 8  |-  ( Re
`  pi )  =  pi
5451, 53eqtr3i 2453 . . . . . . 7  |-  ( Im
`  ( _i  x.  pi ) )  =  pi
5554oveq2i 6317 . . . . . 6  |-  ( ( Im `  ( log `  A ) )  -  ( Im `  ( _i  x.  pi ) ) )  =  ( ( Im `  ( log `  A ) )  -  pi )
5649, 55syl6eq 2479 . . . . 5  |-  ( ( A  e.  CC  /\  0  <  ( Im `  A ) )  -> 
( Im `  (
( log `  A
)  -  ( _i  x.  pi ) ) )  =  ( ( Im `  ( log `  A ) )  -  pi ) )
5747, 56breqtrrd 4450 . . . 4  |-  ( ( A  e.  CC  /\  0  <  ( Im `  A ) )  ->  -u pi  <  ( Im
`  ( ( log `  A )  -  (
_i  x.  pi )
) ) )
58 resubcl 9946 . . . . . . 7  |-  ( ( ( Im `  ( log `  A ) )  e.  RR  /\  pi  e.  RR )  ->  (
( Im `  ( log `  A ) )  -  pi )  e.  RR )
5938, 39, 58sylancl 666 . . . . . 6  |-  ( ( A  e.  CC  /\  0  <  ( Im `  A ) )  -> 
( ( Im `  ( log `  A ) )  -  pi )  e.  RR )
6039a1i 11 . . . . . 6  |-  ( ( A  e.  CC  /\  0  <  ( Im `  A ) )  ->  pi  e.  RR )
61 0re 9651 . . . . . . . 8  |-  0  e.  RR
62 pipos 23414 . . . . . . . 8  |-  0  <  pi
6361, 39, 62ltleii 9765 . . . . . . 7  |-  0  <_  pi
64 subge02 10138 . . . . . . . 8  |-  ( ( ( Im `  ( log `  A ) )  e.  RR  /\  pi  e.  RR )  ->  (
0  <_  pi  <->  ( (
Im `  ( log `  A ) )  -  pi )  <_  ( Im
`  ( log `  A
) ) ) )
6538, 39, 64sylancl 666 . . . . . . 7  |-  ( ( A  e.  CC  /\  0  <  ( Im `  A ) )  -> 
( 0  <_  pi  <->  ( ( Im `  ( log `  A ) )  -  pi )  <_ 
( Im `  ( log `  A ) ) ) )
6663, 65mpbii 214 . . . . . 6  |-  ( ( A  e.  CC  /\  0  <  ( Im `  A ) )  -> 
( ( Im `  ( log `  A ) )  -  pi )  <_  ( Im `  ( log `  A ) ) )
67 logimcl 23518 . . . . . . . 8  |-  ( ( A  e.  CC  /\  A  =/=  0 )  -> 
( -u pi  <  (
Im `  ( log `  A ) )  /\  ( Im `  ( log `  A ) )  <_  pi ) )
688, 67syldan 472 . . . . . . 7  |-  ( ( A  e.  CC  /\  0  <  ( Im `  A ) )  -> 
( -u pi  <  (
Im `  ( log `  A ) )  /\  ( Im `  ( log `  A ) )  <_  pi ) )
6968simprd 464 . . . . . 6  |-  ( ( A  e.  CC  /\  0  <  ( Im `  A ) )  -> 
( Im `  ( log `  A ) )  <_  pi )
7059, 38, 60, 66, 69letrd 9800 . . . . 5  |-  ( ( A  e.  CC  /\  0  <  ( Im `  A ) )  -> 
( ( Im `  ( log `  A ) )  -  pi )  <_  pi )
7156, 70eqbrtrd 4444 . . . 4  |-  ( ( A  e.  CC  /\  0  <  ( Im `  A ) )  -> 
( Im `  (
( log `  A
)  -  ( _i  x.  pi ) ) )  <_  pi )
72 ellogrn 23508 . . . 4  |-  ( ( ( log `  A
)  -  ( _i  x.  pi ) )  e.  ran  log  <->  ( (
( log `  A
)  -  ( _i  x.  pi ) )  e.  CC  /\  -u pi  <  ( Im `  (
( log `  A
)  -  ( _i  x.  pi ) ) )  /\  ( Im
`  ( ( log `  A )  -  (
_i  x.  pi )
) )  <_  pi ) )
7332, 57, 71, 72syl3anbrc 1189 . . 3  |-  ( ( A  e.  CC  /\  0  <  ( Im `  A ) )  -> 
( ( log `  A
)  -  ( _i  x.  pi ) )  e.  ran  log )
74 logef 23530 . . 3  |-  ( ( ( log `  A
)  -  ( _i  x.  pi ) )  e.  ran  log  ->  ( log `  ( exp `  ( ( log `  A
)  -  ( _i  x.  pi ) ) ) )  =  ( ( log `  A
)  -  ( _i  x.  pi ) ) )
7573, 74syl 17 . 2  |-  ( ( A  e.  CC  /\  0  <  ( Im `  A ) )  -> 
( log `  ( exp `  ( ( log `  A )  -  (
_i  x.  pi )
) ) )  =  ( ( log `  A
)  -  ( _i  x.  pi ) ) )
7630, 75eqtr3d 2465 1  |-  ( ( A  e.  CC  /\  0  <  ( Im `  A ) )  -> 
( log `  -u A
)  =  ( ( log `  A )  -  ( _i  x.  pi ) ) )
Colors of variables: wff setvar class
Syntax hints:    -> wi 4    <-> wb 187    /\ wa 370    = wceq 1437    e. wcel 1872    =/= wne 2614   class class class wbr 4423   ran crn 4854   ` cfv 5601  (class class class)co 6306   CCcc 9545   RRcr 9546   0cc0 9547   1c1 9548   _ici 9549    + caddc 9550    x. cmul 9552    < clt 9683    <_ cle 9684    - cmin 9868   -ucneg 9869    / cdiv 10277   (,)cioo 11643   Recre 13161   Imcim 13162   expce 14114   picpi 14119   logclog 23503
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1663  ax-4 1676  ax-5 1752  ax-6 1798  ax-7 1843  ax-8 1874  ax-9 1876  ax-10 1891  ax-11 1896  ax-12 1909  ax-13 2057  ax-ext 2401  ax-rep 4536  ax-sep 4546  ax-nul 4555  ax-pow 4602  ax-pr 4660  ax-un 6598  ax-inf2 8156  ax-cnex 9603  ax-resscn 9604  ax-1cn 9605  ax-icn 9606  ax-addcl 9607  ax-addrcl 9608  ax-mulcl 9609  ax-mulrcl 9610  ax-mulcom 9611  ax-addass 9612  ax-mulass 9613  ax-distr 9614  ax-i2m1 9615  ax-1ne0 9616  ax-1rid 9617  ax-rnegex 9618  ax-rrecex 9619  ax-cnre 9620  ax-pre-lttri 9621  ax-pre-lttrn 9622  ax-pre-ltadd 9623  ax-pre-mulgt0 9624  ax-pre-sup 9625  ax-addf 9626  ax-mulf 9627
This theorem depends on definitions:  df-bi 188  df-or 371  df-an 372  df-3or 983  df-3an 984  df-tru 1440  df-fal 1443  df-ex 1658  df-nf 1662  df-sb 1791  df-eu 2273  df-mo 2274  df-clab 2408  df-cleq 2414  df-clel 2417  df-nfc 2568  df-ne 2616  df-nel 2617  df-ral 2776  df-rex 2777  df-reu 2778  df-rmo 2779  df-rab 2780  df-v 3082  df-sbc 3300  df-csb 3396  df-dif 3439  df-un 3441  df-in 3443  df-ss 3450  df-pss 3452  df-nul 3762  df-if 3912  df-pw 3983  df-sn 3999  df-pr 4001  df-tp 4003  df-op 4005  df-uni 4220  df-int 4256  df-iun 4301  df-iin 4302  df-br 4424  df-opab 4483  df-mpt 4484  df-tr 4519  df-eprel 4764  df-id 4768  df-po 4774  df-so 4775  df-fr 4812  df-se 4813  df-we 4814  df-xp 4859  df-rel 4860  df-cnv 4861  df-co 4862  df-dm 4863  df-rn 4864  df-res 4865  df-ima 4866  df-pred 5399  df-ord 5445  df-on 5446  df-lim 5447  df-suc 5448  df-iota 5565  df-fun 5603  df-fn 5604  df-f 5605  df-f1 5606  df-fo 5607  df-f1o 5608  df-fv 5609  df-isom 5610  df-riota 6268  df-ov 6309  df-oprab 6310  df-mpt2 6311  df-of 6546  df-om 6708  df-1st 6808  df-2nd 6809  df-supp 6927  df-wrecs 7040  df-recs 7102  df-rdg 7140  df-1o 7194  df-2o 7195  df-oadd 7198  df-er 7375  df-map 7486  df-pm 7487  df-ixp 7535  df-en 7582  df-dom 7583  df-sdom 7584  df-fin 7585  df-fsupp 7894  df-fi 7935  df-sup 7966  df-inf 7967  df-oi 8035  df-card 8382  df-cda 8606  df-pnf 9685  df-mnf 9686  df-xr 9687  df-ltxr 9688  df-le 9689  df-sub 9870  df-neg 9871  df-div 10278  df-nn 10618  df-2 10676  df-3 10677  df-4 10678  df-5 10679  df-6 10680  df-7 10681  df-8 10682  df-9 10683  df-10 10684  df-n0 10878  df-z 10946  df-dec 11060  df-uz 11168  df-q 11273  df-rp 11311  df-xneg 11417  df-xadd 11418  df-xmul 11419  df-ioo 11647  df-ioc 11648  df-ico 11649  df-icc 11650  df-fz 11793  df-fzo 11924  df-fl 12035  df-mod 12104  df-seq 12221  df-exp 12280  df-fac 12467  df-bc 12495  df-hash 12523  df-shft 13131  df-cj 13163  df-re 13164  df-im 13165  df-sqrt 13299  df-abs 13300  df-limsup 13526  df-clim 13552  df-rlim 13553  df-sum 13753  df-ef 14121  df-sin 14123  df-cos 14124  df-pi 14126  df-struct 15123  df-ndx 15124  df-slot 15125  df-base 15126  df-sets 15127  df-ress 15128  df-plusg 15203  df-mulr 15204  df-starv 15205  df-sca 15206  df-vsca 15207  df-ip 15208  df-tset 15209  df-ple 15210  df-ds 15212  df-unif 15213  df-hom 15214  df-cco 15215  df-rest 15321  df-topn 15322  df-0g 15340  df-gsum 15341  df-topgen 15342  df-pt 15343  df-prds 15346  df-xrs 15400  df-qtop 15406  df-imas 15407  df-xps 15410  df-mre 15492  df-mrc 15493  df-acs 15495  df-mgm 16488  df-sgrp 16527  df-mnd 16537  df-submnd 16583  df-mulg 16676  df-cntz 16971  df-cmn 17432  df-psmet 18962  df-xmet 18963  df-met 18964  df-bl 18965  df-mopn 18966  df-fbas 18967  df-fg 18968  df-cnfld 18971  df-top 19920  df-bases 19921  df-topon 19922  df-topsp 19923  df-cld 20033  df-ntr 20034  df-cls 20035  df-nei 20113  df-lp 20151  df-perf 20152  df-cn 20242  df-cnp 20243  df-haus 20330  df-tx 20576  df-hmeo 20769  df-fil 20860  df-fm 20952  df-flim 20953  df-flf 20954  df-xms 21334  df-ms 21335  df-tms 21336  df-cncf 21909  df-limc 22820  df-dv 22821  df-log 23505
This theorem is referenced by:  atanlogsublem  23840
  Copyright terms: Public domain W3C validator