Theorem tanarg 26585

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 6881	. . . . . . . 8 ⊢ (𝐴 = 0 → (ℜ‘𝐴) = (ℜ‘0))
2		re0 15176	. . . . . . . 8 ⊢ (ℜ‘0) = 0
3	1, 2	eqtrdi 2787	. . . . . . 7 ⊢ (𝐴 = 0 → (ℜ‘𝐴) = 0)
4	3	necon3i 2965	. . . . . 6 ⊢ ((ℜ‘𝐴) ≠ 0 → 𝐴 ≠ 0)
5		logcl 26534	. . . . . 6 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0) → (log‘𝐴) ∈ ℂ)
6	4, 5	sylan2 593	. . . . 5 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (log‘𝐴) ∈ ℂ)
7	6	imcld 15219	. . . 4 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (ℑ‘(log‘𝐴)) ∈ ℝ)
8	7	recnd 11268	. . 3 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (ℑ‘(log‘𝐴)) ∈ ℂ)
9		sqcl 14141	. . . . . . 7 ⊢ (𝐴 ∈ ℂ → (𝐴↑2) ∈ ℂ)
10	9	adantr 480	. . . . . 6 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (𝐴↑2) ∈ ℂ)
11		abscl 15302	. . . . . . . . 9 ⊢ (𝐴 ∈ ℂ → (abs‘𝐴) ∈ ℝ)
12	11	adantr 480	. . . . . . . 8 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (abs‘𝐴) ∈ ℝ)
13	12	recnd 11268	. . . . . . 7 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (abs‘𝐴) ∈ ℂ)
14	13	sqcld 14167	. . . . . 6 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((abs‘𝐴)↑2) ∈ ℂ)
15		absrpcl 15312	. . . . . . . . 9 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0) → (abs‘𝐴) ∈ ℝ+)
16	4, 15	sylan2 593	. . . . . . . 8 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (abs‘𝐴) ∈ ℝ+)
17	16	rpne0d 13061	. . . . . . 7 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (abs‘𝐴) ≠ 0)
18		sqne0 14146	. . . . . . . 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 12060	. . . . 5 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (((𝐴↑2) + ((abs‘𝐴)↑2)) / ((abs‘𝐴)↑2)) = (((𝐴↑2) / ((abs‘𝐴)↑2)) + (((abs‘𝐴)↑2) / ((abs‘𝐴)↑2))))
22		ax-icn 11193	. . . . . . . . 9 ⊢ i ∈ ℂ
23		mulcl 11218	. . . . . . . . 9 ⊢ ((i ∈ ℂ ∧ (ℑ‘(log‘𝐴)) ∈ ℂ) → (i · (ℑ‘(log‘𝐴))) ∈ ℂ)
24	22, 8, 23	sylancr 587	. . . . . . . 8 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (i · (ℑ‘(log‘𝐴))) ∈ ℂ)
25		2z 12629	. . . . . . . 8 ⊢ 2 ∈ ℤ
26		efexp 16124	. . . . . . . 8 ⊢ (((i · (ℑ‘(log‘𝐴))) ∈ ℂ ∧ 2 ∈ ℤ) → (exp‘(2 · (i · (ℑ‘(log‘𝐴))))) = ((exp‘(i · (ℑ‘(log‘𝐴))))↑2))
27	24, 25, 26	sylancl 586	. . . . . . 7 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (exp‘(2 · (i · (ℑ‘(log‘𝐴))))) = ((exp‘(i · (ℑ‘(log‘𝐴))))↑2))
28		efiarg 26573	. . . . . . . . 9 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0) → (exp‘(i · (ℑ‘(log‘𝐴)))) = (𝐴 / (abs‘𝐴)))
29	4, 28	sylan2 593	. . . . . . . 8 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (exp‘(i · (ℑ‘(log‘𝐴)))) = (𝐴 / (abs‘𝐴)))
30	29	oveq1d 7425	. . . . . . 7 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((exp‘(i · (ℑ‘(log‘𝐴))))↑2) = ((𝐴 / (abs‘𝐴))↑2))
31		simpl 482	. . . . . . . 8 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → 𝐴 ∈ ℂ)
32	31, 13, 17	sqdivd 14182	. . . . . . 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 12020	. . . . . 6 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (((abs‘𝐴)↑2) / ((abs‘𝐴)↑2)) = 1)
35	33, 34	oveq12d 7428	. . . . 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 11259	. . . . 5 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((𝐴↑2) + ((abs‘𝐴)↑2)) ∈ ℂ)
38	22	a1i 11	. . . . . . . . . 10 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → i ∈ ℂ)
39		2cn 12320	. . . . . . . . . . 11 ⊢ 2 ∈ ℂ
40		recl 15134	. . . . . . . . . . . . . 14 ⊢ (𝐴 ∈ ℂ → (ℜ‘𝐴) ∈ ℝ)
41	40	adantr 480	. . . . . . . . . . . . 13 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (ℜ‘𝐴) ∈ ℝ)
42	41	recnd 11268	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (ℜ‘𝐴) ∈ ℂ)
43	42	sqcld 14167	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((ℜ‘𝐴)↑2) ∈ ℂ)
44		mulcl 11218	. . . . . . . . . . 11 ⊢ ((2 ∈ ℂ ∧ ((ℜ‘𝐴)↑2) ∈ ℂ) → (2 · ((ℜ‘𝐴)↑2)) ∈ ℂ)
45	39, 43, 44	sylancr 587	. . . . . . . . . 10 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (2 · ((ℜ‘𝐴)↑2)) ∈ ℂ)
46	39	a1i 11	. . . . . . . . . . . . 13 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → 2 ∈ ℂ)
47		imcl 15135	. . . . . . . . . . . . . . . 16 ⊢ (𝐴 ∈ ℂ → (ℑ‘𝐴) ∈ ℝ)
48	47	adantr 480	. . . . . . . . . . . . . . 15 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (ℑ‘𝐴) ∈ ℝ)
49	48	recnd 11268	. . . . . . . . . . . . . 14 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (ℑ‘𝐴) ∈ ℂ)
50	42, 49	mulcld 11260	. . . . . . . . . . . . 13 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((ℜ‘𝐴) · (ℑ‘𝐴)) ∈ ℂ)
51	38, 46, 50	mul12d 11449	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (i · (2 · ((ℜ‘𝐴) · (ℑ‘𝐴)))) = (2 · (i · ((ℜ‘𝐴) · (ℑ‘𝐴)))))
52	38, 42, 49	mul12d 11449	. . . . . . . . . . . . 13 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (i · ((ℜ‘𝐴) · (ℑ‘𝐴))) = ((ℜ‘𝐴) · (i · (ℑ‘𝐴))))
53	52	oveq2d 7426	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (2 · (i · ((ℜ‘𝐴) · (ℑ‘𝐴)))) = (2 · ((ℜ‘𝐴) · (i · (ℑ‘𝐴)))))
54	51, 53	eqtrd 2771	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (i · (2 · ((ℜ‘𝐴) · (ℑ‘𝐴)))) = (2 · ((ℜ‘𝐴) · (i · (ℑ‘𝐴)))))
55		mulcl 11218	. . . . . . . . . . . . . 14 ⊢ ((i ∈ ℂ ∧ (ℑ‘𝐴) ∈ ℂ) → (i · (ℑ‘𝐴)) ∈ ℂ)
56	22, 49, 55	sylancr 587	. . . . . . . . . . . . 13 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (i · (ℑ‘𝐴)) ∈ ℂ)
57	42, 56	mulcld 11260	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((ℜ‘𝐴) · (i · (ℑ‘𝐴))) ∈ ℂ)
58		mulcl 11218	. . . . . . . . . . . 12 ⊢ ((2 ∈ ℂ ∧ ((ℜ‘𝐴) · (i · (ℑ‘𝐴))) ∈ ℂ) → (2 · ((ℜ‘𝐴) · (i · (ℑ‘𝐴)))) ∈ ℂ)
59	39, 57, 58	sylancr 587	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (2 · ((ℜ‘𝐴) · (i · (ℑ‘𝐴)))) ∈ ℂ)
60	54, 59	eqeltrd 2835	. . . . . . . . . 10 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (i · (2 · ((ℜ‘𝐴) · (ℑ‘𝐴)))) ∈ ℂ)
61	38, 45, 60	adddid 11264	. . . . . . . . 9 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (i · ((2 · ((ℜ‘𝐴)↑2)) + (i · (2 · ((ℜ‘𝐴) · (ℑ‘𝐴)))))) = ((i · (2 · ((ℜ‘𝐴)↑2))) + (i · (i · (2 · ((ℜ‘𝐴) · (ℑ‘𝐴)))))))
62		mulcl 11218	. . . . . . . . . . . . 13 ⊢ (((ℜ‘𝐴) ∈ ℂ ∧ i ∈ ℂ) → ((ℜ‘𝐴) · i) ∈ ℂ)
63	42, 22, 62	sylancl 586	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((ℜ‘𝐴) · i) ∈ ℂ)
64	46, 63, 42	mulassd 11263	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((2 · ((ℜ‘𝐴) · i)) · (ℜ‘𝐴)) = (2 · (((ℜ‘𝐴) · i) · (ℜ‘𝐴))))
65	42	sqvald 14166	. . . . . . . . . . . . . 14 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((ℜ‘𝐴)↑2) = ((ℜ‘𝐴) · (ℜ‘𝐴)))
66	65	oveq1d 7425	. . . . . . . . . . . . 13 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (((ℜ‘𝐴)↑2) · i) = (((ℜ‘𝐴) · (ℜ‘𝐴)) · i))
67		mulcom 11220	. . . . . . . . . . . . . 14 ⊢ ((((ℜ‘𝐴)↑2) ∈ ℂ ∧ i ∈ ℂ) → (((ℜ‘𝐴)↑2) · i) = (i · ((ℜ‘𝐴)↑2)))
68	43, 22, 67	sylancl 586	. . . . . . . . . . . . 13 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (((ℜ‘𝐴)↑2) · i) = (i · ((ℜ‘𝐴)↑2)))
69	42, 42, 38	mul32d 11450	. . . . . . . . . . . . 13 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (((ℜ‘𝐴) · (ℜ‘𝐴)) · i) = (((ℜ‘𝐴) · i) · (ℜ‘𝐴)))
70	66, 68, 69	3eqtr3d 2779	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (i · ((ℜ‘𝐴)↑2)) = (((ℜ‘𝐴) · i) · (ℜ‘𝐴)))
71	70	oveq2d 7426	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (2 · (i · ((ℜ‘𝐴)↑2))) = (2 · (((ℜ‘𝐴) · i) · (ℜ‘𝐴))))
72	46, 38, 43	mul12d 11449	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (2 · (i · ((ℜ‘𝐴)↑2))) = (i · (2 · ((ℜ‘𝐴)↑2))))
73	64, 71, 72	3eqtr2d 2777	. . . . . . . . . 10 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((2 · ((ℜ‘𝐴) · i)) · (ℜ‘𝐴)) = (i · (2 · ((ℜ‘𝐴)↑2))))
74		ixi 11871	. . . . . . . . . . . . 13 ⊢ (i · i) = -1
75	74	oveq1i 7420	. . . . . . . . . . . 12 ⊢ ((i · i) · ((2 · (ℑ‘𝐴)) · (ℜ‘𝐴))) = (-1 · ((2 · (ℑ‘𝐴)) · (ℜ‘𝐴)))
76		mulcl 11218	. . . . . . . . . . . . . . 15 ⊢ ((2 ∈ ℂ ∧ (ℑ‘𝐴) ∈ ℂ) → (2 · (ℑ‘𝐴)) ∈ ℂ)
77	39, 49, 76	sylancr 587	. . . . . . . . . . . . . 14 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (2 · (ℑ‘𝐴)) ∈ ℂ)
78	77, 42	mulcld 11260	. . . . . . . . . . . . 13 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((2 · (ℑ‘𝐴)) · (ℜ‘𝐴)) ∈ ℂ)
79	38, 38, 78	mulassd 11263	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((i · i) · ((2 · (ℑ‘𝐴)) · (ℜ‘𝐴))) = (i · (i · ((2 · (ℑ‘𝐴)) · (ℜ‘𝐴)))))
80	75, 79	eqtr3id 2785	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (-1 · ((2 · (ℑ‘𝐴)) · (ℜ‘𝐴))) = (i · (i · ((2 · (ℑ‘𝐴)) · (ℜ‘𝐴)))))
81	78	mulm1d 11694	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (-1 · ((2 · (ℑ‘𝐴)) · (ℜ‘𝐴))) = -((2 · (ℑ‘𝐴)) · (ℜ‘𝐴)))
82	46, 49, 42	mulassd 11263	. . . . . . . . . . . . . 14 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((2 · (ℑ‘𝐴)) · (ℜ‘𝐴)) = (2 · ((ℑ‘𝐴) · (ℜ‘𝐴))))
83	49, 42	mulcomd 11261	. . . . . . . . . . . . . . 15 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((ℑ‘𝐴) · (ℜ‘𝐴)) = ((ℜ‘𝐴) · (ℑ‘𝐴)))
84	83	oveq2d 7426	. . . . . . . . . . . . . 14 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (2 · ((ℑ‘𝐴) · (ℜ‘𝐴))) = (2 · ((ℜ‘𝐴) · (ℑ‘𝐴))))
85	82, 84	eqtrd 2771	. . . . . . . . . . . . 13 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((2 · (ℑ‘𝐴)) · (ℜ‘𝐴)) = (2 · ((ℜ‘𝐴) · (ℑ‘𝐴))))
86	85	oveq2d 7426	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (i · ((2 · (ℑ‘𝐴)) · (ℜ‘𝐴))) = (i · (2 · ((ℜ‘𝐴) · (ℑ‘𝐴)))))
87	86	oveq2d 7426	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (i · (i · ((2 · (ℑ‘𝐴)) · (ℜ‘𝐴)))) = (i · (i · (2 · ((ℜ‘𝐴) · (ℑ‘𝐴))))))
88	80, 81, 87	3eqtr3d 2779	. . . . . . . . . 10 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → -((2 · (ℑ‘𝐴)) · (ℜ‘𝐴)) = (i · (i · (2 · ((ℜ‘𝐴) · (ℑ‘𝐴))))))
89	73, 88	oveq12d 7428	. . . . . . . . 9 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (((2 · ((ℜ‘𝐴) · i)) · (ℜ‘𝐴)) + -((2 · (ℑ‘𝐴)) · (ℜ‘𝐴))) = ((i · (2 · ((ℜ‘𝐴)↑2))) + (i · (i · (2 · ((ℜ‘𝐴) · (ℑ‘𝐴)))))))
90		mulcl 11218	. . . . . . . . . . . 12 ⊢ ((2 ∈ ℂ ∧ ((ℜ‘𝐴) · i) ∈ ℂ) → (2 · ((ℜ‘𝐴) · i)) ∈ ℂ)
91	39, 63, 90	sylancr 587	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (2 · ((ℜ‘𝐴) · i)) ∈ ℂ)
92	91, 42	mulcld 11260	. . . . . . . . . 10 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((2 · ((ℜ‘𝐴) · i)) · (ℜ‘𝐴)) ∈ ℂ)
93	92, 78	negsubd 11605	. . . . . . . . 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 14167	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((ℑ‘𝐴)↑2) ∈ ℂ)
96	59, 95	subcld 11599	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((2 · ((ℜ‘𝐴) · (i · (ℑ‘𝐴)))) − ((ℑ‘𝐴)↑2)) ∈ ℂ)
97	43, 96, 43, 95	add4d 11469	. . . . . . . . . 10 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((((ℜ‘𝐴)↑2) + ((2 · ((ℜ‘𝐴) · (i · (ℑ‘𝐴)))) − ((ℑ‘𝐴)↑2))) + (((ℜ‘𝐴)↑2) + ((ℑ‘𝐴)↑2))) = ((((ℜ‘𝐴)↑2) + ((ℜ‘𝐴)↑2)) + (((2 · ((ℜ‘𝐴) · (i · (ℑ‘𝐴)))) − ((ℑ‘𝐴)↑2)) + ((ℑ‘𝐴)↑2))))
98		replim 15140	. . . . . . . . . . . . . 14 ⊢ (𝐴 ∈ ℂ → 𝐴 = ((ℜ‘𝐴) + (i · (ℑ‘𝐴))))
99	98	adantr 480	. . . . . . . . . . . . 13 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → 𝐴 = ((ℜ‘𝐴) + (i · (ℑ‘𝐴))))
100	99	oveq1d 7425	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (𝐴↑2) = (((ℜ‘𝐴) + (i · (ℑ‘𝐴)))↑2))
101		binom2 14240	. . . . . . . . . . . . . 14 ⊢ (((ℜ‘𝐴) ∈ ℂ ∧ (i · (ℑ‘𝐴)) ∈ ℂ) → (((ℜ‘𝐴) + (i · (ℑ‘𝐴)))↑2) = ((((ℜ‘𝐴)↑2) + (2 · ((ℜ‘𝐴) · (i · (ℑ‘𝐴))))) + ((i · (ℑ‘𝐴))↑2)))
102	42, 56, 101	syl2anc 584	. . . . . . . . . . . . 13 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (((ℜ‘𝐴) + (i · (ℑ‘𝐴)))↑2) = ((((ℜ‘𝐴)↑2) + (2 · ((ℜ‘𝐴) · (i · (ℑ‘𝐴))))) + ((i · (ℑ‘𝐴))↑2)))
103		sqmul 14142	. . . . . . . . . . . . . . . . 17 ⊢ ((i ∈ ℂ ∧ (ℑ‘𝐴) ∈ ℂ) → ((i · (ℑ‘𝐴))↑2) = ((i↑2) · ((ℑ‘𝐴)↑2)))
104	22, 49, 103	sylancr 587	. . . . . . . . . . . . . . . 16 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((i · (ℑ‘𝐴))↑2) = ((i↑2) · ((ℑ‘𝐴)↑2)))
105		i2 14225	. . . . . . . . . . . . . . . . 17 ⊢ (i↑2) = -1
106	105	oveq1i 7420	. . . . . . . . . . . . . . . 16 ⊢ ((i↑2) · ((ℑ‘𝐴)↑2)) = (-1 · ((ℑ‘𝐴)↑2))
107	104, 106	eqtrdi 2787	. . . . . . . . . . . . . . 15 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((i · (ℑ‘𝐴))↑2) = (-1 · ((ℑ‘𝐴)↑2)))
108	95	mulm1d 11694	. . . . . . . . . . . . . . 15 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (-1 · ((ℑ‘𝐴)↑2)) = -((ℑ‘𝐴)↑2))
109	107, 108	eqtrd 2771	. . . . . . . . . . . . . 14 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((i · (ℑ‘𝐴))↑2) = -((ℑ‘𝐴)↑2))
110	109	oveq2d 7426	. . . . . . . . . . . . 13 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((((ℜ‘𝐴)↑2) + (2 · ((ℜ‘𝐴) · (i · (ℑ‘𝐴))))) + ((i · (ℑ‘𝐴))↑2)) = ((((ℜ‘𝐴)↑2) + (2 · ((ℜ‘𝐴) · (i · (ℑ‘𝐴))))) + -((ℑ‘𝐴)↑2)))
111	43, 59	addcld 11259	. . . . . . . . . . . . . 14 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (((ℜ‘𝐴)↑2) + (2 · ((ℜ‘𝐴) · (i · (ℑ‘𝐴))))) ∈ ℂ)
112	111, 95	negsubd 11605	. . . . . . . . . . . . 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 11619	. . . . . . . . . . . 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 15305	. . . . . . . . . . . 12 ⊢ (𝐴 ∈ ℂ → ((abs‘𝐴)↑2) = (((ℜ‘𝐴)↑2) + ((ℑ‘𝐴)↑2)))
117	116	adantr 480	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((abs‘𝐴)↑2) = (((ℜ‘𝐴)↑2) + ((ℑ‘𝐴)↑2)))
118	115, 117	oveq12d 7428	. . . . . . . . . 10 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((𝐴↑2) + ((abs‘𝐴)↑2)) = ((((ℜ‘𝐴)↑2) + ((2 · ((ℜ‘𝐴) · (i · (ℑ‘𝐴)))) − ((ℑ‘𝐴)↑2))) + (((ℜ‘𝐴)↑2) + ((ℑ‘𝐴)↑2))))
119	43	2timesd 12489	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (2 · ((ℜ‘𝐴)↑2)) = (((ℜ‘𝐴)↑2) + ((ℜ‘𝐴)↑2)))
120	59, 95	npcand 11603	. . . . . . . . . . . 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 7428	. . . . . . . . . 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 7426	. . . . . . . 8 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (i · ((𝐴↑2) + ((abs‘𝐴)↑2))) = (i · ((2 · ((ℜ‘𝐴)↑2)) + (i · (2 · ((ℜ‘𝐴) · (ℑ‘𝐴)))))))
125	91, 77, 42	subdird 11699	. . . . . . . 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 11599	. . . . . . . 8 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((2 · ((ℜ‘𝐴) · i)) − (2 · (ℑ‘𝐴))) ∈ ℂ)
128		mulcom 11220	. . . . . . . . . . 11 ⊢ (((ℜ‘𝐴) ∈ ℂ ∧ i ∈ ℂ) → ((ℜ‘𝐴) · i) = (i · (ℜ‘𝐴)))
129	42, 22, 128	sylancl 586	. . . . . . . . . 10 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((ℜ‘𝐴) · i) = (i · (ℜ‘𝐴)))
130		simpr 484	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (ℜ‘𝐴) ≠ 0)
131		eleq1 2823	. . . . . . . . . . . . . 14 ⊢ ((i · (ℜ‘𝐴)) = (ℑ‘𝐴) → ((i · (ℜ‘𝐴)) ∈ ℝ ↔ (ℑ‘𝐴) ∈ ℝ))
132	48, 131	syl5ibrcom 247	. . . . . . . . . . . . 13 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((i · (ℜ‘𝐴)) = (ℑ‘𝐴) → (i · (ℜ‘𝐴)) ∈ ℝ))
133		rimul 12236	. . . . . . . . . . . . 13 ⊢ (((ℜ‘𝐴) ∈ ℝ ∧ (i · (ℜ‘𝐴)) ∈ ℝ) → (ℜ‘𝐴) = 0)
134	41, 132, 133	syl6an 684	. . . . . . . . . . . 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 11609	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (((2 · ((ℜ‘𝐴) · i)) − (2 · (ℑ‘𝐴))) = 0 ↔ (2 · ((ℜ‘𝐴) · i)) = (2 · (ℑ‘𝐴))))
139		2ne0 12349	. . . . . . . . . . . . 13 ⊢ 2 ≠ 0
140	139	a1i 11	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → 2 ≠ 0)
141	63, 49, 46, 140	mulcand 11875	. . . . . . . . . . 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 11894	. . . . . . 7 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (((2 · ((ℜ‘𝐴) · i)) − (2 · (ℑ‘𝐴))) · (ℜ‘𝐴)) ≠ 0)
146	126, 145	eqnetrd 3000	. . . . . 6 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (i · ((𝐴↑2) + ((abs‘𝐴)↑2))) ≠ 0)
147		oveq2 7418	. . . . . . . 8 ⊢ (((𝐴↑2) + ((abs‘𝐴)↑2)) = 0 → (i · ((𝐴↑2) + ((abs‘𝐴)↑2))) = (i · 0))
148		it0e0 12469	. . . . . . . 8 ⊢ (i · 0) = 0
149	147, 148	eqtrdi 2787	. . . . . . 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 12038	. . . 4 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (((𝐴↑2) + ((abs‘𝐴)↑2)) / ((abs‘𝐴)↑2)) ≠ 0)
153	36, 152	eqnetrd 3000	. . 3 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((exp‘(2 · (i · (ℑ‘(log‘𝐴))))) + 1) ≠ 0)
154		tanval3 16157	. . 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 584	. 2 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (tan‘(ℑ‘(log‘𝐴))) = (((exp‘(2 · (i · (ℑ‘(log‘𝐴))))) − 1) / (i · ((exp‘(2 · (i · (ℑ‘(log‘𝐴))))) + 1))))
156	10, 14, 14, 20	divsubdird 12061	. . . 4 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (((𝐴↑2) − ((abs‘𝐴)↑2)) / ((abs‘𝐴)↑2)) = (((𝐴↑2) / ((abs‘𝐴)↑2)) − (((abs‘𝐴)↑2) / ((abs‘𝐴)↑2))))
157	33, 34	oveq12d 7428	. . . 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 7426	. . . 4 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (i · ((exp‘(2 · (i · (ℑ‘(log‘𝐴))))) + 1)) = (i · (((𝐴↑2) + ((abs‘𝐴)↑2)) / ((abs‘𝐴)↑2))))
160	38, 37, 14, 20	divassd 12057	. . . 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 7428	. 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 11599	. . . 4 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((𝐴↑2) − ((abs‘𝐴)↑2)) ∈ ℂ)
164		mulcl 11218	. . . . 5 ⊢ ((i ∈ ℂ ∧ ((𝐴↑2) + ((abs‘𝐴)↑2)) ∈ ℂ) → (i · ((𝐴↑2) + ((abs‘𝐴)↑2))) ∈ ℂ)
165	22, 37, 164	sylancr 587	. . . 4 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (i · ((𝐴↑2) + ((abs‘𝐴)↑2))) ∈ ℂ)
166	163, 165, 14, 146, 20	divcan7d 12050	. . 3 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((((𝐴↑2) − ((abs‘𝐴)↑2)) / ((abs‘𝐴)↑2)) / ((i · ((𝐴↑2) + ((abs‘𝐴)↑2))) / ((abs‘𝐴)↑2))) = (((𝐴↑2) − ((abs‘𝐴)↑2)) / (i · ((𝐴↑2) + ((abs‘𝐴)↑2)))))
167	115, 117	oveq12d 7428	. . . . 5 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((𝐴↑2) − ((abs‘𝐴)↑2)) = ((((ℜ‘𝐴)↑2) + ((2 · ((ℜ‘𝐴) · (i · (ℑ‘𝐴)))) − ((ℑ‘𝐴)↑2))) − (((ℜ‘𝐴)↑2) + ((ℑ‘𝐴)↑2))))
168	43, 96, 95	pnpcand 11636	. . . . 5 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((((ℜ‘𝐴)↑2) + ((2 · ((ℜ‘𝐴) · (i · (ℑ‘𝐴)))) − ((ℑ‘𝐴)↑2))) − (((ℜ‘𝐴)↑2) + ((ℑ‘𝐴)↑2))) = (((2 · ((ℜ‘𝐴) · (i · (ℑ‘𝐴)))) − ((ℑ‘𝐴)↑2)) − ((ℑ‘𝐴)↑2)))
169	59, 95, 95	subsub4d 11630	. . . . . 6 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (((2 · ((ℜ‘𝐴) · (i · (ℑ‘𝐴)))) − ((ℑ‘𝐴)↑2)) − ((ℑ‘𝐴)↑2)) = ((2 · ((ℜ‘𝐴) · (i · (ℑ‘𝐴)))) − (((ℑ‘𝐴)↑2) + ((ℑ‘𝐴)↑2))))
170	95	2timesd 12489	. . . . . . 7 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (2 · ((ℑ‘𝐴)↑2)) = (((ℑ‘𝐴)↑2) + ((ℑ‘𝐴)↑2)))
171	170	oveq2d 7426	. . . . . 6 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((2 · ((ℜ‘𝐴) · (i · (ℑ‘𝐴)))) − (2 · ((ℑ‘𝐴)↑2))) = ((2 · ((ℜ‘𝐴) · (i · (ℑ‘𝐴)))) − (((ℑ‘𝐴)↑2) + ((ℑ‘𝐴)↑2))))
172	46, 63, 49	mulassd 11263	. . . . . . . . 9 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((2 · ((ℜ‘𝐴) · i)) · (ℑ‘𝐴)) = (2 · (((ℜ‘𝐴) · i) · (ℑ‘𝐴))))
173	42, 38, 49	mulassd 11263	. . . . . . . . . 10 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (((ℜ‘𝐴) · i) · (ℑ‘𝐴)) = ((ℜ‘𝐴) · (i · (ℑ‘𝐴))))
174	173	oveq2d 7426	. . . . . . . . 9 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (2 · (((ℜ‘𝐴) · i) · (ℑ‘𝐴))) = (2 · ((ℜ‘𝐴) · (i · (ℑ‘𝐴)))))
175	172, 174	eqtr2d 2772	. . . . . . . 8 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (2 · ((ℜ‘𝐴) · (i · (ℑ‘𝐴)))) = ((2 · ((ℜ‘𝐴) · i)) · (ℑ‘𝐴)))
176	49	sqvald 14166	. . . . . . . . . 10 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((ℑ‘𝐴)↑2) = ((ℑ‘𝐴) · (ℑ‘𝐴)))
177	176	oveq2d 7426	. . . . . . . . 9 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (2 · ((ℑ‘𝐴)↑2)) = (2 · ((ℑ‘𝐴) · (ℑ‘𝐴))))
178	46, 49, 49	mulassd 11263	. . . . . . . . 9 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((2 · (ℑ‘𝐴)) · (ℑ‘𝐴)) = (2 · ((ℑ‘𝐴) · (ℑ‘𝐴))))
179	177, 178	eqtr4d 2774	. . . . . . . 8 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (2 · ((ℑ‘𝐴)↑2)) = ((2 · (ℑ‘𝐴)) · (ℑ‘𝐴)))
180	175, 179	oveq12d 7428	. . . . . . 7 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((2 · ((ℜ‘𝐴) · (i · (ℑ‘𝐴)))) − (2 · ((ℑ‘𝐴)↑2))) = (((2 · ((ℜ‘𝐴) · i)) · (ℑ‘𝐴)) − ((2 · (ℑ‘𝐴)) · (ℑ‘𝐴))))
181	91, 77, 49	subdird 11699	. . . . . . 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 7428	. . 3 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (((𝐴↑2) − ((abs‘𝐴)↑2)) / (i · ((𝐴↑2) + ((abs‘𝐴)↑2)))) = ((((2 · ((ℜ‘𝐴) · i)) − (2 · (ℑ‘𝐴))) · (ℑ‘𝐴)) / (((2 · ((ℜ‘𝐴) · i)) − (2 · (ℑ‘𝐴))) · (ℜ‘𝐴))))
186	49, 42, 127, 130, 144	divcan5d 12048	. . 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‘𝐴))) = ((ℑ‘𝐴) / (ℜ‘𝐴)))

