Proof of Theorem sincosq4sgn
| Step | Hyp | Ref
 | Expression | 
| 1 |   | 3re 9064 | 
. . . . 5
⊢ 3 ∈
ℝ | 
| 2 |   | halfpire 15028 | 
. . . . 5
⊢ (π /
2) ∈ ℝ | 
| 3 | 1, 2 | remulcli 8040 | 
. . . 4
⊢ (3
· (π / 2)) ∈ ℝ | 
| 4 | 3 | rexri 8084 | 
. . 3
⊢ (3
· (π / 2)) ∈ ℝ* | 
| 5 |   | 2re 9060 | 
. . . . 5
⊢ 2 ∈
ℝ | 
| 6 |   | pire 15022 | 
. . . . 5
⊢ π
∈ ℝ | 
| 7 | 5, 6 | remulcli 8040 | 
. . . 4
⊢ (2
· π) ∈ ℝ | 
| 8 | 7 | rexri 8084 | 
. . 3
⊢ (2
· π) ∈ ℝ* | 
| 9 |   | elioo2 9996 | 
. . 3
⊢ (((3
· (π / 2)) ∈ ℝ* ∧ (2 · π) ∈
ℝ*) → (𝐴 ∈ ((3 · (π / 2))(,)(2
· π)) ↔ (𝐴
∈ ℝ ∧ (3 · (π / 2)) < 𝐴 ∧ 𝐴 < (2 · π)))) | 
| 10 | 4, 8, 9 | mp2an 426 | 
. 2
⊢ (𝐴 ∈ ((3 · (π /
2))(,)(2 · π)) ↔ (𝐴 ∈ ℝ ∧ (3 · (π /
2)) < 𝐴 ∧ 𝐴 < (2 ·
π))) | 
| 11 |   | df-3 9050 | 
. . . . . . . . . . . 12
⊢ 3 = (2 +
1) | 
| 12 | 11 | oveq1i 5932 | 
. . . . . . . . . . 11
⊢ (3
· (π / 2)) = ((2 + 1) · (π / 2)) | 
| 13 |   | 2cn 9061 | 
. . . . . . . . . . . 12
⊢ 2 ∈
ℂ | 
| 14 |   | ax-1cn 7972 | 
. . . . . . . . . . . 12
⊢ 1 ∈
ℂ | 
| 15 | 2 | recni 8038 | 
. . . . . . . . . . . 12
⊢ (π /
2) ∈ ℂ | 
| 16 | 13, 14, 15 | adddiri 8037 | 
. . . . . . . . . . 11
⊢ ((2 + 1)
· (π / 2)) = ((2 · (π / 2)) + (1 · (π /
2))) | 
| 17 | 6 | recni 8038 | 
. . . . . . . . . . . . 13
⊢ π
∈ ℂ | 
| 18 |   | 2ap0 9083 | 
. . . . . . . . . . . . 13
⊢ 2 #
0 | 
| 19 | 17, 13, 18 | divcanap2i 8782 | 
. . . . . . . . . . . 12
⊢ (2
· (π / 2)) = π | 
| 20 | 15 | mullidi 8029 | 
. . . . . . . . . . . 12
⊢ (1
· (π / 2)) = (π / 2) | 
| 21 | 19, 20 | oveq12i 5934 | 
. . . . . . . . . . 11
⊢ ((2
· (π / 2)) + (1 · (π / 2))) = (π + (π /
2)) | 
| 22 | 12, 16, 21 | 3eqtrri 2222 | 
. . . . . . . . . 10
⊢ (π +
(π / 2)) = (3 · (π / 2)) | 
| 23 | 22 | breq1i 4040 | 
. . . . . . . . 9
⊢ ((π +
(π / 2)) < 𝐴 ↔
(3 · (π / 2)) < 𝐴) | 
| 24 |   | ltaddsub 8463 | 
. . . . . . . . . 10
⊢ ((π
∈ ℝ ∧ (π / 2) ∈ ℝ ∧ 𝐴 ∈ ℝ) → ((π + (π / 2))
< 𝐴 ↔ π <
(𝐴 − (π /
2)))) | 
| 25 | 6, 2, 24 | mp3an12 1338 | 
. . . . . . . . 9
⊢ (𝐴 ∈ ℝ → ((π +
(π / 2)) < 𝐴 ↔
π < (𝐴 − (π
/ 2)))) | 
| 26 | 23, 25 | bitr3id 194 | 
. . . . . . . 8
⊢ (𝐴 ∈ ℝ → ((3
· (π / 2)) < 𝐴
↔ π < (𝐴 −
(π / 2)))) | 
| 27 |   | ltsubadd 8459 | 
. . . . . . . . . 10
⊢ ((𝐴 ∈ ℝ ∧ (π / 2)
∈ ℝ ∧ (3 · (π / 2)) ∈ ℝ) → ((𝐴 − (π / 2)) < (3
· (π / 2)) ↔ 𝐴 < ((3 · (π / 2)) + (π /
2)))) | 
| 28 | 2, 3, 27 | mp3an23 1340 | 
. . . . . . . . 9
⊢ (𝐴 ∈ ℝ → ((𝐴 − (π / 2)) < (3
· (π / 2)) ↔ 𝐴 < ((3 · (π / 2)) + (π /
2)))) | 
| 29 |   | df-4 9051 | 
. . . . . . . . . . . . 13
⊢ 4 = (3 +
1) | 
| 30 | 29 | oveq1i 5932 | 
. . . . . . . . . . . 12
⊢ (4
· (π / 2)) = ((3 + 1) · (π / 2)) | 
| 31 | 1 | recni 8038 | 
. . . . . . . . . . . . 13
⊢ 3 ∈
ℂ | 
| 32 | 31, 14, 15 | adddiri 8037 | 
. . . . . . . . . . . 12
⊢ ((3 + 1)
· (π / 2)) = ((3 · (π / 2)) + (1 · (π /
2))) | 
| 33 | 20 | oveq2i 5933 | 
. . . . . . . . . . . 12
⊢ ((3
· (π / 2)) + (1 · (π / 2))) = ((3 · (π / 2)) +
(π / 2)) | 
| 34 | 30, 32, 33 | 3eqtrri 2222 | 
. . . . . . . . . . 11
⊢ ((3
· (π / 2)) + (π / 2)) = (4 · (π / 2)) | 
| 35 |   | 4cn 9068 | 
. . . . . . . . . . . . 13
⊢ 4 ∈
ℂ | 
| 36 | 13, 18 | pm3.2i 272 | 
. . . . . . . . . . . . 13
⊢ (2 ∈
ℂ ∧ 2 # 0) | 
| 37 |   | div12ap 8721 | 
. . . . . . . . . . . . 13
⊢ ((4
∈ ℂ ∧ π ∈ ℂ ∧ (2 ∈ ℂ ∧ 2 # 0))
→ (4 · (π / 2)) = (π · (4 / 2))) | 
| 38 | 35, 17, 36, 37 | mp3an 1348 | 
. . . . . . . . . . . 12
⊢ (4
· (π / 2)) = (π · (4 / 2)) | 
| 39 |   | 4d2e2 9151 | 
. . . . . . . . . . . . . 14
⊢ (4 / 2) =
2 | 
| 40 | 39 | oveq2i 5933 | 
. . . . . . . . . . . . 13
⊢ (π
· (4 / 2)) = (π · 2) | 
| 41 | 17, 13 | mulcomi 8032 | 
. . . . . . . . . . . . 13
⊢ (π
· 2) = (2 · π) | 
| 42 | 40, 41 | eqtri 2217 | 
. . . . . . . . . . . 12
⊢ (π
· (4 / 2)) = (2 · π) | 
| 43 | 38, 42 | eqtri 2217 | 
. . . . . . . . . . 11
⊢ (4
· (π / 2)) = (2 · π) | 
| 44 | 34, 43 | eqtri 2217 | 
. . . . . . . . . 10
⊢ ((3
· (π / 2)) + (π / 2)) = (2 · π) | 
| 45 | 44 | breq2i 4041 | 
. . . . . . . . 9
⊢ (𝐴 < ((3 · (π / 2)) +
(π / 2)) ↔ 𝐴 <
(2 · π)) | 
| 46 | 28, 45 | bitr2di 197 | 
. . . . . . . 8
⊢ (𝐴 ∈ ℝ → (𝐴 < (2 · π) ↔
(𝐴 − (π / 2)) <
(3 · (π / 2)))) | 
| 47 | 26, 46 | anbi12d 473 | 
. . . . . . 7
⊢ (𝐴 ∈ ℝ → (((3
· (π / 2)) < 𝐴
∧ 𝐴 < (2 ·
π)) ↔ (π < (𝐴
− (π / 2)) ∧ (𝐴 − (π / 2)) < (3 · (π
/ 2))))) | 
| 48 |   | resubcl 8290 | 
. . . . . . . . . 10
⊢ ((𝐴 ∈ ℝ ∧ (π / 2)
∈ ℝ) → (𝐴
− (π / 2)) ∈ ℝ) | 
| 49 | 2, 48 | mpan2 425 | 
. . . . . . . . 9
⊢ (𝐴 ∈ ℝ → (𝐴 − (π / 2)) ∈
ℝ) | 
| 50 | 6 | rexri 8084 | 
. . . . . . . . . . 11
⊢ π
∈ ℝ* | 
| 51 |   | elioo2 9996 | 
. . . . . . . . . . 11
⊢ ((π
∈ ℝ* ∧ (3 · (π / 2)) ∈
ℝ*) → ((𝐴 − (π / 2)) ∈ (π(,)(3
· (π / 2))) ↔ ((𝐴 − (π / 2)) ∈ ℝ ∧
π < (𝐴 − (π
/ 2)) ∧ (𝐴 −
(π / 2)) < (3 · (π / 2))))) | 
| 52 | 50, 4, 51 | mp2an 426 | 
. . . . . . . . . 10
⊢ ((𝐴 − (π / 2)) ∈
(π(,)(3 · (π / 2))) ↔ ((𝐴 − (π / 2)) ∈ ℝ ∧
π < (𝐴 − (π
/ 2)) ∧ (𝐴 −
(π / 2)) < (3 · (π / 2)))) | 
| 53 |   | sincosq3sgn 15064 | 
. . . . . . . . . 10
⊢ ((𝐴 − (π / 2)) ∈
(π(,)(3 · (π / 2))) → ((sin‘(𝐴 − (π / 2))) < 0 ∧
(cos‘(𝐴 − (π
/ 2))) < 0)) | 
| 54 | 52, 53 | sylbir 135 | 
. . . . . . . . 9
⊢ (((𝐴 − (π / 2)) ∈
ℝ ∧ π < (𝐴
− (π / 2)) ∧ (𝐴 − (π / 2)) < (3 · (π
/ 2))) → ((sin‘(𝐴 − (π / 2))) < 0 ∧
(cos‘(𝐴 − (π
/ 2))) < 0)) | 
| 55 | 49, 54 | syl3an1 1282 | 
. . . . . . . 8
⊢ ((𝐴 ∈ ℝ ∧ π <
(𝐴 − (π / 2))
∧ (𝐴 − (π /
2)) < (3 · (π / 2))) → ((sin‘(𝐴 − (π / 2))) < 0 ∧
(cos‘(𝐴 − (π
/ 2))) < 0)) | 
| 56 | 55 | 3expib 1208 | 
. . . . . . 7
⊢ (𝐴 ∈ ℝ → ((π
< (𝐴 − (π / 2))
∧ (𝐴 − (π /
2)) < (3 · (π / 2))) → ((sin‘(𝐴 − (π / 2))) < 0 ∧
(cos‘(𝐴 − (π
/ 2))) < 0))) | 
| 57 | 47, 56 | sylbid 150 | 
. . . . . 6
⊢ (𝐴 ∈ ℝ → (((3
· (π / 2)) < 𝐴
∧ 𝐴 < (2 ·
π)) → ((sin‘(𝐴 − (π / 2))) < 0 ∧
(cos‘(𝐴 − (π
/ 2))) < 0))) | 
| 58 | 49 | resincld 11888 | 
. . . . . . . 8
⊢ (𝐴 ∈ ℝ →
(sin‘(𝐴 − (π
/ 2))) ∈ ℝ) | 
| 59 | 58 | lt0neg1d 8542 | 
. . . . . . 7
⊢ (𝐴 ∈ ℝ →
((sin‘(𝐴 −
(π / 2))) < 0 ↔ 0 < -(sin‘(𝐴 − (π / 2))))) | 
| 60 | 59 | anbi1d 465 | 
. . . . . 6
⊢ (𝐴 ∈ ℝ →
(((sin‘(𝐴 −
(π / 2))) < 0 ∧ (cos‘(𝐴 − (π / 2))) < 0) ↔ (0 <
-(sin‘(𝐴 −
(π / 2))) ∧ (cos‘(𝐴 − (π / 2))) <
0))) | 
| 61 | 57, 60 | sylibd 149 | 
. . . . 5
⊢ (𝐴 ∈ ℝ → (((3
· (π / 2)) < 𝐴
∧ 𝐴 < (2 ·
π)) → (0 < -(sin‘(𝐴 − (π / 2))) ∧
(cos‘(𝐴 − (π
/ 2))) < 0))) | 
| 62 |   | recn 8012 | 
. . . . . . . . . 10
⊢ (𝐴 ∈ ℝ → 𝐴 ∈
ℂ) | 
| 63 |   | pncan3 8234 | 
. . . . . . . . . 10
⊢ (((π /
2) ∈ ℂ ∧ 𝐴
∈ ℂ) → ((π / 2) + (𝐴 − (π / 2))) = 𝐴) | 
| 64 | 15, 62, 63 | sylancr 414 | 
. . . . . . . . 9
⊢ (𝐴 ∈ ℝ → ((π /
2) + (𝐴 − (π /
2))) = 𝐴) | 
| 65 | 64 | fveq2d 5562 | 
. . . . . . . 8
⊢ (𝐴 ∈ ℝ →
(cos‘((π / 2) + (𝐴
− (π / 2)))) = (cos‘𝐴)) | 
| 66 | 49 | recnd 8055 | 
. . . . . . . . 9
⊢ (𝐴 ∈ ℝ → (𝐴 − (π / 2)) ∈
ℂ) | 
| 67 |   | coshalfpip 15058 | 
. . . . . . . . 9
⊢ ((𝐴 − (π / 2)) ∈
ℂ → (cos‘((π / 2) + (𝐴 − (π / 2)))) = -(sin‘(𝐴 − (π /
2)))) | 
| 68 | 66, 67 | syl 14 | 
. . . . . . . 8
⊢ (𝐴 ∈ ℝ →
(cos‘((π / 2) + (𝐴
− (π / 2)))) = -(sin‘(𝐴 − (π / 2)))) | 
| 69 | 65, 68 | eqtr3d 2231 | 
. . . . . . 7
⊢ (𝐴 ∈ ℝ →
(cos‘𝐴) =
-(sin‘(𝐴 −
(π / 2)))) | 
| 70 | 69 | breq2d 4045 | 
. . . . . 6
⊢ (𝐴 ∈ ℝ → (0 <
(cos‘𝐴) ↔ 0 <
-(sin‘(𝐴 −
(π / 2))))) | 
| 71 | 64 | fveq2d 5562 | 
. . . . . . . 8
⊢ (𝐴 ∈ ℝ →
(sin‘((π / 2) + (𝐴
− (π / 2)))) = (sin‘𝐴)) | 
| 72 |   | sinhalfpip 15056 | 
. . . . . . . . 9
⊢ ((𝐴 − (π / 2)) ∈
ℂ → (sin‘((π / 2) + (𝐴 − (π / 2)))) = (cos‘(𝐴 − (π /
2)))) | 
| 73 | 66, 72 | syl 14 | 
. . . . . . . 8
⊢ (𝐴 ∈ ℝ →
(sin‘((π / 2) + (𝐴
− (π / 2)))) = (cos‘(𝐴 − (π / 2)))) | 
| 74 | 71, 73 | eqtr3d 2231 | 
. . . . . . 7
⊢ (𝐴 ∈ ℝ →
(sin‘𝐴) =
(cos‘(𝐴 − (π
/ 2)))) | 
| 75 | 74 | breq1d 4043 | 
. . . . . 6
⊢ (𝐴 ∈ ℝ →
((sin‘𝐴) < 0
↔ (cos‘(𝐴
− (π / 2))) < 0)) | 
| 76 | 70, 75 | anbi12d 473 | 
. . . . 5
⊢ (𝐴 ∈ ℝ → ((0 <
(cos‘𝐴) ∧
(sin‘𝐴) < 0)
↔ (0 < -(sin‘(𝐴 − (π / 2))) ∧
(cos‘(𝐴 − (π
/ 2))) < 0))) | 
| 77 | 61, 76 | sylibrd 169 | 
. . . 4
⊢ (𝐴 ∈ ℝ → (((3
· (π / 2)) < 𝐴
∧ 𝐴 < (2 ·
π)) → (0 < (cos‘𝐴) ∧ (sin‘𝐴) < 0))) | 
| 78 | 77 | 3impib 1203 | 
. . 3
⊢ ((𝐴 ∈ ℝ ∧ (3
· (π / 2)) < 𝐴
∧ 𝐴 < (2 ·
π)) → (0 < (cos‘𝐴) ∧ (sin‘𝐴) < 0)) | 
| 79 | 78 | ancomd 267 | 
. 2
⊢ ((𝐴 ∈ ℝ ∧ (3
· (π / 2)) < 𝐴
∧ 𝐴 < (2 ·
π)) → ((sin‘𝐴) < 0 ∧ 0 < (cos‘𝐴))) | 
| 80 | 10, 79 | sylbi 121 | 
1
⊢ (𝐴 ∈ ((3 · (π /
2))(,)(2 · π)) → ((sin‘𝐴) < 0 ∧ 0 < (cos‘𝐴))) |