Proof of Theorem sincosq4sgn
Step | Hyp | Ref
| Expression |
1 | | 3re 8952 |
. . . . 5
⊢ 3 ∈
ℝ |
2 | | halfpire 13507 |
. . . . 5
⊢ (π /
2) ∈ ℝ |
3 | 1, 2 | remulcli 7934 |
. . . 4
⊢ (3
· (π / 2)) ∈ ℝ |
4 | 3 | rexri 7977 |
. . 3
⊢ (3
· (π / 2)) ∈ ℝ* |
5 | | 2re 8948 |
. . . . 5
⊢ 2 ∈
ℝ |
6 | | pire 13501 |
. . . . 5
⊢ π
∈ ℝ |
7 | 5, 6 | remulcli 7934 |
. . . 4
⊢ (2
· π) ∈ ℝ |
8 | 7 | rexri 7977 |
. . 3
⊢ (2
· π) ∈ ℝ* |
9 | | elioo2 9878 |
. . 3
⊢ (((3
· (π / 2)) ∈ ℝ* ∧ (2 · π) ∈
ℝ*) → (𝐴 ∈ ((3 · (π / 2))(,)(2
· π)) ↔ (𝐴
∈ ℝ ∧ (3 · (π / 2)) < 𝐴 ∧ 𝐴 < (2 · π)))) |
10 | 4, 8, 9 | mp2an 424 |
. 2
⊢ (𝐴 ∈ ((3 · (π /
2))(,)(2 · π)) ↔ (𝐴 ∈ ℝ ∧ (3 · (π /
2)) < 𝐴 ∧ 𝐴 < (2 ·
π))) |
11 | | df-3 8938 |
. . . . . . . . . . . 12
⊢ 3 = (2 +
1) |
12 | 11 | oveq1i 5863 |
. . . . . . . . . . 11
⊢ (3
· (π / 2)) = ((2 + 1) · (π / 2)) |
13 | | 2cn 8949 |
. . . . . . . . . . . 12
⊢ 2 ∈
ℂ |
14 | | ax-1cn 7867 |
. . . . . . . . . . . 12
⊢ 1 ∈
ℂ |
15 | 2 | recni 7932 |
. . . . . . . . . . . 12
⊢ (π /
2) ∈ ℂ |
16 | 13, 14, 15 | adddiri 7931 |
. . . . . . . . . . 11
⊢ ((2 + 1)
· (π / 2)) = ((2 · (π / 2)) + (1 · (π /
2))) |
17 | 6 | recni 7932 |
. . . . . . . . . . . . 13
⊢ π
∈ ℂ |
18 | | 2ap0 8971 |
. . . . . . . . . . . . 13
⊢ 2 #
0 |
19 | 17, 13, 18 | divcanap2i 8672 |
. . . . . . . . . . . 12
⊢ (2
· (π / 2)) = π |
20 | 15 | mulid2i 7923 |
. . . . . . . . . . . 12
⊢ (1
· (π / 2)) = (π / 2) |
21 | 19, 20 | oveq12i 5865 |
. . . . . . . . . . 11
⊢ ((2
· (π / 2)) + (1 · (π / 2))) = (π + (π /
2)) |
22 | 12, 16, 21 | 3eqtrri 2196 |
. . . . . . . . . 10
⊢ (π +
(π / 2)) = (3 · (π / 2)) |
23 | 22 | breq1i 3996 |
. . . . . . . . 9
⊢ ((π +
(π / 2)) < 𝐴 ↔
(3 · (π / 2)) < 𝐴) |
24 | | ltaddsub 8355 |
. . . . . . . . . 10
⊢ ((π
∈ ℝ ∧ (π / 2) ∈ ℝ ∧ 𝐴 ∈ ℝ) → ((π + (π / 2))
< 𝐴 ↔ π <
(𝐴 − (π /
2)))) |
25 | 6, 2, 24 | mp3an12 1322 |
. . . . . . . . 9
⊢ (𝐴 ∈ ℝ → ((π +
(π / 2)) < 𝐴 ↔
π < (𝐴 − (π
/ 2)))) |
26 | 23, 25 | bitr3id 193 |
. . . . . . . 8
⊢ (𝐴 ∈ ℝ → ((3
· (π / 2)) < 𝐴
↔ π < (𝐴 −
(π / 2)))) |
27 | | ltsubadd 8351 |
. . . . . . . . . 10
⊢ ((𝐴 ∈ ℝ ∧ (π / 2)
∈ ℝ ∧ (3 · (π / 2)) ∈ ℝ) → ((𝐴 − (π / 2)) < (3
· (π / 2)) ↔ 𝐴 < ((3 · (π / 2)) + (π /
2)))) |
28 | 2, 3, 27 | mp3an23 1324 |
. . . . . . . . 9
⊢ (𝐴 ∈ ℝ → ((𝐴 − (π / 2)) < (3
· (π / 2)) ↔ 𝐴 < ((3 · (π / 2)) + (π /
2)))) |
29 | | df-4 8939 |
. . . . . . . . . . . . 13
⊢ 4 = (3 +
1) |
30 | 29 | oveq1i 5863 |
. . . . . . . . . . . 12
⊢ (4
· (π / 2)) = ((3 + 1) · (π / 2)) |
31 | 1 | recni 7932 |
. . . . . . . . . . . . 13
⊢ 3 ∈
ℂ |
32 | 31, 14, 15 | adddiri 7931 |
. . . . . . . . . . . 12
⊢ ((3 + 1)
· (π / 2)) = ((3 · (π / 2)) + (1 · (π /
2))) |
33 | 20 | oveq2i 5864 |
. . . . . . . . . . . 12
⊢ ((3
· (π / 2)) + (1 · (π / 2))) = ((3 · (π / 2)) +
(π / 2)) |
34 | 30, 32, 33 | 3eqtrri 2196 |
. . . . . . . . . . 11
⊢ ((3
· (π / 2)) + (π / 2)) = (4 · (π / 2)) |
35 | | 4cn 8956 |
. . . . . . . . . . . . 13
⊢ 4 ∈
ℂ |
36 | 13, 18 | pm3.2i 270 |
. . . . . . . . . . . . 13
⊢ (2 ∈
ℂ ∧ 2 # 0) |
37 | | div12ap 8611 |
. . . . . . . . . . . . 13
⊢ ((4
∈ ℂ ∧ π ∈ ℂ ∧ (2 ∈ ℂ ∧ 2 # 0))
→ (4 · (π / 2)) = (π · (4 / 2))) |
38 | 35, 17, 36, 37 | mp3an 1332 |
. . . . . . . . . . . 12
⊢ (4
· (π / 2)) = (π · (4 / 2)) |
39 | | 4d2e2 9038 |
. . . . . . . . . . . . . 14
⊢ (4 / 2) =
2 |
40 | 39 | oveq2i 5864 |
. . . . . . . . . . . . 13
⊢ (π
· (4 / 2)) = (π · 2) |
41 | 17, 13 | mulcomi 7926 |
. . . . . . . . . . . . 13
⊢ (π
· 2) = (2 · π) |
42 | 40, 41 | eqtri 2191 |
. . . . . . . . . . . 12
⊢ (π
· (4 / 2)) = (2 · π) |
43 | 38, 42 | eqtri 2191 |
. . . . . . . . . . 11
⊢ (4
· (π / 2)) = (2 · π) |
44 | 34, 43 | eqtri 2191 |
. . . . . . . . . 10
⊢ ((3
· (π / 2)) + (π / 2)) = (2 · π) |
45 | 44 | breq2i 3997 |
. . . . . . . . 9
⊢ (𝐴 < ((3 · (π / 2)) +
(π / 2)) ↔ 𝐴 <
(2 · π)) |
46 | 28, 45 | bitr2di 196 |
. . . . . . . 8
⊢ (𝐴 ∈ ℝ → (𝐴 < (2 · π) ↔
(𝐴 − (π / 2)) <
(3 · (π / 2)))) |
47 | 26, 46 | anbi12d 470 |
. . . . . . 7
⊢ (𝐴 ∈ ℝ → (((3
· (π / 2)) < 𝐴
∧ 𝐴 < (2 ·
π)) ↔ (π < (𝐴
− (π / 2)) ∧ (𝐴 − (π / 2)) < (3 · (π
/ 2))))) |
48 | | resubcl 8183 |
. . . . . . . . . 10
⊢ ((𝐴 ∈ ℝ ∧ (π / 2)
∈ ℝ) → (𝐴
− (π / 2)) ∈ ℝ) |
49 | 2, 48 | mpan2 423 |
. . . . . . . . 9
⊢ (𝐴 ∈ ℝ → (𝐴 − (π / 2)) ∈
ℝ) |
50 | 6 | rexri 7977 |
. . . . . . . . . . 11
⊢ π
∈ ℝ* |
51 | | elioo2 9878 |
. . . . . . . . . . 11
⊢ ((π
∈ ℝ* ∧ (3 · (π / 2)) ∈
ℝ*) → ((𝐴 − (π / 2)) ∈ (π(,)(3
· (π / 2))) ↔ ((𝐴 − (π / 2)) ∈ ℝ ∧
π < (𝐴 − (π
/ 2)) ∧ (𝐴 −
(π / 2)) < (3 · (π / 2))))) |
52 | 50, 4, 51 | mp2an 424 |
. . . . . . . . . 10
⊢ ((𝐴 − (π / 2)) ∈
(π(,)(3 · (π / 2))) ↔ ((𝐴 − (π / 2)) ∈ ℝ ∧
π < (𝐴 − (π
/ 2)) ∧ (𝐴 −
(π / 2)) < (3 · (π / 2)))) |
53 | | sincosq3sgn 13543 |
. . . . . . . . . 10
⊢ ((𝐴 − (π / 2)) ∈
(π(,)(3 · (π / 2))) → ((sin‘(𝐴 − (π / 2))) < 0 ∧
(cos‘(𝐴 − (π
/ 2))) < 0)) |
54 | 52, 53 | sylbir 134 |
. . . . . . . . 9
⊢ (((𝐴 − (π / 2)) ∈
ℝ ∧ π < (𝐴
− (π / 2)) ∧ (𝐴 − (π / 2)) < (3 · (π
/ 2))) → ((sin‘(𝐴 − (π / 2))) < 0 ∧
(cos‘(𝐴 − (π
/ 2))) < 0)) |
55 | 49, 54 | syl3an1 1266 |
. . . . . . . 8
⊢ ((𝐴 ∈ ℝ ∧ π <
(𝐴 − (π / 2))
∧ (𝐴 − (π /
2)) < (3 · (π / 2))) → ((sin‘(𝐴 − (π / 2))) < 0 ∧
(cos‘(𝐴 − (π
/ 2))) < 0)) |
56 | 55 | 3expib 1201 |
. . . . . . 7
⊢ (𝐴 ∈ ℝ → ((π
< (𝐴 − (π / 2))
∧ (𝐴 − (π /
2)) < (3 · (π / 2))) → ((sin‘(𝐴 − (π / 2))) < 0 ∧
(cos‘(𝐴 − (π
/ 2))) < 0))) |
57 | 47, 56 | sylbid 149 |
. . . . . 6
⊢ (𝐴 ∈ ℝ → (((3
· (π / 2)) < 𝐴
∧ 𝐴 < (2 ·
π)) → ((sin‘(𝐴 − (π / 2))) < 0 ∧
(cos‘(𝐴 − (π
/ 2))) < 0))) |
58 | 49 | resincld 11686 |
. . . . . . . 8
⊢ (𝐴 ∈ ℝ →
(sin‘(𝐴 − (π
/ 2))) ∈ ℝ) |
59 | 58 | lt0neg1d 8434 |
. . . . . . 7
⊢ (𝐴 ∈ ℝ →
((sin‘(𝐴 −
(π / 2))) < 0 ↔ 0 < -(sin‘(𝐴 − (π / 2))))) |
60 | 59 | anbi1d 462 |
. . . . . 6
⊢ (𝐴 ∈ ℝ →
(((sin‘(𝐴 −
(π / 2))) < 0 ∧ (cos‘(𝐴 − (π / 2))) < 0) ↔ (0 <
-(sin‘(𝐴 −
(π / 2))) ∧ (cos‘(𝐴 − (π / 2))) <
0))) |
61 | 57, 60 | sylibd 148 |
. . . . 5
⊢ (𝐴 ∈ ℝ → (((3
· (π / 2)) < 𝐴
∧ 𝐴 < (2 ·
π)) → (0 < -(sin‘(𝐴 − (π / 2))) ∧
(cos‘(𝐴 − (π
/ 2))) < 0))) |
62 | | recn 7907 |
. . . . . . . . . 10
⊢ (𝐴 ∈ ℝ → 𝐴 ∈
ℂ) |
63 | | pncan3 8127 |
. . . . . . . . . 10
⊢ (((π /
2) ∈ ℂ ∧ 𝐴
∈ ℂ) → ((π / 2) + (𝐴 − (π / 2))) = 𝐴) |
64 | 15, 62, 63 | sylancr 412 |
. . . . . . . . 9
⊢ (𝐴 ∈ ℝ → ((π /
2) + (𝐴 − (π /
2))) = 𝐴) |
65 | 64 | fveq2d 5500 |
. . . . . . . 8
⊢ (𝐴 ∈ ℝ →
(cos‘((π / 2) + (𝐴
− (π / 2)))) = (cos‘𝐴)) |
66 | 49 | recnd 7948 |
. . . . . . . . 9
⊢ (𝐴 ∈ ℝ → (𝐴 − (π / 2)) ∈
ℂ) |
67 | | coshalfpip 13537 |
. . . . . . . . 9
⊢ ((𝐴 − (π / 2)) ∈
ℂ → (cos‘((π / 2) + (𝐴 − (π / 2)))) = -(sin‘(𝐴 − (π /
2)))) |
68 | 66, 67 | syl 14 |
. . . . . . . 8
⊢ (𝐴 ∈ ℝ →
(cos‘((π / 2) + (𝐴
− (π / 2)))) = -(sin‘(𝐴 − (π / 2)))) |
69 | 65, 68 | eqtr3d 2205 |
. . . . . . 7
⊢ (𝐴 ∈ ℝ →
(cos‘𝐴) =
-(sin‘(𝐴 −
(π / 2)))) |
70 | 69 | breq2d 4001 |
. . . . . 6
⊢ (𝐴 ∈ ℝ → (0 <
(cos‘𝐴) ↔ 0 <
-(sin‘(𝐴 −
(π / 2))))) |
71 | 64 | fveq2d 5500 |
. . . . . . . 8
⊢ (𝐴 ∈ ℝ →
(sin‘((π / 2) + (𝐴
− (π / 2)))) = (sin‘𝐴)) |
72 | | sinhalfpip 13535 |
. . . . . . . . 9
⊢ ((𝐴 − (π / 2)) ∈
ℂ → (sin‘((π / 2) + (𝐴 − (π / 2)))) = (cos‘(𝐴 − (π /
2)))) |
73 | 66, 72 | syl 14 |
. . . . . . . 8
⊢ (𝐴 ∈ ℝ →
(sin‘((π / 2) + (𝐴
− (π / 2)))) = (cos‘(𝐴 − (π / 2)))) |
74 | 71, 73 | eqtr3d 2205 |
. . . . . . 7
⊢ (𝐴 ∈ ℝ →
(sin‘𝐴) =
(cos‘(𝐴 − (π
/ 2)))) |
75 | 74 | breq1d 3999 |
. . . . . 6
⊢ (𝐴 ∈ ℝ →
((sin‘𝐴) < 0
↔ (cos‘(𝐴
− (π / 2))) < 0)) |
76 | 70, 75 | anbi12d 470 |
. . . . 5
⊢ (𝐴 ∈ ℝ → ((0 <
(cos‘𝐴) ∧
(sin‘𝐴) < 0)
↔ (0 < -(sin‘(𝐴 − (π / 2))) ∧
(cos‘(𝐴 − (π
/ 2))) < 0))) |
77 | 61, 76 | sylibrd 168 |
. . . 4
⊢ (𝐴 ∈ ℝ → (((3
· (π / 2)) < 𝐴
∧ 𝐴 < (2 ·
π)) → (0 < (cos‘𝐴) ∧ (sin‘𝐴) < 0))) |
78 | 77 | 3impib 1196 |
. . 3
⊢ ((𝐴 ∈ ℝ ∧ (3
· (π / 2)) < 𝐴
∧ 𝐴 < (2 ·
π)) → (0 < (cos‘𝐴) ∧ (sin‘𝐴) < 0)) |
79 | 78 | ancomd 265 |
. 2
⊢ ((𝐴 ∈ ℝ ∧ (3
· (π / 2)) < 𝐴
∧ 𝐴 < (2 ·
π)) → ((sin‘𝐴) < 0 ∧ 0 < (cos‘𝐴))) |
80 | 10, 79 | sylbi 120 |
1
⊢ (𝐴 ∈ ((3 · (π /
2))(,)(2 · π)) → ((sin‘𝐴) < 0 ∧ 0 < (cos‘𝐴))) |