atancj - Metamath Proof Explorer

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

Theorem atancj 26971

Description: The arctangent function distributes under conjugation. (The condition that ℜ(𝐴) ≠ 0 is necessary because the branch cuts are chosen so that the negative imaginary line "agrees with" neighboring values with negative real part, while the positive imaginary line agrees with values with positive real part. This makes atanneg 26968 true unconditionally but messes up conjugation symmetry, and it is impossible to have both in a single-valued function. The claim is true on the imaginary line between -1 and 1, though.) (Contributed by Mario Carneiro, 31-Mar-2015.)

**Assertion**
Ref	Expression
atancj	⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (𝐴 ∈ dom arctan ∧ (∗‘(arctan‘𝐴)) = (arctan‘(∗‘𝐴))))

**Proof of Theorem atancj**
Step	Hyp	Ref	Expression
1		simpl 482	. . 3 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → 𝐴 ∈ ℂ)
2		simpr 484	. . . 4 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (ℜ‘𝐴) ≠ 0)
3		fveq2 6920	. . . . . 6 ⊢ (𝐴 = -i → (ℜ‘𝐴) = (ℜ‘-i))
4		ax-icn 11243	. . . . . . . 8 ⊢ i ∈ ℂ
5	4	renegi 15229	. . . . . . 7 ⊢ (ℜ‘-i) = -(ℜ‘i)
6		rei 15205	. . . . . . . 8 ⊢ (ℜ‘i) = 0
7	6	negeqi 11529	. . . . . . 7 ⊢ -(ℜ‘i) = -0
8		neg0 11582	. . . . . . 7 ⊢ -0 = 0
9	5, 7, 8	3eqtri 2772	. . . . . 6 ⊢ (ℜ‘-i) = 0
10	3, 9	eqtrdi 2796	. . . . 5 ⊢ (𝐴 = -i → (ℜ‘𝐴) = 0)
11	10	necon3i 2979	. . . 4 ⊢ ((ℜ‘𝐴) ≠ 0 → 𝐴 ≠ -i)
12	2, 11	syl 17	. . 3 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → 𝐴 ≠ -i)
13		fveq2 6920	. . . . . 6 ⊢ (𝐴 = i → (ℜ‘𝐴) = (ℜ‘i))
14	13, 6	eqtrdi 2796	. . . . 5 ⊢ (𝐴 = i → (ℜ‘𝐴) = 0)
15	14	necon3i 2979	. . . 4 ⊢ ((ℜ‘𝐴) ≠ 0 → 𝐴 ≠ i)
16	2, 15	syl 17	. . 3 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → 𝐴 ≠ i)
17		atandm 26937	. . 3 ⊢ (𝐴 ∈ dom arctan ↔ (𝐴 ∈ ℂ ∧ 𝐴 ≠ -i ∧ 𝐴 ≠ i))
18	1, 12, 16, 17	syl3anbrc 1343	. 2 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → 𝐴 ∈ dom arctan)
19		halfcl 12518	. . . . . 6 ⊢ (i ∈ ℂ → (i / 2) ∈ ℂ)
20	4, 19	ax-mp 5	. . . . 5 ⊢ (i / 2) ∈ ℂ
21		ax-1cn 11242	. . . . . . . 8 ⊢ 1 ∈ ℂ
22		mulcl 11268	. . . . . . . . 9 ⊢ ((i ∈ ℂ ∧ 𝐴 ∈ ℂ) → (i · 𝐴) ∈ ℂ)
23	4, 1, 22	sylancr 586	. . . . . . . 8 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (i · 𝐴) ∈ ℂ)
24		subcl 11535	. . . . . . . 8 ⊢ ((1 ∈ ℂ ∧ (i · 𝐴) ∈ ℂ) → (1 − (i · 𝐴)) ∈ ℂ)
25	21, 23, 24	sylancr 586	. . . . . . 7 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (1 − (i · 𝐴)) ∈ ℂ)
26		atandm2 26938	. . . . . . . . 9 ⊢ (𝐴 ∈ dom arctan ↔ (𝐴 ∈ ℂ ∧ (1 − (i · 𝐴)) ≠ 0 ∧ (1 + (i · 𝐴)) ≠ 0))
27	18, 26	sylib 218	. . . . . . . 8 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (𝐴 ∈ ℂ ∧ (1 − (i · 𝐴)) ≠ 0 ∧ (1 + (i · 𝐴)) ≠ 0))
28	27	simp2d 1143	. . . . . . 7 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (1 − (i · 𝐴)) ≠ 0)
29	25, 28	logcld 26630	. . . . . 6 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (log‘(1 − (i · 𝐴))) ∈ ℂ)
30		addcl 11266	. . . . . . . 8 ⊢ ((1 ∈ ℂ ∧ (i · 𝐴) ∈ ℂ) → (1 + (i · 𝐴)) ∈ ℂ)
31	21, 23, 30	sylancr 586	. . . . . . 7 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (1 + (i · 𝐴)) ∈ ℂ)
32	27	simp3d 1144	. . . . . . 7 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (1 + (i · 𝐴)) ≠ 0)
33	31, 32	logcld 26630	. . . . . 6 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (log‘(1 + (i · 𝐴))) ∈ ℂ)
34	29, 33	subcld 11647	. . . . 5 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((log‘(1 − (i · 𝐴))) − (log‘(1 + (i · 𝐴)))) ∈ ℂ)
35		cjmul 15191	. . . . 5 ⊢ (((i / 2) ∈ ℂ ∧ ((log‘(1 − (i · 𝐴))) − (log‘(1 + (i · 𝐴)))) ∈ ℂ) → (∗‘((i / 2) · ((log‘(1 − (i · 𝐴))) − (log‘(1 + (i · 𝐴)))))) = ((∗‘(i / 2)) · (∗‘((log‘(1 − (i · 𝐴))) − (log‘(1 + (i · 𝐴)))))))
36	20, 34, 35	sylancr 586	. . . 4 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (∗‘((i / 2) · ((log‘(1 − (i · 𝐴))) − (log‘(1 + (i · 𝐴)))))) = ((∗‘(i / 2)) · (∗‘((log‘(1 − (i · 𝐴))) − (log‘(1 + (i · 𝐴)))))))
37		2ne0 12397	. . . . . . . 8 ⊢ 2 ≠ 0
38		2cn 12368	. . . . . . . . 9 ⊢ 2 ∈ ℂ
39	4, 38	cjdivi 15240	. . . . . . . 8 ⊢ (2 ≠ 0 → (∗‘(i / 2)) = ((∗‘i) / (∗‘2)))
40	37, 39	ax-mp 5	. . . . . . 7 ⊢ (∗‘(i / 2)) = ((∗‘i) / (∗‘2))
41		divneg 11986	. . . . . . . . 9 ⊢ ((i ∈ ℂ ∧ 2 ∈ ℂ ∧ 2 ≠ 0) → -(i / 2) = (-i / 2))
42	4, 38, 37, 41	mp3an 1461	. . . . . . . 8 ⊢ -(i / 2) = (-i / 2)
43		cji 15208	. . . . . . . . 9 ⊢ (∗‘i) = -i
44		2re 12367	. . . . . . . . . 10 ⊢ 2 ∈ ℝ
45		cjre 15188	. . . . . . . . . 10 ⊢ (2 ∈ ℝ → (∗‘2) = 2)
46	44, 45	ax-mp 5	. . . . . . . . 9 ⊢ (∗‘2) = 2
47	43, 46	oveq12i 7460	. . . . . . . 8 ⊢ ((∗‘i) / (∗‘2)) = (-i / 2)
48	42, 47	eqtr4i 2771	. . . . . . 7 ⊢ -(i / 2) = ((∗‘i) / (∗‘2))
49	40, 48	eqtr4i 2771	. . . . . 6 ⊢ (∗‘(i / 2)) = -(i / 2)
50	49	oveq1i 7458	. . . . 5 ⊢ ((∗‘(i / 2)) · (∗‘((log‘(1 − (i · 𝐴))) − (log‘(1 + (i · 𝐴)))))) = (-(i / 2) · (∗‘((log‘(1 − (i · 𝐴))) − (log‘(1 + (i · 𝐴))))))
51	34	cjcld 15245	. . . . . 6 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (∗‘((log‘(1 − (i · 𝐴))) − (log‘(1 + (i · 𝐴))))) ∈ ℂ)
52		mulneg12 11728	. . . . . 6 ⊢ (((i / 2) ∈ ℂ ∧ (∗‘((log‘(1 − (i · 𝐴))) − (log‘(1 + (i · 𝐴))))) ∈ ℂ) → (-(i / 2) · (∗‘((log‘(1 − (i · 𝐴))) − (log‘(1 + (i · 𝐴)))))) = ((i / 2) · -(∗‘((log‘(1 − (i · 𝐴))) − (log‘(1 + (i · 𝐴)))))))
53	20, 51, 52	sylancr 586	. . . . 5 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (-(i / 2) · (∗‘((log‘(1 − (i · 𝐴))) − (log‘(1 + (i · 𝐴)))))) = ((i / 2) · -(∗‘((log‘(1 − (i · 𝐴))) − (log‘(1 + (i · 𝐴)))))))
54	50, 53	eqtrid 2792	. . . 4 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((∗‘(i / 2)) · (∗‘((log‘(1 − (i · 𝐴))) − (log‘(1 + (i · 𝐴)))))) = ((i / 2) · -(∗‘((log‘(1 − (i · 𝐴))) − (log‘(1 + (i · 𝐴)))))))
55		cjsub 15198	. . . . . . . . 9 ⊢ (((log‘(1 − (i · 𝐴))) ∈ ℂ ∧ (log‘(1 + (i · 𝐴))) ∈ ℂ) → (∗‘((log‘(1 − (i · 𝐴))) − (log‘(1 + (i · 𝐴))))) = ((∗‘(log‘(1 − (i · 𝐴)))) − (∗‘(log‘(1 + (i · 𝐴))))))
56	29, 33, 55	syl2anc 583	. . . . . . . 8 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (∗‘((log‘(1 − (i · 𝐴))) − (log‘(1 + (i · 𝐴))))) = ((∗‘(log‘(1 − (i · 𝐴)))) − (∗‘(log‘(1 + (i · 𝐴))))))
57		imsub 15184	. . . . . . . . . . . . . . 15 ⊢ ((1 ∈ ℂ ∧ (i · 𝐴) ∈ ℂ) → (ℑ‘(1 − (i · 𝐴))) = ((ℑ‘1) − (ℑ‘(i · 𝐴))))
58	21, 23, 57	sylancr 586	. . . . . . . . . . . . . 14 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (ℑ‘(1 − (i · 𝐴))) = ((ℑ‘1) − (ℑ‘(i · 𝐴))))
59		reim 15158	. . . . . . . . . . . . . . . 16 ⊢ (𝐴 ∈ ℂ → (ℜ‘𝐴) = (ℑ‘(i · 𝐴)))
60	59	adantr 480	. . . . . . . . . . . . . . 15 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (ℜ‘𝐴) = (ℑ‘(i · 𝐴)))
61	60	oveq2d 7464	. . . . . . . . . . . . . 14 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((ℑ‘1) − (ℜ‘𝐴)) = ((ℑ‘1) − (ℑ‘(i · 𝐴))))
62	58, 61	eqtr4d 2783	. . . . . . . . . . . . 13 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (ℑ‘(1 − (i · 𝐴))) = ((ℑ‘1) − (ℜ‘𝐴)))
63		df-neg 11523	. . . . . . . . . . . . . 14 ⊢ -(ℜ‘𝐴) = (0 − (ℜ‘𝐴))
64		im1 15204	. . . . . . . . . . . . . . 15 ⊢ (ℑ‘1) = 0
65	64	oveq1i 7458	. . . . . . . . . . . . . 14 ⊢ ((ℑ‘1) − (ℜ‘𝐴)) = (0 − (ℜ‘𝐴))
66	63, 65	eqtr4i 2771	. . . . . . . . . . . . 13 ⊢ -(ℜ‘𝐴) = ((ℑ‘1) − (ℜ‘𝐴))
67	62, 66	eqtr4di 2798	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (ℑ‘(1 − (i · 𝐴))) = -(ℜ‘𝐴))
68		recl 15159	. . . . . . . . . . . . . . 15 ⊢ (𝐴 ∈ ℂ → (ℜ‘𝐴) ∈ ℝ)
69	68	adantr 480	. . . . . . . . . . . . . 14 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (ℜ‘𝐴) ∈ ℝ)
70	69	recnd 11318	. . . . . . . . . . . . 13 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (ℜ‘𝐴) ∈ ℂ)
71	70, 2	negne0d 11645	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → -(ℜ‘𝐴) ≠ 0)
72	67, 71	eqnetrd 3014	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (ℑ‘(1 − (i · 𝐴))) ≠ 0)
73		logcj 26666	. . . . . . . . . . 11 ⊢ (((1 − (i · 𝐴)) ∈ ℂ ∧ (ℑ‘(1 − (i · 𝐴))) ≠ 0) → (log‘(∗‘(1 − (i · 𝐴)))) = (∗‘(log‘(1 − (i · 𝐴)))))
74	25, 72, 73	syl2anc 583	. . . . . . . . . 10 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (log‘(∗‘(1 − (i · 𝐴)))) = (∗‘(log‘(1 − (i · 𝐴)))))
75		cjsub 15198	. . . . . . . . . . . . 13 ⊢ ((1 ∈ ℂ ∧ (i · 𝐴) ∈ ℂ) → (∗‘(1 − (i · 𝐴))) = ((∗‘1) − (∗‘(i · 𝐴))))
76	21, 23, 75	sylancr 586	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (∗‘(1 − (i · 𝐴))) = ((∗‘1) − (∗‘(i · 𝐴))))
77		1re 11290	. . . . . . . . . . . . . 14 ⊢ 1 ∈ ℝ
78		cjre 15188	. . . . . . . . . . . . . 14 ⊢ (1 ∈ ℝ → (∗‘1) = 1)
79	77, 78	mp1i 13	. . . . . . . . . . . . 13 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (∗‘1) = 1)
80		cjmul 15191	. . . . . . . . . . . . . . 15 ⊢ ((i ∈ ℂ ∧ 𝐴 ∈ ℂ) → (∗‘(i · 𝐴)) = ((∗‘i) · (∗‘𝐴)))
81	4, 1, 80	sylancr 586	. . . . . . . . . . . . . 14 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (∗‘(i · 𝐴)) = ((∗‘i) · (∗‘𝐴)))
82	43	oveq1i 7458	. . . . . . . . . . . . . . 15 ⊢ ((∗‘i) · (∗‘𝐴)) = (-i · (∗‘𝐴))
83		cjcl 15154	. . . . . . . . . . . . . . . . 17 ⊢ (𝐴 ∈ ℂ → (∗‘𝐴) ∈ ℂ)
84	83	adantr 480	. . . . . . . . . . . . . . . 16 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (∗‘𝐴) ∈ ℂ)
85		mulneg1 11726	. . . . . . . . . . . . . . . 16 ⊢ ((i ∈ ℂ ∧ (∗‘𝐴) ∈ ℂ) → (-i · (∗‘𝐴)) = -(i · (∗‘𝐴)))
86	4, 84, 85	sylancr 586	. . . . . . . . . . . . . . 15 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (-i · (∗‘𝐴)) = -(i · (∗‘𝐴)))
87	82, 86	eqtrid 2792	. . . . . . . . . . . . . 14 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((∗‘i) · (∗‘𝐴)) = -(i · (∗‘𝐴)))
88	81, 87	eqtrd 2780	. . . . . . . . . . . . 13 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (∗‘(i · 𝐴)) = -(i · (∗‘𝐴)))
89	79, 88	oveq12d 7466	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((∗‘1) − (∗‘(i · 𝐴))) = (1 − -(i · (∗‘𝐴))))
90		mulcl 11268	. . . . . . . . . . . . . 14 ⊢ ((i ∈ ℂ ∧ (∗‘𝐴) ∈ ℂ) → (i · (∗‘𝐴)) ∈ ℂ)
91	4, 84, 90	sylancr 586	. . . . . . . . . . . . 13 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (i · (∗‘𝐴)) ∈ ℂ)
92		subneg 11585	. . . . . . . . . . . . 13 ⊢ ((1 ∈ ℂ ∧ (i · (∗‘𝐴)) ∈ ℂ) → (1 − -(i · (∗‘𝐴))) = (1 + (i · (∗‘𝐴))))
93	21, 91, 92	sylancr 586	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (1 − -(i · (∗‘𝐴))) = (1 + (i · (∗‘𝐴))))
94	76, 89, 93	3eqtrd 2784	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (∗‘(1 − (i · 𝐴))) = (1 + (i · (∗‘𝐴))))
95	94	fveq2d 6924	. . . . . . . . . 10 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (log‘(∗‘(1 − (i · 𝐴)))) = (log‘(1 + (i · (∗‘𝐴)))))
96	74, 95	eqtr3d 2782	. . . . . . . . 9 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (∗‘(log‘(1 − (i · 𝐴)))) = (log‘(1 + (i · (∗‘𝐴)))))
97		imadd 15183	. . . . . . . . . . . . . 14 ⊢ ((1 ∈ ℂ ∧ (i · 𝐴) ∈ ℂ) → (ℑ‘(1 + (i · 𝐴))) = ((ℑ‘1) + (ℑ‘(i · 𝐴))))
98	21, 23, 97	sylancr 586	. . . . . . . . . . . . 13 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (ℑ‘(1 + (i · 𝐴))) = ((ℑ‘1) + (ℑ‘(i · 𝐴))))
99	60	oveq2d 7464	. . . . . . . . . . . . . 14 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (0 + (ℜ‘𝐴)) = (0 + (ℑ‘(i · 𝐴))))
100	64	oveq1i 7458	. . . . . . . . . . . . . 14 ⊢ ((ℑ‘1) + (ℑ‘(i · 𝐴))) = (0 + (ℑ‘(i · 𝐴)))
101	99, 100	eqtr4di 2798	. . . . . . . . . . . . 13 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (0 + (ℜ‘𝐴)) = ((ℑ‘1) + (ℑ‘(i · 𝐴))))
102	70	addlidd 11491	. . . . . . . . . . . . 13 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (0 + (ℜ‘𝐴)) = (ℜ‘𝐴))
103	98, 101, 102	3eqtr2d 2786	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (ℑ‘(1 + (i · 𝐴))) = (ℜ‘𝐴))
104	103, 2	eqnetrd 3014	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (ℑ‘(1 + (i · 𝐴))) ≠ 0)
105		logcj 26666	. . . . . . . . . . 11 ⊢ (((1 + (i · 𝐴)) ∈ ℂ ∧ (ℑ‘(1 + (i · 𝐴))) ≠ 0) → (log‘(∗‘(1 + (i · 𝐴)))) = (∗‘(log‘(1 + (i · 𝐴)))))
106	31, 104, 105	syl2anc 583	. . . . . . . . . 10 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (log‘(∗‘(1 + (i · 𝐴)))) = (∗‘(log‘(1 + (i · 𝐴)))))
107		cjadd 15190	. . . . . . . . . . . . 13 ⊢ ((1 ∈ ℂ ∧ (i · 𝐴) ∈ ℂ) → (∗‘(1 + (i · 𝐴))) = ((∗‘1) + (∗‘(i · 𝐴))))
108	21, 23, 107	sylancr 586	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (∗‘(1 + (i · 𝐴))) = ((∗‘1) + (∗‘(i · 𝐴))))
109	79, 88	oveq12d 7466	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((∗‘1) + (∗‘(i · 𝐴))) = (1 + -(i · (∗‘𝐴))))
110		negsub 11584	. . . . . . . . . . . . 13 ⊢ ((1 ∈ ℂ ∧ (i · (∗‘𝐴)) ∈ ℂ) → (1 + -(i · (∗‘𝐴))) = (1 − (i · (∗‘𝐴))))
111	21, 91, 110	sylancr 586	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (1 + -(i · (∗‘𝐴))) = (1 − (i · (∗‘𝐴))))
112	108, 109, 111	3eqtrd 2784	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (∗‘(1 + (i · 𝐴))) = (1 − (i · (∗‘𝐴))))
113	112	fveq2d 6924	. . . . . . . . . 10 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (log‘(∗‘(1 + (i · 𝐴)))) = (log‘(1 − (i · (∗‘𝐴)))))
114	106, 113	eqtr3d 2782	. . . . . . . . 9 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (∗‘(log‘(1 + (i · 𝐴)))) = (log‘(1 − (i · (∗‘𝐴)))))
115	96, 114	oveq12d 7466	. . . . . . . 8 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((∗‘(log‘(1 − (i · 𝐴)))) − (∗‘(log‘(1 + (i · 𝐴))))) = ((log‘(1 + (i · (∗‘𝐴)))) − (log‘(1 − (i · (∗‘𝐴))))))
116	56, 115	eqtrd 2780	. . . . . . 7 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (∗‘((log‘(1 − (i · 𝐴))) − (log‘(1 + (i · 𝐴))))) = ((log‘(1 + (i · (∗‘𝐴)))) − (log‘(1 − (i · (∗‘𝐴))))))
117	116	negeqd 11530	. . . . . 6 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → -(∗‘((log‘(1 − (i · 𝐴))) − (log‘(1 + (i · 𝐴))))) = -((log‘(1 + (i · (∗‘𝐴)))) − (log‘(1 − (i · (∗‘𝐴))))))
118		addcl 11266	. . . . . . . . 9 ⊢ ((1 ∈ ℂ ∧ (i · (∗‘𝐴)) ∈ ℂ) → (1 + (i · (∗‘𝐴))) ∈ ℂ)
119	21, 91, 118	sylancr 586	. . . . . . . 8 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (1 + (i · (∗‘𝐴))) ∈ ℂ)
120		atandmcj 26970	. . . . . . . . . 10 ⊢ (𝐴 ∈ dom arctan → (∗‘𝐴) ∈ dom arctan)
121	18, 120	syl 17	. . . . . . . . 9 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (∗‘𝐴) ∈ dom arctan)
122		atandm2 26938	. . . . . . . . . 10 ⊢ ((∗‘𝐴) ∈ dom arctan ↔ ((∗‘𝐴) ∈ ℂ ∧ (1 − (i · (∗‘𝐴))) ≠ 0 ∧ (1 + (i · (∗‘𝐴))) ≠ 0))
123	122	simp3bi 1147	. . . . . . . . 9 ⊢ ((∗‘𝐴) ∈ dom arctan → (1 + (i · (∗‘𝐴))) ≠ 0)
124	121, 123	syl 17	. . . . . . . 8 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (1 + (i · (∗‘𝐴))) ≠ 0)
125	119, 124	logcld 26630	. . . . . . 7 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (log‘(1 + (i · (∗‘𝐴)))) ∈ ℂ)
126		subcl 11535	. . . . . . . . 9 ⊢ ((1 ∈ ℂ ∧ (i · (∗‘𝐴)) ∈ ℂ) → (1 − (i · (∗‘𝐴))) ∈ ℂ)
127	21, 91, 126	sylancr 586	. . . . . . . 8 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (1 − (i · (∗‘𝐴))) ∈ ℂ)
128	122	simp2bi 1146	. . . . . . . . 9 ⊢ ((∗‘𝐴) ∈ dom arctan → (1 − (i · (∗‘𝐴))) ≠ 0)
129	121, 128	syl 17	. . . . . . . 8 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (1 − (i · (∗‘𝐴))) ≠ 0)
130	127, 129	logcld 26630	. . . . . . 7 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (log‘(1 − (i · (∗‘𝐴)))) ∈ ℂ)
131	125, 130	negsubdi2d 11663	. . . . . 6 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → -((log‘(1 + (i · (∗‘𝐴)))) − (log‘(1 − (i · (∗‘𝐴))))) = ((log‘(1 − (i · (∗‘𝐴)))) − (log‘(1 + (i · (∗‘𝐴))))))
132	117, 131	eqtrd 2780	. . . . 5 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → -(∗‘((log‘(1 − (i · 𝐴))) − (log‘(1 + (i · 𝐴))))) = ((log‘(1 − (i · (∗‘𝐴)))) − (log‘(1 + (i · (∗‘𝐴))))))
133	132	oveq2d 7464	. . . 4 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → ((i / 2) · -(∗‘((log‘(1 − (i · 𝐴))) − (log‘(1 + (i · 𝐴)))))) = ((i / 2) · ((log‘(1 − (i · (∗‘𝐴)))) − (log‘(1 + (i · (∗‘𝐴)))))))
134	36, 54, 133	3eqtrd 2784	. . 3 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (∗‘((i / 2) · ((log‘(1 − (i · 𝐴))) − (log‘(1 + (i · 𝐴)))))) = ((i / 2) · ((log‘(1 − (i · (∗‘𝐴)))) − (log‘(1 + (i · (∗‘𝐴)))))))
135		atanval 26945	. . . . 5 ⊢ (𝐴 ∈ dom arctan → (arctan‘𝐴) = ((i / 2) · ((log‘(1 − (i · 𝐴))) − (log‘(1 + (i · 𝐴))))))
136	18, 135	syl 17	. . . 4 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (arctan‘𝐴) = ((i / 2) · ((log‘(1 − (i · 𝐴))) − (log‘(1 + (i · 𝐴))))))
137	136	fveq2d 6924	. . 3 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (∗‘(arctan‘𝐴)) = (∗‘((i / 2) · ((log‘(1 − (i · 𝐴))) − (log‘(1 + (i · 𝐴)))))))
138		atanval 26945	. . . 4 ⊢ ((∗‘𝐴) ∈ dom arctan → (arctan‘(∗‘𝐴)) = ((i / 2) · ((log‘(1 − (i · (∗‘𝐴)))) − (log‘(1 + (i · (∗‘𝐴)))))))
139	121, 138	syl 17	. . 3 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (arctan‘(∗‘𝐴)) = ((i / 2) · ((log‘(1 − (i · (∗‘𝐴)))) − (log‘(1 + (i · (∗‘𝐴)))))))
140	134, 137, 139	3eqtr4d 2790	. 2 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (∗‘(arctan‘𝐴)) = (arctan‘(∗‘𝐴)))
141	18, 140	jca 511	1 ⊢ ((𝐴 ∈ ℂ ∧ (ℜ‘𝐴) ≠ 0) → (𝐴 ∈ dom arctan ∧ (∗‘(arctan‘𝐴)) = (arctan‘(∗‘𝐴))))

