tanarg - Metamath Proof Explorer

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

Theorem tanarg 26467

Description: The basic relation between the "arg" function ℑ ∘ log and the arctangent. (Contributed by Mario Carneiro, 25-Feb-2015.)

**Assertion**
Ref	Expression
tanarg	⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (tan‘(ℑ‘(log‘𝐴))) = ((ℑ‘𝐴) / (ℜ‘𝐴)))

**Proof of Theorem tanarg**
Step	Hyp	Ref	Expression
1		fveq2 6891	. . . . . . . 8 ⊢ (𝐴 = 0 → (ℜ‘𝐴) = (ℜ‘0))
2		re0 15106	. . . . . . . 8 ⊢ (ℜ‘0) = 0
3	1, 2	eqtrdi 2787	. . . . . . 7 ⊢ (𝐴 = 0 → (ℜ‘𝐴) = 0)
4	3	necon3i 2972	. . . . . 6 ⊢ ((ℜ‘𝐴) ≠ 0 → 𝐴 ≠ 0)
5		logcl 26417	. . . . . 6 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0) → (log‘𝐴) ∈ ℂ)
6	4, 5	sylan2 592	. . . . 5 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (log‘𝐴) ∈ ℂ)
7	6	imcld 15149	. . . 4 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (ℑ‘(log‘𝐴)) ∈ ℝ)
8	7	recnd 11249	. . 3 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (ℑ‘(log‘𝐴)) ∈ ℂ)
9		sqcl 14090	. . . . . . 7 ⊢ (𝐴 ∈ ℂ → (𝐴↑2) ∈ ℂ)
10	9	adantr 480	. . . . . 6 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (𝐴↑2) ∈ ℂ)
11		abscl 15232	. . . . . . . . 9 ⊢ (𝐴 ∈ ℂ → (abs‘𝐴) ∈ ℝ)
12	11	adantr 480	. . . . . . . 8 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (abs‘𝐴) ∈ ℝ)
13	12	recnd 11249	. . . . . . 7 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (abs‘𝐴) ∈ ℂ)
14	13	sqcld 14116	. . . . . 6 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((abs‘𝐴)↑2) ∈ ℂ)
15		absrpcl 15242	. . . . . . . . 9 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0) → (abs‘𝐴) ∈ ℝ⁺)
16	4, 15	sylan2 592	. . . . . . . 8 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (abs‘𝐴) ∈ ℝ⁺)
17	16	rpne0d 13028	. . . . . . 7 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (abs‘𝐴) ≠ 0)
18		sqne0 14095	. . . . . . . 8 ⊢ ((abs‘𝐴) ∈ ℂ → (((abs‘𝐴)↑2) ≠ 0 ↔ (abs‘𝐴) ≠ 0))
19	13, 18	syl 17	. . . . . . 7 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (((abs‘𝐴)↑2) ≠ 0 ↔ (abs‘𝐴) ≠ 0))
20	17, 19	mpbird 257	. . . . . 6 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((abs‘𝐴)↑2) ≠ 0)
21	10, 14, 14, 20	divdird 12035	. . . . 5 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (((𝐴↑2) + ((abs‘𝐴)↑2)) / ((abs‘𝐴)↑2)) = (((𝐴↑2) / ((abs‘𝐴)↑2)) + (((abs‘𝐴)↑2) / ((abs‘𝐴)↑2))))
22		ax-icn 11175	. . . . . . . . 9 ⊢ i ∈ ℂ
23		mulcl 11200	. . . . . . . . 9 ⊢ ((i ∈ ℂ ∧ (ℑ‘(log‘𝐴)) ∈ ℂ) → (i · (ℑ‘(log‘𝐴))) ∈ ℂ)
24	22, 8, 23	sylancr 586	. . . . . . . 8 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (i · (ℑ‘(log‘𝐴))) ∈ ℂ)
25		2z 12601	. . . . . . . 8 ⊢ 2 ∈ ℤ
26		efexp 16051	. . . . . . . 8 ⊢ (((i · (ℑ‘(log‘𝐴))) ∈ ℂ ∧ 2 ∈ ℤ) → (exp‘(2 · (i · (ℑ‘(log‘𝐴))))) = ((exp‘(i · (ℑ‘(log‘𝐴))))↑2))
27	24, 25, 26	sylancl 585	. . . . . . 7 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (exp‘(2 · (i · (ℑ‘(log‘𝐴))))) = ((exp‘(i · (ℑ‘(log‘𝐴))))↑2))
28		efiarg 26455	. . . . . . . . 9 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0) → (exp‘(i · (ℑ‘(log‘𝐴)))) = (𝐴 / (abs‘𝐴)))
29	4, 28	sylan2 592	. . . . . . . 8 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (exp‘(i · (ℑ‘(log‘𝐴)))) = (𝐴 / (abs‘𝐴)))
30	29	oveq1d 7427	. . . . . . 7 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((exp‘(i · (ℑ‘(log‘𝐴))))↑2) = ((𝐴 / (abs‘𝐴))↑2))
31		simpl 482	. . . . . . . 8 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → 𝐴 ∈ ℂ)
32	31, 13, 17	sqdivd 14131	. . . . . . 7 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((𝐴 / (abs‘𝐴))↑2) = ((𝐴↑2) / ((abs‘𝐴)↑2)))
33	27, 30, 32	3eqtrrd 2776	. . . . . 6 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((𝐴↑2) / ((abs‘𝐴)↑2)) = (exp‘(2 · (i · (ℑ‘(log‘𝐴))))))
34	14, 20	dividd 11995	. . . . . 6 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (((abs‘𝐴)↑2) / ((abs‘𝐴)↑2)) = 1)
35	33, 34	oveq12d 7430	. . . . 5 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (((𝐴↑2) / ((abs‘𝐴)↑2)) + (((abs‘𝐴)↑2) / ((abs‘𝐴)↑2))) = ((exp‘(2 · (i · (ℑ‘(log‘𝐴))))) + 1))
36	21, 35	eqtr2d 2772	. . . 4 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((exp‘(2 · (i · (ℑ‘(log‘𝐴))))) + 1) = (((𝐴↑2) + ((abs‘𝐴)↑2)) / ((abs‘𝐴)↑2)))
37	10, 14	addcld 11240	. . . . 5 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((𝐴↑2) + ((abs‘𝐴)↑2)) ∈ ℂ)
38	22	a1i 11	. . . . . . . . . 10 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → i ∈ ℂ)
39		2cn 12294	. . . . . . . . . . 11 ⊢ 2 ∈ ℂ
40		recl 15064	. . . . . . . . . . . . . 14 ⊢ (𝐴 ∈ ℂ → (ℜ‘𝐴) ∈ ℝ)
41	40	adantr 480	. . . . . . . . . . . . 13 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (ℜ‘𝐴) ∈ ℝ)
42	41	recnd 11249	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (ℜ‘𝐴) ∈ ℂ)
43	42	sqcld 14116	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((ℜ‘𝐴)↑2) ∈ ℂ)
44		mulcl 11200	. . . . . . . . . . 11 ⊢ ((2 ∈ ℂ ∧ ((ℜ‘𝐴)↑2) ∈ ℂ) → (2 · ((ℜ‘𝐴)↑2)) ∈ ℂ)
45	39, 43, 44	sylancr 586	. . . . . . . . . 10 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (2 · ((ℜ‘𝐴)↑2)) ∈ ℂ)
46	39	a1i 11	. . . . . . . . . . . . 13 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → 2 ∈ ℂ)
47		imcl 15065	. . . . . . . . . . . . . . . 16 ⊢ (𝐴 ∈ ℂ → (ℑ‘𝐴) ∈ ℝ)
48	47	adantr 480	. . . . . . . . . . . . . . 15 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (ℑ‘𝐴) ∈ ℝ)
49	48	recnd 11249	. . . . . . . . . . . . . 14 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (ℑ‘𝐴) ∈ ℂ)
50	42, 49	mulcld 11241	. . . . . . . . . . . . 13 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((ℜ‘𝐴) · (ℑ‘𝐴)) ∈ ℂ)
51	38, 46, 50	mul12d 11430	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (i · (2 · ((ℜ‘𝐴) · (ℑ‘𝐴)))) = (2 · (i · ((ℜ‘𝐴) · (ℑ‘𝐴)))))
52	38, 42, 49	mul12d 11430	. . . . . . . . . . . . 13 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (i · ((ℜ‘𝐴) · (ℑ‘𝐴))) = ((ℜ‘𝐴) · (i · (ℑ‘𝐴))))
53	52	oveq2d 7428	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (2 · (i · ((ℜ‘𝐴) · (ℑ‘𝐴)))) = (2 · ((ℜ‘𝐴) · (i · (ℑ‘𝐴)))))
54	51, 53	eqtrd 2771	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (i · (2 · ((ℜ‘𝐴) · (ℑ‘𝐴)))) = (2 · ((ℜ‘𝐴) · (i · (ℑ‘𝐴)))))
55		mulcl 11200	. . . . . . . . . . . . . 14 ⊢ ((i ∈ ℂ ∧ (ℑ‘𝐴) ∈ ℂ) → (i · (ℑ‘𝐴)) ∈ ℂ)
56	22, 49, 55	sylancr 586	. . . . . . . . . . . . 13 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (i · (ℑ‘𝐴)) ∈ ℂ)
57	42, 56	mulcld 11241	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((ℜ‘𝐴) · (i · (ℑ‘𝐴))) ∈ ℂ)
58		mulcl 11200	. . . . . . . . . . . 12 ⊢ ((2 ∈ ℂ ∧ ((ℜ‘𝐴) · (i · (ℑ‘𝐴))) ∈ ℂ) → (2 · ((ℜ‘𝐴) · (i · (ℑ‘𝐴)))) ∈ ℂ)
59	39, 57, 58	sylancr 586	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (2 · ((ℜ‘𝐴) · (i · (ℑ‘𝐴)))) ∈ ℂ)
60	54, 59	eqeltrd 2832	. . . . . . . . . 10 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (i · (2 · ((ℜ‘𝐴) · (ℑ‘𝐴)))) ∈ ℂ)
61	38, 45, 60	adddid 11245	. . . . . . . . 9 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (i · ((2 · ((ℜ‘𝐴)↑2)) + (i · (2 · ((ℜ‘𝐴) · (ℑ‘𝐴)))))) = ((i · (2 · ((ℜ‘𝐴)↑2))) + (i · (i · (2 · ((ℜ‘𝐴) · (ℑ‘𝐴)))))))
62		mulcl 11200	. . . . . . . . . . . . 13 ⊢ (((ℜ‘𝐴) ∈ ℂ ∧ i ∈ ℂ) → ((ℜ‘𝐴) · i) ∈ ℂ)
63	42, 22, 62	sylancl 585	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((ℜ‘𝐴) · i) ∈ ℂ)
64	46, 63, 42	mulassd 11244	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((2 · ((ℜ‘𝐴) · i)) · (ℜ‘𝐴)) = (2 · (((ℜ‘𝐴) · i) · (ℜ‘𝐴))))
65	42	sqvald 14115	. . . . . . . . . . . . . 14 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((ℜ‘𝐴)↑2) = ((ℜ‘𝐴) · (ℜ‘𝐴)))
66	65	oveq1d 7427	. . . . . . . . . . . . 13 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (((ℜ‘𝐴)↑2) · i) = (((ℜ‘𝐴) · (ℜ‘𝐴)) · i))
67		mulcom 11202	. . . . . . . . . . . . . 14 ⊢ ((((ℜ‘𝐴)↑2) ∈ ℂ ∧ i ∈ ℂ) → (((ℜ‘𝐴)↑2) · i) = (i · ((ℜ‘𝐴)↑2)))
68	43, 22, 67	sylancl 585	. . . . . . . . . . . . 13 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (((ℜ‘𝐴)↑2) · i) = (i · ((ℜ‘𝐴)↑2)))
69	42, 42, 38	mul32d 11431	. . . . . . . . . . . . 13 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (((ℜ‘𝐴) · (ℜ‘𝐴)) · i) = (((ℜ‘𝐴) · i) · (ℜ‘𝐴)))
70	66, 68, 69	3eqtr3d 2779	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (i · ((ℜ‘𝐴)↑2)) = (((ℜ‘𝐴) · i) · (ℜ‘𝐴)))
71	70	oveq2d 7428	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (2 · (i · ((ℜ‘𝐴)↑2))) = (2 · (((ℜ‘𝐴) · i) · (ℜ‘𝐴))))
72	46, 38, 43	mul12d 11430	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (2 · (i · ((ℜ‘𝐴)↑2))) = (i · (2 · ((ℜ‘𝐴)↑2))))
73	64, 71, 72	3eqtr2d 2777	. . . . . . . . . 10 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((2 · ((ℜ‘𝐴) · i)) · (ℜ‘𝐴)) = (i · (2 · ((ℜ‘𝐴)↑2))))
74		ixi 11850	. . . . . . . . . . . . 13 ⊢ (i · i) = -1
75	74	oveq1i 7422	. . . . . . . . . . . 12 ⊢ ((i · i) · ((2 · (ℑ‘𝐴)) · (ℜ‘𝐴))) = (-1 · ((2 · (ℑ‘𝐴)) · (ℜ‘𝐴)))
76		mulcl 11200	. . . . . . . . . . . . . . 15 ⊢ ((2 ∈ ℂ ∧ (ℑ‘𝐴) ∈ ℂ) → (2 · (ℑ‘𝐴)) ∈ ℂ)
77	39, 49, 76	sylancr 586	. . . . . . . . . . . . . 14 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (2 · (ℑ‘𝐴)) ∈ ℂ)
78	77, 42	mulcld 11241	. . . . . . . . . . . . 13 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((2 · (ℑ‘𝐴)) · (ℜ‘𝐴)) ∈ ℂ)
79	38, 38, 78	mulassd 11244	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((i · i) · ((2 · (ℑ‘𝐴)) · (ℜ‘𝐴))) = (i · (i · ((2 · (ℑ‘𝐴)) · (ℜ‘𝐴)))))
80	75, 79	eqtr3id 2785	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (-1 · ((2 · (ℑ‘𝐴)) · (ℜ‘𝐴))) = (i · (i · ((2 · (ℑ‘𝐴)) · (ℜ‘𝐴)))))
81	78	mulm1d 11673	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (-1 · ((2 · (ℑ‘𝐴)) · (ℜ‘𝐴))) = -((2 · (ℑ‘𝐴)) · (ℜ‘𝐴)))
82	46, 49, 42	mulassd 11244	. . . . . . . . . . . . . 14 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((2 · (ℑ‘𝐴)) · (ℜ‘𝐴)) = (2 · ((ℑ‘𝐴) · (ℜ‘𝐴))))
83	49, 42	mulcomd 11242	. . . . . . . . . . . . . . 15 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((ℑ‘𝐴) · (ℜ‘𝐴)) = ((ℜ‘𝐴) · (ℑ‘𝐴)))
84	83	oveq2d 7428	. . . . . . . . . . . . . 14 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (2 · ((ℑ‘𝐴) · (ℜ‘𝐴))) = (2 · ((ℜ‘𝐴) · (ℑ‘𝐴))))
85	82, 84	eqtrd 2771	. . . . . . . . . . . . 13 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((2 · (ℑ‘𝐴)) · (ℜ‘𝐴)) = (2 · ((ℜ‘𝐴) · (ℑ‘𝐴))))
86	85	oveq2d 7428	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (i · ((2 · (ℑ‘𝐴)) · (ℜ‘𝐴))) = (i · (2 · ((ℜ‘𝐴) · (ℑ‘𝐴)))))
87	86	oveq2d 7428	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (i · (i · ((2 · (ℑ‘𝐴)) · (ℜ‘𝐴)))) = (i · (i · (2 · ((ℜ‘𝐴) · (ℑ‘𝐴))))))
88	80, 81, 87	3eqtr3d 2779	. . . . . . . . . 10 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → -((2 · (ℑ‘𝐴)) · (ℜ‘𝐴)) = (i · (i · (2 · ((ℜ‘𝐴) · (ℑ‘𝐴))))))
89	73, 88	oveq12d 7430	. . . . . . . . 9 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (((2 · ((ℜ‘𝐴) · i)) · (ℜ‘𝐴)) + -((2 · (ℑ‘𝐴)) · (ℜ‘𝐴))) = ((i · (2 · ((ℜ‘𝐴)↑2))) + (i · (i · (2 · ((ℜ‘𝐴) · (ℑ‘𝐴)))))))
90		mulcl 11200	. . . . . . . . . . . 12 ⊢ ((2 ∈ ℂ ∧ ((ℜ‘𝐴) · i) ∈ ℂ) → (2 · ((ℜ‘𝐴) · i)) ∈ ℂ)
91	39, 63, 90	sylancr 586	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (2 · ((ℜ‘𝐴) · i)) ∈ ℂ)
92	91, 42	mulcld 11241	. . . . . . . . . 10 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((2 · ((ℜ‘𝐴) · i)) · (ℜ‘𝐴)) ∈ ℂ)
93	92, 78	negsubd 11584	. . . . . . . . 9 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (((2 · ((ℜ‘𝐴) · i)) · (ℜ‘𝐴)) + -((2 · (ℑ‘𝐴)) · (ℜ‘𝐴))) = (((2 · ((ℜ‘𝐴) · i)) · (ℜ‘𝐴)) − ((2 · (ℑ‘𝐴)) · (ℜ‘𝐴))))
94	61, 89, 93	3eqtr2d 2777	. . . . . . . 8 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (i · ((2 · ((ℜ‘𝐴)↑2)) + (i · (2 · ((ℜ‘𝐴) · (ℑ‘𝐴)))))) = (((2 · ((ℜ‘𝐴) · i)) · (ℜ‘𝐴)) − ((2 · (ℑ‘𝐴)) · (ℜ‘𝐴))))
95	49	sqcld 14116	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((ℑ‘𝐴)↑2) ∈ ℂ)
96	59, 95	subcld 11578	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((2 · ((ℜ‘𝐴) · (i · (ℑ‘𝐴)))) − ((ℑ‘𝐴)↑2)) ∈ ℂ)
97	43, 96, 43, 95	add4d 11449	. . . . . . . . . 10 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((((ℜ‘𝐴)↑2) + ((2 · ((ℜ‘𝐴) · (i · (ℑ‘𝐴)))) − ((ℑ‘𝐴)↑2))) + (((ℜ‘𝐴)↑2) + ((ℑ‘𝐴)↑2))) = ((((ℜ‘𝐴)↑2) + ((ℜ‘𝐴)↑2)) + (((2 · ((ℜ‘𝐴) · (i · (ℑ‘𝐴)))) − ((ℑ‘𝐴)↑2)) + ((ℑ‘𝐴)↑2))))
98		replim 15070	. . . . . . . . . . . . . 14 ⊢ (𝐴 ∈ ℂ → 𝐴 = ((ℜ‘𝐴) + (i · (ℑ‘𝐴))))
99	98	adantr 480	. . . . . . . . . . . . 13 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → 𝐴 = ((ℜ‘𝐴) + (i · (ℑ‘𝐴))))
100	99	oveq1d 7427	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (𝐴↑2) = (((ℜ‘𝐴) + (i · (ℑ‘𝐴)))↑2))
101		binom2 14188	. . . . . . . . . . . . . 14 ⊢ (((ℜ‘𝐴) ∈ ℂ ∧ (i · (ℑ‘𝐴)) ∈ ℂ) → (((ℜ‘𝐴) + (i · (ℑ‘𝐴)))↑2) = ((((ℜ‘𝐴)↑2) + (2 · ((ℜ‘𝐴) · (i · (ℑ‘𝐴))))) + ((i · (ℑ‘𝐴))↑2)))
102	42, 56, 101	syl2anc 583	. . . . . . . . . . . . 13 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (((ℜ‘𝐴) + (i · (ℑ‘𝐴)))↑2) = ((((ℜ‘𝐴)↑2) + (2 · ((ℜ‘𝐴) · (i · (ℑ‘𝐴))))) + ((i · (ℑ‘𝐴))↑2)))
103		sqmul 14091	. . . . . . . . . . . . . . . . 17 ⊢ ((i ∈ ℂ ∧ (ℑ‘𝐴) ∈ ℂ) → ((i · (ℑ‘𝐴))↑2) = ((i↑2) · ((ℑ‘𝐴)↑2)))
104	22, 49, 103	sylancr 586	. . . . . . . . . . . . . . . 16 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((i · (ℑ‘𝐴))↑2) = ((i↑2) · ((ℑ‘𝐴)↑2)))
105		i2 14173	. . . . . . . . . . . . . . . . 17 ⊢ (i↑2) = -1
106	105	oveq1i 7422	. . . . . . . . . . . . . . . 16 ⊢ ((i↑2) · ((ℑ‘𝐴)↑2)) = (-1 · ((ℑ‘𝐴)↑2))
107	104, 106	eqtrdi 2787	. . . . . . . . . . . . . . 15 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((i · (ℑ‘𝐴))↑2) = (-1 · ((ℑ‘𝐴)↑2)))
108	95	mulm1d 11673	. . . . . . . . . . . . . . 15 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (-1 · ((ℑ‘𝐴)↑2)) = -((ℑ‘𝐴)↑2))
109	107, 108	eqtrd 2771	. . . . . . . . . . . . . 14 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((i · (ℑ‘𝐴))↑2) = -((ℑ‘𝐴)↑2))
110	109	oveq2d 7428	. . . . . . . . . . . . 13 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((((ℜ‘𝐴)↑2) + (2 · ((ℜ‘𝐴) · (i · (ℑ‘𝐴))))) + ((i · (ℑ‘𝐴))↑2)) = ((((ℜ‘𝐴)↑2) + (2 · ((ℜ‘𝐴) · (i · (ℑ‘𝐴))))) + -((ℑ‘𝐴)↑2)))
111	43, 59	addcld 11240	. . . . . . . . . . . . . 14 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (((ℜ‘𝐴)↑2) + (2 · ((ℜ‘𝐴) · (i · (ℑ‘𝐴))))) ∈ ℂ)
112	111, 95	negsubd 11584	. . . . . . . . . . . . 13 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((((ℜ‘𝐴)↑2) + (2 · ((ℜ‘𝐴) · (i · (ℑ‘𝐴))))) + -((ℑ‘𝐴)↑2)) = ((((ℜ‘𝐴)↑2) + (2 · ((ℜ‘𝐴) · (i · (ℑ‘𝐴))))) − ((ℑ‘𝐴)↑2)))
113	102, 110, 112	3eqtrd 2775	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (((ℜ‘𝐴) + (i · (ℑ‘𝐴)))↑2) = ((((ℜ‘𝐴)↑2) + (2 · ((ℜ‘𝐴) · (i · (ℑ‘𝐴))))) − ((ℑ‘𝐴)↑2)))
114	43, 59, 95	addsubassd 11598	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((((ℜ‘𝐴)↑2) + (2 · ((ℜ‘𝐴) · (i · (ℑ‘𝐴))))) − ((ℑ‘𝐴)↑2)) = (((ℜ‘𝐴)↑2) + ((2 · ((ℜ‘𝐴) · (i · (ℑ‘𝐴)))) − ((ℑ‘𝐴)↑2))))
115	100, 113, 114	3eqtrd 2775	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (𝐴↑2) = (((ℜ‘𝐴)↑2) + ((2 · ((ℜ‘𝐴) · (i · (ℑ‘𝐴)))) − ((ℑ‘𝐴)↑2))))
116		absvalsq2 15235	. . . . . . . . . . . 12 ⊢ (𝐴 ∈ ℂ → ((abs‘𝐴)↑2) = (((ℜ‘𝐴)↑2) + ((ℑ‘𝐴)↑2)))
117	116	adantr 480	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((abs‘𝐴)↑2) = (((ℜ‘𝐴)↑2) + ((ℑ‘𝐴)↑2)))
118	115, 117	oveq12d 7430	. . . . . . . . . 10 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((𝐴↑2) + ((abs‘𝐴)↑2)) = ((((ℜ‘𝐴)↑2) + ((2 · ((ℜ‘𝐴) · (i · (ℑ‘𝐴)))) − ((ℑ‘𝐴)↑2))) + (((ℜ‘𝐴)↑2) + ((ℑ‘𝐴)↑2))))
119	43	2timesd 12462	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (2 · ((ℜ‘𝐴)↑2)) = (((ℜ‘𝐴)↑2) + ((ℜ‘𝐴)↑2)))
120	59, 95	npcand 11582	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (((2 · ((ℜ‘𝐴) · (i · (ℑ‘𝐴)))) − ((ℑ‘𝐴)↑2)) + ((ℑ‘𝐴)↑2)) = (2 · ((ℜ‘𝐴) · (i · (ℑ‘𝐴)))))
121	53, 51, 120	3eqtr4d 2781	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (i · (2 · ((ℜ‘𝐴) · (ℑ‘𝐴)))) = (((2 · ((ℜ‘𝐴) · (i · (ℑ‘𝐴)))) − ((ℑ‘𝐴)↑2)) + ((ℑ‘𝐴)↑2)))
122	119, 121	oveq12d 7430	. . . . . . . . . 10 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((2 · ((ℜ‘𝐴)↑2)) + (i · (2 · ((ℜ‘𝐴) · (ℑ‘𝐴))))) = ((((ℜ‘𝐴)↑2) + ((ℜ‘𝐴)↑2)) + (((2 · ((ℜ‘𝐴) · (i · (ℑ‘𝐴)))) − ((ℑ‘𝐴)↑2)) + ((ℑ‘𝐴)↑2))))
123	97, 118, 122	3eqtr4d 2781	. . . . . . . . 9 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((𝐴↑2) + ((abs‘𝐴)↑2)) = ((2 · ((ℜ‘𝐴)↑2)) + (i · (2 · ((ℜ‘𝐴) · (ℑ‘𝐴))))))
124	123	oveq2d 7428	. . . . . . . 8 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (i · ((𝐴↑2) + ((abs‘𝐴)↑2))) = (i · ((2 · ((ℜ‘𝐴)↑2)) + (i · (2 · ((ℜ‘𝐴) · (ℑ‘𝐴)))))))
125	91, 77, 42	subdird 11678	. . . . . . . 8 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (((2 · ((ℜ‘𝐴) · i)) − (2 · (ℑ‘𝐴))) · (ℜ‘𝐴)) = (((2 · ((ℜ‘𝐴) · i)) · (ℜ‘𝐴)) − ((2 · (ℑ‘𝐴)) · (ℜ‘𝐴))))
126	94, 124, 125	3eqtr4d 2781	. . . . . . 7 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (i · ((𝐴↑2) + ((abs‘𝐴)↑2))) = (((2 · ((ℜ‘𝐴) · i)) − (2 · (ℑ‘𝐴))) · (ℜ‘𝐴)))
127	91, 77	subcld 11578	. . . . . . . 8 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((2 · ((ℜ‘𝐴) · i)) − (2 · (ℑ‘𝐴))) ∈ ℂ)
128		mulcom 11202	. . . . . . . . . . 11 ⊢ (((ℜ‘𝐴) ∈ ℂ ∧ i ∈ ℂ) → ((ℜ‘𝐴) · i) = (i · (ℜ‘𝐴)))
129	42, 22, 128	sylancl 585	. . . . . . . . . 10 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((ℜ‘𝐴) · i) = (i · (ℜ‘𝐴)))
130		simpr 484	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (ℜ‘𝐴) ≠ 0)
131		eleq1 2820	. . . . . . . . . . . . . 14 ⊢ ((i · (ℜ‘𝐴)) = (ℑ‘𝐴) → ((i · (ℜ‘𝐴)) ∈ ℝ ↔ (ℑ‘𝐴) ∈ ℝ))
132	48, 131	syl5ibrcom 246	. . . . . . . . . . . . 13 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((i · (ℜ‘𝐴)) = (ℑ‘𝐴) → (i · (ℜ‘𝐴)) ∈ ℝ))
133		rimul 12210	. . . . . . . . . . . . 13 ⊢ (((ℜ‘𝐴) ∈ ℝ ∧ (i · (ℜ‘𝐴)) ∈ ℝ) → (ℜ‘𝐴) = 0)
134	41, 132, 133	syl6an 681	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((i · (ℜ‘𝐴)) = (ℑ‘𝐴) → (ℜ‘𝐴) = 0))
135	134	necon3d 2960	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((ℜ‘𝐴) ≠ 0 → (i · (ℜ‘𝐴)) ≠ (ℑ‘𝐴)))
136	130, 135	mpd 15	. . . . . . . . . 10 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (i · (ℜ‘𝐴)) ≠ (ℑ‘𝐴))
137	129, 136	eqnetrd 3007	. . . . . . . . 9 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((ℜ‘𝐴) · i) ≠ (ℑ‘𝐴))
138	91, 77	subeq0ad 11588	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (((2 · ((ℜ‘𝐴) · i)) − (2 · (ℑ‘𝐴))) = 0 ↔ (2 · ((ℜ‘𝐴) · i)) = (2 · (ℑ‘𝐴))))
139		2ne0 12323	. . . . . . . . . . . . 13 ⊢ 2 ≠ 0
140	139	a1i 11	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → 2 ≠ 0)
141	63, 49, 46, 140	mulcand 11854	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((2 · ((ℜ‘𝐴) · i)) = (2 · (ℑ‘𝐴)) ↔ ((ℜ‘𝐴) · i) = (ℑ‘𝐴)))
142	138, 141	bitrd 279	. . . . . . . . . 10 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (((2 · ((ℜ‘𝐴) · i)) − (2 · (ℑ‘𝐴))) = 0 ↔ ((ℜ‘𝐴) · i) = (ℑ‘𝐴)))
143	142	necon3bid 2984	. . . . . . . . 9 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (((2 · ((ℜ‘𝐴) · i)) − (2 · (ℑ‘𝐴))) ≠ 0 ↔ ((ℜ‘𝐴) · i) ≠ (ℑ‘𝐴)))
144	137, 143	mpbird 257	. . . . . . . 8 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((2 · ((ℜ‘𝐴) · i)) − (2 · (ℑ‘𝐴))) ≠ 0)
145	127, 42, 144, 130	mulne0d 11873	. . . . . . 7 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (((2 · ((ℜ‘𝐴) · i)) − (2 · (ℑ‘𝐴))) · (ℜ‘𝐴)) ≠ 0)
146	126, 145	eqnetrd 3007	. . . . . 6 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (i · ((𝐴↑2) + ((abs‘𝐴)↑2))) ≠ 0)
147		oveq2 7420	. . . . . . . 8 ⊢ (((𝐴↑2) + ((abs‘𝐴)↑2)) = 0 → (i · ((𝐴↑2) + ((abs‘𝐴)↑2))) = (i · 0))
148		it0e0 12441	. . . . . . . 8 ⊢ (i · 0) = 0
149	147, 148	eqtrdi 2787	. . . . . . 7 ⊢ (((𝐴↑2) + ((abs‘𝐴)↑2)) = 0 → (i · ((𝐴↑2) + ((abs‘𝐴)↑2))) = 0)
150	149	necon3i 2972	. . . . . 6 ⊢ ((i · ((𝐴↑2) + ((abs‘𝐴)↑2))) ≠ 0 → ((𝐴↑2) + ((abs‘𝐴)↑2)) ≠ 0)
151	146, 150	syl 17	. . . . 5 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((𝐴↑2) + ((abs‘𝐴)↑2)) ≠ 0)
152	37, 14, 151, 20	divne0d 12013	. . . 4 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (((𝐴↑2) + ((abs‘𝐴)↑2)) / ((abs‘𝐴)↑2)) ≠ 0)
153	36, 152	eqnetrd 3007	. . 3 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((exp‘(2 · (i · (ℑ‘(log‘𝐴))))) + 1) ≠ 0)
154		tanval3 16084	. . 3 ⊢ (((ℑ‘(log‘𝐴)) ∈ ℂ ∧ ((exp‘(2 · (i · (ℑ‘(log‘𝐴))))) + 1) ≠ 0) → (tan‘(ℑ‘(log‘𝐴))) = (((exp‘(2 · (i · (ℑ‘(log‘𝐴))))) − 1) / (i · ((exp‘(2 · (i · (ℑ‘(log‘𝐴))))) + 1))))
155	8, 153, 154	syl2anc 583	. 2 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (tan‘(ℑ‘(log‘𝐴))) = (((exp‘(2 · (i · (ℑ‘(log‘𝐴))))) − 1) / (i · ((exp‘(2 · (i · (ℑ‘(log‘𝐴))))) + 1))))
156	10, 14, 14, 20	divsubdird 12036	. . . 4 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (((𝐴↑2) − ((abs‘𝐴)↑2)) / ((abs‘𝐴)↑2)) = (((𝐴↑2) / ((abs‘𝐴)↑2)) − (((abs‘𝐴)↑2) / ((abs‘𝐴)↑2))))
157	33, 34	oveq12d 7430	. . . 4 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (((𝐴↑2) / ((abs‘𝐴)↑2)) − (((abs‘𝐴)↑2) / ((abs‘𝐴)↑2))) = ((exp‘(2 · (i · (ℑ‘(log‘𝐴))))) − 1))
158	156, 157	eqtr2d 2772	. . 3 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((exp‘(2 · (i · (ℑ‘(log‘𝐴))))) − 1) = (((𝐴↑2) − ((abs‘𝐴)↑2)) / ((abs‘𝐴)↑2)))
159	36	oveq2d 7428	. . . 4 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (i · ((exp‘(2 · (i · (ℑ‘(log‘𝐴))))) + 1)) = (i · (((𝐴↑2) + ((abs‘𝐴)↑2)) / ((abs‘𝐴)↑2))))
160	38, 37, 14, 20	divassd 12032	. . . 4 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((i · ((𝐴↑2) + ((abs‘𝐴)↑2))) / ((abs‘𝐴)↑2)) = (i · (((𝐴↑2) + ((abs‘𝐴)↑2)) / ((abs‘𝐴)↑2))))
161	159, 160	eqtr4d 2774	. . 3 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (i · ((exp‘(2 · (i · (ℑ‘(log‘𝐴))))) + 1)) = ((i · ((𝐴↑2) + ((abs‘𝐴)↑2))) / ((abs‘𝐴)↑2)))
162	158, 161	oveq12d 7430	. 2 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (((exp‘(2 · (i · (ℑ‘(log‘𝐴))))) − 1) / (i · ((exp‘(2 · (i · (ℑ‘(log‘𝐴))))) + 1))) = ((((𝐴↑2) − ((abs‘𝐴)↑2)) / ((abs‘𝐴)↑2)) / ((i · ((𝐴↑2) + ((abs‘𝐴)↑2))) / ((abs‘𝐴)↑2))))
163	10, 14	subcld 11578	. . . 4 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((𝐴↑2) − ((abs‘𝐴)↑2)) ∈ ℂ)
164		mulcl 11200	. . . . 5 ⊢ ((i ∈ ℂ ∧ ((𝐴↑2) + ((abs‘𝐴)↑2)) ∈ ℂ) → (i · ((𝐴↑2) + ((abs‘𝐴)↑2))) ∈ ℂ)
165	22, 37, 164	sylancr 586	. . . 4 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (i · ((𝐴↑2) + ((abs‘𝐴)↑2))) ∈ ℂ)
166	163, 165, 14, 146, 20	divcan7d 12025	. . 3 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((((𝐴↑2) − ((abs‘𝐴)↑2)) / ((abs‘𝐴)↑2)) / ((i · ((𝐴↑2) + ((abs‘𝐴)↑2))) / ((abs‘𝐴)↑2))) = (((𝐴↑2) − ((abs‘𝐴)↑2)) / (i · ((𝐴↑2) + ((abs‘𝐴)↑2)))))
167	115, 117	oveq12d 7430	. . . . 5 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((𝐴↑2) − ((abs‘𝐴)↑2)) = ((((ℜ‘𝐴)↑2) + ((2 · ((ℜ‘𝐴) · (i · (ℑ‘𝐴)))) − ((ℑ‘𝐴)↑2))) − (((ℜ‘𝐴)↑2) + ((ℑ‘𝐴)↑2))))
168	43, 96, 95	pnpcand 11615	. . . . 5 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((((ℜ‘𝐴)↑2) + ((2 · ((ℜ‘𝐴) · (i · (ℑ‘𝐴)))) − ((ℑ‘𝐴)↑2))) − (((ℜ‘𝐴)↑2) + ((ℑ‘𝐴)↑2))) = (((2 · ((ℜ‘𝐴) · (i · (ℑ‘𝐴)))) − ((ℑ‘𝐴)↑2)) − ((ℑ‘𝐴)↑2)))
169	59, 95, 95	subsub4d 11609	. . . . . 6 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (((2 · ((ℜ‘𝐴) · (i · (ℑ‘𝐴)))) − ((ℑ‘𝐴)↑2)) − ((ℑ‘𝐴)↑2)) = ((2 · ((ℜ‘𝐴) · (i · (ℑ‘𝐴)))) − (((ℑ‘𝐴)↑2) + ((ℑ‘𝐴)↑2))))
170	95	2timesd 12462	. . . . . . 7 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (2 · ((ℑ‘𝐴)↑2)) = (((ℑ‘𝐴)↑2) + ((ℑ‘𝐴)↑2)))
171	170	oveq2d 7428	. . . . . 6 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((2 · ((ℜ‘𝐴) · (i · (ℑ‘𝐴)))) − (2 · ((ℑ‘𝐴)↑2))) = ((2 · ((ℜ‘𝐴) · (i · (ℑ‘𝐴)))) − (((ℑ‘𝐴)↑2) + ((ℑ‘𝐴)↑2))))
172	46, 63, 49	mulassd 11244	. . . . . . . . 9 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((2 · ((ℜ‘𝐴) · i)) · (ℑ‘𝐴)) = (2 · (((ℜ‘𝐴) · i) · (ℑ‘𝐴))))
173	42, 38, 49	mulassd 11244	. . . . . . . . . 10 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (((ℜ‘𝐴) · i) · (ℑ‘𝐴)) = ((ℜ‘𝐴) · (i · (ℑ‘𝐴))))
174	173	oveq2d 7428	. . . . . . . . 9 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (2 · (((ℜ‘𝐴) · i) · (ℑ‘𝐴))) = (2 · ((ℜ‘𝐴) · (i · (ℑ‘𝐴)))))
175	172, 174	eqtr2d 2772	. . . . . . . 8 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (2 · ((ℜ‘𝐴) · (i · (ℑ‘𝐴)))) = ((2 · ((ℜ‘𝐴) · i)) · (ℑ‘𝐴)))
176	49	sqvald 14115	. . . . . . . . . 10 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((ℑ‘𝐴)↑2) = ((ℑ‘𝐴) · (ℑ‘𝐴)))
177	176	oveq2d 7428	. . . . . . . . 9 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (2 · ((ℑ‘𝐴)↑2)) = (2 · ((ℑ‘𝐴) · (ℑ‘𝐴))))
178	46, 49, 49	mulassd 11244	. . . . . . . . 9 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((2 · (ℑ‘𝐴)) · (ℑ‘𝐴)) = (2 · ((ℑ‘𝐴) · (ℑ‘𝐴))))
179	177, 178	eqtr4d 2774	. . . . . . . 8 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (2 · ((ℑ‘𝐴)↑2)) = ((2 · (ℑ‘𝐴)) · (ℑ‘𝐴)))
180	175, 179	oveq12d 7430	. . . . . . 7 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((2 · ((ℜ‘𝐴) · (i · (ℑ‘𝐴)))) − (2 · ((ℑ‘𝐴)↑2))) = (((2 · ((ℜ‘𝐴) · i)) · (ℑ‘𝐴)) − ((2 · (ℑ‘𝐴)) · (ℑ‘𝐴))))
181	91, 77, 49	subdird 11678	. . . . . . 7 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (((2 · ((ℜ‘𝐴) · i)) − (2 · (ℑ‘𝐴))) · (ℑ‘𝐴)) = (((2 · ((ℜ‘𝐴) · i)) · (ℑ‘𝐴)) − ((2 · (ℑ‘𝐴)) · (ℑ‘𝐴))))
182	180, 181	eqtr4d 2774	. . . . . 6 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((2 · ((ℜ‘𝐴) · (i · (ℑ‘𝐴)))) − (2 · ((ℑ‘𝐴)↑2))) = (((2 · ((ℜ‘𝐴) · i)) − (2 · (ℑ‘𝐴))) · (ℑ‘𝐴)))
183	169, 171, 182	3eqtr2d 2777	. . . . 5 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (((2 · ((ℜ‘𝐴) · (i · (ℑ‘𝐴)))) − ((ℑ‘𝐴)↑2)) − ((ℑ‘𝐴)↑2)) = (((2 · ((ℜ‘𝐴) · i)) − (2 · (ℑ‘𝐴))) · (ℑ‘𝐴)))
184	167, 168, 183	3eqtrd 2775	. . . 4 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((𝐴↑2) − ((abs‘𝐴)↑2)) = (((2 · ((ℜ‘𝐴) · i)) − (2 · (ℑ‘𝐴))) · (ℑ‘𝐴)))
185	184, 126	oveq12d 7430	. . 3 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (((𝐴↑2) − ((abs‘𝐴)↑2)) / (i · ((𝐴↑2) + ((abs‘𝐴)↑2)))) = ((((2 · ((ℜ‘𝐴) · i)) − (2 · (ℑ‘𝐴))) · (ℑ‘𝐴)) / (((2 · ((ℜ‘𝐴) · i)) − (2 · (ℑ‘𝐴))) · (ℜ‘𝐴))))
186	49, 42, 127, 130, 144	divcan5d 12023	. . 3 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((((2 · ((ℜ‘𝐴) · i)) − (2 · (ℑ‘𝐴))) · (ℑ‘𝐴)) / (((2 · ((ℜ‘𝐴) · i)) − (2 · (ℑ‘𝐴))) · (ℜ‘𝐴))) = ((ℑ‘𝐴) / (ℜ‘𝐴)))
187	166, 185, 186	3eqtrd 2775	. 2 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((((𝐴↑2) − ((abs‘𝐴)↑2)) / ((abs‘𝐴)↑2)) / ((i · ((𝐴↑2) + ((abs‘𝐴)↑2))) / ((abs‘𝐴)↑2))) = ((ℑ‘𝐴) / (ℜ‘𝐴)))
188	155, 162, 187	3eqtrd 2775	1 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (tan‘(ℑ‘(log‘𝐴))) = ((ℑ‘𝐴) / (ℜ‘𝐴)))

