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 26418

Description: Lemma for atanlogadd 26419. (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 11216	. . . 4 ⊢ 0 ∈ ℝ
2		atandm2 26382	. . . . . 6 ⊢ (𝐴 ∈ dom arctan ↔ (𝐴 ∈ ℂ ∧ (1 − (i · 𝐴)) ≠ 0 ∧ (1 + (i · 𝐴)) ≠ 0))
3	2	simp1bi 1146	. . . . 5 ⊢ (𝐴 ∈ dom arctan → 𝐴 ∈ ℂ)
4	3	recld 15141	. . . 4 ⊢ (𝐴 ∈ dom arctan → (ℜ‘𝐴) ∈ ℝ)
5		leloe 11300	. . . 4 ⊢ ((0 ∈ ℝ ∧ (ℜ‘𝐴) ∈ ℝ) → (0 ≤ (ℜ‘𝐴) ↔ (0 < (ℜ‘𝐴) ∨ 0 = (ℜ‘𝐴))))
6	1, 4, 5	sylancr 588	. . 3 ⊢ (𝐴 ∈ dom arctan → (0 ≤ (ℜ‘𝐴) ↔ (0 < (ℜ‘𝐴) ∨ 0 = (ℜ‘𝐴))))
7	6	biimpa 478	. 2 ⊢ ((𝐴 ∈ dom arctan ∧ 0 ≤ (ℜ‘𝐴)) → (0 < (ℜ‘𝐴) ∨ 0 = (ℜ‘𝐴)))
8		ax-1cn 11168	. . . . . . . 8 ⊢ 1 ∈ ℂ
9		ax-icn 11169	. . . . . . . . 9 ⊢ i ∈ ℂ
10		mulcl 11194	. . . . . . . . 9 ⊢ ((i ∈ ℂ ∧ 𝐴 ∈ ℂ) → (i · 𝐴) ∈ ℂ)
11	9, 3, 10	sylancr 588	. . . . . . . 8 ⊢ (𝐴 ∈ dom arctan → (i · 𝐴) ∈ ℂ)
12		addcl 11192	. . . . . . . 8 ⊢ ((1 ∈ ℂ ∧ (i · 𝐴) ∈ ℂ) → (1 + (i · 𝐴)) ∈ ℂ)
13	8, 11, 12	sylancr 588	. . . . . . 7 ⊢ (𝐴 ∈ dom arctan → (1 + (i · 𝐴)) ∈ ℂ)
14	2	simp3bi 1148	. . . . . . 7 ⊢ (𝐴 ∈ dom arctan → (1 + (i · 𝐴)) ≠ 0)
15	13, 14	logcld 26079	. . . . . 6 ⊢ (𝐴 ∈ dom arctan → (log‘(1 + (i · 𝐴))) ∈ ℂ)
16		subcl 11459	. . . . . . . 8 ⊢ ((1 ∈ ℂ ∧ (i · 𝐴) ∈ ℂ) → (1 − (i · 𝐴)) ∈ ℂ)
17	8, 11, 16	sylancr 588	. . . . . . 7 ⊢ (𝐴 ∈ dom arctan → (1 − (i · 𝐴)) ∈ ℂ)
18	2	simp2bi 1147	. . . . . . 7 ⊢ (𝐴 ∈ dom arctan → (1 − (i · 𝐴)) ≠ 0)
19	17, 18	logcld 26079	. . . . . 6 ⊢ (𝐴 ∈ dom arctan → (log‘(1 − (i · 𝐴))) ∈ ℂ)
20	15, 19	addcld 11233	. . . . 5 ⊢ (𝐴 ∈ dom arctan → ((log‘(1 + (i · 𝐴))) + (log‘(1 − (i · 𝐴)))) ∈ ℂ)
21	20	adantr 482	. . . 4 ⊢ ((𝐴 ∈ dom arctan ∧ 0 < (ℜ‘𝐴)) → ((log‘(1 + (i · 𝐴))) + (log‘(1 − (i · 𝐴)))) ∈ ℂ)
22		pire 25968	. . . . . . . 8 ⊢ π ∈ ℝ
23	22	renegcli 11521	. . . . . . 7 ⊢ -π ∈ ℝ
24	23	a1i 11	. . . . . 6 ⊢ ((𝐴 ∈ dom arctan ∧ 0 < (ℜ‘𝐴)) → -π ∈ ℝ)
25	19	adantr 482	. . . . . . 7 ⊢ ((𝐴 ∈ dom arctan ∧ 0 < (ℜ‘𝐴)) → (log‘(1 − (i · 𝐴))) ∈ ℂ)
26	25	imcld 15142	. . . . . 6 ⊢ ((𝐴 ∈ dom arctan ∧ 0 < (ℜ‘𝐴)) → (ℑ‘(log‘(1 − (i · 𝐴)))) ∈ ℝ)
27	15	adantr 482	. . . . . . . 8 ⊢ ((𝐴 ∈ dom arctan ∧ 0 < (ℜ‘𝐴)) → (log‘(1 + (i · 𝐴))) ∈ ℂ)
28	27	imcld 15142	. . . . . . 7 ⊢ ((𝐴 ∈ dom arctan ∧ 0 < (ℜ‘𝐴)) → (ℑ‘(log‘(1 + (i · 𝐴)))) ∈ ℝ)
29	28, 26	readdcld 11243	. . . . . 6 ⊢ ((𝐴 ∈ dom arctan ∧ 0 < (ℜ‘𝐴)) → ((ℑ‘(log‘(1 + (i · 𝐴)))) + (ℑ‘(log‘(1 − (i · 𝐴))))) ∈ ℝ)
30	17	adantr 482	. . . . . . . . 9 ⊢ ((𝐴 ∈ dom arctan ∧ 0 < (ℜ‘𝐴)) → (1 − (i · 𝐴)) ∈ ℂ)
31		im1 15102	. . . . . . . . . . . . 13 ⊢ (ℑ‘1) = 0
32	31	oveq1i 7419	. . . . . . . . . . . 12 ⊢ ((ℑ‘1) − (ℑ‘(i · 𝐴))) = (0 − (ℑ‘(i · 𝐴)))
33		df-neg 11447	. . . . . . . . . . . 12 ⊢ -(ℑ‘(i · 𝐴)) = (0 − (ℑ‘(i · 𝐴)))
34	32, 33	eqtr4i 2764	. . . . . . . . . . 11 ⊢ ((ℑ‘1) − (ℑ‘(i · 𝐴))) = -(ℑ‘(i · 𝐴))
35	11	adantr 482	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ dom arctan ∧ 0 < (ℜ‘𝐴)) → (i · 𝐴) ∈ ℂ)
36		imsub 15082	. . . . . . . . . . . 12 ⊢ ((1 ∈ ℂ ∧ (i · 𝐴) ∈ ℂ) → (ℑ‘(1 − (i · 𝐴))) = ((ℑ‘1) − (ℑ‘(i · 𝐴))))
37	8, 35, 36	sylancr 588	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ dom arctan ∧ 0 < (ℜ‘𝐴)) → (ℑ‘(1 − (i · 𝐴))) = ((ℑ‘1) − (ℑ‘(i · 𝐴))))
38	3	adantr 482	. . . . . . . . . . . . 13 ⊢ ((𝐴 ∈ dom arctan ∧ 0 < (ℜ‘𝐴)) → 𝐴 ∈ ℂ)
39		reim 15056	. . . . . . . . . . . . 13 ⊢ (𝐴 ∈ ℂ → (ℜ‘𝐴) = (ℑ‘(i · 𝐴)))
40	38, 39	syl 17	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ dom arctan ∧ 0 < (ℜ‘𝐴)) → (ℜ‘𝐴) = (ℑ‘(i · 𝐴)))
41	40	negeqd 11454	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ dom arctan ∧ 0 < (ℜ‘𝐴)) → -(ℜ‘𝐴) = -(ℑ‘(i · 𝐴)))
42	34, 37, 41	3eqtr4a 2799	. . . . . . . . . 10 ⊢ ((𝐴 ∈ dom arctan ∧ 0 < (ℜ‘𝐴)) → (ℑ‘(1 − (i · 𝐴))) = -(ℜ‘𝐴))
43	4	lt0neg2d 11784	. . . . . . . . . . 11 ⊢ (𝐴 ∈ dom arctan → (0 < (ℜ‘𝐴) ↔ -(ℜ‘𝐴) < 0))
44	43	biimpa 478	. . . . . . . . . 10 ⊢ ((𝐴 ∈ dom arctan ∧ 0 < (ℜ‘𝐴)) → -(ℜ‘𝐴) < 0)
45	42, 44	eqbrtrd 5171	. . . . . . . . 9 ⊢ ((𝐴 ∈ dom arctan ∧ 0 < (ℜ‘𝐴)) → (ℑ‘(1 − (i · 𝐴))) < 0)
46		argimlt0 26121	. . . . . . . . 9 ⊢ (((1 − (i · 𝐴)) ∈ ℂ ∧ (ℑ‘(1 − (i · 𝐴))) < 0) → (ℑ‘(log‘(1 − (i · 𝐴)))) ∈ (-π(,)0))
47	30, 45, 46	syl2anc 585	. . . . . . . 8 ⊢ ((𝐴 ∈ dom arctan ∧ 0 < (ℜ‘𝐴)) → (ℑ‘(log‘(1 − (i · 𝐴)))) ∈ (-π(,)0))
48		eliooord 13383	. . . . . . . 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 496	. . . . . 6 ⊢ ((𝐴 ∈ dom arctan ∧ 0 < (ℜ‘𝐴)) → -π < (ℑ‘(log‘(1 − (i · 𝐴)))))
51	13	adantr 482	. . . . . . . . . 10 ⊢ ((𝐴 ∈ dom arctan ∧ 0 < (ℜ‘𝐴)) → (1 + (i · 𝐴)) ∈ ℂ)
52		simpr 486	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ dom arctan ∧ 0 < (ℜ‘𝐴)) → 0 < (ℜ‘𝐴))
53		imadd 15081	. . . . . . . . . . . . 13 ⊢ ((1 ∈ ℂ ∧ (i · 𝐴) ∈ ℂ) → (ℑ‘(1 + (i · 𝐴))) = ((ℑ‘1) + (ℑ‘(i · 𝐴))))
54	8, 35, 53	sylancr 588	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ dom arctan ∧ 0 < (ℜ‘𝐴)) → (ℑ‘(1 + (i · 𝐴))) = ((ℑ‘1) + (ℑ‘(i · 𝐴))))
55	40	oveq2d 7425	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ dom arctan ∧ 0 < (ℜ‘𝐴)) → ((ℑ‘1) + (ℜ‘𝐴)) = ((ℑ‘1) + (ℑ‘(i · 𝐴))))
56	31	oveq1i 7419	. . . . . . . . . . . . 13 ⊢ ((ℑ‘1) + (ℜ‘𝐴)) = (0 + (ℜ‘𝐴))
57	38	recld 15141	. . . . . . . . . . . . . . 15 ⊢ ((𝐴 ∈ dom arctan ∧ 0 < (ℜ‘𝐴)) → (ℜ‘𝐴) ∈ ℝ)
58	57	recnd 11242	. . . . . . . . . . . . . 14 ⊢ ((𝐴 ∈ dom arctan ∧ 0 < (ℜ‘𝐴)) → (ℜ‘𝐴) ∈ ℂ)
59	58	addlidd 11415	. . . . . . . . . . . . 13 ⊢ ((𝐴 ∈ dom arctan ∧ 0 < (ℜ‘𝐴)) → (0 + (ℜ‘𝐴)) = (ℜ‘𝐴))
60	56, 59	eqtrid 2785	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ dom arctan ∧ 0 < (ℜ‘𝐴)) → ((ℑ‘1) + (ℜ‘𝐴)) = (ℜ‘𝐴))
61	54, 55, 60	3eqtr2d 2779	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ dom arctan ∧ 0 < (ℜ‘𝐴)) → (ℑ‘(1 + (i · 𝐴))) = (ℜ‘𝐴))
62	52, 61	breqtrrd 5177	. . . . . . . . . 10 ⊢ ((𝐴 ∈ dom arctan ∧ 0 < (ℜ‘𝐴)) → 0 < (ℑ‘(1 + (i · 𝐴))))
63		argimgt0 26120	. . . . . . . . . 10 ⊢ (((1 + (i · 𝐴)) ∈ ℂ ∧ 0 < (ℑ‘(1 + (i · 𝐴)))) → (ℑ‘(log‘(1 + (i · 𝐴)))) ∈ (0(,)π))
64	51, 62, 63	syl2anc 585	. . . . . . . . 9 ⊢ ((𝐴 ∈ dom arctan ∧ 0 < (ℜ‘𝐴)) → (ℑ‘(log‘(1 + (i · 𝐴)))) ∈ (0(,)π))
65		eliooord 13383	. . . . . . . . 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 496	. . . . . . 7 ⊢ ((𝐴 ∈ dom arctan ∧ 0 < (ℜ‘𝐴)) → 0 < (ℑ‘(log‘(1 + (i · 𝐴)))))
68	28, 26	ltaddpos2d 11799	. . . . . . 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 11375	. . . . 5 ⊢ ((𝐴 ∈ dom arctan ∧ 0 < (ℜ‘𝐴)) → -π < ((ℑ‘(log‘(1 + (i · 𝐴)))) + (ℑ‘(log‘(1 − (i · 𝐴))))))
71	27, 25	imaddd 15162	. . . . 5 ⊢ ((𝐴 ∈ dom arctan ∧ 0 < (ℜ‘𝐴)) → (ℑ‘((log‘(1 + (i · 𝐴))) + (log‘(1 − (i · 𝐴))))) = ((ℑ‘(log‘(1 + (i · 𝐴)))) + (ℑ‘(log‘(1 − (i · 𝐴))))))
72	70, 71	breqtrrd 5177	. . . 4 ⊢ ((𝐴 ∈ dom arctan ∧ 0 < (ℜ‘𝐴)) → -π < (ℑ‘((log‘(1 + (i · 𝐴))) + (log‘(1 − (i · 𝐴))))))
73	22	a1i 11	. . . . . 6 ⊢ ((𝐴 ∈ dom arctan ∧ 0 < (ℜ‘𝐴)) → π ∈ ℝ)
74		0red 11217	. . . . . . . . 9 ⊢ ((𝐴 ∈ dom arctan ∧ 0 < (ℜ‘𝐴)) → 0 ∈ ℝ)
75	49	simprd 497	. . . . . . . . 9 ⊢ ((𝐴 ∈ dom arctan ∧ 0 < (ℜ‘𝐴)) → (ℑ‘(log‘(1 − (i · 𝐴)))) < 0)
76	26, 74, 28, 75	ltadd2dd 11373	. . . . . . . 8 ⊢ ((𝐴 ∈ dom arctan ∧ 0 < (ℜ‘𝐴)) → ((ℑ‘(log‘(1 + (i · 𝐴)))) + (ℑ‘(log‘(1 − (i · 𝐴))))) < ((ℑ‘(log‘(1 + (i · 𝐴)))) + 0))
77	28	recnd 11242	. . . . . . . . 9 ⊢ ((𝐴 ∈ dom arctan ∧ 0 < (ℜ‘𝐴)) → (ℑ‘(log‘(1 + (i · 𝐴)))) ∈ ℂ)
78	77	addridd 11414	. . . . . . . 8 ⊢ ((𝐴 ∈ dom arctan ∧ 0 < (ℜ‘𝐴)) → ((ℑ‘(log‘(1 + (i · 𝐴)))) + 0) = (ℑ‘(log‘(1 + (i · 𝐴)))))
79	76, 78	breqtrd 5175	. . . . . . 7 ⊢ ((𝐴 ∈ dom arctan ∧ 0 < (ℜ‘𝐴)) → ((ℑ‘(log‘(1 + (i · 𝐴)))) + (ℑ‘(log‘(1 − (i · 𝐴))))) < (ℑ‘(log‘(1 + (i · 𝐴)))))
80	66	simprd 497	. . . . . . 7 ⊢ ((𝐴 ∈ dom arctan ∧ 0 < (ℜ‘𝐴)) → (ℑ‘(log‘(1 + (i · 𝐴)))) < π)
81	29, 28, 73, 79, 80	lttrd 11375	. . . . . 6 ⊢ ((𝐴 ∈ dom arctan ∧ 0 < (ℜ‘𝐴)) → ((ℑ‘(log‘(1 + (i · 𝐴)))) + (ℑ‘(log‘(1 − (i · 𝐴))))) < π)
82	29, 73, 81	ltled 11362	. . . . 5 ⊢ ((𝐴 ∈ dom arctan ∧ 0 < (ℜ‘𝐴)) → ((ℑ‘(log‘(1 + (i · 𝐴)))) + (ℑ‘(log‘(1 − (i · 𝐴))))) ≤ π)
83	71, 82	eqbrtrd 5171	. . . 4 ⊢ ((𝐴 ∈ dom arctan ∧ 0 < (ℜ‘𝐴)) → (ℑ‘((log‘(1 + (i · 𝐴))) + (log‘(1 − (i · 𝐴))))) ≤ π)
84		ellogrn 26068	. . . 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 1344	. . 3 ⊢ ((𝐴 ∈ dom arctan ∧ 0 < (ℜ‘𝐴)) → ((log‘(1 + (i · 𝐴))) + (log‘(1 − (i · 𝐴)))) ∈ ran log)
86		0red 11217	. . . 4 ⊢ ((𝐴 ∈ dom arctan ∧ 0 = (ℜ‘𝐴)) → 0 ∈ ℝ)
87	11	adantr 482	. . . . 5 ⊢ ((𝐴 ∈ dom arctan ∧ 0 = (ℜ‘𝐴)) → (i · 𝐴) ∈ ℂ)
88		simpr 486	. . . . . 6 ⊢ ((𝐴 ∈ dom arctan ∧ 0 = (ℜ‘𝐴)) → 0 = (ℜ‘𝐴))
89	3	adantr 482	. . . . . . 7 ⊢ ((𝐴 ∈ dom arctan ∧ 0 = (ℜ‘𝐴)) → 𝐴 ∈ ℂ)
90	89, 39	syl 17	. . . . . 6 ⊢ ((𝐴 ∈ dom arctan ∧ 0 = (ℜ‘𝐴)) → (ℜ‘𝐴) = (ℑ‘(i · 𝐴)))
91	88, 90	eqtr2d 2774	. . . . 5 ⊢ ((𝐴 ∈ dom arctan ∧ 0 = (ℜ‘𝐴)) → (ℑ‘(i · 𝐴)) = 0)
92	87, 91	reim0bd 15147	. . . 4 ⊢ ((𝐴 ∈ dom arctan ∧ 0 = (ℜ‘𝐴)) → (i · 𝐴) ∈ ℝ)
93	15, 19	addcomd 11416	. . . . . 6 ⊢ (𝐴 ∈ dom arctan → ((log‘(1 + (i · 𝐴))) + (log‘(1 − (i · 𝐴)))) = ((log‘(1 − (i · 𝐴))) + (log‘(1 + (i · 𝐴)))))
94	93	ad2antrr 725	. . . . 5 ⊢ (((𝐴 ∈ dom arctan ∧ 0 = (ℜ‘𝐴)) ∧ 0 ≤ (i · 𝐴)) → ((log‘(1 + (i · 𝐴))) + (log‘(1 − (i · 𝐴)))) = ((log‘(1 − (i · 𝐴))) + (log‘(1 + (i · 𝐴)))))
95		logrncl 26076	. . . . . . . 8 ⊢ (((1 − (i · 𝐴)) ∈ ℂ ∧ (1 − (i · 𝐴)) ≠ 0) → (log‘(1 − (i · 𝐴))) ∈ ran log)
96	17, 18, 95	syl2anc 585	. . . . . . 7 ⊢ (𝐴 ∈ dom arctan → (log‘(1 − (i · 𝐴))) ∈ ran log)
97	96	ad2antrr 725	. . . . . 6 ⊢ (((𝐴 ∈ dom arctan ∧ 0 = (ℜ‘𝐴)) ∧ 0 ≤ (i · 𝐴)) → (log‘(1 − (i · 𝐴))) ∈ ran log)
98		1re 11214	. . . . . . . . 9 ⊢ 1 ∈ ℝ
99	92	adantr 482	. . . . . . . . 9 ⊢ (((𝐴 ∈ dom arctan ∧ 0 = (ℜ‘𝐴)) ∧ 0 ≤ (i · 𝐴)) → (i · 𝐴) ∈ ℝ)
100		readdcl 11193	. . . . . . . . 9 ⊢ ((1 ∈ ℝ ∧ (i · 𝐴) ∈ ℝ) → (1 + (i · 𝐴)) ∈ ℝ)
101	98, 99, 100	sylancr 588	. . . . . . . 8 ⊢ (((𝐴 ∈ dom arctan ∧ 0 = (ℜ‘𝐴)) ∧ 0 ≤ (i · 𝐴)) → (1 + (i · 𝐴)) ∈ ℝ)
102		0red 11217	. . . . . . . . 9 ⊢ (((𝐴 ∈ dom arctan ∧ 0 = (ℜ‘𝐴)) ∧ 0 ≤ (i · 𝐴)) → 0 ∈ ℝ)
103		1red 11215	. . . . . . . . 9 ⊢ (((𝐴 ∈ dom arctan ∧ 0 = (ℜ‘𝐴)) ∧ 0 ≤ (i · 𝐴)) → 1 ∈ ℝ)
104		0lt1 11736	. . . . . . . . . 10 ⊢ 0 < 1
105	104	a1i 11	. . . . . . . . 9 ⊢ (((𝐴 ∈ dom arctan ∧ 0 = (ℜ‘𝐴)) ∧ 0 ≤ (i · 𝐴)) → 0 < 1)
106		addge01 11724	. . . . . . . . . . 11 ⊢ ((1 ∈ ℝ ∧ (i · 𝐴) ∈ ℝ) → (0 ≤ (i · 𝐴) ↔ 1 ≤ (1 + (i · 𝐴))))
107	98, 92, 106	sylancr 588	. . . . . . . . . 10 ⊢ ((𝐴 ∈ dom arctan ∧ 0 = (ℜ‘𝐴)) → (0 ≤ (i · 𝐴) ↔ 1 ≤ (1 + (i · 𝐴))))
108	107	biimpa 478	. . . . . . . . 9 ⊢ (((𝐴 ∈ dom arctan ∧ 0 = (ℜ‘𝐴)) ∧ 0 ≤ (i · 𝐴)) → 1 ≤ (1 + (i · 𝐴)))
109	102, 103, 101, 105, 108	ltletrd 11374	. . . . . . . 8 ⊢ (((𝐴 ∈ dom arctan ∧ 0 = (ℜ‘𝐴)) ∧ 0 ≤ (i · 𝐴)) → 0 < (1 + (i · 𝐴)))
110	101, 109	elrpd 13013	. . . . . . 7 ⊢ (((𝐴 ∈ dom arctan ∧ 0 = (ℜ‘𝐴)) ∧ 0 ≤ (i · 𝐴)) → (1 + (i · 𝐴)) ∈ ℝ⁺)
111	110	relogcld 26131	. . . . . 6 ⊢ (((𝐴 ∈ dom arctan ∧ 0 = (ℜ‘𝐴)) ∧ 0 ≤ (i · 𝐴)) → (log‘(1 + (i · 𝐴))) ∈ ℝ)
112		logrnaddcl 26083	. . . . . 6 ⊢ (((log‘(1 − (i · 𝐴))) ∈ ran log ∧ (log‘(1 + (i · 𝐴))) ∈ ℝ) → ((log‘(1 − (i · 𝐴))) + (log‘(1 + (i · 𝐴)))) ∈ ran log)
113	97, 111, 112	syl2anc 585	. . . . 5 ⊢ (((𝐴 ∈ dom arctan ∧ 0 = (ℜ‘𝐴)) ∧ 0 ≤ (i · 𝐴)) → ((log‘(1 − (i · 𝐴))) + (log‘(1 + (i · 𝐴)))) ∈ ran log)
114	94, 113	eqeltrd 2834	. . . 4 ⊢ (((𝐴 ∈ dom arctan ∧ 0 = (ℜ‘𝐴)) ∧ 0 ≤ (i · 𝐴)) → ((log‘(1 + (i · 𝐴))) + (log‘(1 − (i · 𝐴)))) ∈ ran log)
115		logrncl 26076	. . . . . . 7 ⊢ (((1 + (i · 𝐴)) ∈ ℂ ∧ (1 + (i · 𝐴)) ≠ 0) → (log‘(1 + (i · 𝐴))) ∈ ran log)
116	13, 14, 115	syl2anc 585	. . . . . 6 ⊢ (𝐴 ∈ dom arctan → (log‘(1 + (i · 𝐴))) ∈ ran log)
117	116	ad2antrr 725	. . . . 5 ⊢ (((𝐴 ∈ dom arctan ∧ 0 = (ℜ‘𝐴)) ∧ (i · 𝐴) ≤ 0) → (log‘(1 + (i · 𝐴))) ∈ ran log)
118	92	adantr 482	. . . . . . . 8 ⊢ (((𝐴 ∈ dom arctan ∧ 0 = (ℜ‘𝐴)) ∧ (i · 𝐴) ≤ 0) → (i · 𝐴) ∈ ℝ)
119		resubcl 11524	. . . . . . . 8 ⊢ ((1 ∈ ℝ ∧ (i · 𝐴) ∈ ℝ) → (1 − (i · 𝐴)) ∈ ℝ)
120	98, 118, 119	sylancr 588	. . . . . . 7 ⊢ (((𝐴 ∈ dom arctan ∧ 0 = (ℜ‘𝐴)) ∧ (i · 𝐴) ≤ 0) → (1 − (i · 𝐴)) ∈ ℝ)
121		0red 11217	. . . . . . . 8 ⊢ (((𝐴 ∈ dom arctan ∧ 0 = (ℜ‘𝐴)) ∧ (i · 𝐴) ≤ 0) → 0 ∈ ℝ)
122		1red 11215	. . . . . . . 8 ⊢ (((𝐴 ∈ dom arctan ∧ 0 = (ℜ‘𝐴)) ∧ (i · 𝐴) ≤ 0) → 1 ∈ ℝ)
123	104	a1i 11	. . . . . . . 8 ⊢ (((𝐴 ∈ dom arctan ∧ 0 = (ℜ‘𝐴)) ∧ (i · 𝐴) ≤ 0) → 0 < 1)
124		1m0e1 12333	. . . . . . . . 9 ⊢ (1 − 0) = 1
125		1red 11215	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ dom arctan ∧ 0 = (ℜ‘𝐴)) → 1 ∈ ℝ)
126	92, 86, 125	lesub2d 11822	. . . . . . . . . 10 ⊢ ((𝐴 ∈ dom arctan ∧ 0 = (ℜ‘𝐴)) → ((i · 𝐴) ≤ 0 ↔ (1 − 0) ≤ (1 − (i · 𝐴))))
127	126	biimpa 478	. . . . . . . . 9 ⊢ (((𝐴 ∈ dom arctan ∧ 0 = (ℜ‘𝐴)) ∧ (i · 𝐴) ≤ 0) → (1 − 0) ≤ (1 − (i · 𝐴)))
128	124, 127	eqbrtrrid 5185	. . . . . . . 8 ⊢ (((𝐴 ∈ dom arctan ∧ 0 = (ℜ‘𝐴)) ∧ (i · 𝐴) ≤ 0) → 1 ≤ (1 − (i · 𝐴)))
129	121, 122, 120, 123, 128	ltletrd 11374	. . . . . . 7 ⊢ (((𝐴 ∈ dom arctan ∧ 0 = (ℜ‘𝐴)) ∧ (i · 𝐴) ≤ 0) → 0 < (1 − (i · 𝐴)))
130	120, 129	elrpd 13013	. . . . . 6 ⊢ (((𝐴 ∈ dom arctan ∧ 0 = (ℜ‘𝐴)) ∧ (i · 𝐴) ≤ 0) → (1 − (i · 𝐴)) ∈ ℝ⁺)
131	130	relogcld 26131	. . . . 5 ⊢ (((𝐴 ∈ dom arctan ∧ 0 = (ℜ‘𝐴)) ∧ (i · 𝐴) ≤ 0) → (log‘(1 − (i · 𝐴))) ∈ ℝ)
132		logrnaddcl 26083	. . . . 5 ⊢ (((log‘(1 + (i · 𝐴))) ∈ ran log ∧ (log‘(1 − (i · 𝐴))) ∈ ℝ) → ((log‘(1 + (i · 𝐴))) + (log‘(1 − (i · 𝐴)))) ∈ ran log)
133	117, 131, 132	syl2anc 585	. . . 4 ⊢ (((𝐴 ∈ dom arctan ∧ 0 = (ℜ‘𝐴)) ∧ (i · 𝐴) ≤ 0) → ((log‘(1 + (i · 𝐴))) + (log‘(1 − (i · 𝐴)))) ∈ ran log)
134	86, 92, 114, 133	lecasei 11320	. . 3 ⊢ ((𝐴 ∈ dom arctan ∧ 0 = (ℜ‘𝐴)) → ((log‘(1 + (i · 𝐴))) + (log‘(1 − (i · 𝐴)))) ∈ ran log)
135	85, 134	jaodan 957	. 2 ⊢ ((𝐴 ∈ dom arctan ∧ (0 < (ℜ‘𝐴) ∨ 0 = (ℜ‘𝐴))) → ((log‘(1 + (i · 𝐴))) + (log‘(1 − (i · 𝐴)))) ∈ ran log)
136	7, 135	syldan 592	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 397 ∨ wo 846 = wceq 1542 ∈ wcel 2107 ≠ wne 2941 class class class wbr 5149 dom cdm 5677 ran crn 5678 ‘cfv 6544 (class class class)co 7409 ℂcc 11108 ℝcr 11109 0cc0 11110 1c1 11111 ici 11112 + caddc 11113 · cmul 11115 < clt 11248 ≤ cle 11249 − cmin 11444 -cneg 11445 (,)cioo 13324 ℜcre 15044 ℑcim 15045 πcpi 16010 logclog 26063 arctancatan 26369

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1798 ax-4 1812 ax-5 1914 ax-6 1972 ax-7 2012 ax-8 2109 ax-9 2117 ax-10 2138 ax-11 2155 ax-12 2172 ax-ext 2704 ax-rep 5286 ax-sep 5300 ax-nul 5307 ax-pow 5364 ax-pr 5428 ax-un 7725 ax-inf2 9636 ax-cnex 11166 ax-resscn 11167 ax-1cn 11168 ax-icn 11169 ax-addcl 11170 ax-addrcl 11171 ax-mulcl 11172 ax-mulrcl 11173 ax-mulcom 11174 ax-addass 11175 ax-mulass 11176 ax-distr 11177 ax-i2m1 11178 ax-1ne0 11179 ax-1rid 11180 ax-rnegex 11181 ax-rrecex 11182 ax-cnre 11183 ax-pre-lttri 11184 ax-pre-lttrn 11185 ax-pre-ltadd 11186 ax-pre-mulgt0 11187 ax-pre-sup 11188 ax-addf 11189 ax-mulf 11190

