Proof of Theorem sincosq3sgn
| Step | Hyp | Ref
 | Expression | 
| 1 |   | pire 15022 | 
. . 3
⊢ π
∈ ℝ | 
| 2 |   | 3re 9064 | 
. . . 4
⊢ 3 ∈
ℝ | 
| 3 |   | halfpire 15028 | 
. . . 4
⊢ (π /
2) ∈ ℝ | 
| 4 | 2, 3 | remulcli 8040 | 
. . 3
⊢ (3
· (π / 2)) ∈ ℝ | 
| 5 |   | rexr 8072 | 
. . . 4
⊢ (π
∈ ℝ → π ∈ ℝ*) | 
| 6 |   | rexr 8072 | 
. . . 4
⊢ ((3
· (π / 2)) ∈ ℝ → (3 · (π / 2)) ∈
ℝ*) | 
| 7 |   | elioo2 9996 | 
. . . 4
⊢ ((π
∈ ℝ* ∧ (3 · (π / 2)) ∈
ℝ*) → (𝐴 ∈ (π(,)(3 · (π / 2)))
↔ (𝐴 ∈ ℝ
∧ π < 𝐴 ∧
𝐴 < (3 · (π /
2))))) | 
| 8 | 5, 6, 7 | syl2an 289 | 
. . 3
⊢ ((π
∈ ℝ ∧ (3 · (π / 2)) ∈ ℝ) → (𝐴 ∈ (π(,)(3 ·
(π / 2))) ↔ (𝐴
∈ ℝ ∧ π < 𝐴 ∧ 𝐴 < (3 · (π /
2))))) | 
| 9 | 1, 4, 8 | mp2an 426 | 
. 2
⊢ (𝐴 ∈ (π(,)(3 ·
(π / 2))) ↔ (𝐴
∈ ℝ ∧ π < 𝐴 ∧ 𝐴 < (3 · (π /
2)))) | 
| 10 |   | pidiv2halves 15031 | 
. . . . . . . . 9
⊢ ((π /
2) + (π / 2)) = π | 
| 11 | 10 | breq1i 4040 | 
. . . . . . . 8
⊢ (((π /
2) + (π / 2)) < 𝐴
↔ π < 𝐴) | 
| 12 |   | ltaddsub 8463 | 
. . . . . . . . 9
⊢ (((π /
2) ∈ ℝ ∧ (π / 2) ∈ ℝ ∧ 𝐴 ∈ ℝ) → (((π / 2) + (π
/ 2)) < 𝐴 ↔ (π /
2) < (𝐴 − (π /
2)))) | 
| 13 | 3, 3, 12 | mp3an12 1338 | 
. . . . . . . 8
⊢ (𝐴 ∈ ℝ → (((π /
2) + (π / 2)) < 𝐴
↔ (π / 2) < (𝐴
− (π / 2)))) | 
| 14 | 11, 13 | bitr3id 194 | 
. . . . . . 7
⊢ (𝐴 ∈ ℝ → (π
< 𝐴 ↔ (π / 2)
< (𝐴 − (π /
2)))) | 
| 15 |   | ltsubadd 8459 | 
. . . . . . . . 9
⊢ ((𝐴 ∈ ℝ ∧ (π / 2)
∈ ℝ ∧ π ∈ ℝ) → ((𝐴 − (π / 2)) < π ↔ 𝐴 < (π + (π /
2)))) | 
| 16 | 3, 1, 15 | mp3an23 1340 | 
. . . . . . . 8
⊢ (𝐴 ∈ ℝ → ((𝐴 − (π / 2)) < π
↔ 𝐴 < (π + (π
/ 2)))) | 
| 17 |   | df-3 9050 | 
. . . . . . . . . . 11
⊢ 3 = (2 +
1) | 
| 18 | 17 | oveq1i 5932 | 
. . . . . . . . . 10
⊢ (3
· (π / 2)) = ((2 + 1) · (π / 2)) | 
| 19 |   | 2cn 9061 | 
. . . . . . . . . . 11
⊢ 2 ∈
ℂ | 
| 20 |   | ax-1cn 7972 | 
. . . . . . . . . . 11
⊢ 1 ∈
ℂ | 
| 21 | 3 | recni 8038 | 
. . . . . . . . . . 11
⊢ (π /
2) ∈ ℂ | 
| 22 | 19, 20, 21 | adddiri 8037 | 
. . . . . . . . . 10
⊢ ((2 + 1)
· (π / 2)) = ((2 · (π / 2)) + (1 · (π /
2))) | 
| 23 | 1 | recni 8038 | 
. . . . . . . . . . . 12
⊢ π
∈ ℂ | 
| 24 |   | 2ap0 9083 | 
. . . . . . . . . . . 12
⊢ 2 #
0 | 
| 25 | 23, 19, 24 | divcanap2i 8782 | 
. . . . . . . . . . 11
⊢ (2
· (π / 2)) = π | 
| 26 | 21 | mullidi 8029 | 
. . . . . . . . . . 11
⊢ (1
· (π / 2)) = (π / 2) | 
| 27 | 25, 26 | oveq12i 5934 | 
. . . . . . . . . 10
⊢ ((2
· (π / 2)) + (1 · (π / 2))) = (π + (π /
2)) | 
| 28 | 18, 22, 27 | 3eqtrri 2222 | 
. . . . . . . . 9
⊢ (π +
(π / 2)) = (3 · (π / 2)) | 
| 29 | 28 | breq2i 4041 | 
. . . . . . . 8
⊢ (𝐴 < (π + (π / 2)) ↔
𝐴 < (3 · (π /
2))) | 
| 30 | 16, 29 | bitr2di 197 | 
. . . . . . 7
⊢ (𝐴 ∈ ℝ → (𝐴 < (3 · (π / 2))
↔ (𝐴 − (π /
2)) < π)) | 
| 31 | 14, 30 | anbi12d 473 | 
. . . . . 6
⊢ (𝐴 ∈ ℝ → ((π
< 𝐴 ∧ 𝐴 < (3 · (π / 2)))
↔ ((π / 2) < (𝐴
− (π / 2)) ∧ (𝐴 − (π / 2)) <
π))) | 
| 32 |   | resubcl 8290 | 
. . . . . . . . 9
⊢ ((𝐴 ∈ ℝ ∧ (π / 2)
∈ ℝ) → (𝐴
− (π / 2)) ∈ ℝ) | 
| 33 | 3, 32 | mpan2 425 | 
. . . . . . . 8
⊢ (𝐴 ∈ ℝ → (𝐴 − (π / 2)) ∈
ℝ) | 
| 34 |   | sincosq2sgn 15063 | 
. . . . . . . . 9
⊢ ((𝐴 − (π / 2)) ∈
((π / 2)(,)π) → (0 < (sin‘(𝐴 − (π / 2))) ∧
(cos‘(𝐴 − (π
/ 2))) < 0)) | 
| 35 |   | rexr 8072 | 
. . . . . . . . . . 11
⊢ ((π /
2) ∈ ℝ → (π / 2) ∈
ℝ*) | 
| 36 |   | elioo2 9996 | 
. . . . . . . . . . 11
⊢ (((π /
2) ∈ ℝ* ∧ π ∈ ℝ*) →
((𝐴 − (π / 2))
∈ ((π / 2)(,)π) ↔ ((𝐴 − (π / 2)) ∈ ℝ ∧
(π / 2) < (𝐴 −
(π / 2)) ∧ (𝐴
− (π / 2)) < π))) | 
| 37 | 35, 5, 36 | syl2an 289 | 
. . . . . . . . . 10
⊢ (((π /
2) ∈ ℝ ∧ π ∈ ℝ) → ((𝐴 − (π / 2)) ∈ ((π /
2)(,)π) ↔ ((𝐴
− (π / 2)) ∈ ℝ ∧ (π / 2) < (𝐴 − (π / 2)) ∧ (𝐴 − (π / 2)) <
π))) | 
| 38 | 3, 1, 37 | mp2an 426 | 
. . . . . . . . 9
⊢ ((𝐴 − (π / 2)) ∈
((π / 2)(,)π) ↔ ((𝐴 − (π / 2)) ∈ ℝ ∧
(π / 2) < (𝐴 −
(π / 2)) ∧ (𝐴
− (π / 2)) < π)) | 
| 39 |   | ancom 266 | 
. . . . . . . . 9
⊢ ((0 <
(sin‘(𝐴 − (π
/ 2))) ∧ (cos‘(𝐴
− (π / 2))) < 0) ↔ ((cos‘(𝐴 − (π / 2))) < 0 ∧ 0 <
(sin‘(𝐴 − (π
/ 2))))) | 
| 40 | 34, 38, 39 | 3imtr3i 200 | 
. . . . . . . 8
⊢ (((𝐴 − (π / 2)) ∈
ℝ ∧ (π / 2) < (𝐴 − (π / 2)) ∧ (𝐴 − (π / 2)) < π)
→ ((cos‘(𝐴
− (π / 2))) < 0 ∧ 0 < (sin‘(𝐴 − (π / 2))))) | 
| 41 | 33, 40 | syl3an1 1282 | 
. . . . . . 7
⊢ ((𝐴 ∈ ℝ ∧ (π / 2)
< (𝐴 − (π / 2))
∧ (𝐴 − (π /
2)) < π) → ((cos‘(𝐴 − (π / 2))) < 0 ∧ 0 <
(sin‘(𝐴 − (π
/ 2))))) | 
| 42 | 41 | 3expib 1208 | 
. . . . . 6
⊢ (𝐴 ∈ ℝ → (((π /
2) < (𝐴 − (π /
2)) ∧ (𝐴 − (π
/ 2)) < π) → ((cos‘(𝐴 − (π / 2))) < 0 ∧ 0 <
(sin‘(𝐴 − (π
/ 2)))))) | 
| 43 | 31, 42 | sylbid 150 | 
. . . . 5
⊢ (𝐴 ∈ ℝ → ((π
< 𝐴 ∧ 𝐴 < (3 · (π / 2)))
→ ((cos‘(𝐴
− (π / 2))) < 0 ∧ 0 < (sin‘(𝐴 − (π / 2)))))) | 
| 44 | 33 | resincld 11888 | 
. . . . . . 7
⊢ (𝐴 ∈ ℝ →
(sin‘(𝐴 − (π
/ 2))) ∈ ℝ) | 
| 45 | 44 | lt0neg2d 8543 | 
. . . . . 6
⊢ (𝐴 ∈ ℝ → (0 <
(sin‘(𝐴 − (π
/ 2))) ↔ -(sin‘(𝐴 − (π / 2))) <
0)) | 
| 46 | 45 | anbi2d 464 | 
. . . . 5
⊢ (𝐴 ∈ ℝ →
(((cos‘(𝐴 −
(π / 2))) < 0 ∧ 0 < (sin‘(𝐴 − (π / 2)))) ↔
((cos‘(𝐴 −
(π / 2))) < 0 ∧ -(sin‘(𝐴 − (π / 2))) <
0))) | 
| 47 | 43, 46 | sylibd 149 | 
. . . 4
⊢ (𝐴 ∈ ℝ → ((π
< 𝐴 ∧ 𝐴 < (3 · (π / 2)))
→ ((cos‘(𝐴
− (π / 2))) < 0 ∧ -(sin‘(𝐴 − (π / 2))) <
0))) | 
| 48 |   | recn 8012 | 
. . . . . . . . 9
⊢ (𝐴 ∈ ℝ → 𝐴 ∈
ℂ) | 
| 49 |   | pncan3 8234 | 
. . . . . . . . 9
⊢ (((π /
2) ∈ ℂ ∧ 𝐴
∈ ℂ) → ((π / 2) + (𝐴 − (π / 2))) = 𝐴) | 
| 50 | 21, 48, 49 | sylancr 414 | 
. . . . . . . 8
⊢ (𝐴 ∈ ℝ → ((π /
2) + (𝐴 − (π /
2))) = 𝐴) | 
| 51 | 50 | fveq2d 5562 | 
. . . . . . 7
⊢ (𝐴 ∈ ℝ →
(sin‘((π / 2) + (𝐴
− (π / 2)))) = (sin‘𝐴)) | 
| 52 | 33 | recnd 8055 | 
. . . . . . . 8
⊢ (𝐴 ∈ ℝ → (𝐴 − (π / 2)) ∈
ℂ) | 
| 53 |   | sinhalfpip 15056 | 
. . . . . . . 8
⊢ ((𝐴 − (π / 2)) ∈
ℂ → (sin‘((π / 2) + (𝐴 − (π / 2)))) = (cos‘(𝐴 − (π /
2)))) | 
| 54 | 52, 53 | syl 14 | 
. . . . . . 7
⊢ (𝐴 ∈ ℝ →
(sin‘((π / 2) + (𝐴
− (π / 2)))) = (cos‘(𝐴 − (π / 2)))) | 
| 55 | 51, 54 | eqtr3d 2231 | 
. . . . . 6
⊢ (𝐴 ∈ ℝ →
(sin‘𝐴) =
(cos‘(𝐴 − (π
/ 2)))) | 
| 56 | 55 | breq1d 4043 | 
. . . . 5
⊢ (𝐴 ∈ ℝ →
((sin‘𝐴) < 0
↔ (cos‘(𝐴
− (π / 2))) < 0)) | 
| 57 | 50 | fveq2d 5562 | 
. . . . . . 7
⊢ (𝐴 ∈ ℝ →
(cos‘((π / 2) + (𝐴
− (π / 2)))) = (cos‘𝐴)) | 
| 58 |   | coshalfpip 15058 | 
. . . . . . . 8
⊢ ((𝐴 − (π / 2)) ∈
ℂ → (cos‘((π / 2) + (𝐴 − (π / 2)))) = -(sin‘(𝐴 − (π /
2)))) | 
| 59 | 52, 58 | syl 14 | 
. . . . . . 7
⊢ (𝐴 ∈ ℝ →
(cos‘((π / 2) + (𝐴
− (π / 2)))) = -(sin‘(𝐴 − (π / 2)))) | 
| 60 | 57, 59 | eqtr3d 2231 | 
. . . . . 6
⊢ (𝐴 ∈ ℝ →
(cos‘𝐴) =
-(sin‘(𝐴 −
(π / 2)))) | 
| 61 | 60 | breq1d 4043 | 
. . . . 5
⊢ (𝐴 ∈ ℝ →
((cos‘𝐴) < 0
↔ -(sin‘(𝐴
− (π / 2))) < 0)) | 
| 62 | 56, 61 | anbi12d 473 | 
. . . 4
⊢ (𝐴 ∈ ℝ →
(((sin‘𝐴) < 0
∧ (cos‘𝐴) < 0)
↔ ((cos‘(𝐴
− (π / 2))) < 0 ∧ -(sin‘(𝐴 − (π / 2))) <
0))) | 
| 63 | 47, 62 | sylibrd 169 | 
. . 3
⊢ (𝐴 ∈ ℝ → ((π
< 𝐴 ∧ 𝐴 < (3 · (π / 2)))
→ ((sin‘𝐴) <
0 ∧ (cos‘𝐴) <
0))) | 
| 64 | 63 | 3impib 1203 | 
. 2
⊢ ((𝐴 ∈ ℝ ∧ π <
𝐴 ∧ 𝐴 < (3 · (π / 2))) →
((sin‘𝐴) < 0 ∧
(cos‘𝐴) <
0)) | 
| 65 | 9, 64 | sylbi 121 | 
1
⊢ (𝐴 ∈ (π(,)(3 ·
(π / 2))) → ((sin‘𝐴) < 0 ∧ (cos‘𝐴) < 0)) |