Theorem tanarg 26596

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 6834	. . . . . . . 8 ⊢ (𝐴 = 0 → (ℜ‘𝐴) = (ℜ‘0))
2		re0 15105	. . . . . . . 8 ⊢ (ℜ‘0) = 0
3	1, 2	eqtrdi 2788	. . . . . . 7 ⊢ (𝐴 = 0 → (ℜ‘𝐴) = 0)
4	3	necon3i 2965	. . . . . 6 ⊢ ((ℜ‘𝐴) ≠ 0 → 𝐴 ≠ 0)
5		logcl 26545	. . . . . 6 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0) → (log‘𝐴) ∈ ℂ)
6	4, 5	sylan2 594	. . . . 5 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (log‘𝐴) ∈ ℂ)
7	6	imcld 15148	. . . 4 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (ℑ‘(log‘𝐴)) ∈ ℝ)
8	7	recnd 11164	. . 3 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (ℑ‘(log‘𝐴)) ∈ ℂ)
9		sqcl 14071	. . . . . . 7 ⊢ (𝐴 ∈ ℂ → (𝐴↑2) ∈ ℂ)
10	9	adantr 480	. . . . . 6 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (𝐴↑2) ∈ ℂ)
11		abscl 15231	. . . . . . . . 9 ⊢ (𝐴 ∈ ℂ → (abs‘𝐴) ∈ ℝ)
12	11	adantr 480	. . . . . . . 8 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (abs‘𝐴) ∈ ℝ)
13	12	recnd 11164	. . . . . . 7 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (abs‘𝐴) ∈ ℂ)
14	13	sqcld 14097	. . . . . 6 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((abs‘𝐴)↑2) ∈ ℂ)
15		absrpcl 15241	. . . . . . . . 9 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0) → (abs‘𝐴) ∈ ℝ+)
16	4, 15	sylan2 594	. . . . . . . 8 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (abs‘𝐴) ∈ ℝ+)
17	16	rpne0d 12982	. . . . . . 7 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (abs‘𝐴) ≠ 0)
18		sqne0 14076	. . . . . . . 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 11960	. . . . 5 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (((𝐴↑2) + ((abs‘𝐴)↑2)) / ((abs‘𝐴)↑2)) = (((𝐴↑2) / ((abs‘𝐴)↑2)) + (((abs‘𝐴)↑2) / ((abs‘𝐴)↑2))))
22		ax-icn 11088	. . . . . . . . 9 ⊢ i ∈ ℂ
23		mulcl 11113	. . . . . . . . 9 ⊢ ((i ∈ ℂ ∧ (ℑ‘(log‘𝐴)) ∈ ℂ) → (i · (ℑ‘(log‘𝐴))) ∈ ℂ)
24	22, 8, 23	sylancr 588	. . . . . . . 8 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (i · (ℑ‘(log‘𝐴))) ∈ ℂ)
25		2z 12550	. . . . . . . 8 ⊢ 2 ∈ ℤ
26		efexp 16059	. . . . . . . 8 ⊢ (((i · (ℑ‘(log‘𝐴))) ∈ ℂ ∧ 2 ∈ ℤ) → (exp‘(2 · (i · (ℑ‘(log‘𝐴))))) = ((exp‘(i · (ℑ‘(log‘𝐴))))↑2))
27	24, 25, 26	sylancl 587	. . . . . . 7 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (exp‘(2 · (i · (ℑ‘(log‘𝐴))))) = ((exp‘(i · (ℑ‘(log‘𝐴))))↑2))
28		efiarg 26584	. . . . . . . . 9 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0) → (exp‘(i · (ℑ‘(log‘𝐴)))) = (𝐴 / (abs‘𝐴)))
29	4, 28	sylan2 594	. . . . . . . 8 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (exp‘(i · (ℑ‘(log‘𝐴)))) = (𝐴 / (abs‘𝐴)))
30	29	oveq1d 7375	. . . . . . 7 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((exp‘(i · (ℑ‘(log‘𝐴))))↑2) = ((𝐴 / (abs‘𝐴))↑2))
31		simpl 482	. . . . . . . 8 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → 𝐴 ∈ ℂ)
32	31, 13, 17	sqdivd 14112	. . . . . . 7 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((𝐴 / (abs‘𝐴))↑2) = ((𝐴↑2) / ((abs‘𝐴)↑2)))
33	27, 30, 32	3eqtrrd 2777	. . . . . 6 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((𝐴↑2) / ((abs‘𝐴)↑2)) = (exp‘(2 · (i · (ℑ‘(log‘𝐴))))))
34	14, 20	dividd 11920	. . . . . 6 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (((abs‘𝐴)↑2) / ((abs‘𝐴)↑2)) = 1)
35	33, 34	oveq12d 7378	. . . . 5 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (((𝐴↑2) / ((abs‘𝐴)↑2)) + (((abs‘𝐴)↑2) / ((abs‘𝐴)↑2))) = ((exp‘(2 · (i · (ℑ‘(log‘𝐴))))) + 1))
36	21, 35	eqtr2d 2773	. . . 4 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((exp‘(2 · (i · (ℑ‘(log‘𝐴))))) + 1) = (((𝐴↑2) + ((abs‘𝐴)↑2)) / ((abs‘𝐴)↑2)))
37	10, 14	addcld 11155	. . . . 5 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((𝐴↑2) + ((abs‘𝐴)↑2)) ∈ ℂ)
38	22	a1i 11	. . . . . . . . . 10 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → i ∈ ℂ)
39		2cn 12247	. . . . . . . . . . 11 ⊢ 2 ∈ ℂ
40		recl 15063	. . . . . . . . . . . . . 14 ⊢ (𝐴 ∈ ℂ → (ℜ‘𝐴) ∈ ℝ)
41	40	adantr 480	. . . . . . . . . . . . 13 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (ℜ‘𝐴) ∈ ℝ)
42	41	recnd 11164	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (ℜ‘𝐴) ∈ ℂ)
43	42	sqcld 14097	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((ℜ‘𝐴)↑2) ∈ ℂ)
44		mulcl 11113	. . . . . . . . . . 11 ⊢ ((2 ∈ ℂ ∧ ((ℜ‘𝐴)↑2) ∈ ℂ) → (2 · ((ℜ‘𝐴)↑2)) ∈ ℂ)
45	39, 43, 44	sylancr 588	. . . . . . . . . 10 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (2 · ((ℜ‘𝐴)↑2)) ∈ ℂ)
46	39	a1i 11	. . . . . . . . . . . . 13 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → 2 ∈ ℂ)
47		imcl 15064	. . . . . . . . . . . . . . . 16 ⊢ (𝐴 ∈ ℂ → (ℑ‘𝐴) ∈ ℝ)
48	47	adantr 480	. . . . . . . . . . . . . . 15 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (ℑ‘𝐴) ∈ ℝ)
49	48	recnd 11164	. . . . . . . . . . . . . 14 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (ℑ‘𝐴) ∈ ℂ)
50	42, 49	mulcld 11156	. . . . . . . . . . . . 13 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((ℜ‘𝐴) · (ℑ‘𝐴)) ∈ ℂ)
51	38, 46, 50	mul12d 11346	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (i · (2 · ((ℜ‘𝐴) · (ℑ‘𝐴)))) = (2 · (i · ((ℜ‘𝐴) · (ℑ‘𝐴)))))
52	38, 42, 49	mul12d 11346	. . . . . . . . . . . . 13 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (i · ((ℜ‘𝐴) · (ℑ‘𝐴))) = ((ℜ‘𝐴) · (i · (ℑ‘𝐴))))
53	52	oveq2d 7376	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (2 · (i · ((ℜ‘𝐴) · (ℑ‘𝐴)))) = (2 · ((ℜ‘𝐴) · (i · (ℑ‘𝐴)))))
54	51, 53	eqtrd 2772	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (i · (2 · ((ℜ‘𝐴) · (ℑ‘𝐴)))) = (2 · ((ℜ‘𝐴) · (i · (ℑ‘𝐴)))))
55		mulcl 11113	. . . . . . . . . . . . . 14 ⊢ ((i ∈ ℂ ∧ (ℑ‘𝐴) ∈ ℂ) → (i · (ℑ‘𝐴)) ∈ ℂ)
56	22, 49, 55	sylancr 588	. . . . . . . . . . . . 13 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (i · (ℑ‘𝐴)) ∈ ℂ)
57	42, 56	mulcld 11156	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((ℜ‘𝐴) · (i · (ℑ‘𝐴))) ∈ ℂ)
58		mulcl 11113	. . . . . . . . . . . 12 ⊢ ((2 ∈ ℂ ∧ ((ℜ‘𝐴) · (i · (ℑ‘𝐴))) ∈ ℂ) → (2 · ((ℜ‘𝐴) · (i · (ℑ‘𝐴)))) ∈ ℂ)
59	39, 57, 58	sylancr 588	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (2 · ((ℜ‘𝐴) · (i · (ℑ‘𝐴)))) ∈ ℂ)
60	54, 59	eqeltrd 2837	. . . . . . . . . 10 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (i · (2 · ((ℜ‘𝐴) · (ℑ‘𝐴)))) ∈ ℂ)
61	38, 45, 60	adddid 11160	. . . . . . . . 9 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (i · ((2 · ((ℜ‘𝐴)↑2)) + (i · (2 · ((ℜ‘𝐴) · (ℑ‘𝐴)))))) = ((i · (2 · ((ℜ‘𝐴)↑2))) + (i · (i · (2 · ((ℜ‘𝐴) · (ℑ‘𝐴)))))))
62		mulcl 11113	. . . . . . . . . . . . 13 ⊢ (((ℜ‘𝐴) ∈ ℂ ∧ i ∈ ℂ) → ((ℜ‘𝐴) · i) ∈ ℂ)
63	42, 22, 62	sylancl 587	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((ℜ‘𝐴) · i) ∈ ℂ)
64	46, 63, 42	mulassd 11159	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((2 · ((ℜ‘𝐴) · i)) · (ℜ‘𝐴)) = (2 · (((ℜ‘𝐴) · i) · (ℜ‘𝐴))))
65	42	sqvald 14096	. . . . . . . . . . . . . 14 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((ℜ‘𝐴)↑2) = ((ℜ‘𝐴) · (ℜ‘𝐴)))
66	65	oveq1d 7375	. . . . . . . . . . . . 13 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (((ℜ‘𝐴)↑2) · i) = (((ℜ‘𝐴) · (ℜ‘𝐴)) · i))
67		mulcom 11115	. . . . . . . . . . . . . 14 ⊢ ((((ℜ‘𝐴)↑2) ∈ ℂ ∧ i ∈ ℂ) → (((ℜ‘𝐴)↑2) · i) = (i · ((ℜ‘𝐴)↑2)))
68	43, 22, 67	sylancl 587	. . . . . . . . . . . . 13 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (((ℜ‘𝐴)↑2) · i) = (i · ((ℜ‘𝐴)↑2)))
69	42, 42, 38	mul32d 11347	. . . . . . . . . . . . 13 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (((ℜ‘𝐴) · (ℜ‘𝐴)) · i) = (((ℜ‘𝐴) · i) · (ℜ‘𝐴)))
70	66, 68, 69	3eqtr3d 2780	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (i · ((ℜ‘𝐴)↑2)) = (((ℜ‘𝐴) · i) · (ℜ‘𝐴)))
71	70	oveq2d 7376	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (2 · (i · ((ℜ‘𝐴)↑2))) = (2 · (((ℜ‘𝐴) · i) · (ℜ‘𝐴))))
72	46, 38, 43	mul12d 11346	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (2 · (i · ((ℜ‘𝐴)↑2))) = (i · (2 · ((ℜ‘𝐴)↑2))))
73	64, 71, 72	3eqtr2d 2778	. . . . . . . . . 10 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((2 · ((ℜ‘𝐴) · i)) · (ℜ‘𝐴)) = (i · (2 · ((ℜ‘𝐴)↑2))))
74		ixi 11770	. . . . . . . . . . . . 13 ⊢ (i · i) = -1
75	74	oveq1i 7370	. . . . . . . . . . . 12 ⊢ ((i · i) · ((2 · (ℑ‘𝐴)) · (ℜ‘𝐴))) = (-1 · ((2 · (ℑ‘𝐴)) · (ℜ‘𝐴)))
76		mulcl 11113	. . . . . . . . . . . . . . 15 ⊢ ((2 ∈ ℂ ∧ (ℑ‘𝐴) ∈ ℂ) → (2 · (ℑ‘𝐴)) ∈ ℂ)
77	39, 49, 76	sylancr 588	. . . . . . . . . . . . . 14 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (2 · (ℑ‘𝐴)) ∈ ℂ)
78	77, 42	mulcld 11156	. . . . . . . . . . . . 13 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((2 · (ℑ‘𝐴)) · (ℜ‘𝐴)) ∈ ℂ)
79	38, 38, 78	mulassd 11159	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((i · i) · ((2 · (ℑ‘𝐴)) · (ℜ‘𝐴))) = (i · (i · ((2 · (ℑ‘𝐴)) · (ℜ‘𝐴)))))
80	75, 79	eqtr3id 2786	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (-1 · ((2 · (ℑ‘𝐴)) · (ℜ‘𝐴))) = (i · (i · ((2 · (ℑ‘𝐴)) · (ℜ‘𝐴)))))
81	78	mulm1d 11593	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (-1 · ((2 · (ℑ‘𝐴)) · (ℜ‘𝐴))) = -((2 · (ℑ‘𝐴)) · (ℜ‘𝐴)))
82	46, 49, 42	mulassd 11159	. . . . . . . . . . . . . 14 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((2 · (ℑ‘𝐴)) · (ℜ‘𝐴)) = (2 · ((ℑ‘𝐴) · (ℜ‘𝐴))))
83	49, 42	mulcomd 11157	. . . . . . . . . . . . . . 15 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((ℑ‘𝐴) · (ℜ‘𝐴)) = ((ℜ‘𝐴) · (ℑ‘𝐴)))
84	83	oveq2d 7376	. . . . . . . . . . . . . 14 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (2 · ((ℑ‘𝐴) · (ℜ‘𝐴))) = (2 · ((ℜ‘𝐴) · (ℑ‘𝐴))))
85	82, 84	eqtrd 2772	. . . . . . . . . . . . 13 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((2 · (ℑ‘𝐴)) · (ℜ‘𝐴)) = (2 · ((ℜ‘𝐴) · (ℑ‘𝐴))))
86	85	oveq2d 7376	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (i · ((2 · (ℑ‘𝐴)) · (ℜ‘𝐴))) = (i · (2 · ((ℜ‘𝐴) · (ℑ‘𝐴)))))
87	86	oveq2d 7376	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (i · (i · ((2 · (ℑ‘𝐴)) · (ℜ‘𝐴)))) = (i · (i · (2 · ((ℜ‘𝐴) · (ℑ‘𝐴))))))
88	80, 81, 87	3eqtr3d 2780	. . . . . . . . . 10 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → -((2 · (ℑ‘𝐴)) · (ℜ‘𝐴)) = (i · (i · (2 · ((ℜ‘𝐴) · (ℑ‘𝐴))))))
89	73, 88	oveq12d 7378	. . . . . . . . 9 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (((2 · ((ℜ‘𝐴) · i)) · (ℜ‘𝐴)) + -((2 · (ℑ‘𝐴)) · (ℜ‘𝐴))) = ((i · (2 · ((ℜ‘𝐴)↑2))) + (i · (i · (2 · ((ℜ‘𝐴) · (ℑ‘𝐴)))))))
90		mulcl 11113	. . . . . . . . . . . 12 ⊢ ((2 ∈ ℂ ∧ ((ℜ‘𝐴) · i) ∈ ℂ) → (2 · ((ℜ‘𝐴) · i)) ∈ ℂ)
91	39, 63, 90	sylancr 588	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (2 · ((ℜ‘𝐴) · i)) ∈ ℂ)
92	91, 42	mulcld 11156	. . . . . . . . . 10 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((2 · ((ℜ‘𝐴) · i)) · (ℜ‘𝐴)) ∈ ℂ)
93	92, 78	negsubd 11502	. . . . . . . . 9 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (((2 · ((ℜ‘𝐴) · i)) · (ℜ‘𝐴)) + -((2 · (ℑ‘𝐴)) · (ℜ‘𝐴))) = (((2 · ((ℜ‘𝐴) · i)) · (ℜ‘𝐴)) − ((2 · (ℑ‘𝐴)) · (ℜ‘𝐴))))
94	61, 89, 93	3eqtr2d 2778	. . . . . . . 8 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (i · ((2 · ((ℜ‘𝐴)↑2)) + (i · (2 · ((ℜ‘𝐴) · (ℑ‘𝐴)))))) = (((2 · ((ℜ‘𝐴) · i)) · (ℜ‘𝐴)) − ((2 · (ℑ‘𝐴)) · (ℜ‘𝐴))))
95	49	sqcld 14097	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((ℑ‘𝐴)↑2) ∈ ℂ)
96	59, 95	subcld 11496	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((2 · ((ℜ‘𝐴) · (i · (ℑ‘𝐴)))) − ((ℑ‘𝐴)↑2)) ∈ ℂ)
97	43, 96, 43, 95	add4d 11366	. . . . . . . . . 10 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((((ℜ‘𝐴)↑2) + ((2 · ((ℜ‘𝐴) · (i · (ℑ‘𝐴)))) − ((ℑ‘𝐴)↑2))) + (((ℜ‘𝐴)↑2) + ((ℑ‘𝐴)↑2))) = ((((ℜ‘𝐴)↑2) + ((ℜ‘𝐴)↑2)) + (((2 · ((ℜ‘𝐴) · (i · (ℑ‘𝐴)))) − ((ℑ‘𝐴)↑2)) + ((ℑ‘𝐴)↑2))))
98		replim 15069	. . . . . . . . . . . . . 14 ⊢ (𝐴 ∈ ℂ → 𝐴 = ((ℜ‘𝐴) + (i · (ℑ‘𝐴))))
99	98	adantr 480	. . . . . . . . . . . . 13 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → 𝐴 = ((ℜ‘𝐴) + (i · (ℑ‘𝐴))))
100	99	oveq1d 7375	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (𝐴↑2) = (((ℜ‘𝐴) + (i · (ℑ‘𝐴)))↑2))
101		binom2 14170	. . . . . . . . . . . . . 14 ⊢ (((ℜ‘𝐴) ∈ ℂ ∧ (i · (ℑ‘𝐴)) ∈ ℂ) → (((ℜ‘𝐴) + (i · (ℑ‘𝐴)))↑2) = ((((ℜ‘𝐴)↑2) + (2 · ((ℜ‘𝐴) · (i · (ℑ‘𝐴))))) + ((i · (ℑ‘𝐴))↑2)))
102	42, 56, 101	syl2anc 585	. . . . . . . . . . . . 13 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (((ℜ‘𝐴) + (i · (ℑ‘𝐴)))↑2) = ((((ℜ‘𝐴)↑2) + (2 · ((ℜ‘𝐴) · (i · (ℑ‘𝐴))))) + ((i · (ℑ‘𝐴))↑2)))
103		sqmul 14072	. . . . . . . . . . . . . . . . 17 ⊢ ((i ∈ ℂ ∧ (ℑ‘𝐴) ∈ ℂ) → ((i · (ℑ‘𝐴))↑2) = ((i↑2) · ((ℑ‘𝐴)↑2)))
104	22, 49, 103	sylancr 588	. . . . . . . . . . . . . . . 16 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((i · (ℑ‘𝐴))↑2) = ((i↑2) · ((ℑ‘𝐴)↑2)))
105		i2 14155	. . . . . . . . . . . . . . . . 17 ⊢ (i↑2) = -1
106	105	oveq1i 7370	. . . . . . . . . . . . . . . 16 ⊢ ((i↑2) · ((ℑ‘𝐴)↑2)) = (-1 · ((ℑ‘𝐴)↑2))
107	104, 106	eqtrdi 2788	. . . . . . . . . . . . . . 15 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((i · (ℑ‘𝐴))↑2) = (-1 · ((ℑ‘𝐴)↑2)))
108	95	mulm1d 11593	. . . . . . . . . . . . . . 15 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (-1 · ((ℑ‘𝐴)↑2)) = -((ℑ‘𝐴)↑2))
109	107, 108	eqtrd 2772	. . . . . . . . . . . . . 14 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((i · (ℑ‘𝐴))↑2) = -((ℑ‘𝐴)↑2))
110	109	oveq2d 7376	. . . . . . . . . . . . 13 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((((ℜ‘𝐴)↑2) + (2 · ((ℜ‘𝐴) · (i · (ℑ‘𝐴))))) + ((i · (ℑ‘𝐴))↑2)) = ((((ℜ‘𝐴)↑2) + (2 · ((ℜ‘𝐴) · (i · (ℑ‘𝐴))))) + -((ℑ‘𝐴)↑2)))
111	43, 59	addcld 11155	. . . . . . . . . . . . . 14 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (((ℜ‘𝐴)↑2) + (2 · ((ℜ‘𝐴) · (i · (ℑ‘𝐴))))) ∈ ℂ)
112	111, 95	negsubd 11502	. . . . . . . . . . . . 13 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((((ℜ‘𝐴)↑2) + (2 · ((ℜ‘𝐴) · (i · (ℑ‘𝐴))))) + -((ℑ‘𝐴)↑2)) = ((((ℜ‘𝐴)↑2) + (2 · ((ℜ‘𝐴) · (i · (ℑ‘𝐴))))) − ((ℑ‘𝐴)↑2)))
113	102, 110, 112	3eqtrd 2776	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (((ℜ‘𝐴) + (i · (ℑ‘𝐴)))↑2) = ((((ℜ‘𝐴)↑2) + (2 · ((ℜ‘𝐴) · (i · (ℑ‘𝐴))))) − ((ℑ‘𝐴)↑2)))
114	43, 59, 95	addsubassd 11516	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((((ℜ‘𝐴)↑2) + (2 · ((ℜ‘𝐴) · (i · (ℑ‘𝐴))))) − ((ℑ‘𝐴)↑2)) = (((ℜ‘𝐴)↑2) + ((2 · ((ℜ‘𝐴) · (i · (ℑ‘𝐴)))) − ((ℑ‘𝐴)↑2))))
115	100, 113, 114	3eqtrd 2776	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (𝐴↑2) = (((ℜ‘𝐴)↑2) + ((2 · ((ℜ‘𝐴) · (i · (ℑ‘𝐴)))) − ((ℑ‘𝐴)↑2))))
116		absvalsq2 15234	. . . . . . . . . . . 12 ⊢ (𝐴 ∈ ℂ → ((abs‘𝐴)↑2) = (((ℜ‘𝐴)↑2) + ((ℑ‘𝐴)↑2)))
117	116	adantr 480	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((abs‘𝐴)↑2) = (((ℜ‘𝐴)↑2) + ((ℑ‘𝐴)↑2)))
118	115, 117	oveq12d 7378	. . . . . . . . . 10 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((𝐴↑2) + ((abs‘𝐴)↑2)) = ((((ℜ‘𝐴)↑2) + ((2 · ((ℜ‘𝐴) · (i · (ℑ‘𝐴)))) − ((ℑ‘𝐴)↑2))) + (((ℜ‘𝐴)↑2) + ((ℑ‘𝐴)↑2))))
119	43	2timesd 12411	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (2 · ((ℜ‘𝐴)↑2)) = (((ℜ‘𝐴)↑2) + ((ℜ‘𝐴)↑2)))
120	59, 95	npcand 11500	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (((2 · ((ℜ‘𝐴) · (i · (ℑ‘𝐴)))) − ((ℑ‘𝐴)↑2)) + ((ℑ‘𝐴)↑2)) = (2 · ((ℜ‘𝐴) · (i · (ℑ‘𝐴)))))
121	53, 51, 120	3eqtr4d 2782	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (i · (2 · ((ℜ‘𝐴) · (ℑ‘𝐴)))) = (((2 · ((ℜ‘𝐴) · (i · (ℑ‘𝐴)))) − ((ℑ‘𝐴)↑2)) + ((ℑ‘𝐴)↑2)))
122	119, 121	oveq12d 7378	. . . . . . . . . 10 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((2 · ((ℜ‘𝐴)↑2)) + (i · (2 · ((ℜ‘𝐴) · (ℑ‘𝐴))))) = ((((ℜ‘𝐴)↑2) + ((ℜ‘𝐴)↑2)) + (((2 · ((ℜ‘𝐴) · (i · (ℑ‘𝐴)))) − ((ℑ‘𝐴)↑2)) + ((ℑ‘𝐴)↑2))))
123	97, 118, 122	3eqtr4d 2782	. . . . . . . . 9 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((𝐴↑2) + ((abs‘𝐴)↑2)) = ((2 · ((ℜ‘𝐴)↑2)) + (i · (2 · ((ℜ‘𝐴) · (ℑ‘𝐴))))))
124	123	oveq2d 7376	. . . . . . . 8 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (i · ((𝐴↑2) + ((abs‘𝐴)↑2))) = (i · ((2 · ((ℜ‘𝐴)↑2)) + (i · (2 · ((ℜ‘𝐴) · (ℑ‘𝐴)))))))
125	91, 77, 42	subdird 11598	. . . . . . . 8 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (((2 · ((ℜ‘𝐴) · i)) − (2 · (ℑ‘𝐴))) · (ℜ‘𝐴)) = (((2 · ((ℜ‘𝐴) · i)) · (ℜ‘𝐴)) − ((2 · (ℑ‘𝐴)) · (ℜ‘𝐴))))
126	94, 124, 125	3eqtr4d 2782	. . . . . . 7 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (i · ((𝐴↑2) + ((abs‘𝐴)↑2))) = (((2 · ((ℜ‘𝐴) · i)) − (2 · (ℑ‘𝐴))) · (ℜ‘𝐴)))
127	91, 77	subcld 11496	. . . . . . . 8 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((2 · ((ℜ‘𝐴) · i)) − (2 · (ℑ‘𝐴))) ∈ ℂ)
128		mulcom 11115	. . . . . . . . . . 11 ⊢ (((ℜ‘𝐴) ∈ ℂ ∧ i ∈ ℂ) → ((ℜ‘𝐴) · i) = (i · (ℜ‘𝐴)))
129	42, 22, 128	sylancl 587	. . . . . . . . . 10 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((ℜ‘𝐴) · i) = (i · (ℜ‘𝐴)))
130		simpr 484	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (ℜ‘𝐴) ≠ 0)
131		eleq1 2825	. . . . . . . . . . . . . 14 ⊢ ((i · (ℜ‘𝐴)) = (ℑ‘𝐴) → ((i · (ℜ‘𝐴)) ∈ ℝ ↔ (ℑ‘𝐴) ∈ ℝ))
132	48, 131	syl5ibrcom 247	. . . . . . . . . . . . 13 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((i · (ℜ‘𝐴)) = (ℑ‘𝐴) → (i · (ℜ‘𝐴)) ∈ ℝ))
133		rimul 12141	. . . . . . . . . . . . 13 ⊢ (((ℜ‘𝐴) ∈ ℝ ∧ (i · (ℜ‘𝐴)) ∈ ℝ) → (ℜ‘𝐴) = 0)
134	41, 132, 133	syl6an 685	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((i · (ℜ‘𝐴)) = (ℑ‘𝐴) → (ℜ‘𝐴) = 0))
135	134	necon3d 2954	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((ℜ‘𝐴) ≠ 0 → (i · (ℜ‘𝐴)) ≠ (ℑ‘𝐴)))
136	130, 135	mpd 15	. . . . . . . . . 10 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (i · (ℜ‘𝐴)) ≠ (ℑ‘𝐴))
137	129, 136	eqnetrd 3000	. . . . . . . . 9 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((ℜ‘𝐴) · i) ≠ (ℑ‘𝐴))
138	91, 77	subeq0ad 11506	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (((2 · ((ℜ‘𝐴) · i)) − (2 · (ℑ‘𝐴))) = 0 ↔ (2 · ((ℜ‘𝐴) · i)) = (2 · (ℑ‘𝐴))))
139		2ne0 12276	. . . . . . . . . . . . 13 ⊢ 2 ≠ 0
140	139	a1i 11	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → 2 ≠ 0)
141	63, 49, 46, 140	mulcand 11774	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((2 · ((ℜ‘𝐴) · i)) = (2 · (ℑ‘𝐴)) ↔ ((ℜ‘𝐴) · i) = (ℑ‘𝐴)))
142	138, 141	bitrd 279	. . . . . . . . . 10 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (((2 · ((ℜ‘𝐴) · i)) − (2 · (ℑ‘𝐴))) = 0 ↔ ((ℜ‘𝐴) · i) = (ℑ‘𝐴)))
143	142	necon3bid 2977	. . . . . . . . 9 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (((2 · ((ℜ‘𝐴) · i)) − (2 · (ℑ‘𝐴))) ≠ 0 ↔ ((ℜ‘𝐴) · i) ≠ (ℑ‘𝐴)))
144	137, 143	mpbird 257	. . . . . . . 8 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((2 · ((ℜ‘𝐴) · i)) − (2 · (ℑ‘𝐴))) ≠ 0)
145	127, 42, 144, 130	mulne0d 11793	. . . . . . 7 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (((2 · ((ℜ‘𝐴) · i)) − (2 · (ℑ‘𝐴))) · (ℜ‘𝐴)) ≠ 0)
146	126, 145	eqnetrd 3000	. . . . . 6 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (i · ((𝐴↑2) + ((abs‘𝐴)↑2))) ≠ 0)
147		oveq2 7368	. . . . . . . 8 ⊢ (((𝐴↑2) + ((abs‘𝐴)↑2)) = 0 → (i · ((𝐴↑2) + ((abs‘𝐴)↑2))) = (i · 0))
148		it0e0 12391	. . . . . . . 8 ⊢ (i · 0) = 0
149	147, 148	eqtrdi 2788	. . . . . . 7 ⊢ (((𝐴↑2) + ((abs‘𝐴)↑2)) = 0 → (i · ((𝐴↑2) + ((abs‘𝐴)↑2))) = 0)
150	149	necon3i 2965	. . . . . 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 11938	. . . 4 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (((𝐴↑2) + ((abs‘𝐴)↑2)) / ((abs‘𝐴)↑2)) ≠ 0)
153	36, 152	eqnetrd 3000	. . 3 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((exp‘(2 · (i · (ℑ‘(log‘𝐴))))) + 1) ≠ 0)
154		tanval3 16092	. . 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 585	. 2 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (tan‘(ℑ‘(log‘𝐴))) = (((exp‘(2 · (i · (ℑ‘(log‘𝐴))))) − 1) / (i · ((exp‘(2 · (i · (ℑ‘(log‘𝐴))))) + 1))))
156	10, 14, 14, 20	divsubdird 11961	. . . 4 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (((𝐴↑2) − ((abs‘𝐴)↑2)) / ((abs‘𝐴)↑2)) = (((𝐴↑2) / ((abs‘𝐴)↑2)) − (((abs‘𝐴)↑2) / ((abs‘𝐴)↑2))))
157	33, 34	oveq12d 7378	. . . 4 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (((𝐴↑2) / ((abs‘𝐴)↑2)) − (((abs‘𝐴)↑2) / ((abs‘𝐴)↑2))) = ((exp‘(2 · (i · (ℑ‘(log‘𝐴))))) − 1))
158	156, 157	eqtr2d 2773	. . 3 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((exp‘(2 · (i · (ℑ‘(log‘𝐴))))) − 1) = (((𝐴↑2) − ((abs‘𝐴)↑2)) / ((abs‘𝐴)↑2)))
159	36	oveq2d 7376	. . . 4 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (i · ((exp‘(2 · (i · (ℑ‘(log‘𝐴))))) + 1)) = (i · (((𝐴↑2) + ((abs‘𝐴)↑2)) / ((abs‘𝐴)↑2))))
160	38, 37, 14, 20	divassd 11957	. . . 4 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((i · ((𝐴↑2) + ((abs‘𝐴)↑2))) / ((abs‘𝐴)↑2)) = (i · (((𝐴↑2) + ((abs‘𝐴)↑2)) / ((abs‘𝐴)↑2))))
161	159, 160	eqtr4d 2775	. . 3 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (i · ((exp‘(2 · (i · (ℑ‘(log‘𝐴))))) + 1)) = ((i · ((𝐴↑2) + ((abs‘𝐴)↑2))) / ((abs‘𝐴)↑2)))
162	158, 161	oveq12d 7378	. 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 11496	. . . 4 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((𝐴↑2) − ((abs‘𝐴)↑2)) ∈ ℂ)
164		mulcl 11113	. . . . 5 ⊢ ((i ∈ ℂ ∧ ((𝐴↑2) + ((abs‘𝐴)↑2)) ∈ ℂ) → (i · ((𝐴↑2) + ((abs‘𝐴)↑2))) ∈ ℂ)
165	22, 37, 164	sylancr 588	. . . 4 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (i · ((𝐴↑2) + ((abs‘𝐴)↑2))) ∈ ℂ)
166	163, 165, 14, 146, 20	divcan7d 11950	. . 3 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((((𝐴↑2) − ((abs‘𝐴)↑2)) / ((abs‘𝐴)↑2)) / ((i · ((𝐴↑2) + ((abs‘𝐴)↑2))) / ((abs‘𝐴)↑2))) = (((𝐴↑2) − ((abs‘𝐴)↑2)) / (i · ((𝐴↑2) + ((abs‘𝐴)↑2)))))
167	115, 117	oveq12d 7378	. . . . 5 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((𝐴↑2) − ((abs‘𝐴)↑2)) = ((((ℜ‘𝐴)↑2) + ((2 · ((ℜ‘𝐴) · (i · (ℑ‘𝐴)))) − ((ℑ‘𝐴)↑2))) − (((ℜ‘𝐴)↑2) + ((ℑ‘𝐴)↑2))))
168	43, 96, 95	pnpcand 11533	. . . . 5 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((((ℜ‘𝐴)↑2) + ((2 · ((ℜ‘𝐴) · (i · (ℑ‘𝐴)))) − ((ℑ‘𝐴)↑2))) − (((ℜ‘𝐴)↑2) + ((ℑ‘𝐴)↑2))) = (((2 · ((ℜ‘𝐴) · (i · (ℑ‘𝐴)))) − ((ℑ‘𝐴)↑2)) − ((ℑ‘𝐴)↑2)))
169	59, 95, 95	subsub4d 11527	. . . . . 6 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (((2 · ((ℜ‘𝐴) · (i · (ℑ‘𝐴)))) − ((ℑ‘𝐴)↑2)) − ((ℑ‘𝐴)↑2)) = ((2 · ((ℜ‘𝐴) · (i · (ℑ‘𝐴)))) − (((ℑ‘𝐴)↑2) + ((ℑ‘𝐴)↑2))))
170	95	2timesd 12411	. . . . . . 7 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (2 · ((ℑ‘𝐴)↑2)) = (((ℑ‘𝐴)↑2) + ((ℑ‘𝐴)↑2)))
171	170	oveq2d 7376	. . . . . 6 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((2 · ((ℜ‘𝐴) · (i · (ℑ‘𝐴)))) − (2 · ((ℑ‘𝐴)↑2))) = ((2 · ((ℜ‘𝐴) · (i · (ℑ‘𝐴)))) − (((ℑ‘𝐴)↑2) + ((ℑ‘𝐴)↑2))))
172	46, 63, 49	mulassd 11159	. . . . . . . . 9 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((2 · ((ℜ‘𝐴) · i)) · (ℑ‘𝐴)) = (2 · (((ℜ‘𝐴) · i) · (ℑ‘𝐴))))
173	42, 38, 49	mulassd 11159	. . . . . . . . . 10 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (((ℜ‘𝐴) · i) · (ℑ‘𝐴)) = ((ℜ‘𝐴) · (i · (ℑ‘𝐴))))
174	173	oveq2d 7376	. . . . . . . . 9 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (2 · (((ℜ‘𝐴) · i) · (ℑ‘𝐴))) = (2 · ((ℜ‘𝐴) · (i · (ℑ‘𝐴)))))
175	172, 174	eqtr2d 2773	. . . . . . . 8 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (2 · ((ℜ‘𝐴) · (i · (ℑ‘𝐴)))) = ((2 · ((ℜ‘𝐴) · i)) · (ℑ‘𝐴)))
176	49	sqvald 14096	. . . . . . . . . 10 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((ℑ‘𝐴)↑2) = ((ℑ‘𝐴) · (ℑ‘𝐴)))
177	176	oveq2d 7376	. . . . . . . . 9 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (2 · ((ℑ‘𝐴)↑2)) = (2 · ((ℑ‘𝐴) · (ℑ‘𝐴))))
178	46, 49, 49	mulassd 11159	. . . . . . . . 9 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((2 · (ℑ‘𝐴)) · (ℑ‘𝐴)) = (2 · ((ℑ‘𝐴) · (ℑ‘𝐴))))
179	177, 178	eqtr4d 2775	. . . . . . . 8 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (2 · ((ℑ‘𝐴)↑2)) = ((2 · (ℑ‘𝐴)) · (ℑ‘𝐴)))
180	175, 179	oveq12d 7378	. . . . . . 7 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((2 · ((ℜ‘𝐴) · (i · (ℑ‘𝐴)))) − (2 · ((ℑ‘𝐴)↑2))) = (((2 · ((ℜ‘𝐴) · i)) · (ℑ‘𝐴)) − ((2 · (ℑ‘𝐴)) · (ℑ‘𝐴))))
181	91, 77, 49	subdird 11598	. . . . . . 7 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (((2 · ((ℜ‘𝐴) · i)) − (2 · (ℑ‘𝐴))) · (ℑ‘𝐴)) = (((2 · ((ℜ‘𝐴) · i)) · (ℑ‘𝐴)) − ((2 · (ℑ‘𝐴)) · (ℑ‘𝐴))))
182	180, 181	eqtr4d 2775	. . . . . 6 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((2 · ((ℜ‘𝐴) · (i · (ℑ‘𝐴)))) − (2 · ((ℑ‘𝐴)↑2))) = (((2 · ((ℜ‘𝐴) · i)) − (2 · (ℑ‘𝐴))) · (ℑ‘𝐴)))
183	169, 171, 182	3eqtr2d 2778	. . . . 5 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (((2 · ((ℜ‘𝐴) · (i · (ℑ‘𝐴)))) − ((ℑ‘𝐴)↑2)) − ((ℑ‘𝐴)↑2)) = (((2 · ((ℜ‘𝐴) · i)) − (2 · (ℑ‘𝐴))) · (ℑ‘𝐴)))
184	167, 168, 183	3eqtrd 2776	. . . 4 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((𝐴↑2) − ((abs‘𝐴)↑2)) = (((2 · ((ℜ‘𝐴) · i)) − (2 · (ℑ‘𝐴))) · (ℑ‘𝐴)))
185	184, 126	oveq12d 7378	. . 3 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (((𝐴↑2) − ((abs‘𝐴)↑2)) / (i · ((𝐴↑2) + ((abs‘𝐴)↑2)))) = ((((2 · ((ℜ‘𝐴) · i)) − (2 · (ℑ‘𝐴))) · (ℑ‘𝐴)) / (((2 · ((ℜ‘𝐴) · i)) − (2 · (ℑ‘𝐴))) · (ℜ‘𝐴))))
186	49, 42, 127, 130, 144	divcan5d 11948	. . 3 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((((2 · ((ℜ‘𝐴) · i)) − (2 · (ℑ‘𝐴))) · (ℑ‘𝐴)) / (((2 · ((ℜ‘𝐴) · i)) − (2 · (ℑ‘𝐴))) · (ℜ‘𝐴))) = ((ℑ‘𝐴) / (ℜ‘𝐴)))
187	166, 185, 186	3eqtrd 2776	. 2 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((((𝐴↑2) − ((abs‘𝐴)↑2)) / ((abs‘𝐴)↑2)) / ((i · ((𝐴↑2) + ((abs‘𝐴)↑2))) / ((abs‘𝐴)↑2))) = ((ℑ‘𝐴) / (ℜ‘𝐴)))
188	155, 162, 187	3eqtrd 2776	1 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (tan‘(ℑ‘(log‘𝐴))) = ((ℑ‘𝐴) / (ℜ‘𝐴)))