Colors of variables: wff setvar class

Syntax hints: → wi 4 ↔ wb 205 ∧ wa 395 = wceq 1540 ∈ wcel 2105 ≠ wne 2939 ‘cfv 6543 (class class class)co 7412 ℂcc 11114 ℝcr 11115 0cc0 11116 1c1 11117 ici 11118 + caddc 11119 · cmul 11121 − cmin 11451 -cneg 11452 / cdiv 11878 2c2 12274 ℤcz 12565 ℝ⁺crp 12981 ↑cexp 14034 ℜcre 15051 ℑcim 15052 abscabs 15188 expce 16012 tanctan 16016 logclog 26403

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1796 ax-4 1810 ax-5 1912 ax-6 1970 ax-7 2010 ax-8 2107 ax-9 2115 ax-10 2136 ax-11 2153 ax-12 2170 ax-ext 2702 ax-rep 5285 ax-sep 5299 ax-nul 5306 ax-pow 5363 ax-pr 5427 ax-un 7729 ax-inf2 9642 ax-cnex 11172 ax-resscn 11173 ax-1cn 11174 ax-icn 11175 ax-addcl 11176 ax-addrcl 11177 ax-mulcl 11178 ax-mulrcl 11179 ax-mulcom 11180 ax-addass 11181 ax-mulass 11182 ax-distr 11183 ax-i2m1 11184 ax-1ne0 11185 ax-1rid 11186 ax-rnegex 11187 ax-rrecex 11188 ax-cnre 11189 ax-pre-lttri 11190 ax-pre-lttrn 11191 ax-pre-ltadd 11192 ax-pre-mulgt0 11193 ax-pre-sup 11194 ax-addf 11195

