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 25511

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

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

**Proof of Theorem atanbndlem**
Step	Hyp	Ref	Expression
1		rpre 12385	. . 3 ⊢ (𝐴 ∈ ℝ⁺ → 𝐴 ∈ ℝ)
2		atanrecl 25497	. . 3 ⊢ (𝐴 ∈ ℝ → (arctan‘𝐴) ∈ ℝ)
3	1, 2	syl 17	. 2 ⊢ (𝐴 ∈ ℝ⁺ → (arctan‘𝐴) ∈ ℝ)
4		picn 25052	. . . 4 ⊢ π ∈ ℂ
5		2cn 11700	. . . 4 ⊢ 2 ∈ ℂ
6		2ne0 11729	. . . 4 ⊢ 2 ≠ 0
7		divneg 11321	. . . 4 ⊢ ((π ∈ ℂ ∧ 2 ∈ ℂ ∧ 2 ≠ 0) → -(π / 2) = (-π / 2))
8	4, 5, 6, 7	mp3an 1458	. . 3 ⊢ -(π / 2) = (-π / 2)
9		ax-1cn 10584	. . . . . . . . . . . 12 ⊢ 1 ∈ ℂ
10		ax-icn 10585	. . . . . . . . . . . . 13 ⊢ i ∈ ℂ
11	1	recnd 10658	. . . . . . . . . . . . 13 ⊢ (𝐴 ∈ ℝ⁺ → 𝐴 ∈ ℂ)
12		mulcl 10610	. . . . . . . . . . . . 13 ⊢ ((i ∈ ℂ ∧ 𝐴 ∈ ℂ) → (i · 𝐴) ∈ ℂ)
13	10, 11, 12	sylancr 590	. . . . . . . . . . . 12 ⊢ (𝐴 ∈ ℝ⁺ → (i · 𝐴) ∈ ℂ)
14		addcl 10608	. . . . . . . . . . . 12 ⊢ ((1 ∈ ℂ ∧ (i · 𝐴) ∈ ℂ) → (1 + (i · 𝐴)) ∈ ℂ)
15	9, 13, 14	sylancr 590	. . . . . . . . . . 11 ⊢ (𝐴 ∈ ℝ⁺ → (1 + (i · 𝐴)) ∈ ℂ)
16		atanre 25471	. . . . . . . . . . . . . 14 ⊢ (𝐴 ∈ ℝ → 𝐴 ∈ dom arctan)
17	1, 16	syl 17	. . . . . . . . . . . . 13 ⊢ (𝐴 ∈ ℝ⁺ → 𝐴 ∈ dom arctan)
18		atandm2 25463	. . . . . . . . . . . . 13 ⊢ (𝐴 ∈ dom arctan ↔ (𝐴 ∈ ℂ ∧ (1 − (i · 𝐴)) ≠ 0 ∧ (1 + (i · 𝐴)) ≠ 0))
19	17, 18	sylib 221	. . . . . . . . . . . 12 ⊢ (𝐴 ∈ ℝ⁺ → (𝐴 ∈ ℂ ∧ (1 − (i · 𝐴)) ≠ 0 ∧ (1 + (i · 𝐴)) ≠ 0))
20	19	simp3d 1141	. . . . . . . . . . 11 ⊢ (𝐴 ∈ ℝ⁺ → (1 + (i · 𝐴)) ≠ 0)
21	15, 20	logcld 25162	. . . . . . . . . 10 ⊢ (𝐴 ∈ ℝ⁺ → (log‘(1 + (i · 𝐴))) ∈ ℂ)
22		subcl 10874	. . . . . . . . . . . 12 ⊢ ((1 ∈ ℂ ∧ (i · 𝐴) ∈ ℂ) → (1 − (i · 𝐴)) ∈ ℂ)
23	9, 13, 22	sylancr 590	. . . . . . . . . . 11 ⊢ (𝐴 ∈ ℝ⁺ → (1 − (i · 𝐴)) ∈ ℂ)
24	19	simp2d 1140	. . . . . . . . . . 11 ⊢ (𝐴 ∈ ℝ⁺ → (1 − (i · 𝐴)) ≠ 0)
25	23, 24	logcld 25162	. . . . . . . . . 10 ⊢ (𝐴 ∈ ℝ⁺ → (log‘(1 − (i · 𝐴))) ∈ ℂ)
26	21, 25	subcld 10986	. . . . . . . . 9 ⊢ (𝐴 ∈ ℝ⁺ → ((log‘(1 + (i · 𝐴))) − (log‘(1 − (i · 𝐴)))) ∈ ℂ)
27		imre 14459	. . . . . . . . 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 25470	. . . . . . . . . . . . . 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 7151	. . . . . . . . . . . 12 ⊢ (𝐴 ∈ ℝ⁺ → (2 · (arctan‘𝐴)) = (2 · ((i / 2) · ((log‘(1 − (i · 𝐴))) − (log‘(1 + (i · 𝐴)))))))
32	10, 5, 6	divcan2i 11372	. . . . . . . . . . . . . 14 ⊢ (2 · (i / 2)) = i
33	32	oveq1i 7145	. . . . . . . . . . . . 13 ⊢ ((2 · (i / 2)) · ((log‘(1 − (i · 𝐴))) − (log‘(1 + (i · 𝐴))))) = (i · ((log‘(1 − (i · 𝐴))) − (log‘(1 + (i · 𝐴)))))
34		2re 11699	. . . . . . . . . . . . . . . 16 ⊢ 2 ∈ ℝ
35	34	a1i 11	. . . . . . . . . . . . . . 15 ⊢ (𝐴 ∈ ℝ⁺ → 2 ∈ ℝ)
36	35	recnd 10658	. . . . . . . . . . . . . 14 ⊢ (𝐴 ∈ ℝ⁺ → 2 ∈ ℂ)
37		halfcl 11850	. . . . . . . . . . . . . . 15 ⊢ (i ∈ ℂ → (i / 2) ∈ ℂ)
38	10, 37	mp1i 13	. . . . . . . . . . . . . 14 ⊢ (𝐴 ∈ ℝ⁺ → (i / 2) ∈ ℂ)
39	25, 21	subcld 10986	. . . . . . . . . . . . . 14 ⊢ (𝐴 ∈ ℝ⁺ → ((log‘(1 − (i · 𝐴))) − (log‘(1 + (i · 𝐴)))) ∈ ℂ)
40	36, 38, 39	mulassd 10653	. . . . . . . . . . . . 13 ⊢ (𝐴 ∈ ℝ⁺ → ((2 · (i / 2)) · ((log‘(1 − (i · 𝐴))) − (log‘(1 + (i · 𝐴))))) = (2 · ((i / 2) · ((log‘(1 − (i · 𝐴))) − (log‘(1 + (i · 𝐴)))))))
41	33, 40	syl5eqr 2847	. . . . . . . . . . . 12 ⊢ (𝐴 ∈ ℝ⁺ → (i · ((log‘(1 − (i · 𝐴))) − (log‘(1 + (i · 𝐴))))) = (2 · ((i / 2) · ((log‘(1 − (i · 𝐴))) − (log‘(1 + (i · 𝐴)))))))
42	31, 41	eqtr4d 2836	. . . . . . . . . . 11 ⊢ (𝐴 ∈ ℝ⁺ → (2 · (arctan‘𝐴)) = (i · ((log‘(1 − (i · 𝐴))) − (log‘(1 + (i · 𝐴))))))
43	21, 25	negsubdi2d 11002	. . . . . . . . . . . 12 ⊢ (𝐴 ∈ ℝ⁺ → -((log‘(1 + (i · 𝐴))) − (log‘(1 − (i · 𝐴)))) = ((log‘(1 − (i · 𝐴))) − (log‘(1 + (i · 𝐴)))))
44	43	oveq2d 7151	. . . . . . . . . . 11 ⊢ (𝐴 ∈ ℝ⁺ → (i · -((log‘(1 + (i · 𝐴))) − (log‘(1 − (i · 𝐴))))) = (i · ((log‘(1 − (i · 𝐴))) − (log‘(1 + (i · 𝐴))))))
45	42, 44	eqtr4d 2836	. . . . . . . . . 10 ⊢ (𝐴 ∈ ℝ⁺ → (2 · (arctan‘𝐴)) = (i · -((log‘(1 + (i · 𝐴))) − (log‘(1 − (i · 𝐴))))))
46		mulneg12 11067	. . . . . . . . . . 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 590	. . . . . . . . . 10 ⊢ (𝐴 ∈ ℝ⁺ → (-i · ((log‘(1 + (i · 𝐴))) − (log‘(1 − (i · 𝐴))))) = (i · -((log‘(1 + (i · 𝐴))) − (log‘(1 − (i · 𝐴))))))
48	45, 47	eqtr4d 2836	. . . . . . . . 9 ⊢ (𝐴 ∈ ℝ⁺ → (2 · (arctan‘𝐴)) = (-i · ((log‘(1 + (i · 𝐴))) − (log‘(1 − (i · 𝐴))))))
49	48	fveq2d 6649	. . . . . . . 8 ⊢ (𝐴 ∈ ℝ⁺ → (ℜ‘(2 · (arctan‘𝐴))) = (ℜ‘(-i · ((log‘(1 + (i · 𝐴))) − (log‘(1 − (i · 𝐴)))))))
50		remulcl 10611	. . . . . . . . . 10 ⊢ ((2 ∈ ℝ ∧ (arctan‘𝐴) ∈ ℝ) → (2 · (arctan‘𝐴)) ∈ ℝ)
51	34, 3, 50	sylancr 590	. . . . . . . . 9 ⊢ (𝐴 ∈ ℝ⁺ → (2 · (arctan‘𝐴)) ∈ ℝ)
52	51	rered 14575	. . . . . . . 8 ⊢ (𝐴 ∈ ℝ⁺ → (ℜ‘(2 · (arctan‘𝐴))) = (2 · (arctan‘𝐴)))
53	28, 49, 52	3eqtr2rd 2840	. . . . . . 7 ⊢ (𝐴 ∈ ℝ⁺ → (2 · (arctan‘𝐴)) = (ℑ‘((log‘(1 + (i · 𝐴))) − (log‘(1 − (i · 𝐴))))))
54		rpgt0 12389	. . . . . . . . 9 ⊢ (𝐴 ∈ ℝ⁺ → 0 < 𝐴)
55	1	rered 14575	. . . . . . . . 9 ⊢ (𝐴 ∈ ℝ⁺ → (ℜ‘𝐴) = 𝐴)
56	54, 55	breqtrrd 5058	. . . . . . . 8 ⊢ (𝐴 ∈ ℝ⁺ → 0 < (ℜ‘𝐴))
57		atanlogsublem 25501	. . . . . . . 8 ⊢ ((𝐴 ∈ dom arctan ∧ 0 < (ℜ‘𝐴)) → (ℑ‘((log‘(1 + (i · 𝐴))) − (log‘(1 − (i · 𝐴))))) ∈ (-π(,)π))
58	17, 56, 57	syl2anc 587	. . . . . . 7 ⊢ (𝐴 ∈ ℝ⁺ → (ℑ‘((log‘(1 + (i · 𝐴))) − (log‘(1 − (i · 𝐴))))) ∈ (-π(,)π))
59	53, 58	eqeltrd 2890	. . . . . 6 ⊢ (𝐴 ∈ ℝ⁺ → (2 · (arctan‘𝐴)) ∈ (-π(,)π))
60		eliooord 12784	. . . . . 6 ⊢ ((2 · (arctan‘𝐴)) ∈ (-π(,)π) → (-π < (2 · (arctan‘𝐴)) ∧ (2 · (arctan‘𝐴)) < π))
61	59, 60	syl 17	. . . . 5 ⊢ (𝐴 ∈ ℝ⁺ → (-π < (2 · (arctan‘𝐴)) ∧ (2 · (arctan‘𝐴)) < π))
62	61	simpld 498	. . . 4 ⊢ (𝐴 ∈ ℝ⁺ → -π < (2 · (arctan‘𝐴)))
63		pire 25051	. . . . . . 7 ⊢ π ∈ ℝ
64	63	renegcli 10936	. . . . . 6 ⊢ -π ∈ ℝ
65	64	a1i 11	. . . . 5 ⊢ (𝐴 ∈ ℝ⁺ → -π ∈ ℝ)
66		2pos 11728	. . . . . 6 ⊢ 0 < 2
67	66	a1i 11	. . . . 5 ⊢ (𝐴 ∈ ℝ⁺ → 0 < 2)
68		ltdivmul 11504	. . . . 5 ⊢ ((-π ∈ ℝ ∧ (arctan‘𝐴) ∈ ℝ ∧ (2 ∈ ℝ ∧ 0 < 2)) → ((-π / 2) < (arctan‘𝐴) ↔ -π < (2 · (arctan‘𝐴))))
69	65, 3, 35, 67, 68	syl112anc 1371	. . . 4 ⊢ (𝐴 ∈ ℝ⁺ → ((-π / 2) < (arctan‘𝐴) ↔ -π < (2 · (arctan‘𝐴))))
70	62, 69	mpbird 260	. . 3 ⊢ (𝐴 ∈ ℝ⁺ → (-π / 2) < (arctan‘𝐴))
71	8, 70	eqbrtrid 5065	. 2 ⊢ (𝐴 ∈ ℝ⁺ → -(π / 2) < (arctan‘𝐴))
72	61	simprd 499	. . 3 ⊢ (𝐴 ∈ ℝ⁺ → (2 · (arctan‘𝐴)) < π)
73	63	a1i 11	. . . 4 ⊢ (𝐴 ∈ ℝ⁺ → π ∈ ℝ)
74		ltmuldiv2 11503	. . . 4 ⊢ (((arctan‘𝐴) ∈ ℝ ∧ π ∈ ℝ ∧ (2 ∈ ℝ ∧ 0 < 2)) → ((2 · (arctan‘𝐴)) < π ↔ (arctan‘𝐴) < (π / 2)))
75	3, 73, 35, 67, 74	syl112anc 1371	. . 3 ⊢ (𝐴 ∈ ℝ⁺ → ((2 · (arctan‘𝐴)) < π ↔ (arctan‘𝐴) < (π / 2)))
76	72, 75	mpbid 235	. 2 ⊢ (𝐴 ∈ ℝ⁺ → (arctan‘𝐴) < (π / 2))
77		halfpire 25057	. . . . 5 ⊢ (π / 2) ∈ ℝ
78	77	renegcli 10936	. . . 4 ⊢ -(π / 2) ∈ ℝ
79	78	rexri 10688	. . 3 ⊢ -(π / 2) ∈ ℝ^*
80	77	rexri 10688	. . 3 ⊢ (π / 2) ∈ ℝ^*
81		elioo2 12767	. . 3 ⊢ ((-(π / 2) ∈ ℝ^* ∧ (π / 2) ∈ ℝ^*) → ((arctan‘𝐴) ∈ (-(π / 2)(,)(π / 2)) ↔ ((arctan‘𝐴) ∈ ℝ ∧ -(π / 2) < (arctan‘𝐴) ∧ (arctan‘𝐴) < (π / 2))))
82	79, 80, 81	mp2an 691	. 2 ⊢ ((arctan‘𝐴) ∈ (-(π / 2)(,)(π / 2)) ↔ ((arctan‘𝐴) ∈ ℝ ∧ -(π / 2) < (arctan‘𝐴) ∧ (arctan‘𝐴) < (π / 2)))
83	3, 71, 76, 82	syl3anbrc 1340	1 ⊢ (𝐴 ∈ ℝ⁺ → (arctan‘𝐴) ∈ (-(π / 2)(,)(π / 2)))

