atanlogaddlem - Metamath Proof Explorer

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

Theorem atanlogaddlem 26655

Description: Lemma for atanlogadd 26656. (Contributed by Mario Carneiro, 3-Apr-2015.)

**Assertion**
Ref	Expression
atanlogaddlem	⊢ ((𝐴 ∈ dom arctan ∧ 0 ≤ (ℜ‘𝐴)) → ((log‘(1 + (i · 𝐴))) + (log‘(1 − (i · 𝐴)))) ∈ ran log)

**Proof of Theorem atanlogaddlem**
Step	Hyp	Ref	Expression
1		0re 11221	. . . 4 ⊢ 0 ∈ ℝ
2		atandm2 26619	. . . . . 6 ⊢ (𝐴 ∈ dom arctan ↔ (𝐴 ∈ ℂ ∧ (1 − (i · 𝐴)) ≠ 0 ∧ (1 + (i · 𝐴)) ≠ 0))
3	2	simp1bi 1144	. . . . 5 ⊢ (𝐴 ∈ dom arctan → 𝐴 ∈ ℂ)
4	3	recld 15146	. . . 4 ⊢ (𝐴 ∈ dom arctan → (ℜ‘𝐴) ∈ ℝ)
5		leloe 11305	. . . 4 ⊢ ((0 ∈ ℝ ∧ (ℜ‘𝐴) ∈ ℝ) → (0 ≤ (ℜ‘𝐴) ↔ (0 < (ℜ‘𝐴) ∨ 0 = (ℜ‘𝐴))))
6	1, 4, 5	sylancr 586	. . 3 ⊢ (𝐴 ∈ dom arctan → (0 ≤ (ℜ‘𝐴) ↔ (0 < (ℜ‘𝐴) ∨ 0 = (ℜ‘𝐴))))
7	6	biimpa 476	. 2 ⊢ ((𝐴 ∈ dom arctan ∧ 0 ≤ (ℜ‘𝐴)) → (0 < (ℜ‘𝐴) ∨ 0 = (ℜ‘𝐴)))
8		ax-1cn 11172	. . . . . . . 8 ⊢ 1 ∈ ℂ
9		ax-icn 11173	. . . . . . . . 9 ⊢ i ∈ ℂ
10		mulcl 11198	. . . . . . . . 9 ⊢ ((i ∈ ℂ ∧ 𝐴 ∈ ℂ) → (i · 𝐴) ∈ ℂ)
11	9, 3, 10	sylancr 586	. . . . . . . 8 ⊢ (𝐴 ∈ dom arctan → (i · 𝐴) ∈ ℂ)
12		addcl 11196	. . . . . . . 8 ⊢ ((1 ∈ ℂ ∧ (i · 𝐴) ∈ ℂ) → (1 + (i · 𝐴)) ∈ ℂ)
13	8, 11, 12	sylancr 586	. . . . . . 7 ⊢ (𝐴 ∈ dom arctan → (1 + (i · 𝐴)) ∈ ℂ)
14	2	simp3bi 1146	. . . . . . 7 ⊢ (𝐴 ∈ dom arctan → (1 + (i · 𝐴)) ≠ 0)
15	13, 14	logcld 26316	. . . . . 6 ⊢ (𝐴 ∈ dom arctan → (log‘(1 + (i · 𝐴))) ∈ ℂ)
16		subcl 11464	. . . . . . . 8 ⊢ ((1 ∈ ℂ ∧ (i · 𝐴) ∈ ℂ) → (1 − (i · 𝐴)) ∈ ℂ)
17	8, 11, 16	sylancr 586	. . . . . . 7 ⊢ (𝐴 ∈ dom arctan → (1 − (i · 𝐴)) ∈ ℂ)
18	2	simp2bi 1145	. . . . . . 7 ⊢ (𝐴 ∈ dom arctan → (1 − (i · 𝐴)) ≠ 0)
19	17, 18	logcld 26316	. . . . . 6 ⊢ (𝐴 ∈ dom arctan → (log‘(1 − (i · 𝐴))) ∈ ℂ)
20	15, 19	addcld 11238	. . . . 5 ⊢ (𝐴 ∈ dom arctan → ((log‘(1 + (i · 𝐴))) + (log‘(1 − (i · 𝐴)))) ∈ ℂ)
21	20	adantr 480	. . . 4 ⊢ ((𝐴 ∈ dom arctan ∧ 0 < (ℜ‘𝐴)) → ((log‘(1 + (i · 𝐴))) + (log‘(1 − (i · 𝐴)))) ∈ ℂ)
22		pire 26205	. . . . . . . 8 ⊢ π ∈ ℝ
23	22	renegcli 11526	. . . . . . 7 ⊢ -π ∈ ℝ
24	23	a1i 11	. . . . . 6 ⊢ ((𝐴 ∈ dom arctan ∧ 0 < (ℜ‘𝐴)) → -π ∈ ℝ)
25	19	adantr 480	. . . . . . 7 ⊢ ((𝐴 ∈ dom arctan ∧ 0 < (ℜ‘𝐴)) → (log‘(1 − (i · 𝐴))) ∈ ℂ)
26	25	imcld 15147	. . . . . 6 ⊢ ((𝐴 ∈ dom arctan ∧ 0 < (ℜ‘𝐴)) → (ℑ‘(log‘(1 − (i · 𝐴)))) ∈ ℝ)
27	15	adantr 480	. . . . . . . 8 ⊢ ((𝐴 ∈ dom arctan ∧ 0 < (ℜ‘𝐴)) → (log‘(1 + (i · 𝐴))) ∈ ℂ)
28	27	imcld 15147	. . . . . . 7 ⊢ ((𝐴 ∈ dom arctan ∧ 0 < (ℜ‘𝐴)) → (ℑ‘(log‘(1 + (i · 𝐴)))) ∈ ℝ)
29	28, 26	readdcld 11248	. . . . . 6 ⊢ ((𝐴 ∈ dom arctan ∧ 0 < (ℜ‘𝐴)) → ((ℑ‘(log‘(1 + (i · 𝐴)))) + (ℑ‘(log‘(1 − (i · 𝐴))))) ∈ ℝ)
30	17	adantr 480	. . . . . . . . 9 ⊢ ((𝐴 ∈ dom arctan ∧ 0 < (ℜ‘𝐴)) → (1 − (i · 𝐴)) ∈ ℂ)
31		im1 15107	. . . . . . . . . . . . 13 ⊢ (ℑ‘1) = 0
32	31	oveq1i 7422	. . . . . . . . . . . 12 ⊢ ((ℑ‘1) − (ℑ‘(i · 𝐴))) = (0 − (ℑ‘(i · 𝐴)))
33		df-neg 11452	. . . . . . . . . . . 12 ⊢ -(ℑ‘(i · 𝐴)) = (0 − (ℑ‘(i · 𝐴)))
34	32, 33	eqtr4i 2762	. . . . . . . . . . 11 ⊢ ((ℑ‘1) − (ℑ‘(i · 𝐴))) = -(ℑ‘(i · 𝐴))
35	11	adantr 480	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ dom arctan ∧ 0 < (ℜ‘𝐴)) → (i · 𝐴) ∈ ℂ)
36		imsub 15087	. . . . . . . . . . . 12 ⊢ ((1 ∈ ℂ ∧ (i · 𝐴) ∈ ℂ) → (ℑ‘(1 − (i · 𝐴))) = ((ℑ‘1) − (ℑ‘(i · 𝐴))))
37	8, 35, 36	sylancr 586	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ dom arctan ∧ 0 < (ℜ‘𝐴)) → (ℑ‘(1 − (i · 𝐴))) = ((ℑ‘1) − (ℑ‘(i · 𝐴))))
38	3	adantr 480	. . . . . . . . . . . . 13 ⊢ ((𝐴 ∈ dom arctan ∧ 0 < (ℜ‘𝐴)) → 𝐴 ∈ ℂ)
39		reim 15061	. . . . . . . . . . . . 13 ⊢ (𝐴 ∈ ℂ → (ℜ‘𝐴) = (ℑ‘(i · 𝐴)))
40	38, 39	syl 17	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ dom arctan ∧ 0 < (ℜ‘𝐴)) → (ℜ‘𝐴) = (ℑ‘(i · 𝐴)))
41	40	negeqd 11459	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ dom arctan ∧ 0 < (ℜ‘𝐴)) → -(ℜ‘𝐴) = -(ℑ‘(i · 𝐴)))
42	34, 37, 41	3eqtr4a 2797	. . . . . . . . . 10 ⊢ ((𝐴 ∈ dom arctan ∧ 0 < (ℜ‘𝐴)) → (ℑ‘(1 − (i · 𝐴))) = -(ℜ‘𝐴))
43	4	lt0neg2d 11789	. . . . . . . . . . 11 ⊢ (𝐴 ∈ dom arctan → (0 < (ℜ‘𝐴) ↔ -(ℜ‘𝐴) < 0))
44	43	biimpa 476	. . . . . . . . . 10 ⊢ ((𝐴 ∈ dom arctan ∧ 0 < (ℜ‘𝐴)) → -(ℜ‘𝐴) < 0)
45	42, 44	eqbrtrd 5170	. . . . . . . . 9 ⊢ ((𝐴 ∈ dom arctan ∧ 0 < (ℜ‘𝐴)) → (ℑ‘(1 − (i · 𝐴))) < 0)
46		argimlt0 26358	. . . . . . . . 9 ⊢ (((1 − (i · 𝐴)) ∈ ℂ ∧ (ℑ‘(1 − (i · 𝐴))) < 0) → (ℑ‘(log‘(1 − (i · 𝐴)))) ∈ (-π(,)0))
47	30, 45, 46	syl2anc 583	. . . . . . . 8 ⊢ ((𝐴 ∈ dom arctan ∧ 0 < (ℜ‘𝐴)) → (ℑ‘(log‘(1 − (i · 𝐴)))) ∈ (-π(,)0))
48		eliooord 13388	. . . . . . . 8 ⊢ ((ℑ‘(log‘(1 − (i · 𝐴)))) ∈ (-π(,)0) → (-π < (ℑ‘(log‘(1 − (i · 𝐴)))) ∧ (ℑ‘(log‘(1 − (i · 𝐴)))) < 0))
49	47, 48	syl 17	. . . . . . 7 ⊢ ((𝐴 ∈ dom arctan ∧ 0 < (ℜ‘𝐴)) → (-π < (ℑ‘(log‘(1 − (i · 𝐴)))) ∧ (ℑ‘(log‘(1 − (i · 𝐴)))) < 0))
50	49	simpld 494	. . . . . 6 ⊢ ((𝐴 ∈ dom arctan ∧ 0 < (ℜ‘𝐴)) → -π < (ℑ‘(log‘(1 − (i · 𝐴)))))
51	13	adantr 480	. . . . . . . . . 10 ⊢ ((𝐴 ∈ dom arctan ∧ 0 < (ℜ‘𝐴)) → (1 + (i · 𝐴)) ∈ ℂ)
52		simpr 484	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ dom arctan ∧ 0 < (ℜ‘𝐴)) → 0 < (ℜ‘𝐴))
53		imadd 15086	. . . . . . . . . . . . 13 ⊢ ((1 ∈ ℂ ∧ (i · 𝐴) ∈ ℂ) → (ℑ‘(1 + (i · 𝐴))) = ((ℑ‘1) + (ℑ‘(i · 𝐴))))
54	8, 35, 53	sylancr 586	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ dom arctan ∧ 0 < (ℜ‘𝐴)) → (ℑ‘(1 + (i · 𝐴))) = ((ℑ‘1) + (ℑ‘(i · 𝐴))))
55	40	oveq2d 7428	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ dom arctan ∧ 0 < (ℜ‘𝐴)) → ((ℑ‘1) + (ℜ‘𝐴)) = ((ℑ‘1) + (ℑ‘(i · 𝐴))))
56	31	oveq1i 7422	. . . . . . . . . . . . 13 ⊢ ((ℑ‘1) + (ℜ‘𝐴)) = (0 + (ℜ‘𝐴))
57	38	recld 15146	. . . . . . . . . . . . . . 15 ⊢ ((𝐴 ∈ dom arctan ∧ 0 < (ℜ‘𝐴)) → (ℜ‘𝐴) ∈ ℝ)
58	57	recnd 11247	. . . . . . . . . . . . . 14 ⊢ ((𝐴 ∈ dom arctan ∧ 0 < (ℜ‘𝐴)) → (ℜ‘𝐴) ∈ ℂ)
59	58	addlidd 11420	. . . . . . . . . . . . 13 ⊢ ((𝐴 ∈ dom arctan ∧ 0 < (ℜ‘𝐴)) → (0 + (ℜ‘𝐴)) = (ℜ‘𝐴))
60	56, 59	eqtrid 2783	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ dom arctan ∧ 0 < (ℜ‘𝐴)) → ((ℑ‘1) + (ℜ‘𝐴)) = (ℜ‘𝐴))
61	54, 55, 60	3eqtr2d 2777	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ dom arctan ∧ 0 < (ℜ‘𝐴)) → (ℑ‘(1 + (i · 𝐴))) = (ℜ‘𝐴))
62	52, 61	breqtrrd 5176	. . . . . . . . . 10 ⊢ ((𝐴 ∈ dom arctan ∧ 0 < (ℜ‘𝐴)) → 0 < (ℑ‘(1 + (i · 𝐴))))
63		argimgt0 26357	. . . . . . . . . 10 ⊢ (((1 + (i · 𝐴)) ∈ ℂ ∧ 0 < (ℑ‘(1 + (i · 𝐴)))) → (ℑ‘(log‘(1 + (i · 𝐴)))) ∈ (0(,)π))
64	51, 62, 63	syl2anc 583	. . . . . . . . 9 ⊢ ((𝐴 ∈ dom arctan ∧ 0 < (ℜ‘𝐴)) → (ℑ‘(log‘(1 + (i · 𝐴)))) ∈ (0(,)π))
65		eliooord 13388	. . . . . . . . 9 ⊢ ((ℑ‘(log‘(1 + (i · 𝐴)))) ∈ (0(,)π) → (0 < (ℑ‘(log‘(1 + (i · 𝐴)))) ∧ (ℑ‘(log‘(1 + (i · 𝐴)))) < π))
66	64, 65	syl 17	. . . . . . . 8 ⊢ ((𝐴 ∈ dom arctan ∧ 0 < (ℜ‘𝐴)) → (0 < (ℑ‘(log‘(1 + (i · 𝐴)))) ∧ (ℑ‘(log‘(1 + (i · 𝐴)))) < π))
67	66	simpld 494	. . . . . . 7 ⊢ ((𝐴 ∈ dom arctan ∧ 0 < (ℜ‘𝐴)) → 0 < (ℑ‘(log‘(1 + (i · 𝐴)))))
68	28, 26	ltaddpos2d 11804	. . . . . . 7 ⊢ ((𝐴 ∈ dom arctan ∧ 0 < (ℜ‘𝐴)) → (0 < (ℑ‘(log‘(1 + (i · 𝐴)))) ↔ (ℑ‘(log‘(1 − (i · 𝐴)))) < ((ℑ‘(log‘(1 + (i · 𝐴)))) + (ℑ‘(log‘(1 − (i · 𝐴)))))))
69	67, 68	mpbid 231	. . . . . 6 ⊢ ((𝐴 ∈ dom arctan ∧ 0 < (ℜ‘𝐴)) → (ℑ‘(log‘(1 − (i · 𝐴)))) < ((ℑ‘(log‘(1 + (i · 𝐴)))) + (ℑ‘(log‘(1 − (i · 𝐴))))))
70	24, 26, 29, 50, 69	lttrd 11380	. . . . 5 ⊢ ((𝐴 ∈ dom arctan ∧ 0 < (ℜ‘𝐴)) → -π < ((ℑ‘(log‘(1 + (i · 𝐴)))) + (ℑ‘(log‘(1 − (i · 𝐴))))))
71	27, 25	imaddd 15167	. . . . 5 ⊢ ((𝐴 ∈ dom arctan ∧ 0 < (ℜ‘𝐴)) → (ℑ‘((log‘(1 + (i · 𝐴))) + (log‘(1 − (i · 𝐴))))) = ((ℑ‘(log‘(1 + (i · 𝐴)))) + (ℑ‘(log‘(1 − (i · 𝐴))))))
72	70, 71	breqtrrd 5176	. . . 4 ⊢ ((𝐴 ∈ dom arctan ∧ 0 < (ℜ‘𝐴)) → -π < (ℑ‘((log‘(1 + (i · 𝐴))) + (log‘(1 − (i · 𝐴))))))
73	22	a1i 11	. . . . . 6 ⊢ ((𝐴 ∈ dom arctan ∧ 0 < (ℜ‘𝐴)) → π ∈ ℝ)
74		0red 11222	. . . . . . . . 9 ⊢ ((𝐴 ∈ dom arctan ∧ 0 < (ℜ‘𝐴)) → 0 ∈ ℝ)
75	49	simprd 495	. . . . . . . . 9 ⊢ ((𝐴 ∈ dom arctan ∧ 0 < (ℜ‘𝐴)) → (ℑ‘(log‘(1 − (i · 𝐴)))) < 0)
76	26, 74, 28, 75	ltadd2dd 11378	. . . . . . . 8 ⊢ ((𝐴 ∈ dom arctan ∧ 0 < (ℜ‘𝐴)) → ((ℑ‘(log‘(1 + (i · 𝐴)))) + (ℑ‘(log‘(1 − (i · 𝐴))))) < ((ℑ‘(log‘(1 + (i · 𝐴)))) + 0))
77	28	recnd 11247	. . . . . . . . 9 ⊢ ((𝐴 ∈ dom arctan ∧ 0 < (ℜ‘𝐴)) → (ℑ‘(log‘(1 + (i · 𝐴)))) ∈ ℂ)
78	77	addridd 11419	. . . . . . . 8 ⊢ ((𝐴 ∈ dom arctan ∧ 0 < (ℜ‘𝐴)) → ((ℑ‘(log‘(1 + (i · 𝐴)))) + 0) = (ℑ‘(log‘(1 + (i · 𝐴)))))
79	76, 78	breqtrd 5174	. . . . . . 7 ⊢ ((𝐴 ∈ dom arctan ∧ 0 < (ℜ‘𝐴)) → ((ℑ‘(log‘(1 + (i · 𝐴)))) + (ℑ‘(log‘(1 − (i · 𝐴))))) < (ℑ‘(log‘(1 + (i · 𝐴)))))
80	66	simprd 495	. . . . . . 7 ⊢ ((𝐴 ∈ dom arctan ∧ 0 < (ℜ‘𝐴)) → (ℑ‘(log‘(1 + (i · 𝐴)))) < π)
81	29, 28, 73, 79, 80	lttrd 11380	. . . . . 6 ⊢ ((𝐴 ∈ dom arctan ∧ 0 < (ℜ‘𝐴)) → ((ℑ‘(log‘(1 + (i · 𝐴)))) + (ℑ‘(log‘(1 − (i · 𝐴))))) < π)
82	29, 73, 81	ltled 11367	. . . . 5 ⊢ ((𝐴 ∈ dom arctan ∧ 0 < (ℜ‘𝐴)) → ((ℑ‘(log‘(1 + (i · 𝐴)))) + (ℑ‘(log‘(1 − (i · 𝐴))))) ≤ π)
83	71, 82	eqbrtrd 5170	. . . 4 ⊢ ((𝐴 ∈ dom arctan ∧ 0 < (ℜ‘𝐴)) → (ℑ‘((log‘(1 + (i · 𝐴))) + (log‘(1 − (i · 𝐴))))) ≤ π)
84		ellogrn 26305	. . . 4 ⊢ (((log‘(1 + (i · 𝐴))) + (log‘(1 − (i · 𝐴)))) ∈ ran log ↔ (((log‘(1 + (i · 𝐴))) + (log‘(1 − (i · 𝐴)))) ∈ ℂ ∧ -π < (ℑ‘((log‘(1 + (i · 𝐴))) + (log‘(1 − (i · 𝐴))))) ∧ (ℑ‘((log‘(1 + (i · 𝐴))) + (log‘(1 − (i · 𝐴))))) ≤ π))
85	21, 72, 83, 84	syl3anbrc 1342	. . 3 ⊢ ((𝐴 ∈ dom arctan ∧ 0 < (ℜ‘𝐴)) → ((log‘(1 + (i · 𝐴))) + (log‘(1 − (i · 𝐴)))) ∈ ran log)
86		0red 11222	. . . 4 ⊢ ((𝐴 ∈ dom arctan ∧ 0 = (ℜ‘𝐴)) → 0 ∈ ℝ)
87	11	adantr 480	. . . . 5 ⊢ ((𝐴 ∈ dom arctan ∧ 0 = (ℜ‘𝐴)) → (i · 𝐴) ∈ ℂ)
88		simpr 484	. . . . . 6 ⊢ ((𝐴 ∈ dom arctan ∧ 0 = (ℜ‘𝐴)) → 0 = (ℜ‘𝐴))
89	3	adantr 480	. . . . . . 7 ⊢ ((𝐴 ∈ dom arctan ∧ 0 = (ℜ‘𝐴)) → 𝐴 ∈ ℂ)
90	89, 39	syl 17	. . . . . 6 ⊢ ((𝐴 ∈ dom arctan ∧ 0 = (ℜ‘𝐴)) → (ℜ‘𝐴) = (ℑ‘(i · 𝐴)))
91	88, 90	eqtr2d 2772	. . . . 5 ⊢ ((𝐴 ∈ dom arctan ∧ 0 = (ℜ‘𝐴)) → (ℑ‘(i · 𝐴)) = 0)
92	87, 91	reim0bd 15152	. . . 4 ⊢ ((𝐴 ∈ dom arctan ∧ 0 = (ℜ‘𝐴)) → (i · 𝐴) ∈ ℝ)
93	15, 19	addcomd 11421	. . . . . 6 ⊢ (𝐴 ∈ dom arctan → ((log‘(1 + (i · 𝐴))) + (log‘(1 − (i · 𝐴)))) = ((log‘(1 − (i · 𝐴))) + (log‘(1 + (i · 𝐴)))))
94	93	ad2antrr 723	. . . . 5 ⊢ (((𝐴 ∈ dom arctan ∧ 0 = (ℜ‘𝐴)) ∧ 0 ≤ (i · 𝐴)) → ((log‘(1 + (i · 𝐴))) + (log‘(1 − (i · 𝐴)))) = ((log‘(1 − (i · 𝐴))) + (log‘(1 + (i · 𝐴)))))
95		logrncl 26313	. . . . . . . 8 ⊢ (((1 − (i · 𝐴)) ∈ ℂ ∧ (1 − (i · 𝐴)) ≠ 0) → (log‘(1 − (i · 𝐴))) ∈ ran log)
96	17, 18, 95	syl2anc 583	. . . . . . 7 ⊢ (𝐴 ∈ dom arctan → (log‘(1 − (i · 𝐴))) ∈ ran log)
97	96	ad2antrr 723	. . . . . 6 ⊢ (((𝐴 ∈ dom arctan ∧ 0 = (ℜ‘𝐴)) ∧ 0 ≤ (i · 𝐴)) → (log‘(1 − (i · 𝐴))) ∈ ran log)
98		1re 11219	. . . . . . . . 9 ⊢ 1 ∈ ℝ
99	92	adantr 480	. . . . . . . . 9 ⊢ (((𝐴 ∈ dom arctan ∧ 0 = (ℜ‘𝐴)) ∧ 0 ≤ (i · 𝐴)) → (i · 𝐴) ∈ ℝ)
100		readdcl 11197	. . . . . . . . 9 ⊢ ((1 ∈ ℝ ∧ (i · 𝐴) ∈ ℝ) → (1 + (i · 𝐴)) ∈ ℝ)
101	98, 99, 100	sylancr 586	. . . . . . . 8 ⊢ (((𝐴 ∈ dom arctan ∧ 0 = (ℜ‘𝐴)) ∧ 0 ≤ (i · 𝐴)) → (1 + (i · 𝐴)) ∈ ℝ)
102		0red 11222	. . . . . . . . 9 ⊢ (((𝐴 ∈ dom arctan ∧ 0 = (ℜ‘𝐴)) ∧ 0 ≤ (i · 𝐴)) → 0 ∈ ℝ)
103		1red 11220	. . . . . . . . 9 ⊢ (((𝐴 ∈ dom arctan ∧ 0 = (ℜ‘𝐴)) ∧ 0 ≤ (i · 𝐴)) → 1 ∈ ℝ)
104		0lt1 11741	. . . . . . . . . 10 ⊢ 0 < 1
105	104	a1i 11	. . . . . . . . 9 ⊢ (((𝐴 ∈ dom arctan ∧ 0 = (ℜ‘𝐴)) ∧ 0 ≤ (i · 𝐴)) → 0 < 1)
106		addge01 11729	. . . . . . . . . . 11 ⊢ ((1 ∈ ℝ ∧ (i · 𝐴) ∈ ℝ) → (0 ≤ (i · 𝐴) ↔ 1 ≤ (1 + (i · 𝐴))))
107	98, 92, 106	sylancr 586	. . . . . . . . . 10 ⊢ ((𝐴 ∈ dom arctan ∧ 0 = (ℜ‘𝐴)) → (0 ≤ (i · 𝐴) ↔ 1 ≤ (1 + (i · 𝐴))))
108	107	biimpa 476	. . . . . . . . 9 ⊢ (((𝐴 ∈ dom arctan ∧ 0 = (ℜ‘𝐴)) ∧ 0 ≤ (i · 𝐴)) → 1 ≤ (1 + (i · 𝐴)))
109	102, 103, 101, 105, 108	ltletrd 11379	. . . . . . . 8 ⊢ (((𝐴 ∈ dom arctan ∧ 0 = (ℜ‘𝐴)) ∧ 0 ≤ (i · 𝐴)) → 0 < (1 + (i · 𝐴)))
110	101, 109	elrpd 13018	. . . . . . 7 ⊢ (((𝐴 ∈ dom arctan ∧ 0 = (ℜ‘𝐴)) ∧ 0 ≤ (i · 𝐴)) → (1 + (i · 𝐴)) ∈ ℝ⁺)
111	110	relogcld 26368	. . . . . 6 ⊢ (((𝐴 ∈ dom arctan ∧ 0 = (ℜ‘𝐴)) ∧ 0 ≤ (i · 𝐴)) → (log‘(1 + (i · 𝐴))) ∈ ℝ)
112		logrnaddcl 26320	. . . . . 6 ⊢ (((log‘(1 − (i · 𝐴))) ∈ ran log ∧ (log‘(1 + (i · 𝐴))) ∈ ℝ) → ((log‘(1 − (i · 𝐴))) + (log‘(1 + (i · 𝐴)))) ∈ ran log)
113	97, 111, 112	syl2anc 583	. . . . 5 ⊢ (((𝐴 ∈ dom arctan ∧ 0 = (ℜ‘𝐴)) ∧ 0 ≤ (i · 𝐴)) → ((log‘(1 − (i · 𝐴))) + (log‘(1 + (i · 𝐴)))) ∈ ran log)
114	94, 113	eqeltrd 2832	. . . 4 ⊢ (((𝐴 ∈ dom arctan ∧ 0 = (ℜ‘𝐴)) ∧ 0 ≤ (i · 𝐴)) → ((log‘(1 + (i · 𝐴))) + (log‘(1 − (i · 𝐴)))) ∈ ran log)
115		logrncl 26313	. . . . . . 7 ⊢ (((1 + (i · 𝐴)) ∈ ℂ ∧ (1 + (i · 𝐴)) ≠ 0) → (log‘(1 + (i · 𝐴))) ∈ ran log)
116	13, 14, 115	syl2anc 583	. . . . . 6 ⊢ (𝐴 ∈ dom arctan → (log‘(1 + (i · 𝐴))) ∈ ran log)
117	116	ad2antrr 723	. . . . 5 ⊢ (((𝐴 ∈ dom arctan ∧ 0 = (ℜ‘𝐴)) ∧ (i · 𝐴) ≤ 0) → (log‘(1 + (i · 𝐴))) ∈ ran log)
118	92	adantr 480	. . . . . . . 8 ⊢ (((𝐴 ∈ dom arctan ∧ 0 = (ℜ‘𝐴)) ∧ (i · 𝐴) ≤ 0) → (i · 𝐴) ∈ ℝ)
119		resubcl 11529	. . . . . . . 8 ⊢ ((1 ∈ ℝ ∧ (i · 𝐴) ∈ ℝ) → (1 − (i · 𝐴)) ∈ ℝ)
120	98, 118, 119	sylancr 586	. . . . . . 7 ⊢ (((𝐴 ∈ dom arctan ∧ 0 = (ℜ‘𝐴)) ∧ (i · 𝐴) ≤ 0) → (1 − (i · 𝐴)) ∈ ℝ)
121		0red 11222	. . . . . . . 8 ⊢ (((𝐴 ∈ dom arctan ∧ 0 = (ℜ‘𝐴)) ∧ (i · 𝐴) ≤ 0) → 0 ∈ ℝ)
122		1red 11220	. . . . . . . 8 ⊢ (((𝐴 ∈ dom arctan ∧ 0 = (ℜ‘𝐴)) ∧ (i · 𝐴) ≤ 0) → 1 ∈ ℝ)
123	104	a1i 11	. . . . . . . 8 ⊢ (((𝐴 ∈ dom arctan ∧ 0 = (ℜ‘𝐴)) ∧ (i · 𝐴) ≤ 0) → 0 < 1)
124		1m0e1 12338	. . . . . . . . 9 ⊢ (1 − 0) = 1
125		1red 11220	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ dom arctan ∧ 0 = (ℜ‘𝐴)) → 1 ∈ ℝ)
126	92, 86, 125	lesub2d 11827	. . . . . . . . . 10 ⊢ ((𝐴 ∈ dom arctan ∧ 0 = (ℜ‘𝐴)) → ((i · 𝐴) ≤ 0 ↔ (1 − 0) ≤ (1 − (i · 𝐴))))
127	126	biimpa 476	. . . . . . . . 9 ⊢ (((𝐴 ∈ dom arctan ∧ 0 = (ℜ‘𝐴)) ∧ (i · 𝐴) ≤ 0) → (1 − 0) ≤ (1 − (i · 𝐴)))
128	124, 127	eqbrtrrid 5184	. . . . . . . 8 ⊢ (((𝐴 ∈ dom arctan ∧ 0 = (ℜ‘𝐴)) ∧ (i · 𝐴) ≤ 0) → 1 ≤ (1 − (i · 𝐴)))
129	121, 122, 120, 123, 128	ltletrd 11379	. . . . . . 7 ⊢ (((𝐴 ∈ dom arctan ∧ 0 = (ℜ‘𝐴)) ∧ (i · 𝐴) ≤ 0) → 0 < (1 − (i · 𝐴)))
130	120, 129	elrpd 13018	. . . . . 6 ⊢ (((𝐴 ∈ dom arctan ∧ 0 = (ℜ‘𝐴)) ∧ (i · 𝐴) ≤ 0) → (1 − (i · 𝐴)) ∈ ℝ⁺)
131	130	relogcld 26368	. . . . 5 ⊢ (((𝐴 ∈ dom arctan ∧ 0 = (ℜ‘𝐴)) ∧ (i · 𝐴) ≤ 0) → (log‘(1 − (i · 𝐴))) ∈ ℝ)
132		logrnaddcl 26320	. . . . 5 ⊢ (((log‘(1 + (i · 𝐴))) ∈ ran log ∧ (log‘(1 − (i · 𝐴))) ∈ ℝ) → ((log‘(1 + (i · 𝐴))) + (log‘(1 − (i · 𝐴)))) ∈ ran log)
133	117, 131, 132	syl2anc 583	. . . 4 ⊢ (((𝐴 ∈ dom arctan ∧ 0 = (ℜ‘𝐴)) ∧ (i · 𝐴) ≤ 0) → ((log‘(1 + (i · 𝐴))) + (log‘(1 − (i · 𝐴)))) ∈ ran log)
134	86, 92, 114, 133	lecasei 11325	. . 3 ⊢ ((𝐴 ∈ dom arctan ∧ 0 = (ℜ‘𝐴)) → ((log‘(1 + (i · 𝐴))) + (log‘(1 − (i · 𝐴)))) ∈ ran log)
135	85, 134	jaodan 955	. 2 ⊢ ((𝐴 ∈ dom arctan ∧ (0 < (ℜ‘𝐴) ∨ 0 = (ℜ‘𝐴))) → ((log‘(1 + (i · 𝐴))) + (log‘(1 − (i · 𝐴)))) ∈ ran log)
136	7, 135	syldan 590	1 ⊢ ((𝐴 ∈ dom arctan ∧ 0 ≤ (ℜ‘𝐴)) → ((log‘(1 + (i · 𝐴))) + (log‘(1 − (i · 𝐴)))) ∈ ran log)