Colors of variables: wff setvar class

Syntax hints: → wi 4 ∧ wa 395 ∧ w3a 1087 = wceq 1537 ∈ wcel 2108 ≠ wne 2946 dom cdm 5700 ‘cfv 6573 (class class class)co 7448 ℂcc 11182 ℝcr 11183 0cc0 11184 1c1 11185 ici 11186 + caddc 11187 · cmul 11189 − cmin 11520 -cneg 11521 / cdiv 11947 2c2 12348 ∗ccj 15145 ℜcre 15146 ℑcim 15147 logclog 26614 arctancatan 26925

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1793 ax-4 1807 ax-5 1909 ax-6 1967 ax-7 2007 ax-8 2110 ax-9 2118 ax-10 2141 ax-11 2158 ax-12 2178 ax-ext 2711 ax-rep 5303 ax-sep 5317 ax-nul 5324 ax-pow 5383 ax-pr 5447 ax-un 7770 ax-inf2 9710 ax-cnex 11240 ax-resscn 11241 ax-1cn 11242 ax-icn 11243 ax-addcl 11244 ax-addrcl 11245 ax-mulcl 11246 ax-mulrcl 11247 ax-mulcom 11248 ax-addass 11249 ax-mulass 11250 ax-distr 11251 ax-i2m1 11252 ax-1ne0 11253 ax-1rid 11254 ax-rnegex 11255 ax-rrecex 11256 ax-cnre 11257 ax-pre-lttri 11258 ax-pre-lttrn 11259 ax-pre-ltadd 11260 ax-pre-mulgt0 11261 ax-pre-sup 11262 ax-addf 11263