Colors of variables: wff setvar class

Syntax hints: → wi 4 ↔ wb 209 ∧ wa 399 ∧ w3a 1084 = wceq 1538 ∈ wcel 2111 ≠ wne 2987 class class class wbr 5030 dom cdm 5519 ‘cfv 6324 (class class class)co 7135 ℂcc 10524 ℝcr 10525 0cc0 10526 1c1 10527 ici 10528 + caddc 10529 · cmul 10531 ℝ^*cxr 10663 < clt 10664 − cmin 10859 -cneg 10860 / cdiv 11286 2c2 11680 ℝ⁺crp 12377 (,)cioo 12726 ℜcre 14448 ℑcim 14449 πcpi 15412 logclog 25146 arctancatan 25450

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 1911 ax-6 1970 ax-7 2015 ax-8 2113 ax-9 2121 ax-10 2142 ax-11 2158 ax-12 2175 ax-ext 2770 ax-rep 5154 ax-sep 5167 ax-nul 5174 ax-pow 5231 ax-pr 5295 ax-un 7441 ax-inf2 9088 ax-cnex 10582 ax-resscn 10583 ax-1cn 10584 ax-icn 10585 ax-addcl 10586 ax-addrcl 10587 ax-mulcl 10588 ax-mulrcl 10589 ax-mulcom 10590 ax-addass 10591 ax-mulass 10592 ax-distr 10593 ax-i2m1 10594 ax-1ne0 10595 ax-1rid 10596 ax-rnegex 10597 ax-rrecex 10598 ax-cnre 10599 ax-pre-lttri 10600 ax-pre-lttrn 10601 ax-pre-ltadd 10602 ax-pre-mulgt0 10603 ax-pre-sup 10604 ax-addf 10605 ax-mulf 10606

