atanbndlem - Metamath Proof Explorer

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

Theorem atanbndlem 26835

Description: Lemma for atanbnd 26836. (Contributed by Mario Carneiro, 5-Apr-2015.)

**Assertion**
Ref	Expression
atanbndlem	⊢ (𝐴 ∈ ℝ⁺ → (arctan‘𝐴) ∈ (-(π / 2)(,)(π / 2)))

**Proof of Theorem atanbndlem**
Step	Hyp	Ref	Expression
1		rpre 12960	. . 3 ⊢ (𝐴 ∈ ℝ⁺ → 𝐴 ∈ ℝ)
2		atanrecl 26821	. . 3 ⊢ (𝐴 ∈ ℝ → (arctan‘𝐴) ∈ ℝ)
3	1, 2	syl 17	. 2 ⊢ (𝐴 ∈ ℝ⁺ → (arctan‘𝐴) ∈ ℝ)
4		picn 26367	. . . 4 ⊢ π ∈ ℂ
5		2cn 12261	. . . 4 ⊢ 2 ∈ ℂ
6		2ne0 12290	. . . 4 ⊢ 2 ≠ 0
7		divneg 11874	. . . 4 ⊢ ((π ∈ ℂ ∧ 2 ∈ ℂ ∧ 2 ≠ 0) → -(π / 2) = (-π / 2))
8	4, 5, 6, 7	mp3an 1463	. . 3 ⊢ -(π / 2) = (-π / 2)
9		ax-1cn 11126	. . . . . . . . . . . 12 ⊢ 1 ∈ ℂ
10		ax-icn 11127	. . . . . . . . . . . . 13 ⊢ i ∈ ℂ
11	1	recnd 11202	. . . . . . . . . . . . 13 ⊢ (𝐴 ∈ ℝ⁺ → 𝐴 ∈ ℂ)
12		mulcl 11152	. . . . . . . . . . . . 13 ⊢ ((i ∈ ℂ ∧ 𝐴 ∈ ℂ) → (i · 𝐴) ∈ ℂ)
13	10, 11, 12	sylancr 587	. . . . . . . . . . . 12 ⊢ (𝐴 ∈ ℝ⁺ → (i · 𝐴) ∈ ℂ)
14		addcl 11150	. . . . . . . . . . . 12 ⊢ ((1 ∈ ℂ ∧ (i · 𝐴) ∈ ℂ) → (1 + (i · 𝐴)) ∈ ℂ)
15	9, 13, 14	sylancr 587	. . . . . . . . . . 11 ⊢ (𝐴 ∈ ℝ⁺ → (1 + (i · 𝐴)) ∈ ℂ)
16		atanre 26795	. . . . . . . . . . . . . 14 ⊢ (𝐴 ∈ ℝ → 𝐴 ∈ dom arctan)
17	1, 16	syl 17	. . . . . . . . . . . . 13 ⊢ (𝐴 ∈ ℝ⁺ → 𝐴 ∈ dom arctan)
18		atandm2 26787	. . . . . . . . . . . . 13 ⊢ (𝐴 ∈ dom arctan ↔ (𝐴 ∈ ℂ ∧ (1 − (i · 𝐴)) ≠ 0 ∧ (1 + (i · 𝐴)) ≠ 0))
19	17, 18	sylib 218	. . . . . . . . . . . 12 ⊢ (𝐴 ∈ ℝ⁺ → (𝐴 ∈ ℂ ∧ (1 − (i · 𝐴)) ≠ 0 ∧ (1 + (i · 𝐴)) ≠ 0))
20	19	simp3d 1144	. . . . . . . . . . 11 ⊢ (𝐴 ∈ ℝ⁺ → (1 + (i · 𝐴)) ≠ 0)
21	15, 20	logcld 26479	. . . . . . . . . 10 ⊢ (𝐴 ∈ ℝ⁺ → (log‘(1 + (i · 𝐴))) ∈ ℂ)
22		subcl 11420	. . . . . . . . . . . 12 ⊢ ((1 ∈ ℂ ∧ (i · 𝐴) ∈ ℂ) → (1 − (i · 𝐴)) ∈ ℂ)
23	9, 13, 22	sylancr 587	. . . . . . . . . . 11 ⊢ (𝐴 ∈ ℝ⁺ → (1 − (i · 𝐴)) ∈ ℂ)
24	19	simp2d 1143	. . . . . . . . . . 11 ⊢ (𝐴 ∈ ℝ⁺ → (1 − (i · 𝐴)) ≠ 0)
25	23, 24	logcld 26479	. . . . . . . . . 10 ⊢ (𝐴 ∈ ℝ⁺ → (log‘(1 − (i · 𝐴))) ∈ ℂ)
26	21, 25	subcld 11533	. . . . . . . . 9 ⊢ (𝐴 ∈ ℝ⁺ → ((log‘(1 + (i · 𝐴))) − (log‘(1 − (i · 𝐴)))) ∈ ℂ)
27		imre 15074	. . . . . . . . 9 ⊢ (((log‘(1 + (i · 𝐴))) − (log‘(1 − (i · 𝐴)))) ∈ ℂ → (ℑ‘((log‘(1 + (i · 𝐴))) − (log‘(1 − (i · 𝐴))))) = (ℜ‘(-i · ((log‘(1 + (i · 𝐴))) − (log‘(1 − (i · 𝐴)))))))
28	26, 27	syl 17	. . . . . . . 8 ⊢ (𝐴 ∈ ℝ⁺ → (ℑ‘((log‘(1 + (i · 𝐴))) − (log‘(1 − (i · 𝐴))))) = (ℜ‘(-i · ((log‘(1 + (i · 𝐴))) − (log‘(1 − (i · 𝐴)))))))
29		atanval 26794	. . . . . . . . . . . . . 14 ⊢ (𝐴 ∈ dom arctan → (arctan‘𝐴) = ((i / 2) · ((log‘(1 − (i · 𝐴))) − (log‘(1 + (i · 𝐴))))))
30	17, 29	syl 17	. . . . . . . . . . . . 13 ⊢ (𝐴 ∈ ℝ⁺ → (arctan‘𝐴) = ((i / 2) · ((log‘(1 − (i · 𝐴))) − (log‘(1 + (i · 𝐴))))))
31	30	oveq2d 7403	. . . . . . . . . . . 12 ⊢ (𝐴 ∈ ℝ⁺ → (2 · (arctan‘𝐴)) = (2 · ((i / 2) · ((log‘(1 − (i · 𝐴))) − (log‘(1 + (i · 𝐴)))))))
32	10, 5, 6	divcan2i 11925	. . . . . . . . . . . . . 14 ⊢ (2 · (i / 2)) = i
33	32	oveq1i 7397	. . . . . . . . . . . . 13 ⊢ ((2 · (i / 2)) · ((log‘(1 − (i · 𝐴))) − (log‘(1 + (i · 𝐴))))) = (i · ((log‘(1 − (i · 𝐴))) − (log‘(1 + (i · 𝐴)))))
34		2re 12260	. . . . . . . . . . . . . . . 16 ⊢ 2 ∈ ℝ
35	34	a1i 11	. . . . . . . . . . . . . . 15 ⊢ (𝐴 ∈ ℝ⁺ → 2 ∈ ℝ)
36	35	recnd 11202	. . . . . . . . . . . . . 14 ⊢ (𝐴 ∈ ℝ⁺ → 2 ∈ ℂ)
37		halfcl 12408	. . . . . . . . . . . . . . 15 ⊢ (i ∈ ℂ → (i / 2) ∈ ℂ)
38	10, 37	mp1i 13	. . . . . . . . . . . . . 14 ⊢ (𝐴 ∈ ℝ⁺ → (i / 2) ∈ ℂ)
39	25, 21	subcld 11533	. . . . . . . . . . . . . 14 ⊢ (𝐴 ∈ ℝ⁺ → ((log‘(1 − (i · 𝐴))) − (log‘(1 + (i · 𝐴)))) ∈ ℂ)
40	36, 38, 39	mulassd 11197	. . . . . . . . . . . . 13 ⊢ (𝐴 ∈ ℝ⁺ → ((2 · (i / 2)) · ((log‘(1 − (i · 𝐴))) − (log‘(1 + (i · 𝐴))))) = (2 · ((i / 2) · ((log‘(1 − (i · 𝐴))) − (log‘(1 + (i · 𝐴)))))))
41	33, 40	eqtr3id 2778	. . . . . . . . . . . 12 ⊢ (𝐴 ∈ ℝ⁺ → (i · ((log‘(1 − (i · 𝐴))) − (log‘(1 + (i · 𝐴))))) = (2 · ((i / 2) · ((log‘(1 − (i · 𝐴))) − (log‘(1 + (i · 𝐴)))))))
42	31, 41	eqtr4d 2767	. . . . . . . . . . 11 ⊢ (𝐴 ∈ ℝ⁺ → (2 · (arctan‘𝐴)) = (i · ((log‘(1 − (i · 𝐴))) − (log‘(1 + (i · 𝐴))))))
43	21, 25	negsubdi2d 11549	. . . . . . . . . . . 12 ⊢ (𝐴 ∈ ℝ⁺ → -((log‘(1 + (i · 𝐴))) − (log‘(1 − (i · 𝐴)))) = ((log‘(1 − (i · 𝐴))) − (log‘(1 + (i · 𝐴)))))
44	43	oveq2d 7403	. . . . . . . . . . 11 ⊢ (𝐴 ∈ ℝ⁺ → (i · -((log‘(1 + (i · 𝐴))) − (log‘(1 − (i · 𝐴))))) = (i · ((log‘(1 − (i · 𝐴))) − (log‘(1 + (i · 𝐴))))))
45	42, 44	eqtr4d 2767	. . . . . . . . . 10 ⊢ (𝐴 ∈ ℝ⁺ → (2 · (arctan‘𝐴)) = (i · -((log‘(1 + (i · 𝐴))) − (log‘(1 − (i · 𝐴))))))
46		mulneg12 11616	. . . . . . . . . . 11 ⊢ ((i ∈ ℂ ∧ ((log‘(1 + (i · 𝐴))) − (log‘(1 − (i · 𝐴)))) ∈ ℂ) → (-i · ((log‘(1 + (i · 𝐴))) − (log‘(1 − (i · 𝐴))))) = (i · -((log‘(1 + (i · 𝐴))) − (log‘(1 − (i · 𝐴))))))
47	10, 26, 46	sylancr 587	. . . . . . . . . 10 ⊢ (𝐴 ∈ ℝ⁺ → (-i · ((log‘(1 + (i · 𝐴))) − (log‘(1 − (i · 𝐴))))) = (i · -((log‘(1 + (i · 𝐴))) − (log‘(1 − (i · 𝐴))))))
48	45, 47	eqtr4d 2767	. . . . . . . . 9 ⊢ (𝐴 ∈ ℝ⁺ → (2 · (arctan‘𝐴)) = (-i · ((log‘(1 + (i · 𝐴))) − (log‘(1 − (i · 𝐴))))))
49	48	fveq2d 6862	. . . . . . . 8 ⊢ (𝐴 ∈ ℝ⁺ → (ℜ‘(2 · (arctan‘𝐴))) = (ℜ‘(-i · ((log‘(1 + (i · 𝐴))) − (log‘(1 − (i · 𝐴)))))))
50		remulcl 11153	. . . . . . . . . 10 ⊢ ((2 ∈ ℝ ∧ (arctan‘𝐴) ∈ ℝ) → (2 · (arctan‘𝐴)) ∈ ℝ)
51	34, 3, 50	sylancr 587	. . . . . . . . 9 ⊢ (𝐴 ∈ ℝ⁺ → (2 · (arctan‘𝐴)) ∈ ℝ)
52	51	rered 15190	. . . . . . . 8 ⊢ (𝐴 ∈ ℝ⁺ → (ℜ‘(2 · (arctan‘𝐴))) = (2 · (arctan‘𝐴)))
53	28, 49, 52	3eqtr2rd 2771	. . . . . . 7 ⊢ (𝐴 ∈ ℝ⁺ → (2 · (arctan‘𝐴)) = (ℑ‘((log‘(1 + (i · 𝐴))) − (log‘(1 − (i · 𝐴))))))
54		rpgt0 12964	. . . . . . . . 9 ⊢ (𝐴 ∈ ℝ⁺ → 0 < 𝐴)
55	1	rered 15190	. . . . . . . . 9 ⊢ (𝐴 ∈ ℝ⁺ → (ℜ‘𝐴) = 𝐴)
56	54, 55	breqtrrd 5135	. . . . . . . 8 ⊢ (𝐴 ∈ ℝ⁺ → 0 < (ℜ‘𝐴))
57		atanlogsublem 26825	. . . . . . . 8 ⊢ ((𝐴 ∈ dom arctan ∧ 0 < (ℜ‘𝐴)) → (ℑ‘((log‘(1 + (i · 𝐴))) − (log‘(1 − (i · 𝐴))))) ∈ (-π(,)π))
58	17, 56, 57	syl2anc 584	. . . . . . 7 ⊢ (𝐴 ∈ ℝ⁺ → (ℑ‘((log‘(1 + (i · 𝐴))) − (log‘(1 − (i · 𝐴))))) ∈ (-π(,)π))
59	53, 58	eqeltrd 2828	. . . . . 6 ⊢ (𝐴 ∈ ℝ⁺ → (2 · (arctan‘𝐴)) ∈ (-π(,)π))
60		eliooord 13366	. . . . . 6 ⊢ ((2 · (arctan‘𝐴)) ∈ (-π(,)π) → (-π < (2 · (arctan‘𝐴)) ∧ (2 · (arctan‘𝐴)) < π))
61	59, 60	syl 17	. . . . 5 ⊢ (𝐴 ∈ ℝ⁺ → (-π < (2 · (arctan‘𝐴)) ∧ (2 · (arctan‘𝐴)) < π))
62	61	simpld 494	. . . 4 ⊢ (𝐴 ∈ ℝ⁺ → -π < (2 · (arctan‘𝐴)))
63		pire 26366	. . . . . . 7 ⊢ π ∈ ℝ
64	63	renegcli 11483	. . . . . 6 ⊢ -π ∈ ℝ
65	64	a1i 11	. . . . 5 ⊢ (𝐴 ∈ ℝ⁺ → -π ∈ ℝ)
66		2pos 12289	. . . . . 6 ⊢ 0 < 2
67	66	a1i 11	. . . . 5 ⊢ (𝐴 ∈ ℝ⁺ → 0 < 2)
68		ltdivmul 12058	. . . . 5 ⊢ ((-π ∈ ℝ ∧ (arctan‘𝐴) ∈ ℝ ∧ (2 ∈ ℝ ∧ 0 < 2)) → ((-π / 2) < (arctan‘𝐴) ↔ -π < (2 · (arctan‘𝐴))))
69	65, 3, 35, 67, 68	syl112anc 1376	. . . 4 ⊢ (𝐴 ∈ ℝ⁺ → ((-π / 2) < (arctan‘𝐴) ↔ -π < (2 · (arctan‘𝐴))))
70	62, 69	mpbird 257	. . 3 ⊢ (𝐴 ∈ ℝ⁺ → (-π / 2) < (arctan‘𝐴))
71	8, 70	eqbrtrid 5142	. 2 ⊢ (𝐴 ∈ ℝ⁺ → -(π / 2) < (arctan‘𝐴))
72	61	simprd 495	. . 3 ⊢ (𝐴 ∈ ℝ⁺ → (2 · (arctan‘𝐴)) < π)
73	63	a1i 11	. . . 4 ⊢ (𝐴 ∈ ℝ⁺ → π ∈ ℝ)
74		ltmuldiv2 12057	. . . 4 ⊢ (((arctan‘𝐴) ∈ ℝ ∧ π ∈ ℝ ∧ (2 ∈ ℝ ∧ 0 < 2)) → ((2 · (arctan‘𝐴)) < π ↔ (arctan‘𝐴) < (π / 2)))
75	3, 73, 35, 67, 74	syl112anc 1376	. . 3 ⊢ (𝐴 ∈ ℝ⁺ → ((2 · (arctan‘𝐴)) < π ↔ (arctan‘𝐴) < (π / 2)))
76	72, 75	mpbid 232	. 2 ⊢ (𝐴 ∈ ℝ⁺ → (arctan‘𝐴) < (π / 2))
77		halfpire 26373	. . . . 5 ⊢ (π / 2) ∈ ℝ
78	77	renegcli 11483	. . . 4 ⊢ -(π / 2) ∈ ℝ
79	78	rexri 11232	. . 3 ⊢ -(π / 2) ∈ ℝ^*
80	77	rexri 11232	. . 3 ⊢ (π / 2) ∈ ℝ^*
81		elioo2 13347	. . 3 ⊢ ((-(π / 2) ∈ ℝ^* ∧ (π / 2) ∈ ℝ^*) → ((arctan‘𝐴) ∈ (-(π / 2)(,)(π / 2)) ↔ ((arctan‘𝐴) ∈ ℝ ∧ -(π / 2) < (arctan‘𝐴) ∧ (arctan‘𝐴) < (π / 2))))
82	79, 80, 81	mp2an 692	. 2 ⊢ ((arctan‘𝐴) ∈ (-(π / 2)(,)(π / 2)) ↔ ((arctan‘𝐴) ∈ ℝ ∧ -(π / 2) < (arctan‘𝐴) ∧ (arctan‘𝐴) < (π / 2)))
83	3, 71, 76, 82	syl3anbrc 1344	1 ⊢ (𝐴 ∈ ℝ⁺ → (arctan‘𝐴) ∈ (-(π / 2)(,)(π / 2)))