This theorem depends on definitions: df-bi 207 df-an 396 df-or 847 df-3or 1088 df-3an 1089 df-tru 1540 df-fal 1550 df-ex 1778 df-nf 1782 df-sb 2065 df-mo 2543 df-eu 2572 df-clab 2718 df-cleq 2732 df-clel 2819 df-nfc 2895 df-ne 2947 df-nel 3053 df-ral 3068 df-rex 3077 df-rmo 3388 df-reu 3389 df-rab 3444 df-v 3490 df-sbc 3805 df-csb 3922 df-dif 3979 df-un 3981 df-in 3983 df-ss 3993 df-pss 3996 df-nul 4353 df-if 4549 df-pw 4624 df-sn 4649 df-pr 4651 df-tp 4653 df-op 4655 df-uni 4932 df-int 4971 df-iun 5017 df-iin 5018 df-br 5167 df-opab 5229 df-mpt 5250 df-tr 5284 df-id 5593 df-eprel 5599 df-po 5607 df-so 5608 df-fr 5652 df-se 5653 df-we 5654 df-xp 5706 df-rel 5707 df-cnv 5708 df-co 5709 df-dm 5710 df-rn 5711 df-res 5712 df-ima 5713 df-pred 6332 df-ord 6398 df-on 6399 df-lim 6400 df-suc 6401 df-iota 6525 df-fun 6575 df-fn 6576 df-f 6577 df-f1 6578 df-fo 6579 df-f1o 6580 df-fv 6581 df-isom 6582 df-riota 7404 df-ov 7451 df-oprab 7452 df-mpo 7453 df-of 7714 df-om 7904 df-1st 8030 df-2nd 8031 df-supp 8202 df-frecs 8322 df-wrecs 8353 df-recs 8427 df-rdg 8466 df-1o 8522 df-2o 8523 df-er 8763 df-map 8886 df-pm 8887 df-ixp 8956 df-en 9004 df-dom 9005 df-sdom 9006 df-fin 9007 df-fsupp 9432 df-fi 9480 df-sup 9511 df-inf 9512 df-oi 9579 df-card 10008 df-pnf 11326 df-mnf 11327 df-xr 11328 df-ltxr 11329 df-le 11330 df-sub 11522 df-neg 11523 df-div 11948 df-nn 12294 df-2 12356 df-3 12357 df-4 12358 df-5 12359 df-6 12360 df-7 12361 df-8 12362 df-9 12363 df-n0 12554 df-z 12640 df-dec 12759 df-uz 12904 df-q 13014 df-rp 13058 df-xneg 13175 df-xadd 13176 df-xmul 13177 df-ioo 13411 df-ioc 13412 df-ico 13413 df-icc 13414 df-fz 13568 df-fzo 13712 df-fl 13843 df-mod 13921 df-seq 14053 df-exp 14113 df-fac 14323 df-bc 14352 df-hash 14380 df-shft 15116 df-cj 15148 df-re 15149 df-im 15150 df-sqrt 15284 df-abs 15285 df-limsup 15517 df-clim 15534 df-rlim 15535 df-sum 15735 df-ef 16115 df-sin 16117 df-cos 16118 df-pi 16120 df-struct 17194 df-sets 17211 df-slot 17229 df-ndx 17241 df-base 17259 df-ress 17288 df-plusg 17324 df-mulr 17325 df-starv 17326 df-sca 17327 df-vsca 17328 df-ip 17329 df-tset 17330 df-ple 17331 df-ds 17333 df-unif 17334 df-hom 17335 df-cco 17336 df-rest 17482 df-topn 17483 df-0g 17501 df-gsum 17502 df-topgen 17503 df-pt 17504 df-prds 17507 df-xrs 17562 df-qtop 17567 df-imas 17568 df-xps 17570 df-mre 17644 df-mrc 17645 df-acs 17647 df-mgm 18678 df-sgrp 18757 df-mnd 18773 df-submnd 18819 df-mulg 19108 df-cntz 19357 df-cmn 19824 df-psmet 21379 df-xmet 21380 df-met 21381 df-bl 21382 df-mopn 21383 df-fbas 21384 df-fg 21385 df-cnfld 21388 df-top 22921 df-topon 22938 df-topsp 22960 df-bases 22974 df-cld 23048 df-ntr 23049 df-cls 23050 df-nei 23127 df-lp 23165 df-perf 23166 df-cn 23256 df-cnp 23257 df-haus 23344 df-tx 23591 df-hmeo 23784 df-fil 23875 df-fm 23967 df-flim 23968 df-flf 23969 df-xms 24351 df-ms 24352 df-tms 24353 df-cncf 24923 df-limc 25921 df-dv 25922 df-log 26616 df-atan 26928

This theorem is referenced by: atanrecl 26972

W3C validator