This theorem depends on definitions: df-bi 210 df-an 400 df-or 845 df-3or 1085 df-3an 1086 df-tru 1541 df-fal 1551 df-ex 1782 df-nf 1786 df-sb 2070 df-mo 2598 df-eu 2629 df-clab 2777 df-cleq 2791 df-clel 2870 df-nfc 2938 df-ne 2988 df-nel 3092 df-ral 3111 df-rex 3112 df-reu 3113 df-rmo 3114 df-rab 3115 df-v 3443 df-sbc 3721 df-csb 3829 df-dif 3884 df-un 3886 df-in 3888 df-ss 3898 df-pss 3900 df-nul 4244 df-if 4426 df-pw 4499 df-sn 4526 df-pr 4528 df-tp 4530 df-op 4532 df-uni 4801 df-int 4839 df-iun 4883 df-iin 4884 df-br 5031 df-opab 5093 df-mpt 5111 df-tr 5137 df-id 5425 df-eprel 5430 df-po 5438 df-so 5439 df-fr 5478 df-se 5479 df-we 5480 df-xp 5525 df-rel 5526 df-cnv 5527 df-co 5528 df-dm 5529 df-rn 5530 df-res 5531 df-ima 5532 df-pred 6116 df-ord 6162 df-on 6163 df-lim 6164 df-suc 6165 df-iota 6283 df-fun 6326 df-fn 6327 df-f 6328 df-f1 6329 df-fo 6330 df-f1o 6331 df-fv 6332 df-isom 6333 df-riota 7093 df-ov 7138 df-oprab 7139 df-mpo 7140 df-of 7389 df-om 7561 df-1st 7671 df-2nd 7672 df-supp 7814 df-wrecs 7930 df-recs 7991 df-rdg 8029 df-1o 8085 df-2o 8086 df-oadd 8089 df-er 8272 df-map 8391 df-pm 8392 df-ixp 8445 df-en 8493 df-dom 8494 df-sdom 8495 df-fin 8496 df-fsupp 8818 df-fi 8859 df-sup 8890 df-inf 8891 df-oi 8958 df-card 9352 df-pnf 10666 df-mnf 10667 df-xr 10668 df-ltxr 10669 df-le 10670 df-sub 10861 df-neg 10862 df-div 11287 df-nn 11626 df-2 11688 df-3 11689 df-4 11690 df-5 11691 df-6 11692 df-7 11693 df-8 11694 df-9 11695 df-n0 11886 df-z 11970 df-dec 12087 df-uz 12232 df-q 12337 df-rp 12378 df-xneg 12495 df-xadd 12496 df-xmul 12497 df-ioo 12730 df-ioc 12731 df-ico 12732 df-icc 12733 df-fz 12886 df-fzo 13029 df-fl 13157 df-mod 13233 df-seq 13365 df-exp 13426 df-fac 13630 df-bc 13659 df-hash 13687 df-shft 14418 df-cj 14450 df-re 14451 df-im 14452 df-sqrt 14586 df-abs 14587 df-limsup 14820 df-clim 14837 df-rlim 14838 df-sum 15035 df-ef 15413 df-sin 15415 df-cos 15416 df-tan 15417 df-pi 15418 df-struct 16477 df-ndx 16478 df-slot 16479 df-base 16481 df-sets 16482 df-ress 16483 df-plusg 16570 df-mulr 16571 df-starv 16572 df-sca 16573 df-vsca 16574 df-ip 16575 df-tset 16576 df-ple 16577 df-ds 16579 df-unif 16580 df-hom 16581 df-cco 16582 df-rest 16688 df-topn 16689 df-0g 16707 df-gsum 16708 df-topgen 16709 df-pt 16710 df-prds 16713 df-xrs 16767 df-qtop 16772 df-imas 16773 df-xps 16775 df-mre 16849 df-mrc 16850 df-acs 16852 df-mgm 17844 df-sgrp 17893 df-mnd 17904 df-submnd 17949 df-mulg 18217 df-cntz 18439 df-cmn 18900 df-psmet 20083 df-xmet 20084 df-met 20085 df-bl 20086 df-mopn 20087 df-fbas 20088 df-fg 20089 df-cnfld 20092 df-top 21499 df-topon 21516 df-topsp 21538 df-bases 21551 df-cld 21624 df-ntr 21625 df-cls 21626 df-nei 21703 df-lp 21741 df-perf 21742 df-cn 21832 df-cnp 21833 df-haus 21920 df-tx 22167 df-hmeo 22360 df-fil 22451 df-fm 22543 df-flim 22544 df-flf 22545 df-xms 22927 df-ms 22928 df-tms 22929 df-cncf 23483 df-limc 24469 df-dv 24470 df-log 25148 df-atan 25453

This theorem is referenced by: atanbnd 25512

W3C validator