Syntax hints:   → wi 4   ↔ wb 206   ∧ wa 395   = wceq 1542   ∈ wcel 2114   ≠ wne 2933  ‘cfv 6492  (class class class)co 7360  ℂcc 11027  ℝcr 11028  0cc0 11029  1c1 11030  ici 11031   + caddc 11032   · cmul 11034   − cmin 11368  -cneg 11369   / cdiv 11798  2c2 12227  ℤcz 12515  ℝ⁺crp 12933  ↑cexp 14014  ℜcre 15050  ℑcim 15051  abscabs 15187  expce 16017  tanctan 16021  logclog 26531

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 1912  ax-6 1969  ax-7 2010  ax-8 2116  ax-9 2124  ax-10 2147  ax-11 2163  ax-12 2185  ax-ext 2709  ax-rep 5212  ax-sep 5231  ax-nul 5241  ax-pow 5302  ax-pr 5370  ax-un 7682  ax-inf2 9553  ax-cnex 11085  ax-resscn 11086  ax-1cn 11087  ax-icn 11088  ax-addcl 11089  ax-addrcl 11090  ax-mulcl 11091  ax-mulrcl 11092  ax-mulcom 11093  ax-addass 11094  ax-mulass 11095  ax-distr 11096  ax-i2m1 11097  ax-1ne0 11098  ax-1rid 11099  ax-rnegex 11100  ax-rrecex 11101  ax-cnre 11102  ax-pre-lttri 11103  ax-pre-lttrn 11104  ax-pre-ltadd 11105  ax-pre-mulgt0 11106  ax-pre-sup 11107  ax-addf 11108

