MPE Home Metamath Proof Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >  atanlogsub Structured version   Visualization version   GIF version

Theorem atanlogsub 26250
Description: A variation on atanlogadd 26248, to show that √(1 + i𝑧) / √(1 − i𝑧) = √((1 + i𝑧) / (1 − i𝑧)) under more limited conditions. (Contributed by Mario Carneiro, 4-Apr-2015.)
Assertion
Ref Expression
atanlogsub ((𝐴 ∈ dom arctan ∧ (ℜ‘𝐴) ≠ 0) → ((log‘(1 + (i · 𝐴))) − (log‘(1 − (i · 𝐴)))) ∈ ran log)

Proof of Theorem atanlogsub
StepHypRef Expression
1 ax-1cn 11105 . . . . . 6 1 ∈ ℂ
2 ax-icn 11106 . . . . . . 7 i ∈ ℂ
3 atandm2 26211 . . . . . . . 8 (𝐴 ∈ dom arctan ↔ (𝐴 ∈ ℂ ∧ (1 − (i · 𝐴)) ≠ 0 ∧ (1 + (i · 𝐴)) ≠ 0))
43simp1bi 1145 . . . . . . 7 (𝐴 ∈ dom arctan → 𝐴 ∈ ℂ)
5 mulcl 11131 . . . . . . 7 ((i ∈ ℂ ∧ 𝐴 ∈ ℂ) → (i · 𝐴) ∈ ℂ)
62, 4, 5sylancr 587 . . . . . 6 (𝐴 ∈ dom arctan → (i · 𝐴) ∈ ℂ)
7 addcl 11129 . . . . . 6 ((1 ∈ ℂ ∧ (i · 𝐴) ∈ ℂ) → (1 + (i · 𝐴)) ∈ ℂ)
81, 6, 7sylancr 587 . . . . 5 (𝐴 ∈ dom arctan → (1 + (i · 𝐴)) ∈ ℂ)
93simp3bi 1147 . . . . 5 (𝐴 ∈ dom arctan → (1 + (i · 𝐴)) ≠ 0)
108, 9logcld 25910 . . . 4 (𝐴 ∈ dom arctan → (log‘(1 + (i · 𝐴))) ∈ ℂ)
11 subcl 11396 . . . . . 6 ((1 ∈ ℂ ∧ (i · 𝐴) ∈ ℂ) → (1 − (i · 𝐴)) ∈ ℂ)
121, 6, 11sylancr 587 . . . . 5 (𝐴 ∈ dom arctan → (1 − (i · 𝐴)) ∈ ℂ)
133simp2bi 1146 . . . . 5 (𝐴 ∈ dom arctan → (1 − (i · 𝐴)) ≠ 0)
1412, 13logcld 25910 . . . 4 (𝐴 ∈ dom arctan → (log‘(1 − (i · 𝐴))) ∈ ℂ)
1510, 14subcld 11508 . . 3 (𝐴 ∈ dom arctan → ((log‘(1 + (i · 𝐴))) − (log‘(1 − (i · 𝐴)))) ∈ ℂ)
1615adantr 481 . 2 ((𝐴 ∈ dom arctan ∧ (ℜ‘𝐴) ≠ 0) → ((log‘(1 + (i · 𝐴))) − (log‘(1 − (i · 𝐴)))) ∈ ℂ)
174recld 15071 . . . . . . 7 (𝐴 ∈ dom arctan → (ℜ‘𝐴) ∈ ℝ)
18 0re 11153 . . . . . . 7 0 ∈ ℝ
19 lttri2 11233 . . . . . . 7 (((ℜ‘𝐴) ∈ ℝ ∧ 0 ∈ ℝ) → ((ℜ‘𝐴) ≠ 0 ↔ ((ℜ‘𝐴) < 0 ∨ 0 < (ℜ‘𝐴))))
2017, 18, 19sylancl 586 . . . . . 6 (𝐴 ∈ dom arctan → ((ℜ‘𝐴) ≠ 0 ↔ ((ℜ‘𝐴) < 0 ∨ 0 < (ℜ‘𝐴))))
2120biimpa 477 . . . . 5 ((𝐴 ∈ dom arctan ∧ (ℜ‘𝐴) ≠ 0) → ((ℜ‘𝐴) < 0 ∨ 0 < (ℜ‘𝐴)))
2215imnegd 15087 . . . . . . . . . 10 (𝐴 ∈ dom arctan → (ℑ‘-((log‘(1 + (i · 𝐴))) − (log‘(1 − (i · 𝐴))))) = -(ℑ‘((log‘(1 + (i · 𝐴))) − (log‘(1 − (i · 𝐴))))))
2310, 14negsubdi2d 11524 . . . . . . . . . . . 12 (𝐴 ∈ dom arctan → -((log‘(1 + (i · 𝐴))) − (log‘(1 − (i · 𝐴)))) = ((log‘(1 − (i · 𝐴))) − (log‘(1 + (i · 𝐴)))))
24 mulneg2 11588 . . . . . . . . . . . . . . . . 17 ((i ∈ ℂ ∧ 𝐴 ∈ ℂ) → (i · -𝐴) = -(i · 𝐴))
252, 4, 24sylancr 587 . . . . . . . . . . . . . . . 16 (𝐴 ∈ dom arctan → (i · -𝐴) = -(i · 𝐴))
2625oveq2d 7369 . . . . . . . . . . . . . . 15 (𝐴 ∈ dom arctan → (1 + (i · -𝐴)) = (1 + -(i · 𝐴)))
27 negsub 11445 . . . . . . . . . . . . . . . 16 ((1 ∈ ℂ ∧ (i · 𝐴) ∈ ℂ) → (1 + -(i · 𝐴)) = (1 − (i · 𝐴)))
281, 6, 27sylancr 587 . . . . . . . . . . . . . . 15 (𝐴 ∈ dom arctan → (1 + -(i · 𝐴)) = (1 − (i · 𝐴)))
2926, 28eqtrd 2776 . . . . . . . . . . . . . 14 (𝐴 ∈ dom arctan → (1 + (i · -𝐴)) = (1 − (i · 𝐴)))
3029fveq2d 6843 . . . . . . . . . . . . 13 (𝐴 ∈ dom arctan → (log‘(1 + (i · -𝐴))) = (log‘(1 − (i · 𝐴))))
3125oveq2d 7369 . . . . . . . . . . . . . . 15 (𝐴 ∈ dom arctan → (1 − (i · -𝐴)) = (1 − -(i · 𝐴)))
32 subneg 11446 . . . . . . . . . . . . . . . 16 ((1 ∈ ℂ ∧ (i · 𝐴) ∈ ℂ) → (1 − -(i · 𝐴)) = (1 + (i · 𝐴)))
331, 6, 32sylancr 587 . . . . . . . . . . . . . . 15 (𝐴 ∈ dom arctan → (1 − -(i · 𝐴)) = (1 + (i · 𝐴)))
3431, 33eqtrd 2776 . . . . . . . . . . . . . 14 (𝐴 ∈ dom arctan → (1 − (i · -𝐴)) = (1 + (i · 𝐴)))
3534fveq2d 6843 . . . . . . . . . . . . 13 (𝐴 ∈ dom arctan → (log‘(1 − (i · -𝐴))) = (log‘(1 + (i · 𝐴))))
3630, 35oveq12d 7371 . . . . . . . . . . . 12 (𝐴 ∈ dom arctan → ((log‘(1 + (i · -𝐴))) − (log‘(1 − (i · -𝐴)))) = ((log‘(1 − (i · 𝐴))) − (log‘(1 + (i · 𝐴)))))
3723, 36eqtr4d 2779 . . . . . . . . . . 11 (𝐴 ∈ dom arctan → -((log‘(1 + (i · 𝐴))) − (log‘(1 − (i · 𝐴)))) = ((log‘(1 + (i · -𝐴))) − (log‘(1 − (i · -𝐴)))))
3837fveq2d 6843 . . . . . . . . . 10 (𝐴 ∈ dom arctan → (ℑ‘-((log‘(1 + (i · 𝐴))) − (log‘(1 − (i · 𝐴))))) = (ℑ‘((log‘(1 + (i · -𝐴))) − (log‘(1 − (i · -𝐴))))))
3922, 38eqtr3d 2778 . . . . . . . . 9 (𝐴 ∈ dom arctan → -(ℑ‘((log‘(1 + (i · 𝐴))) − (log‘(1 − (i · 𝐴))))) = (ℑ‘((log‘(1 + (i · -𝐴))) − (log‘(1 − (i · -𝐴))))))
4039adantr 481 . . . . . . . 8 ((𝐴 ∈ dom arctan ∧ (ℜ‘𝐴) < 0) → -(ℑ‘((log‘(1 + (i · 𝐴))) − (log‘(1 − (i · 𝐴))))) = (ℑ‘((log‘(1 + (i · -𝐴))) − (log‘(1 − (i · -𝐴))))))
41 atandmneg 26240 . . . . . . . . . 10 (𝐴 ∈ dom arctan → -𝐴 ∈ dom arctan)
4217lt0neg1d 11720 . . . . . . . . . . . 12 (𝐴 ∈ dom arctan → ((ℜ‘𝐴) < 0 ↔ 0 < -(ℜ‘𝐴)))
4342biimpa 477 . . . . . . . . . . 11 ((𝐴 ∈ dom arctan ∧ (ℜ‘𝐴) < 0) → 0 < -(ℜ‘𝐴))
444adantr 481 . . . . . . . . . . . 12 ((𝐴 ∈ dom arctan ∧ (ℜ‘𝐴) < 0) → 𝐴 ∈ ℂ)
4544renegd 15086 . . . . . . . . . . 11 ((𝐴 ∈ dom arctan ∧ (ℜ‘𝐴) < 0) → (ℜ‘-𝐴) = -(ℜ‘𝐴))
4643, 45breqtrrd 5131 . . . . . . . . . 10 ((𝐴 ∈ dom arctan ∧ (ℜ‘𝐴) < 0) → 0 < (ℜ‘-𝐴))
47 atanlogsublem 26249 . . . . . . . . . 10 ((-𝐴 ∈ dom arctan ∧ 0 < (ℜ‘-𝐴)) → (ℑ‘((log‘(1 + (i · -𝐴))) − (log‘(1 − (i · -𝐴))))) ∈ (-π(,)π))
4841, 46, 47syl2an2r 683 . . . . . . . . 9 ((𝐴 ∈ dom arctan ∧ (ℜ‘𝐴) < 0) → (ℑ‘((log‘(1 + (i · -𝐴))) − (log‘(1 − (i · -𝐴))))) ∈ (-π(,)π))
49 picn 25800 . . . . . . . . . . 11 π ∈ ℂ
5049negnegi 11467 . . . . . . . . . 10 --π = π
5150oveq2i 7364 . . . . . . . . 9 (-π(,)--π) = (-π(,)π)
5248, 51eleqtrrdi 2849 . . . . . . . 8 ((𝐴 ∈ dom arctan ∧ (ℜ‘𝐴) < 0) → (ℑ‘((log‘(1 + (i · -𝐴))) − (log‘(1 − (i · -𝐴))))) ∈ (-π(,)--π))
5340, 52eqeltrd 2838 . . . . . . 7 ((𝐴 ∈ dom arctan ∧ (ℜ‘𝐴) < 0) → -(ℑ‘((log‘(1 + (i · 𝐴))) − (log‘(1 − (i · 𝐴))))) ∈ (-π(,)--π))
54 pire 25799 . . . . . . . . 9 π ∈ ℝ
5554renegcli 11458 . . . . . . . 8 -π ∈ ℝ
5615adantr 481 . . . . . . . . 9 ((𝐴 ∈ dom arctan ∧ (ℜ‘𝐴) < 0) → ((log‘(1 + (i · 𝐴))) − (log‘(1 − (i · 𝐴)))) ∈ ℂ)
5756imcld 15072 . . . . . . . 8 ((𝐴 ∈ dom arctan ∧ (ℜ‘𝐴) < 0) → (ℑ‘((log‘(1 + (i · 𝐴))) − (log‘(1 − (i · 𝐴))))) ∈ ℝ)
58 iooneg 13380 . . . . . . . 8 ((-π ∈ ℝ ∧ π ∈ ℝ ∧ (ℑ‘((log‘(1 + (i · 𝐴))) − (log‘(1 − (i · 𝐴))))) ∈ ℝ) → ((ℑ‘((log‘(1 + (i · 𝐴))) − (log‘(1 − (i · 𝐴))))) ∈ (-π(,)π) ↔ -(ℑ‘((log‘(1 + (i · 𝐴))) − (log‘(1 − (i · 𝐴))))) ∈ (-π(,)--π)))
5955, 54, 57, 58mp3an12i 1465 . . . . . . 7 ((𝐴 ∈ dom arctan ∧ (ℜ‘𝐴) < 0) → ((ℑ‘((log‘(1 + (i · 𝐴))) − (log‘(1 − (i · 𝐴))))) ∈ (-π(,)π) ↔ -(ℑ‘((log‘(1 + (i · 𝐴))) − (log‘(1 − (i · 𝐴))))) ∈ (-π(,)--π)))
6053, 59mpbird 256 . . . . . 6 ((𝐴 ∈ dom arctan ∧ (ℜ‘𝐴) < 0) → (ℑ‘((log‘(1 + (i · 𝐴))) − (log‘(1 − (i · 𝐴))))) ∈ (-π(,)π))
61 atanlogsublem 26249 . . . . . 6 ((𝐴 ∈ dom arctan ∧ 0 < (ℜ‘𝐴)) → (ℑ‘((log‘(1 + (i · 𝐴))) − (log‘(1 − (i · 𝐴))))) ∈ (-π(,)π))
6260, 61jaodan 956 . . . . 5 ((𝐴 ∈ dom arctan ∧ ((ℜ‘𝐴) < 0 ∨ 0 < (ℜ‘𝐴))) → (ℑ‘((log‘(1 + (i · 𝐴))) − (log‘(1 − (i · 𝐴))))) ∈ (-π(,)π))
6321, 62syldan 591 . . . 4 ((𝐴 ∈ dom arctan ∧ (ℜ‘𝐴) ≠ 0) → (ℑ‘((log‘(1 + (i · 𝐴))) − (log‘(1 − (i · 𝐴))))) ∈ (-π(,)π))
64 eliooord 13315 . . . 4 ((ℑ‘((log‘(1 + (i · 𝐴))) − (log‘(1 − (i · 𝐴))))) ∈ (-π(,)π) → (-π < (ℑ‘((log‘(1 + (i · 𝐴))) − (log‘(1 − (i · 𝐴))))) ∧ (ℑ‘((log‘(1 + (i · 𝐴))) − (log‘(1 − (i · 𝐴))))) < π))
6563, 64syl 17 . . 3 ((𝐴 ∈ dom arctan ∧ (ℜ‘𝐴) ≠ 0) → (-π < (ℑ‘((log‘(1 + (i · 𝐴))) − (log‘(1 − (i · 𝐴))))) ∧ (ℑ‘((log‘(1 + (i · 𝐴))) − (log‘(1 − (i · 𝐴))))) < π))
6665simpld 495 . 2 ((𝐴 ∈ dom arctan ∧ (ℜ‘𝐴) ≠ 0) → -π < (ℑ‘((log‘(1 + (i · 𝐴))) − (log‘(1 − (i · 𝐴))))))
6765simprd 496 . . 3 ((𝐴 ∈ dom arctan ∧ (ℜ‘𝐴) ≠ 0) → (ℑ‘((log‘(1 + (i · 𝐴))) − (log‘(1 − (i · 𝐴))))) < π)
6816imcld 15072 . . . 4 ((𝐴 ∈ dom arctan ∧ (ℜ‘𝐴) ≠ 0) → (ℑ‘((log‘(1 + (i · 𝐴))) − (log‘(1 − (i · 𝐴))))) ∈ ℝ)
69 ltle 11239 . . . 4 (((ℑ‘((log‘(1 + (i · 𝐴))) − (log‘(1 − (i · 𝐴))))) ∈ ℝ ∧ π ∈ ℝ) → ((ℑ‘((log‘(1 + (i · 𝐴))) − (log‘(1 − (i · 𝐴))))) < π → (ℑ‘((log‘(1 + (i · 𝐴))) − (log‘(1 − (i · 𝐴))))) ≤ π))
7068, 54, 69sylancl 586 . . 3 ((𝐴 ∈ dom arctan ∧ (ℜ‘𝐴) ≠ 0) → ((ℑ‘((log‘(1 + (i · 𝐴))) − (log‘(1 − (i · 𝐴))))) < π → (ℑ‘((log‘(1 + (i · 𝐴))) − (log‘(1 − (i · 𝐴))))) ≤ π))
7167, 70mpd 15 . 2 ((𝐴 ∈ dom arctan ∧ (ℜ‘𝐴) ≠ 0) → (ℑ‘((log‘(1 + (i · 𝐴))) − (log‘(1 − (i · 𝐴))))) ≤ π)
72 ellogrn 25899 . 2 (((log‘(1 + (i · 𝐴))) − (log‘(1 − (i · 𝐴)))) ∈ ran log ↔ (((log‘(1 + (i · 𝐴))) − (log‘(1 − (i · 𝐴)))) ∈ ℂ ∧ -π < (ℑ‘((log‘(1 + (i · 𝐴))) − (log‘(1 − (i · 𝐴))))) ∧ (ℑ‘((log‘(1 + (i · 𝐴))) − (log‘(1 − (i · 𝐴))))) ≤ π))
7316, 66, 71, 72syl3anbrc 1343 1 ((𝐴 ∈ dom arctan ∧ (ℜ‘𝐴) ≠ 0) → ((log‘(1 + (i · 𝐴))) − (log‘(1 − (i · 𝐴)))) ∈ ran log)
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 205  wa 396  wo 845   = wceq 1541  wcel 2106  wne 2941   class class class wbr 5103  dom cdm 5631  ran crn 5632  cfv 6493  (class class class)co 7353  cc 11045  cr 11046  0cc0 11047  1c1 11048  ici 11049   + caddc 11050   · cmul 11052   < clt 11185  cle 11186  cmin 11381  -cneg 11382  (,)cioo 13256  cre 14974  cim 14975  πcpi 15941  logclog 25894  arctancatan 26198
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1797  ax-4 1811  ax-5 1913  ax-6 1971  ax-7 2011  ax-8 2108  ax-9 2116  ax-10 2137  ax-11 2154  ax-12 2171  ax-ext 2707  ax-rep 5240  ax-sep 5254  ax-nul 5261  ax-pow 5318  ax-pr 5382  ax-un 7668  ax-inf2 9573  ax-cnex 11103  ax-resscn 11104  ax-1cn 11105  ax-icn 11106  ax-addcl 11107  ax-addrcl 11108  ax-mulcl 11109  ax-mulrcl 11110  ax-mulcom 11111  ax-addass 11112  ax-mulass 11113  ax-distr 11114  ax-i2m1 11115  ax-1ne0 11116  ax-1rid 11117  ax-rnegex 11118  ax-rrecex 11119  ax-cnre 11120  ax-pre-lttri 11121  ax-pre-lttrn 11122  ax-pre-ltadd 11123  ax-pre-mulgt0 11124  ax-pre-sup 11125  ax-addf 11126  ax-mulf 11127
This theorem depends on definitions:  df-bi 206  df-an 397  df-or 846  df-3or 1088  df-3an 1089  df-tru 1544  df-fal 1554  df-ex 1782  df-nf 1786  df-sb 2068  df-mo 2538  df-eu 2567  df-clab 2714  df-cleq 2728  df-clel 2814  df-nfc 2887  df-ne 2942  df-nel 3048  df-ral 3063  df-rex 3072  df-rmo 3351  df-reu 3352  df-rab 3406  df-v 3445  df-sbc 3738  df-csb 3854  df-dif 3911  df-un 3913  df-in 3915  df-ss 3925  df-pss 3927  df-nul 4281  df-if 4485  df-pw 4560  df-sn 4585  df-pr 4587  df-tp 4589  df-op 4591  df-uni 4864  df-int 4906  df-iun 4954  df-iin 4955  df-br 5104  df-opab 5166  df-mpt 5187  df-tr 5221  df-id 5529  df-eprel 5535  df-po 5543  df-so 5544  df-fr 5586  df-se 5587  df-we 5588  df-xp 5637  df-rel 5638  df-cnv 5639  df-co 5640  df-dm 5641  df-rn 5642  df-res 5643  df-ima 5644  df-pred 6251  df-ord 6318  df-on 6319  df-lim 6320  df-suc 6321  df-iota 6445  df-fun 6495  df-fn 6496  df-f 6497  df-f1 6498  df-fo 6499  df-f1o 6500  df-fv 6501  df-isom 6502  df-riota 7309  df-ov 7356  df-oprab 7357  df-mpo 7358  df-of 7613  df-om 7799  df-1st 7917  df-2nd 7918  df-supp 8089  df-frecs 8208  df-wrecs 8239  df-recs 8313  df-rdg 8352  df-1o 8408  df-2o 8409  df-er 8644  df-map 8763  df-pm 8764  df-ixp 8832  df-en 8880  df-dom 8881  df-sdom 8882  df-fin 8883  df-fsupp 9302  df-fi 9343  df-sup 9374  df-inf 9375  df-oi 9442  df-card 9871  df-pnf 11187  df-mnf 11188  df-xr 11189  df-ltxr 11190  df-le 11191  df-sub 11383  df-neg 11384  df-div 11809  df-nn 12150  df-2 12212  df-3 12213  df-4 12214  df-5 12215  df-6 12216  df-7 12217  df-8 12218  df-9 12219  df-n0 12410  df-z 12496  df-dec 12615  df-uz 12760  df-q 12866  df-rp 12908  df-xneg 13025  df-xadd 13026  df-xmul 13027  df-ioo 13260  df-ioc 13261  df-ico 13262  df-icc 13263  df-fz 13417  df-fzo 13560  df-fl 13689  df-mod 13767  df-seq 13899  df-exp 13960  df-fac 14166  df-bc 14195  df-hash 14223  df-shft 14944  df-cj 14976  df-re 14977  df-im 14978  df-sqrt 15112  df-abs 15113  df-limsup 15345  df-clim 15362  df-rlim 15363  df-sum 15563  df-ef 15942  df-sin 15944  df-cos 15945  df-tan 15946  df-pi 15947  df-struct 17011  df-sets 17028  df-slot 17046  df-ndx 17058  df-base 17076  df-ress 17105  df-plusg 17138  df-mulr 17139  df-starv 17140  df-sca 17141  df-vsca 17142  df-ip 17143  df-tset 17144  df-ple 17145  df-ds 17147  df-unif 17148  df-hom 17149  df-cco 17150  df-rest 17296  df-topn 17297  df-0g 17315  df-gsum 17316  df-topgen 17317  df-pt 17318  df-prds 17321  df-xrs 17376  df-qtop 17381  df-imas 17382  df-xps 17384  df-mre 17458  df-mrc 17459  df-acs 17461  df-mgm 18489  df-sgrp 18538  df-mnd 18549  df-submnd 18594  df-mulg 18864  df-cntz 19088  df-cmn 19555  df-psmet 20773  df-xmet 20774  df-met 20775  df-bl 20776  df-mopn 20777  df-fbas 20778  df-fg 20779  df-cnfld 20782  df-top 22227  df-topon 22244  df-topsp 22266  df-bases 22280  df-cld 22354  df-ntr 22355  df-cls 22356  df-nei 22433  df-lp 22471  df-perf 22472  df-cn 22562  df-cnp 22563  df-haus 22650  df-tx 22897  df-hmeo 23090  df-fil 23181  df-fm 23273  df-flim 23274  df-flf 23275  df-xms 23657  df-ms 23658  df-tms 23659  df-cncf 24225  df-limc 25214  df-dv 25215  df-log 25896  df-atan 26201
This theorem is referenced by:  atantan  26257
  Copyright terms: Public domain W3C validator