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 26889

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

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

**Proof of Theorem atanbndlem**
Step	Hyp	Ref	Expression
1		rpre 12951	. . 3 ⊢ (𝐴 ∈ ℝ⁺ → 𝐴 ∈ ℝ)
2		atanrecl 26875	. . 3 ⊢ (𝐴 ∈ ℝ → (arctan‘𝐴) ∈ ℝ)
3	1, 2	syl 17	. 2 ⊢ (𝐴 ∈ ℝ⁺ → (arctan‘𝐴) ∈ ℝ)
4		picn 26422	. . . 4 ⊢ π ∈ ℂ
5		2cn 12256	. . . 4 ⊢ 2 ∈ ℂ
6		2ne0 12285	. . . 4 ⊢ 2 ≠ 0
7		divneg 11846	. . . 4 ⊢ ((π ∈ ℂ ∧ 2 ∈ ℂ ∧ 2 ≠ 0) → -(π / 2) = (-π / 2))
8	4, 5, 6, 7	mp3an 1464	. . 3 ⊢ -(π / 2) = (-π / 2)
9		ax-1cn 11096	. . . . . . . . . . . 12 ⊢ 1 ∈ ℂ
10		ax-icn 11097	. . . . . . . . . . . . 13 ⊢ i ∈ ℂ
11	1	recnd 11173	. . . . . . . . . . . . 13 ⊢ (𝐴 ∈ ℝ⁺ → 𝐴 ∈ ℂ)
12		mulcl 11122	. . . . . . . . . . . . 13 ⊢ ((i ∈ ℂ ∧ 𝐴 ∈ ℂ) → (i · 𝐴) ∈ ℂ)
13	10, 11, 12	sylancr 588	. . . . . . . . . . . 12 ⊢ (𝐴 ∈ ℝ⁺ → (i · 𝐴) ∈ ℂ)
14		addcl 11120	. . . . . . . . . . . 12 ⊢ ((1 ∈ ℂ ∧ (i · 𝐴) ∈ ℂ) → (1 + (i · 𝐴)) ∈ ℂ)
15	9, 13, 14	sylancr 588	. . . . . . . . . . 11 ⊢ (𝐴 ∈ ℝ⁺ → (1 + (i · 𝐴)) ∈ ℂ)
16		atanre 26849	. . . . . . . . . . . . . 14 ⊢ (𝐴 ∈ ℝ → 𝐴 ∈ dom arctan)
17	1, 16	syl 17	. . . . . . . . . . . . 13 ⊢ (𝐴 ∈ ℝ⁺ → 𝐴 ∈ dom arctan)
18		atandm2 26841	. . . . . . . . . . . . 13 ⊢ (𝐴 ∈ dom arctan ↔ (𝐴 ∈ ℂ ∧ (1 − (i · 𝐴)) ≠ 0 ∧ (1 + (i · 𝐴)) ≠ 0))
19	17, 18	sylib 218	. . . . . . . . . . . 12 ⊢ (𝐴 ∈ ℝ⁺ → (𝐴 ∈ ℂ ∧ (1 − (i · 𝐴)) ≠ 0 ∧ (1 + (i · 𝐴)) ≠ 0))
20	19	simp3d 1145	. . . . . . . . . . 11 ⊢ (𝐴 ∈ ℝ⁺ → (1 + (i · 𝐴)) ≠ 0)
21	15, 20	logcld 26534	. . . . . . . . . 10 ⊢ (𝐴 ∈ ℝ⁺ → (log‘(1 + (i · 𝐴))) ∈ ℂ)
22		subcl 11392	. . . . . . . . . . . 12 ⊢ ((1 ∈ ℂ ∧ (i · 𝐴) ∈ ℂ) → (1 − (i · 𝐴)) ∈ ℂ)
23	9, 13, 22	sylancr 588	. . . . . . . . . . 11 ⊢ (𝐴 ∈ ℝ⁺ → (1 − (i · 𝐴)) ∈ ℂ)
24	19	simp2d 1144	. . . . . . . . . . 11 ⊢ (𝐴 ∈ ℝ⁺ → (1 − (i · 𝐴)) ≠ 0)
25	23, 24	logcld 26534	. . . . . . . . . 10 ⊢ (𝐴 ∈ ℝ⁺ → (log‘(1 − (i · 𝐴))) ∈ ℂ)
26	21, 25	subcld 11505	. . . . . . . . 9 ⊢ (𝐴 ∈ ℝ⁺ → ((log‘(1 + (i · 𝐴))) − (log‘(1 − (i · 𝐴)))) ∈ ℂ)
27		imre 15070	. . . . . . . . 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 26848	. . . . . . . . . . . . . 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 7383	. . . . . . . . . . . 12 ⊢ (𝐴 ∈ ℝ⁺ → (2 · (arctan‘𝐴)) = (2 · ((i / 2) · ((log‘(1 − (i · 𝐴))) − (log‘(1 + (i · 𝐴)))))))
32	10, 5, 6	divcan2i 11898	. . . . . . . . . . . . . 14 ⊢ (2 · (i / 2)) = i
33	32	oveq1i 7377	. . . . . . . . . . . . 13 ⊢ ((2 · (i / 2)) · ((log‘(1 − (i · 𝐴))) − (log‘(1 + (i · 𝐴))))) = (i · ((log‘(1 − (i · 𝐴))) − (log‘(1 + (i · 𝐴)))))
34		2re 12255	. . . . . . . . . . . . . . . 16 ⊢ 2 ∈ ℝ
35	34	a1i 11	. . . . . . . . . . . . . . 15 ⊢ (𝐴 ∈ ℝ⁺ → 2 ∈ ℝ)
36	35	recnd 11173	. . . . . . . . . . . . . 14 ⊢ (𝐴 ∈ ℝ⁺ → 2 ∈ ℂ)
37		halfcl 12403	. . . . . . . . . . . . . . 15 ⊢ (i ∈ ℂ → (i / 2) ∈ ℂ)
38	10, 37	mp1i 13	. . . . . . . . . . . . . 14 ⊢ (𝐴 ∈ ℝ⁺ → (i / 2) ∈ ℂ)
39	25, 21	subcld 11505	. . . . . . . . . . . . . 14 ⊢ (𝐴 ∈ ℝ⁺ → ((log‘(1 − (i · 𝐴))) − (log‘(1 + (i · 𝐴)))) ∈ ℂ)
40	36, 38, 39	mulassd 11168	. . . . . . . . . . . . 13 ⊢ (𝐴 ∈ ℝ⁺ → ((2 · (i / 2)) · ((log‘(1 − (i · 𝐴))) − (log‘(1 + (i · 𝐴))))) = (2 · ((i / 2) · ((log‘(1 − (i · 𝐴))) − (log‘(1 + (i · 𝐴)))))))
41	33, 40	eqtr3id 2785	. . . . . . . . . . . 12 ⊢ (𝐴 ∈ ℝ⁺ → (i · ((log‘(1 − (i · 𝐴))) − (log‘(1 + (i · 𝐴))))) = (2 · ((i / 2) · ((log‘(1 − (i · 𝐴))) − (log‘(1 + (i · 𝐴)))))))
42	31, 41	eqtr4d 2774	. . . . . . . . . . 11 ⊢ (𝐴 ∈ ℝ⁺ → (2 · (arctan‘𝐴)) = (i · ((log‘(1 − (i · 𝐴))) − (log‘(1 + (i · 𝐴))))))
43	21, 25	negsubdi2d 11521	. . . . . . . . . . . 12 ⊢ (𝐴 ∈ ℝ⁺ → -((log‘(1 + (i · 𝐴))) − (log‘(1 − (i · 𝐴)))) = ((log‘(1 − (i · 𝐴))) − (log‘(1 + (i · 𝐴)))))
44	43	oveq2d 7383	. . . . . . . . . . 11 ⊢ (𝐴 ∈ ℝ⁺ → (i · -((log‘(1 + (i · 𝐴))) − (log‘(1 − (i · 𝐴))))) = (i · ((log‘(1 − (i · 𝐴))) − (log‘(1 + (i · 𝐴))))))
45	42, 44	eqtr4d 2774	. . . . . . . . . 10 ⊢ (𝐴 ∈ ℝ⁺ → (2 · (arctan‘𝐴)) = (i · -((log‘(1 + (i · 𝐴))) − (log‘(1 − (i · 𝐴))))))
46		mulneg12 11588	. . . . . . . . . . 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 588	. . . . . . . . . 10 ⊢ (𝐴 ∈ ℝ⁺ → (-i · ((log‘(1 + (i · 𝐴))) − (log‘(1 − (i · 𝐴))))) = (i · -((log‘(1 + (i · 𝐴))) − (log‘(1 − (i · 𝐴))))))
48	45, 47	eqtr4d 2774	. . . . . . . . 9 ⊢ (𝐴 ∈ ℝ⁺ → (2 · (arctan‘𝐴)) = (-i · ((log‘(1 + (i · 𝐴))) − (log‘(1 − (i · 𝐴))))))
49	48	fveq2d 6844	. . . . . . . 8 ⊢ (𝐴 ∈ ℝ⁺ → (ℜ‘(2 · (arctan‘𝐴))) = (ℜ‘(-i · ((log‘(1 + (i · 𝐴))) − (log‘(1 − (i · 𝐴)))))))
50		remulcl 11123	. . . . . . . . . 10 ⊢ ((2 ∈ ℝ ∧ (arctan‘𝐴) ∈ ℝ) → (2 · (arctan‘𝐴)) ∈ ℝ)
51	34, 3, 50	sylancr 588	. . . . . . . . 9 ⊢ (𝐴 ∈ ℝ⁺ → (2 · (arctan‘𝐴)) ∈ ℝ)
52	51	rered 15186	. . . . . . . 8 ⊢ (𝐴 ∈ ℝ⁺ → (ℜ‘(2 · (arctan‘𝐴))) = (2 · (arctan‘𝐴)))
53	28, 49, 52	3eqtr2rd 2778	. . . . . . 7 ⊢ (𝐴 ∈ ℝ⁺ → (2 · (arctan‘𝐴)) = (ℑ‘((log‘(1 + (i · 𝐴))) − (log‘(1 − (i · 𝐴))))))
54		rpgt0 12955	. . . . . . . . 9 ⊢ (𝐴 ∈ ℝ⁺ → 0 < 𝐴)
55	1	rered 15186	. . . . . . . . 9 ⊢ (𝐴 ∈ ℝ⁺ → (ℜ‘𝐴) = 𝐴)
56	54, 55	breqtrrd 5113	. . . . . . . 8 ⊢ (𝐴 ∈ ℝ⁺ → 0 < (ℜ‘𝐴))
57		atanlogsublem 26879	. . . . . . . 8 ⊢ ((𝐴 ∈ dom arctan ∧ 0 < (ℜ‘𝐴)) → (ℑ‘((log‘(1 + (i · 𝐴))) − (log‘(1 − (i · 𝐴))))) ∈ (-π(,)π))
58	17, 56, 57	syl2anc 585	. . . . . . 7 ⊢ (𝐴 ∈ ℝ⁺ → (ℑ‘((log‘(1 + (i · 𝐴))) − (log‘(1 − (i · 𝐴))))) ∈ (-π(,)π))
59	53, 58	eqeltrd 2836	. . . . . 6 ⊢ (𝐴 ∈ ℝ⁺ → (2 · (arctan‘𝐴)) ∈ (-π(,)π))
60		eliooord 13358	. . . . . 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 26421	. . . . . . 7 ⊢ π ∈ ℝ
64	63	renegcli 11455	. . . . . 6 ⊢ -π ∈ ℝ
65	64	a1i 11	. . . . 5 ⊢ (𝐴 ∈ ℝ⁺ → -π ∈ ℝ)
66		2pos 12284	. . . . . 6 ⊢ 0 < 2
67	66	a1i 11	. . . . 5 ⊢ (𝐴 ∈ ℝ⁺ → 0 < 2)
68		ltdivmul 12031	. . . . 5 ⊢ ((-π ∈ ℝ ∧ (arctan‘𝐴) ∈ ℝ ∧ (2 ∈ ℝ ∧ 0 < 2)) → ((-π / 2) < (arctan‘𝐴) ↔ -π < (2 · (arctan‘𝐴))))
69	65, 3, 35, 67, 68	syl112anc 1377	. . . 4 ⊢ (𝐴 ∈ ℝ⁺ → ((-π / 2) < (arctan‘𝐴) ↔ -π < (2 · (arctan‘𝐴))))
70	62, 69	mpbird 257	. . 3 ⊢ (𝐴 ∈ ℝ⁺ → (-π / 2) < (arctan‘𝐴))
71	8, 70	eqbrtrid 5120	. 2 ⊢ (𝐴 ∈ ℝ⁺ → -(π / 2) < (arctan‘𝐴))
72	61	simprd 495	. . 3 ⊢ (𝐴 ∈ ℝ⁺ → (2 · (arctan‘𝐴)) < π)
73	63	a1i 11	. . . 4 ⊢ (𝐴 ∈ ℝ⁺ → π ∈ ℝ)
74		ltmuldiv2 12030	. . . 4 ⊢ (((arctan‘𝐴) ∈ ℝ ∧ π ∈ ℝ ∧ (2 ∈ ℝ ∧ 0 < 2)) → ((2 · (arctan‘𝐴)) < π ↔ (arctan‘𝐴) < (π / 2)))
75	3, 73, 35, 67, 74	syl112anc 1377	. . 3 ⊢ (𝐴 ∈ ℝ⁺ → ((2 · (arctan‘𝐴)) < π ↔ (arctan‘𝐴) < (π / 2)))
76	72, 75	mpbid 232	. 2 ⊢ (𝐴 ∈ ℝ⁺ → (arctan‘𝐴) < (π / 2))
77		halfpire 26428	. . . . 5 ⊢ (π / 2) ∈ ℝ
78	77	renegcli 11455	. . . 4 ⊢ -(π / 2) ∈ ℝ
79	78	rexri 11203	. . 3 ⊢ -(π / 2) ∈ ℝ^*
80	77	rexri 11203	. . 3 ⊢ (π / 2) ∈ ℝ^*
81		elioo2 13339	. . 3 ⊢ ((-(π / 2) ∈ ℝ^* ∧ (π / 2) ∈ ℝ^*) → ((arctan‘𝐴) ∈ (-(π / 2)(,)(π / 2)) ↔ ((arctan‘𝐴) ∈ ℝ ∧ -(π / 2) < (arctan‘𝐴) ∧ (arctan‘𝐴) < (π / 2))))
82	79, 80, 81	mp2an 693	. 2 ⊢ ((arctan‘𝐴) ∈ (-(π / 2)(,)(π / 2)) ↔ ((arctan‘𝐴) ∈ ℝ ∧ -(π / 2) < (arctan‘𝐴) ∧ (arctan‘𝐴) < (π / 2)))
83	3, 71, 76, 82	syl3anbrc 1345	1 ⊢ (𝐴 ∈ ℝ⁺ → (arctan‘𝐴) ∈ (-(π / 2)(,)(π / 2)))