Syntax hints:   → wi 4   ↔ wb 206   ∧ wa 395   = wceq 1540   ∈ wcel 2109   ≠ wne 2933  ‘cfv 6536  (class class class)co 7410  ℂcc 11132  ℝcr 11133  0cc0 11134  1c1 11135  ici 11136   + caddc 11137   · cmul 11139   − cmin 11471  -cneg 11472   / cdiv 11899  2c2 12300  ℤcz 12593  ℝ⁺crp 13013  ↑cexp 14084  ℜcre 15121  ℑcim 15122  abscabs 15258  expce 16082  tanctan 16086  logclog 26520

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1795  ax-4 1809  ax-5 1910  ax-6 1967  ax-7 2008  ax-8 2111  ax-9 2119  ax-10 2142  ax-11 2158  ax-12 2178  ax-ext 2708  ax-rep 5254  ax-sep 5271  ax-nul 5281  ax-pow 5340  ax-pr 5407  ax-un 7734  ax-inf2 9660  ax-cnex 11190  ax-resscn 11191  ax-1cn 11192  ax-icn 11193  ax-addcl 11194  ax-addrcl 11195  ax-mulcl 11196  ax-mulrcl 11197  ax-mulcom 11198  ax-addass 11199  ax-mulass 11200  ax-distr 11201  ax-i2m1 11202  ax-1ne0 11203  ax-1rid 11204  ax-rnegex 11205  ax-rrecex 11206  ax-cnre 11207  ax-pre-lttri 11208  ax-pre-lttrn 11209  ax-pre-ltadd 11210  ax-pre-mulgt0 11211  ax-pre-sup 11212  ax-addf 11213