Colors of variables: wff setvar class

Syntax hints: → wi 4 ↔ wb 206 ∧ wa 395 ∧ w3a 1086 = wceq 1540 ∈ wcel 2109 ≠ wne 2925 class class class wbr 5107 dom cdm 5638 ‘cfv 6511 (class class class)co 7387 ℂcc 11066 ℝcr 11067 0cc0 11068 1c1 11069 ici 11070 + caddc 11071 · cmul 11073 ℝ^*cxr 11207 < clt 11208 − cmin 11405 -cneg 11406 / cdiv 11835 2c2 12241 ℝ⁺crp 12951 (,)cioo 13306 ℜcre 15063 ℑcim 15064 πcpi 16032 logclog 26463 arctancatan 26774

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 2701 ax-rep 5234 ax-sep 5251 ax-nul 5261 ax-pow 5320 ax-pr 5387 ax-un 7711 ax-inf2 9594 ax-cnex 11124 ax-resscn 11125 ax-1cn 11126 ax-icn 11127 ax-addcl 11128 ax-addrcl 11129 ax-mulcl 11130 ax-mulrcl 11131 ax-mulcom 11132 ax-addass 11133 ax-mulass 11134 ax-distr 11135 ax-i2m1 11136 ax-1ne0 11137 ax-1rid 11138 ax-rnegex 11139 ax-rrecex 11140 ax-cnre 11141 ax-pre-lttri 11142 ax-pre-lttrn 11143 ax-pre-ltadd 11144 ax-pre-mulgt0 11145 ax-pre-sup 11146 ax-addf 11147

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 2533 df-eu 2562 df-clab 2708 df-cleq 2721 df-clel 2803 df-nfc 2878 df-ne 2926 df-nel 3030 df-ral 3045 df-rex 3054 df-rmo 3354 df-reu 3355 df-rab 3406 df-v 3449 df-sbc 3754 df-csb 3863 df-dif 3917 df-un 3919 df-in 3921 df-ss 3931 df-pss 3934 df-nul 4297 df-if 4489 df-pw 4565 df-sn 4590 df-pr 4592 df-tp 4594 df-op 4596 df-uni 4872 df-int 4911 df-iun 4957 df-iin 4958 df-br 5108 df-opab 5170 df-mpt 5189 df-tr 5215 df-id 5533 df-eprel 5538 df-po 5546 df-so 5547 df-fr 5591 df-se 5592 df-we 5593 df-xp 5644 df-rel 5645 df-cnv 5646 df-co 5647 df-dm 5648 df-rn 5649 df-res 5650 df-ima 5651 df-pred 6274 df-ord 6335 df-on 6336 df-lim 6337 df-suc 6338 df-iota 6464 df-fun 6513 df-fn 6514 df-f 6515 df-f1 6516 df-fo 6517 df-f1o 6518 df-fv 6519 df-isom 6520 df-riota 7344 df-ov 7390 df-oprab 7391 df-mpo 7392 df-of 7653 df-om 7843 df-1st 7968 df-2nd 7969 df-supp 8140 df-frecs 8260 df-wrecs 8291 df-recs 8340 df-rdg 8378 df-1o 8434 df-2o 8435 df-er 8671 df-map 8801 df-pm 8802 df-ixp 8871 df-en 8919 df-dom 8920 df-sdom 8921 df-fin 8922 df-fsupp 9313 df-fi 9362 df-sup 9393 df-inf 9394 df-oi 9463 df-card 9892 df-pnf 11210 df-mnf 11211 df-xr 11212 df-ltxr 11213 df-le 11214 df-sub 11407 df-neg 11408 df-div 11836 df-nn 12187 df-2 12249 df-3 12250 df-4 12251 df-5 12252 df-6 12253 df-7 12254 df-8 12255 df-9 12256 df-n0 12443 df-z 12530 df-dec 12650 df-uz 12794 df-q 12908 df-rp 12952 df-xneg 13072 df-xadd 13073 df-xmul 13074 df-ioo 13310 df-ioc 13311 df-ico 13312 df-icc 13313 df-fz 13469 df-fzo 13616 df-fl 13754 df-mod 13832 df-seq 13967 df-exp 14027 df-fac 14239 df-bc 14268 df-hash 14296 df-shft 15033 df-cj 15065 df-re 15066 df-im 15067 df-sqrt 15201 df-abs 15202 df-limsup 15437 df-clim 15454 df-rlim 15455 df-sum 15653 df-ef 16033 df-sin 16035 df-cos 16036 df-tan 16037 df-pi 16038 df-struct 17117 df-sets 17134 df-slot 17152 df-ndx 17164 df-base 17180 df-ress 17201 df-plusg 17233 df-mulr 17234 df-starv 17235 df-sca 17236 df-vsca 17237 df-ip 17238 df-tset 17239 df-ple 17240 df-ds 17242 df-unif 17243 df-hom 17244 df-cco 17245 df-rest 17385 df-topn 17386 df-0g 17404 df-gsum 17405 df-topgen 17406 df-pt 17407 df-prds 17410 df-xrs 17465 df-qtop 17470 df-imas 17471 df-xps 17473 df-mre 17547 df-mrc 17548 df-acs 17550 df-mgm 18567 df-sgrp 18646 df-mnd 18662 df-submnd 18711 df-mulg 19000 df-cntz 19249 df-cmn 19712 df-psmet 21256 df-xmet 21257 df-met 21258 df-bl 21259 df-mopn 21260 df-fbas 21261 df-fg 21262 df-cnfld 21265 df-top 22781 df-topon 22798 df-topsp 22820 df-bases 22833 df-cld 22906 df-ntr 22907 df-cls 22908 df-nei 22985 df-lp 23023 df-perf 23024 df-cn 23114 df-cnp 23115 df-haus 23202 df-tx 23449 df-hmeo 23642 df-fil 23733 df-fm 23825 df-flim 23826 df-flf 23827 df-xms 24208 df-ms 24209 df-tms 24210 df-cncf 24771 df-limc 25767 df-dv 25768 df-log 26465 df-atan 26777

This theorem is referenced by: atanbnd 26836

W3C validator