Colors of variables: wff setvar class

Syntax hints: → wi 4 ↔ wb 206 ∧ wa 395 ∧ w3a 1087 = wceq 1542 ∈ wcel 2114 ≠ wne 2932 class class class wbr 5085 dom cdm 5631 ‘cfv 6498 (class class class)co 7367 ℂcc 11036 ℝcr 11037 0cc0 11038 1c1 11039 ici 11040 + caddc 11041 · cmul 11043 ℝ^*cxr 11178 < clt 11179 − cmin 11377 -cneg 11378 / cdiv 11807 2c2 12236 ℝ⁺crp 12942 (,)cioo 13298 ℜcre 15059 ℑcim 15060 πcpi 16031 logclog 26518 arctancatan 26828

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1797 ax-4 1811 ax-5 1912 ax-6 1969 ax-7 2010 ax-8 2116 ax-9 2124 ax-10 2147 ax-11 2163 ax-12 2185 ax-ext 2708 ax-rep 5212 ax-sep 5231 ax-nul 5241 ax-pow 5307 ax-pr 5375 ax-un 7689 ax-inf2 9562 ax-cnex 11094 ax-resscn 11095 ax-1cn 11096 ax-icn 11097 ax-addcl 11098 ax-addrcl 11099 ax-mulcl 11100 ax-mulrcl 11101 ax-mulcom 11102 ax-addass 11103 ax-mulass 11104 ax-distr 11105 ax-i2m1 11106 ax-1ne0 11107 ax-1rid 11108 ax-rnegex 11109 ax-rrecex 11110 ax-cnre 11111 ax-pre-lttri 11112 ax-pre-lttrn 11113 ax-pre-ltadd 11114 ax-pre-mulgt0 11115 ax-pre-sup 11116 ax-addf 11117