Colors of variables: wff setvar class

Syntax hints: → wi 4 ↔ wb 205 ∧ wa 395 ∨ wo 844 = wceq 1540 ∈ wcel 2105 ≠ wne 2939 class class class wbr 5148 dom cdm 5676 ran crn 5677 ‘cfv 6543 (class class class)co 7412 ℂcc 11112 ℝcr 11113 0cc0 11114 1c1 11115 ici 11116 + caddc 11117 · cmul 11119 < clt 11253 ≤ cle 11254 − cmin 11449 -cneg 11450 (,)cioo 13329 ℜcre 15049 ℑcim 15050 πcpi 16015 logclog 26300 arctancatan 26606

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 9640 ax-cnex 11170 ax-resscn 11171 ax-1cn 11172 ax-icn 11173 ax-addcl 11174 ax-addrcl 11175 ax-mulcl 11176 ax-mulrcl 11177 ax-mulcom 11178 ax-addass 11179 ax-mulass 11180 ax-distr 11181 ax-i2m1 11182 ax-1ne0 11183 ax-1rid 11184 ax-rnegex 11185 ax-rrecex 11186 ax-cnre 11187 ax-pre-lttri 11188 ax-pre-lttrn 11189 ax-pre-ltadd 11190 ax-pre-mulgt0 11191 ax-pre-sup 11192 ax-addf 11193

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 8151 df-frecs 8270 df-wrecs 8301 df-recs 8375 df-rdg 8414 df-1o 8470 df-2o 8471 df-er 8707 df-map 8826 df-pm 8827 df-ixp 8896 df-en 8944 df-dom 8945 df-sdom 8946 df-fin 8947 df-fsupp 9366 df-fi 9410 df-sup 9441 df-inf 9442 df-oi 9509 df-card 9938 df-pnf 11255 df-mnf 11256 df-xr 11257 df-ltxr 11258 df-le 11259 df-sub 11451 df-neg 11452 df-div 11877 df-nn 12218 df-2 12280 df-3 12281 df-4 12282 df-5 12283 df-6 12284 df-7 12285 df-8 12286 df-9 12287 df-n0 12478 df-z 12564 df-dec 12683 df-uz 12828 df-q 12938 df-rp 12980 df-xneg 13097 df-xadd 13098 df-xmul 13099 df-ioo 13333 df-ioc 13334 df-ico 13335 df-icc 13336 df-fz 13490 df-fzo 13633 df-fl 13762 df-mod 13840 df-seq 13972 df-exp 14033 df-fac 14239 df-bc 14268 df-hash 14296 df-shft 15019 df-cj 15051 df-re 15052 df-im 15053 df-sqrt 15187 df-abs 15188 df-limsup 15420 df-clim 15437 df-rlim 15438 df-sum 15638 df-ef 16016 df-sin 16018 df-cos 16019 df-pi 16021 df-struct 17085 df-sets 17102 df-slot 17120 df-ndx 17132 df-base 17150 df-ress 17179 df-plusg 17215 df-mulr 17216 df-starv 17217 df-sca 17218 df-vsca 17219 df-ip 17220 df-tset 17221 df-ple 17222 df-ds 17224 df-unif 17225 df-hom 17226 df-cco 17227 df-rest 17373 df-topn 17374 df-0g 17392 df-gsum 17393 df-topgen 17394 df-pt 17395 df-prds 17398 df-xrs 17453 df-qtop 17458 df-imas 17459 df-xps 17461 df-mre 17535 df-mrc 17536 df-acs 17538 df-mgm 18566 df-sgrp 18645 df-mnd 18661 df-submnd 18707 df-mulg 18988 df-cntz 19223 df-cmn 19692 df-psmet 21137 df-xmet 21138 df-met 21139 df-bl 21140 df-mopn 21141 df-fbas 21142 df-fg 21143 df-cnfld 21146 df-top 22617 df-topon 22634 df-topsp 22656 df-bases 22670 df-cld 22744 df-ntr 22745 df-cls 22746 df-nei 22823 df-lp 22861 df-perf 22862 df-cn 22952 df-cnp 22953 df-haus 23040 df-tx 23287 df-hmeo 23480 df-fil 23571 df-fm 23663 df-flim 23664 df-flf 23665 df-xms 24047 df-ms 24048 df-tms 24049 df-cncf 24619 df-limc 25616 df-dv 25617 df-log 26302 df-atan 26609

This theorem is referenced by: atanlogadd 26656

W3C validator