Proof of Theorem sincosq3sgn
| Step | Hyp | Ref
| Expression |
| 1 | | pire 8672 |
. . 3
⊢ π ∈ ℝ |
| 2 | | 3re 5983 |
. . . 4
⊢ 3 ∈ ℝ |
| 3 | | 2re 5981 |
. . . . 5
⊢ 2 ∈ ℝ |
| 4 | | 2ne0 5992 |
. . . . 5
⊢ 2 ≠ 0 |
| 5 | 1, 3, 4 | redivcl 5800 |
. . . 4
⊢ (π / 2) ∈ ℝ |
| 6 | 2, 5 | remulcl 5347 |
. . 3
⊢ (3 · (π /
2)) ∈ ℝ |
| 7 | | elioo2t 6380 |
. . . 4
⊢ ((π ∈ ℝ*
⋀ (3 · (π / 2)) ∈ ℝ*)
→ (A ∈ (π(,)(3 · (π / 2)))
↔ (A ∈ ℝ ⋀ π < A ⋀ A < (3 · (π / 2))))) |
| 8 | | rexrt 5511 |
. . . 4
⊢ (π ∈ ℝ →
π ∈ ℝ*) |
| 9 | | rexrt 5511 |
. . . 4
⊢ ((3 · (π
/ 2)) ∈ ℝ
→ (3 · (π / 2)) ∈ ℝ*) |
| 10 | 7, 8, 9 | syl2an 456 |
. . 3
⊢ ((π ∈ ℝ ⋀ (3 · (π / 2)) ∈ ℝ) →
(A ∈
(π(,)(3 · (π / 2))) ↔ (A ∈ ℝ ⋀ π
< A ⋀
A < (3 · (π /
2))))) |
| 11 | 1, 6, 10 | mp2an 699 |
. 2
⊢ (A ∈
(π(,)(3 · (π / 2))) ↔ (A ∈ ℝ ⋀ π
< A ⋀
A < (3 · (π /
2)))) |
| 12 | | ltaddsubt 5643 |
. . . . . . . . 9
⊢ (((π / 2) ∈ ℝ ⋀ (π / 2) ∈ ℝ ⋀ A ∈ ℝ) →
(((π / 2) + (π / 2)) < A ↔ (π / 2) < (A − (π / 2)))) |
| 13 | 5, 5, 12 | mp3an12 908 |
. . . . . . . 8
⊢ (A ∈ ℝ → (((π / 2) + (π / 2))
< A ↔ (π / 2) <
(A − (π / 2)))) |
| 14 | 1 | recn 5326 |
. . . . . . . . . 10
⊢ π ∈ ℂ |
| 15 | | 2halvest 6041 |
. . . . . . . . . 10
⊢ (π ∈ ℂ →
((π / 2) + (π / 2)) = π) |
| 16 | 14, 15 | ax-mp 7 |
. . . . . . . . 9
⊢ ((π / 2) +
(π / 2)) = π |
| 17 | 16 | breq1i 2631 |
. . . . . . . 8
⊢ (((π / 2) +
(π / 2)) < A ↔
π < A) |
| 18 | 13, 17 | syl5bbr 536 |
. . . . . . 7
⊢ (A ∈ ℝ → (π < A ↔ (π / 2) < (A − (π / 2)))) |
| 19 | | ltsubaddt 5639 |
. . . . . . . . 9
⊢ ((A ∈ ℝ ⋀
(π / 2) ∈ ℝ ⋀ π
∈ ℝ)
→ ((A − (π / 2)) <
π ↔ A < (π +
(π / 2)))) |
| 20 | 5, 1, 19 | mp3an23 910 |
. . . . . . . 8
⊢ (A ∈ ℝ → ((A
− (π / 2)) < π ↔ A < (π + (π / 2)))) |
| 21 | | df-3 5973 |
. . . . . . . . . . 11
⊢ 3 = (2 + 1) |
| 22 | 21 | opreq1i 3977 |
. . . . . . . . . 10
⊢ (3 · (π /
2)) = ((2 + 1) · (π / 2)) |
| 23 | | 2cn 5982 |
. . . . . . . . . . 11
⊢ 2 ∈ ℂ |
| 24 | | ax1cn 5281 |
. . . . . . . . . . 11
⊢ 1 ∈ ℂ |
| 25 | 5 | recn 5326 |
. . . . . . . . . . 11
⊢ (π / 2) ∈ ℂ |
| 26 | 23, 24, 25 | adddir 5339 |
. . . . . . . . . 10
⊢ ((2 + 1) ·
(π / 2)) = ((2 · (π / 2)) + (1 · (π
/ 2))) |
| 27 | 14, 23, 4 | divcan2 5728 |
. . . . . . . . . . 11
⊢ (2 · (π /
2)) = π |
| 28 | 25 | mulid2 5345 |
. . . . . . . . . . 11
⊢ (1 · (π /
2)) = (π / 2) |
| 29 | 27, 28 | opreq12i 3979 |
. . . . . . . . . 10
⊢ ((2 · (π
/ 2)) + (1 · (π / 2))) = (π + (π /
2)) |
| 30 | 22, 26, 29 | 3eqtrr 1503 |
. . . . . . . . 9
⊢ (π +
(π / 2)) = (3 · (π / 2)) |
| 31 | 30 | breq2i 2632 |
. . . . . . . 8
⊢ (A < (π + (π / 2)) ↔
A < (3 · (π /
2))) |
| 32 | 20, 31 | syl6rbb 539 |
. . . . . . 7
⊢ (A ∈ ℝ → (A
< (3 · (π / 2)) ↔ (A − (π / 2)) <
π)) |
| 33 | 18, 32 | anbi12d 630 |
. . . . . 6
⊢ (A ∈ ℝ → ((π < A ⋀ A < (3 · (π / 2))) ↔
((π / 2) < (A −
(π / 2)) ⋀ (A − (π / 2)) <
π))) |
| 34 | | sincosq2sgn 8700 |
. . . . . . . . 9
⊢ ((A − (π / 2)) ∈ ((π / 2)(,)π) → (0 <
(sin ‘(A − (π / 2)))
⋀ (cos ‘(A − (π / 2))) < 0)) |
| 35 | | elioo2t 6380 |
. . . . . . . . . . 11
⊢ (((π / 2) ∈ ℝ*
⋀ π ∈ ℝ*)
→ ((A − (π / 2)) ∈ ((π / 2)(,)π) ↔
((A − (π / 2)) ∈ ℝ ⋀ (π / 2) < (A − (π / 2)) ⋀ (A −
(π / 2)) < π))) |
| 36 | | rexrt 5511 |
. . . . . . . . . . 11
⊢ ((π / 2) ∈ ℝ →
(π / 2) ∈ ℝ*) |
| 37 | 35, 36, 8 | syl2an 456 |
. . . . . . . . . 10
⊢ (((π / 2) ∈ ℝ ⋀ π ∈
ℝ) → ((A − (π / 2)) ∈ ((π / 2)(,)π) ↔
((A − (π / 2)) ∈ ℝ ⋀ (π / 2) < (A − (π / 2)) ⋀ (A −
(π / 2)) < π))) |
| 38 | 5, 1, 37 | mp2an 699 |
. . . . . . . . 9
⊢ ((A − (π / 2)) ∈ ((π / 2)(,)π) ↔
((A − (π / 2)) ∈ ℝ ⋀ (π / 2) < (A − (π / 2)) ⋀ (A −
(π / 2)) < π)) |
| 39 | | ancom 437 |
. . . . . . . . 9
⊢ ((0 < (sin
‘(A − (π / 2))) ⋀ (cos ‘(A − (π / 2))) < 0) ↔ ((cos
‘(A − (π / 2))) <
0 ⋀ 0 < (sin ‘(A − (π / 2))))) |
| 40 | 34, 38, 39 | 3imtr3 218 |
. . . . . . . 8
⊢ (((A − (π / 2)) ∈ ℝ ⋀ (π / 2) < (A − (π / 2)) ⋀ (A −
(π / 2)) < π) → ((cos ‘(A − (π / 2))) < 0 ⋀ 0 < (sin ‘(A − (π / 2))))) |
| 41 | | resubclt 5450 |
. . . . . . . . 9
⊢ ((A ∈ ℝ ⋀
(π / 2) ∈ ℝ) → (A
− (π / 2)) ∈ ℝ) |
| 42 | 5, 41 | mpan2 698 |
. . . . . . . 8
⊢ (A ∈ ℝ → (A
− (π / 2)) ∈ ℝ) |
| 43 | 40, 42 | syl3an1 861 |
. . . . . . 7
⊢ ((A ∈ ℝ ⋀
(π / 2) < (A −
(π / 2)) ⋀ (A − (π / 2)) < π)
→ ((cos ‘(A − (π
/ 2))) < 0 ⋀ 0 < (sin ‘(A − (π / 2))))) |
| 44 | 43 | 3expib 838 |
. . . . . 6
⊢ (A ∈ ℝ → (((π / 2) < (A − (π / 2)) ⋀ (A −
(π / 2)) < π) → ((cos ‘(A − (π / 2))) < 0 ⋀ 0 < (sin ‘(A − (π / 2)))))) |
| 45 | 33, 44 | sylbid 203 |
. . . . 5
⊢ (A ∈ ℝ → ((π < A ⋀ A < (3 · (π / 2))) → ((cos
‘(A − (π / 2))) <
0 ⋀ 0 < (sin ‘(A − (π / 2)))))) |
| 46 | | resinclt 7438 |
. . . . . . 7
⊢ ((A − (π / 2)) ∈ ℝ → (sin
‘(A − (π / 2))) ∈ ℝ) |
| 47 | | lt0neg2t 5681 |
. . . . . . 7
⊢ ((sin ‘(A − (π / 2))) ∈ ℝ → (0
< (sin ‘(A − (π /
2))) ↔ -(sin ‘(A −
(π / 2))) < 0)) |
| 48 | 42, 46, 47 | 3syl 20 |
. . . . . 6
⊢ (A ∈ ℝ → (0 < (sin ‘(A − (π / 2))) ↔ -(sin
‘(A − (π / 2))) <
0)) |
| 49 | 48 | anbi2d 618 |
. . . . 5
⊢ (A ∈ ℝ → (((cos ‘(A − (π / 2))) < 0 ⋀ 0 < (sin ‘(A − (π / 2)))) ↔ ((cos
‘(A − (π / 2))) <
0 ⋀ -(sin ‘(A − (π / 2))) < 0))) |
| 50 | 45, 49 | sylibd 202 |
. . . 4
⊢ (A ∈ ℝ → ((π < A ⋀ A < (3 · (π / 2))) → ((cos
‘(A − (π / 2))) <
0 ⋀ -(sin ‘(A − (π / 2))) < 0))) |
| 51 | | recnt 5325 |
. . . . . . . . 9
⊢ (A ∈ ℝ → A
∈ ℂ) |
| 52 | | pncan3t 5389 |
. . . . . . . . . 10
⊢ (((π / 2) ∈ ℂ ⋀ A ∈ ℂ) →
((π / 2) + (A −
(π / 2))) = A) |
| 53 | 25, 52 | mpan 697 |
. . . . . . . . 9
⊢ (A ∈ ℂ → ((π / 2) + (A − (π / 2))) = A) |
| 54 | 51, 53 | syl 10 |
. . . . . . . 8
⊢ (A ∈ ℝ → ((π / 2) + (A − (π / 2))) = A) |
| 55 | 54 | fveq2d 3734 |
. . . . . . 7
⊢ (A ∈ ℝ → (sin ‘((π / 2) +
(A − (π / 2)))) = (sin
‘A)) |
| 56 | 42 | recnd 5327 |
. . . . . . . 8
⊢ (A ∈ ℝ → (A
− (π / 2)) ∈ ℂ) |
| 57 | | sinhalfpip 8694 |
. . . . . . . 8
⊢ ((A − (π / 2)) ∈ ℂ → (sin
‘((π / 2) + (A −
(π / 2)))) = (cos ‘(A
− (π / 2)))) |
| 58 | 56, 57 | syl 10 |
. . . . . . 7
⊢ (A ∈ ℝ → (sin ‘((π / 2) +
(A − (π / 2)))) = (cos
‘(A − (π /
2)))) |
| 59 | 55, 58 | eqtr3d 1512 |
. . . . . 6
⊢ (A ∈ ℝ → (sin ‘A) = (cos ‘(A − (π / 2)))) |
| 60 | 59 | breq1d 2634 |
. . . . 5
⊢ (A ∈ ℝ → ((sin ‘A) < 0 ↔ (cos ‘(A − (π / 2))) < 0)) |
| 61 | 54 | fveq2d 3734 |
. . . . . . 7
⊢ (A ∈ ℝ → (cos ‘((π / 2) +
(A − (π / 2)))) = (cos
‘A)) |
| 62 | | coshalfpip 8696 |
. . . . . . . 8
⊢ ((A − (π / 2)) ∈ ℂ → (cos
‘((π / 2) + (A −
(π / 2)))) = -(sin ‘(A
− (π / 2)))) |
| 63 | 56, 62 | syl 10 |
. . . . . . 7
⊢ (A ∈ ℝ → (cos ‘((π / 2) +
(A − (π / 2)))) = -(sin
‘(A − (π /
2)))) |
| 64 | 61, 63 | eqtr3d 1512 |
. . . . . 6
⊢ (A ∈ ℝ → (cos ‘A) = -(sin ‘(A − (π / 2)))) |
| 65 | 64 | breq1d 2634 |
. . . . 5
⊢ (A ∈ ℝ → ((cos ‘A) < 0 ↔ -(sin ‘(A − (π / 2))) < 0)) |
| 66 | 60, 65 | anbi12d 630 |
. . . 4
⊢ (A ∈ ℝ → (((sin ‘A) < 0 ⋀ (cos
‘A) < 0) ↔ ((cos
‘(A − (π / 2))) <
0 ⋀ -(sin ‘(A − (π / 2))) < 0))) |
| 67 | 50, 66 | sylibrd 204 |
. . 3
⊢ (A ∈ ℝ → ((π < A ⋀ A < (3 · (π / 2))) → ((sin
‘A) < 0 ⋀ (cos ‘A) < 0))) |
| 68 | 67 | 3impib 833 |
. 2
⊢ ((A ∈ ℝ ⋀ π
< A ⋀
A < (3 · (π / 2)))
→ ((sin ‘A) < 0 ⋀ (cos ‘A) < 0)) |
| 69 | 11, 68 | sylbi 199 |
1
⊢ (A ∈
(π(,)(3 · (π / 2))) → ((sin ‘A) < 0 ⋀ (cos
‘A) < 0)) |