This theorem depends on definitions: df-bi 207 df-an 396 df-or 849 df-3or 1088 df-3an 1089 df-tru 1545 df-fal 1555 df-ex 1782 df-nf 1786 df-sb 2069 df-mo 2539 df-eu 2569 df-clab 2715 df-cleq 2728 df-clel 2811 df-nfc 2885 df-ne 2933 df-nel 3037 df-ral 3052 df-rex 3062 df-rmo 3342 df-reu 3343 df-rab 3390 df-v 3431 df-sbc 3729 df-csb 3838 df-dif 3892 df-un 3894 df-in 3896 df-ss 3906 df-pss 3909 df-nul 4274 df-if 4467 df-pw 4543 df-sn 4568 df-pr 4570 df-tp 4572 df-op 4574 df-uni 4851 df-int 4890 df-iun 4935 df-iin 4936 df-br 5086 df-opab 5148 df-mpt 5167 df-tr 5193 df-id 5526 df-eprel 5531 df-po 5539 df-so 5540 df-fr 5584 df-se 5585 df-we 5586 df-xp 5637 df-rel 5638 df-cnv 5639 df-co 5640 df-dm 5641 df-rn 5642 df-res 5643 df-ima 5644 df-pred 6265 df-ord 6326 df-on 6327 df-lim 6328 df-suc 6329 df-iota 6454 df-fun 6500 df-fn 6501 df-f 6502 df-f1 6503 df-fo 6504 df-f1o 6505 df-fv 6506 df-isom 6507 df-riota 7324 df-ov 7370 df-oprab 7371 df-mpo 7372 df-of 7631 df-om 7818 df-1st 7942 df-2nd 7943 df-supp 8111 df-frecs 8231 df-wrecs 8262 df-recs 8311 df-rdg 8349 df-1o 8405 df-2o 8406 df-er 8643 df-map 8775 df-pm 8776 df-ixp 8846 df-en 8894 df-dom 8895 df-sdom 8896 df-fin 8897 df-fsupp 9275 df-fi 9324 df-sup 9355 df-inf 9356 df-oi 9425 df-card 9863 df-pnf 11181 df-mnf 11182 df-xr 11183 df-ltxr 11184 df-le 11185 df-sub 11379 df-neg 11380 df-div 11808 df-nn 12175 df-2 12244 df-3 12245 df-4 12246 df-5 12247 df-6 12248 df-7 12249 df-8 12250 df-9 12251 df-n0 12438 df-z 12525 df-dec 12645 df-uz 12789 df-q 12899 df-rp 12943 df-xneg 13063 df-xadd 13064 df-xmul 13065 df-ioo 13302 df-ioc 13303 df-ico 13304 df-icc 13305 df-fz 13462 df-fzo 13609 df-fl 13751 df-mod 13829 df-seq 13964 df-exp 14024 df-fac 14236 df-bc 14265 df-hash 14293 df-shft 15029 df-cj 15061 df-re 15062 df-im 15063 df-sqrt 15197 df-abs 15198 df-limsup 15433 df-clim 15450 df-rlim 15451 df-sum 15649 df-ef 16032 df-sin 16034 df-cos 16035 df-tan 16036 df-pi 16037 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 17466 df-qtop 17471 df-imas 17472 df-xps 17474 df-mre 17548 df-mrc 17549 df-acs 17551 df-mgm 18608 df-sgrp 18687 df-mnd 18703 df-submnd 18752 df-mulg 19044 df-cntz 19292 df-cmn 19757 df-psmet 21344 df-xmet 21345 df-met 21346 df-bl 21347 df-mopn 21348 df-fbas 21349 df-fg 21350 df-cnfld 21353 df-top 22859 df-topon 22876 df-topsp 22898 df-bases 22911 df-cld 22984 df-ntr 22985 df-cls 22986 df-nei 23063 df-lp 23101 df-perf 23102 df-cn 23192 df-cnp 23193 df-haus 23280 df-tx 23527 df-hmeo 23720 df-fil 23811 df-fm 23903 df-flim 23904 df-flf 23905 df-xms 24285 df-ms 24286 df-tms 24287 df-cncf 24845 df-limc 25833 df-dv 25834 df-log 26520 df-atan 26831

This theorem is referenced by: atanbnd 26890

W3C validator