This theorem depends on definitions:  df-bi 207  df-an 396  df-or 848  df-3or 1087  df-3an 1088  df-tru 1543  df-fal 1553  df-ex 1780  df-nf 1784  df-sb 2066  df-mo 2540  df-eu 2569  df-clab 2715  df-cleq 2728  df-clel 2810  df-nfc 2886  df-ne 2934  df-nel 3038  df-ral 3053  df-rex 3062  df-rmo 3364  df-reu 3365  df-rab 3421  df-v 3466  df-sbc 3771  df-csb 3880  df-dif 3934  df-un 3936  df-in 3938  df-ss 3948  df-pss 3951  df-nul 4314  df-if 4506  df-pw 4582  df-sn 4607  df-pr 4609  df-tp 4611  df-op 4613  df-uni 4889  df-int 4928  df-iun 4974  df-iin 4975  df-br 5125  df-opab 5187  df-mpt 5207  df-tr 5235  df-id 5553  df-eprel 5558  df-po 5566  df-so 5567  df-fr 5611  df-se 5612  df-we 5613  df-xp 5665  df-rel 5666  df-cnv 5667  df-co 5668  df-dm 5669  df-rn 5670  df-res 5671  df-ima 5672  df-pred 6295  df-ord 6360  df-on 6361  df-lim 6362  df-suc 6363  df-iota 6489  df-fun 6538  df-fn 6539  df-f 6540  df-f1 6541  df-fo 6542  df-f1o 6543  df-fv 6544  df-isom 6545  df-riota 7367  df-ov 7413  df-oprab 7414  df-mpo 7415  df-of 7676  df-om 7867  df-1st 7993  df-2nd 7994  df-supp 8165  df-frecs 8285  df-wrecs 8316  df-recs 8390  df-rdg 8429  df-1o 8485  df-2o 8486  df-er 8724  df-map 8847  df-pm 8848  df-ixp 8917  df-en 8965  df-dom 8966  df-sdom 8967  df-fin 8968  df-fsupp 9379  df-fi 9428  df-sup 9459  df-inf 9460  df-oi 9529  df-card 9958  df-pnf 11276  df-mnf 11277  df-xr 11278  df-ltxr 11279  df-le 11280  df-sub 11473  df-neg 11474  df-div 11900  df-nn 12246  df-2 12308  df-3 12309  df-4 12310  df-5 12311  df-6 12312  df-7 12313  df-8 12314  df-9 12315  df-n0 12507  df-z 12594  df-dec 12714  df-uz 12858  df-q 12970  df-rp 13014  df-xneg 13133  df-xadd 13134  df-xmul 13135  df-ioo 13371  df-ioc 13372  df-ico 13373  df-icc 13374  df-fz 13530  df-fzo 13677  df-fl 13814  df-mod 13892  df-seq 14025  df-exp 14085  df-fac 14297  df-bc 14326  df-hash 14354  df-shft 15091  df-cj 15123  df-re 15124  df-im 15125  df-sqrt 15259  df-abs 15260  df-limsup 15492  df-clim 15509  df-rlim 15510  df-sum 15708  df-ef 16088  df-sin 16090  df-cos 16091  df-tan 16092  df-pi 16093  df-struct 17171  df-sets 17188  df-slot 17206  df-ndx 17218  df-base 17234  df-ress 17257  df-plusg 17289  df-mulr 17290  df-starv 17291  df-sca 17292  df-vsca 17293  df-ip 17294  df-tset 17295  df-ple 17296  df-ds 17298  df-unif 17299  df-hom 17300  df-cco 17301  df-rest 17441  df-topn 17442  df-0g 17460  df-gsum 17461  df-topgen 17462  df-pt 17463  df-prds 17466  df-xrs 17521  df-qtop 17526  df-imas 17527  df-xps 17529  df-mre 17603  df-mrc 17604  df-acs 17606  df-mgm 18623  df-sgrp 18702  df-mnd 18718  df-submnd 18767  df-mulg 19056  df-cntz 19305  df-cmn 19768  df-psmet 21312  df-xmet 21313  df-met 21314  df-bl 21315  df-mopn 21316  df-fbas 21317  df-fg 21318  df-cnfld 21321  df-top 22837  df-topon 22854  df-topsp 22876  df-bases 22889  df-cld 22962  df-ntr 22963  df-cls 22964  df-nei 23041  df-lp 23079  df-perf 23080  df-cn 23170  df-cnp 23171  df-haus 23258  df-tx 23505  df-hmeo 23698  df-fil 23789  df-fm 23881  df-flim 23882  df-flf 23883  df-xms 24264  df-ms 24265  df-tms 24266  df-cncf 24827  df-limc 25824  df-dv 25825  df-log 26522

This theorem is referenced by:  logcnlem4  26611  atanlogsublem  26882