This theorem depends on definitions: df-bi 206 df-an 398 df-or 847 df-3or 1089 df-3an 1090 df-tru 1545 df-fal 1555 df-ex 1783 df-nf 1787 df-sb 2069 df-mo 2535 df-eu 2564 df-clab 2711 df-cleq 2725 df-clel 2811 df-nfc 2886 df-ne 2942 df-nel 3048 df-ral 3063 df-rex 3072 df-rmo 3377 df-reu 3378 df-rab 3434 df-v 3477 df-sbc 3779 df-csb 3895 df-dif 3952 df-un 3954 df-in 3956 df-ss 3966 df-pss 3968 df-nul 4324 df-if 4530 df-pw 4605 df-sn 4630 df-pr 4632 df-tp 4634 df-op 4636 df-uni 4910 df-int 4952 df-iun 5000 df-iin 5001 df-br 5150 df-opab 5212 df-mpt 5233 df-tr 5267 df-id 5575 df-eprel 5581 df-po 5589 df-so 5590 df-fr 5632 df-se 5633 df-we 5634 df-xp 5683 df-rel 5684 df-cnv 5685 df-co 5686 df-dm 5687 df-rn 5688 df-res 5689 df-ima 5690 df-pred 6301 df-ord 6368 df-on 6369 df-lim 6370 df-suc 6371 df-iota 6496 df-fun 6546 df-fn 6547 df-f 6548 df-f1 6549 df-fo 6550 df-f1o 6551 df-fv 6552 df-isom 6553 df-riota 7365 df-ov 7412 df-oprab 7413 df-mpo 7414 df-of 7670 df-om 7856 df-1st 7975 df-2nd 7976 df-supp 8147 df-frecs 8266 df-wrecs 8297 df-recs 8371 df-rdg 8410 df-1o 8466 df-2o 8467 df-er 8703 df-map 8822 df-pm 8823 df-ixp 8892 df-en 8940 df-dom 8941 df-sdom 8942 df-fin 8943 df-fsupp 9362 df-fi 9406 df-sup 9437 df-inf 9438 df-oi 9505 df-card 9934 df-pnf 11250 df-mnf 11251 df-xr 11252 df-ltxr 11253 df-le 11254 df-sub 11446 df-neg 11447 df-div 11872 df-nn 12213 df-2 12275 df-3 12276 df-4 12277 df-5 12278 df-6 12279 df-7 12280 df-8 12281 df-9 12282 df-n0 12473 df-z 12559 df-dec 12678 df-uz 12823 df-q 12933 df-rp 12975 df-xneg 13092 df-xadd 13093 df-xmul 13094 df-ioo 13328 df-ioc 13329 df-ico 13330 df-icc 13331 df-fz 13485 df-fzo 13628 df-fl 13757 df-mod 13835 df-seq 13967 df-exp 14028 df-fac 14234 df-bc 14263 df-hash 14291 df-shft 15014 df-cj 15046 df-re 15047 df-im 15048 df-sqrt 15182 df-abs 15183 df-limsup 15415 df-clim 15432 df-rlim 15433 df-sum 15633 df-ef 16011 df-sin 16013 df-cos 16014 df-pi 16016 df-struct 17080 df-sets 17097 df-slot 17115 df-ndx 17127 df-base 17145 df-ress 17174 df-plusg 17210 df-mulr 17211 df-starv 17212 df-sca 17213 df-vsca 17214 df-ip 17215 df-tset 17216 df-ple 17217 df-ds 17219 df-unif 17220 df-hom 17221 df-cco 17222 df-rest 17368 df-topn 17369 df-0g 17387 df-gsum 17388 df-topgen 17389 df-pt 17390 df-prds 17393 df-xrs 17448 df-qtop 17453 df-imas 17454 df-xps 17456 df-mre 17530 df-mrc 17531 df-acs 17533 df-mgm 18561 df-sgrp 18610 df-mnd 18626 df-submnd 18672 df-mulg 18951 df-cntz 19181 df-cmn 19650 df-psmet 20936 df-xmet 20937 df-met 20938 df-bl 20939 df-mopn 20940 df-fbas 20941 df-fg 20942 df-cnfld 20945 df-top 22396 df-topon 22413 df-topsp 22435 df-bases 22449 df-cld 22523 df-ntr 22524 df-cls 22525 df-nei 22602 df-lp 22640 df-perf 22641 df-cn 22731 df-cnp 22732 df-haus 22819 df-tx 23066 df-hmeo 23259 df-fil 23350 df-fm 23442 df-flim 23443 df-flf 23444 df-xms 23826 df-ms 23827 df-tms 23828 df-cncf 24394 df-limc 25383 df-dv 25384 df-log 26065 df-atan 26372

This theorem is referenced by: atanlogadd 26419

W3C validator