This theorem depends on definitions:  df-bi 207  df-an 396  df-or 849  df-3or 1088  df-3an 1089  df-tru 1545  df-fal 1555  df-ex 1782  df-nf 1786  df-sb 2069  df-mo 2540  df-eu 2570  df-clab 2716  df-cleq 2729  df-clel 2812  df-nfc 2886  df-ne 2934  df-nel 3038  df-ral 3053  df-rex 3063  df-rmo 3343  df-reu 3344  df-rab 3391  df-v 3432  df-sbc 3730  df-csb 3839  df-dif 3893  df-un 3895  df-in 3897  df-ss 3907  df-pss 3910  df-nul 4275  df-if 4468  df-pw 4544  df-sn 4569  df-pr 4571  df-tp 4573  df-op 4575  df-uni 4852  df-int 4891  df-iun 4936  df-iin 4937  df-br 5087  df-opab 5149  df-mpt 5168  df-tr 5194  df-id 5519  df-eprel 5524  df-po 5532  df-so 5533  df-fr 5577  df-se 5578  df-we 5579  df-xp 5630  df-rel 5631  df-cnv 5632  df-co 5633  df-dm 5634  df-rn 5635  df-res 5636  df-ima 5637  df-pred 6259  df-ord 6320  df-on 6321  df-lim 6322  df-suc 6323  df-iota 6448  df-fun 6494  df-fn 6495  df-f 6496  df-f1 6497  df-fo 6498  df-f1o 6499  df-fv 6500  df-isom 6501  df-riota 7317  df-ov 7363  df-oprab 7364  df-mpo 7365  df-of 7624  df-om 7811  df-1st 7935  df-2nd 7936  df-supp 8104  df-frecs 8224  df-wrecs 8255  df-recs 8304  df-rdg 8342  df-1o 8398  df-2o 8399  df-er 8636  df-map 8768  df-pm 8769  df-ixp 8839  df-en 8887  df-dom 8888  df-sdom 8889  df-fin 8890  df-fsupp 9268  df-fi 9317  df-sup 9348  df-inf 9349  df-oi 9418  df-card 9854  df-pnf 11172  df-mnf 11173  df-xr 11174  df-ltxr 11175  df-le 11176  df-sub 11370  df-neg 11371  df-div 11799  df-nn 12166  df-2 12235  df-3 12236  df-4 12237  df-5 12238  df-6 12239  df-7 12240  df-8 12241  df-9 12242  df-n0 12429  df-z 12516  df-dec 12636  df-uz 12780  df-q 12890  df-rp 12934  df-xneg 13054  df-xadd 13055  df-xmul 13056  df-ioo 13293  df-ioc 13294  df-ico 13295  df-icc 13296  df-fz 13453  df-fzo 13600  df-fl 13742  df-mod 13820  df-seq 13955  df-exp 14015  df-fac 14227  df-bc 14256  df-hash 14284  df-shft 15020  df-cj 15052  df-re 15053  df-im 15054  df-sqrt 15188  df-abs 15189  df-limsup 15424  df-clim 15441  df-rlim 15442  df-sum 15640  df-ef 16023  df-sin 16025  df-cos 16026  df-tan 16027  df-pi 16028  df-struct 17108  df-sets 17125  df-slot 17143  df-ndx 17155  df-base 17171  df-ress 17192  df-plusg 17224  df-mulr 17225  df-starv 17226  df-sca 17227  df-vsca 17228  df-ip 17229  df-tset 17230  df-ple 17231  df-ds 17233  df-unif 17234  df-hom 17235  df-cco 17236  df-rest 17376  df-topn 17377  df-0g 17395  df-gsum 17396  df-topgen 17397  df-pt 17398  df-prds 17401  df-xrs 17457  df-qtop 17462  df-imas 17463  df-xps 17465  df-mre 17539  df-mrc 17540  df-acs 17542  df-mgm 18599  df-sgrp 18678  df-mnd 18694  df-submnd 18743  df-mulg 19035  df-cntz 19283  df-cmn 19748  df-psmet 21336  df-xmet 21337  df-met 21338  df-bl 21339  df-mopn 21340  df-fbas 21341  df-fg 21342  df-cnfld 21345  df-top 22869  df-topon 22886  df-topsp 22908  df-bases 22921  df-cld 22994  df-ntr 22995  df-cls 22996  df-nei 23073  df-lp 23111  df-perf 23112  df-cn 23202  df-cnp 23203  df-haus 23290  df-tx 23537  df-hmeo 23730  df-fil 23821  df-fm 23913  df-flim 23914  df-flf 23915  df-xms 24295  df-ms 24296  df-tms 24297  df-cncf 24855  df-limc 25843  df-dv 25844  df-log 26533

This theorem is referenced by:  logcnlem4  26622  atanlogsublem  26892