This theorem depends on definitions: df-bi 206 df-an 396 df-or 845 df-3or 1087 df-3an 1088 df-tru 1543 df-fal 1553 df-ex 1781 df-nf 1785 df-sb 2067 df-mo 2533 df-eu 2562 df-clab 2709 df-cleq 2723 df-clel 2809 df-nfc 2884 df-ne 2940 df-nel 3046 df-ral 3061 df-rex 3070 df-rmo 3375 df-reu 3376 df-rab 3432 df-v 3475 df-sbc 3778 df-csb 3894 df-dif 3951 df-un 3953 df-in 3955 df-ss 3965 df-pss 3967 df-nul 4323 df-if 4529 df-pw 4604 df-sn 4629 df-pr 4631 df-tp 4633 df-op 4635 df-uni 4909 df-int 4951 df-iun 4999 df-iin 5000 df-br 5149 df-opab 5211 df-mpt 5232 df-tr 5266 df-id 5574 df-eprel 5580 df-po 5588 df-so 5589 df-fr 5631 df-se 5632 df-we 5633 df-xp 5682 df-rel 5683 df-cnv 5684 df-co 5685 df-dm 5686 df-rn 5687 df-res 5688 df-ima 5689 df-pred 6300 df-ord 6367 df-on 6368 df-lim 6369 df-suc 6370 df-iota 6495 df-fun 6545 df-fn 6546 df-f 6547 df-f1 6548 df-fo 6549 df-f1o 6550 df-fv 6551 df-isom 6552 df-riota 7368 df-ov 7415 df-oprab 7416 df-mpo 7417 df-of 7674 df-om 7860 df-1st 7979 df-2nd 7980 df-supp 8152 df-frecs 8272 df-wrecs 8303 df-recs 8377 df-rdg 8416 df-1o 8472 df-2o 8473 df-er 8709 df-map 8828 df-pm 8829 df-ixp 8898 df-en 8946 df-dom 8947 df-sdom 8948 df-fin 8949 df-fsupp 9368 df-fi 9412 df-sup 9443 df-inf 9444 df-oi 9511 df-card 9940 df-pnf 11257 df-mnf 11258 df-xr 11259 df-ltxr 11260 df-le 11261 df-sub 11453 df-neg 11454 df-div 11879 df-nn 12220 df-2 12282 df-3 12283 df-4 12284 df-5 12285 df-6 12286 df-7 12287 df-8 12288 df-9 12289 df-n0 12480 df-z 12566 df-dec 12685 df-uz 12830 df-q 12940 df-rp 12982 df-xneg 13099 df-xadd 13100 df-xmul 13101 df-ioo 13335 df-ioc 13336 df-ico 13337 df-icc 13338 df-fz 13492 df-fzo 13635 df-fl 13764 df-mod 13842 df-seq 13974 df-exp 14035 df-fac 14241 df-bc 14270 df-hash 14298 df-shft 15021 df-cj 15053 df-re 15054 df-im 15055 df-sqrt 15189 df-abs 15190 df-limsup 15422 df-clim 15439 df-rlim 15440 df-sum 15640 df-ef 16018 df-sin 16020 df-cos 16021 df-tan 16022 df-pi 16023 df-struct 17087 df-sets 17104 df-slot 17122 df-ndx 17134 df-base 17152 df-ress 17181 df-plusg 17217 df-mulr 17218 df-starv 17219 df-sca 17220 df-vsca 17221 df-ip 17222 df-tset 17223 df-ple 17224 df-ds 17226 df-unif 17227 df-hom 17228 df-cco 17229 df-rest 17375 df-topn 17376 df-0g 17394 df-gsum 17395 df-topgen 17396 df-pt 17397 df-prds 17400 df-xrs 17455 df-qtop 17460 df-imas 17461 df-xps 17463 df-mre 17537 df-mrc 17538 df-acs 17540 df-mgm 18571 df-sgrp 18650 df-mnd 18666 df-submnd 18712 df-mulg 18994 df-cntz 19229 df-cmn 19698 df-psmet 21225 df-xmet 21226 df-met 21227 df-bl 21228 df-mopn 21229 df-fbas 21230 df-fg 21231 df-cnfld 21234 df-top 22716 df-topon 22733 df-topsp 22755 df-bases 22769 df-cld 22843 df-ntr 22844 df-cls 22845 df-nei 22922 df-lp 22960 df-perf 22961 df-cn 23051 df-cnp 23052 df-haus 23139 df-tx 23386 df-hmeo 23579 df-fil 23670 df-fm 23762 df-flim 23763 df-flf 23764 df-xms 24146 df-ms 24147 df-tms 24148 df-cncf 24718 df-limc 25715 df-dv 25716 df-log 26405

This theorem is referenced by: logcnlem4 26493 atanlogsublem 26761

W3C validator