Proof of Theorem sincosq4sgn
| Step | Hyp | Ref
| Expression |
| 1 | | 3re 5983 |
. . . 4
⊢ 3 ∈ ℝ |
| 2 | | pire 8672 |
. . . . 5
⊢ π ∈ ℝ |
| 3 | | 2re 5981 |
. . . . 5
⊢ 2 ∈ ℝ |
| 4 | | 2ne0 5992 |
. . . . 5
⊢ 2 ≠ 0 |
| 5 | 2, 3, 4 | redivcl 5800 |
. . . 4
⊢ (π / 2) ∈ ℝ |
| 6 | 1, 5 | remulcl 5347 |
. . 3
⊢ (3 · (π /
2)) ∈ ℝ |
| 7 | 3, 2 | remulcl 5347 |
. . 3
⊢ (2 · π)
∈ ℝ |
| 8 | | elioo2t 6380 |
. . . 4
⊢ (((3 · (π
/ 2)) ∈ ℝ* ⋀
(2 · π) ∈ ℝ*) → (A ∈ ((3 ·
(π / 2))(,)(2 · π)) ↔ (A ∈ ℝ ⋀ (3 ·
(π / 2)) < A ⋀ A < (2
· π)))) |
| 9 | | rexrt 5511 |
. . . 4
⊢ ((3 · (π
/ 2)) ∈ ℝ
→ (3 · (π / 2)) ∈ ℝ*) |
| 10 | | rexrt 5511 |
. . . 4
⊢ ((2 · π)
∈ ℝ →
(2 · π) ∈ ℝ*) |
| 11 | 8, 9, 10 | syl2an 456 |
. . 3
⊢ (((3 · (π
/ 2)) ∈ ℝ
⋀ (2 · π) ∈ ℝ) →
(A ∈ ((3
· (π / 2))(,)(2 · π)) ↔ (A ∈ ℝ ⋀ (3 ·
(π / 2)) < A ⋀ A < (2
· π)))) |
| 12 | 6, 7, 11 | mp2an 699 |
. 2
⊢ (A ∈ ((3 ·
(π / 2))(,)(2 · π)) ↔ (A ∈ ℝ ⋀ (3 ·
(π / 2)) < A ⋀ A < (2
· π))) |
| 13 | | ltaddsubt 5643 |
. . . . . . . . . 10
⊢ ((π ∈ ℝ ⋀ (π / 2) ∈ ℝ ⋀ A ∈ ℝ) →
((π + (π / 2)) < A
↔ π < (A −
(π / 2)))) |
| 14 | 2, 5, 13 | mp3an12 908 |
. . . . . . . . 9
⊢ (A ∈ ℝ → ((π + (π / 2)) <
A ↔ π < (A − (π / 2)))) |
| 15 | | df-3 5973 |
. . . . . . . . . . . 12
⊢ 3 = (2 + 1) |
| 16 | 15 | opreq1i 3977 |
. . . . . . . . . . 11
⊢ (3 · (π /
2)) = ((2 + 1) · (π / 2)) |
| 17 | | 2cn 5982 |
. . . . . . . . . . . 12
⊢ 2 ∈ ℂ |
| 18 | | ax1cn 5281 |
. . . . . . . . . . . 12
⊢ 1 ∈ ℂ |
| 19 | 5 | recn 5326 |
. . . . . . . . . . . 12
⊢ (π / 2) ∈ ℂ |
| 20 | 17, 18, 19 | adddir 5339 |
. . . . . . . . . . 11
⊢ ((2 + 1) ·
(π / 2)) = ((2 · (π / 2)) + (1 · (π
/ 2))) |
| 21 | 2 | recn 5326 |
. . . . . . . . . . . . 13
⊢ π ∈ ℂ |
| 22 | 21, 17, 4 | divcan2 5728 |
. . . . . . . . . . . 12
⊢ (2 · (π /
2)) = π |
| 23 | 19 | mulid2 5345 |
. . . . . . . . . . . 12
⊢ (1 · (π /
2)) = (π / 2) |
| 24 | 22, 23 | opreq12i 3979 |
. . . . . . . . . . 11
⊢ ((2 · (π
/ 2)) + (1 · (π / 2))) = (π + (π /
2)) |
| 25 | 16, 20, 24 | 3eqtrr 1503 |
. . . . . . . . . 10
⊢ (π +
(π / 2)) = (3 · (π / 2)) |
| 26 | 25 | breq1i 2631 |
. . . . . . . . 9
⊢ ((π +
(π / 2)) < A ↔ (3
· (π / 2)) < A) |
| 27 | 14, 26 | syl5bbr 536 |
. . . . . . . 8
⊢ (A ∈ ℝ → ((3 · (π / 2)) <
A ↔ π < (A − (π / 2)))) |
| 28 | | ltsubaddt 5639 |
. . . . . . . . . 10
⊢ ((A ∈ ℝ ⋀
(π / 2) ∈ ℝ ⋀ (3 ·
(π / 2)) ∈ ℝ) → ((A
− (π / 2)) < (3 · (π / 2)) ↔ A < ((3 · (π / 2)) +
(π / 2)))) |
| 29 | 5, 6, 28 | mp3an23 910 |
. . . . . . . . 9
⊢ (A ∈ ℝ → ((A
− (π / 2)) < (3 · (π / 2)) ↔ A < ((3 · (π / 2)) +
(π / 2)))) |
| 30 | | df-4 5974 |
. . . . . . . . . . . . 13
⊢ 4 = (3 + 1) |
| 31 | 30 | opreq1i 3977 |
. . . . . . . . . . . 12
⊢ (4 · (π /
2)) = ((3 + 1) · (π / 2)) |
| 32 | 1 | recn 5326 |
. . . . . . . . . . . . 13
⊢ 3 ∈ ℂ |
| 33 | 32, 18, 19 | adddir 5339 |
. . . . . . . . . . . 12
⊢ ((3 + 1) ·
(π / 2)) = ((3 · (π / 2)) + (1 · (π
/ 2))) |
| 34 | 23 | opreq2i 3978 |
. . . . . . . . . . . 12
⊢ ((3 · (π
/ 2)) + (1 · (π / 2))) = ((3 · (π / 2)) +
(π / 2)) |
| 35 | 31, 33, 34 | 3eqtrr 1503 |
. . . . . . . . . . 11
⊢ ((3 · (π
/ 2)) + (π / 2)) = (4 · (π / 2)) |
| 36 | | 4re 5984 |
. . . . . . . . . . . . . 14
⊢ 4 ∈ ℝ |
| 37 | 36 | recn 5326 |
. . . . . . . . . . . . 13
⊢ 4 ∈ ℂ |
| 38 | | div12t 5751 |
. . . . . . . . . . . . . 14
⊢ (((4 ∈ ℂ ⋀ π ∈
ℂ ⋀ 2
∈ ℂ) ⋀ 2 ≠ 0) → (4 · (π / 2))
= (π · (4 / 2))) |
| 39 | 4, 38 | mpan2 698 |
. . . . . . . . . . . . 13
⊢ ((4 ∈ ℂ ⋀ π ∈
ℂ ⋀ 2
∈ ℂ)
→ (4 · (π / 2)) = (π · (4 /
2))) |
| 40 | 37, 21, 17, 39 | mp3an 918 |
. . . . . . . . . . . 12
⊢ (4 · (π /
2)) = (π · (4 / 2)) |
| 41 | | 4d2e2 6029 |
. . . . . . . . . . . . 13
⊢ (4 / 2) = 2 |
| 42 | 41 | opreq2i 3978 |
. . . . . . . . . . . 12
⊢ (π · (4 /
2)) = (π · 2) |
| 43 | 21, 17 | mulcom 5335 |
. . . . . . . . . . . 12
⊢ (π · 2) =
(2 · π) |
| 44 | 40, 42, 43 | 3eqtr 1502 |
. . . . . . . . . . 11
⊢ (4 · (π /
2)) = (2 · π) |
| 45 | 35, 44 | eqtr 1498 |
. . . . . . . . . 10
⊢ ((3 · (π
/ 2)) + (π / 2)) = (2 · π) |
| 46 | 45 | breq2i 2632 |
. . . . . . . . 9
⊢ (A < ((3 · (π / 2)) +
(π / 2)) ↔ A < (2
· π)) |
| 47 | 29, 46 | syl6rbb 539 |
. . . . . . . 8
⊢ (A ∈ ℝ → (A
< (2 · π) ↔ (A
− (π / 2)) < (3 · (π / 2)))) |
| 48 | 27, 47 | anbi12d 630 |
. . . . . . 7
⊢ (A ∈ ℝ → (((3 · (π / 2)) <
A ⋀
A < (2 · π)) ↔
(π < (A − (π /
2)) ⋀ (A
− (π / 2)) < (3 · (π / 2))))) |
| 49 | | elioo2t 6380 |
. . . . . . . . . . . 12
⊢ ((π ∈ ℝ*
⋀ (3 · (π / 2)) ∈ ℝ*)
→ ((A − (π / 2)) ∈ (π(,)(3 · (π / 2)))
↔ ((A − (π / 2)) ∈ ℝ ⋀ π < (A − (π / 2)) ⋀ (A −
(π / 2)) < (3 · (π / 2))))) |
| 50 | | rexrt 5511 |
. . . . . . . . . . . 12
⊢ (π ∈ ℝ →
π ∈ ℝ*) |
| 51 | 49, 50, 9 | syl2an 456 |
. . . . . . . . . . 11
⊢ ((π ∈ ℝ ⋀ (3 · (π / 2)) ∈ ℝ) →
((A − (π / 2)) ∈ (π(,)(3 · (π / 2)))
↔ ((A − (π / 2)) ∈ ℝ ⋀ π < (A − (π / 2)) ⋀ (A −
(π / 2)) < (3 · (π / 2))))) |
| 52 | 2, 6, 51 | mp2an 699 |
. . . . . . . . . 10
⊢ ((A − (π / 2)) ∈ (π(,)(3 · (π / 2)))
↔ ((A − (π / 2)) ∈ ℝ ⋀ π < (A − (π / 2)) ⋀ (A −
(π / 2)) < (3 · (π / 2)))) |
| 53 | | sincosq3sgn 8701 |
. . . . . . . . . 10
⊢ ((A − (π / 2)) ∈ (π(,)(3 · (π / 2)))
→ ((sin ‘(A − (π
/ 2))) < 0 ⋀ (cos ‘(A − (π / 2))) < 0)) |
| 54 | 52, 53 | sylbir 201 |
. . . . . . . . 9
⊢ (((A − (π / 2)) ∈ ℝ ⋀ π < (A − (π / 2)) ⋀ (A −
(π / 2)) < (3 · (π / 2))) → ((sin
‘(A − (π / 2))) <
0 ⋀ (cos ‘(A − (π / 2))) < 0)) |
| 55 | | resubclt 5450 |
. . . . . . . . . 10
⊢ ((A ∈ ℝ ⋀
(π / 2) ∈ ℝ) → (A
− (π / 2)) ∈ ℝ) |
| 56 | 5, 55 | mpan2 698 |
. . . . . . . . 9
⊢ (A ∈ ℝ → (A
− (π / 2)) ∈ ℝ) |
| 57 | 54, 56 | syl3an1 861 |
. . . . . . . 8
⊢ ((A ∈ ℝ ⋀ π
< (A − (π / 2)) ⋀ (A −
(π / 2)) < (3 · (π / 2))) → ((sin
‘(A − (π / 2))) <
0 ⋀ (cos ‘(A − (π / 2))) < 0)) |
| 58 | 57 | 3expib 838 |
. . . . . . 7
⊢ (A ∈ ℝ → ((π < (A − (π / 2)) ⋀ (A −
(π / 2)) < (3 · (π / 2))) → ((sin
‘(A − (π / 2))) <
0 ⋀ (cos ‘(A − (π / 2))) < 0))) |
| 59 | 48, 58 | sylbid 203 |
. . . . . 6
⊢ (A ∈ ℝ → (((3 · (π / 2)) <
A ⋀
A < (2 · π)) →
((sin ‘(A − (π / 2)))
< 0 ⋀ (cos ‘(A − (π / 2))) < 0))) |
| 60 | | resinclt 7438 |
. . . . . . . 8
⊢ ((A − (π / 2)) ∈ ℝ → (sin
‘(A − (π / 2))) ∈ ℝ) |
| 61 | | lt0neg1t 5680 |
. . . . . . . 8
⊢ ((sin ‘(A − (π / 2))) ∈ ℝ → ((sin
‘(A − (π / 2))) <
0 ↔ 0 < -(sin ‘(A −
(π / 2))))) |
| 62 | 56, 60, 61 | 3syl 20 |
. . . . . . 7
⊢ (A ∈ ℝ → ((sin ‘(A − (π / 2))) < 0 ↔ 0 <
-(sin ‘(A − (π /
2))))) |
| 63 | 62 | anbi1d 619 |
. . . . . 6
⊢ (A ∈ ℝ → (((sin ‘(A − (π / 2))) < 0 ⋀ (cos ‘(A − (π / 2))) < 0) ↔ (0 <
-(sin ‘(A − (π / 2)))
⋀ (cos ‘(A − (π / 2))) < 0))) |
| 64 | 59, 63 | sylibd 202 |
. . . . 5
⊢ (A ∈ ℝ → (((3 · (π / 2)) <
A ⋀
A < (2 · π)) → (0
< -(sin ‘(A − (π /
2))) ⋀ (cos ‘(A − (π / 2))) < 0))) |
| 65 | | recnt 5325 |
. . . . . . . . . 10
⊢ (A ∈ ℝ → A
∈ ℂ) |
| 66 | | pncan3t 5389 |
. . . . . . . . . . 11
⊢ (((π / 2) ∈ ℂ ⋀ A ∈ ℂ) →
((π / 2) + (A −
(π / 2))) = A) |
| 67 | 19, 66 | mpan 697 |
. . . . . . . . . 10
⊢ (A ∈ ℂ → ((π / 2) + (A − (π / 2))) = A) |
| 68 | 65, 67 | syl 10 |
. . . . . . . . 9
⊢ (A ∈ ℝ → ((π / 2) + (A − (π / 2))) = A) |
| 69 | 68 | fveq2d 3734 |
. . . . . . . 8
⊢ (A ∈ ℝ → (cos ‘((π / 2) +
(A − (π / 2)))) = (cos
‘A)) |
| 70 | 56 | recnd 5327 |
. . . . . . . . 9
⊢ (A ∈ ℝ → (A
− (π / 2)) ∈ ℂ) |
| 71 | | coshalfpip 8696 |
. . . . . . . . 9
⊢ ((A − (π / 2)) ∈ ℂ → (cos
‘((π / 2) + (A −
(π / 2)))) = -(sin ‘(A
− (π / 2)))) |
| 72 | 70, 71 | syl 10 |
. . . . . . . 8
⊢ (A ∈ ℝ → (cos ‘((π / 2) +
(A − (π / 2)))) = -(sin
‘(A − (π /
2)))) |
| 73 | 69, 72 | eqtr3d 1512 |
. . . . . . 7
⊢ (A ∈ ℝ → (cos ‘A) = -(sin ‘(A − (π / 2)))) |
| 74 | 73 | breq2d 2635 |
. . . . . 6
⊢ (A ∈ ℝ → (0 < (cos ‘A) ↔ 0 < -(sin ‘(A − (π / 2))))) |
| 75 | 68 | fveq2d 3734 |
. . . . . . . 8
⊢ (A ∈ ℝ → (sin ‘((π / 2) +
(A − (π / 2)))) = (sin
‘A)) |
| 76 | | sinhalfpip 8694 |
. . . . . . . . 9
⊢ ((A − (π / 2)) ∈ ℂ → (sin
‘((π / 2) + (A −
(π / 2)))) = (cos ‘(A
− (π / 2)))) |
| 77 | 70, 76 | syl 10 |
. . . . . . . 8
⊢ (A ∈ ℝ → (sin ‘((π / 2) +
(A − (π / 2)))) = (cos
‘(A − (π /
2)))) |
| 78 | 75, 77 | eqtr3d 1512 |
. . . . . . 7
⊢ (A ∈ ℝ → (sin ‘A) = (cos ‘(A − (π / 2)))) |
| 79 | 78 | breq1d 2634 |
. . . . . 6
⊢ (A ∈ ℝ → ((sin ‘A) < 0 ↔ (cos ‘(A − (π / 2))) < 0)) |
| 80 | 74, 79 | anbi12d 630 |
. . . . 5
⊢ (A ∈ ℝ → ((0 < (cos ‘A) ⋀ (sin
‘A) < 0) ↔ (0 < -(sin
‘(A − (π / 2))) ⋀ (cos ‘(A − (π / 2))) < 0))) |
| 81 | 64, 80 | sylibrd 204 |
. . . 4
⊢ (A ∈ ℝ → (((3 · (π / 2)) <
A ⋀
A < (2 · π)) → (0
< (cos ‘A) ⋀ (sin ‘A) < 0))) |
| 82 | 81 | 3impib 833 |
. . 3
⊢ ((A ∈ ℝ ⋀ (3 ·
(π / 2)) < A ⋀ A < (2
· π)) → (0 < (cos ‘A) ⋀ (sin
‘A) < 0)) |
| 83 | | ancom 437 |
. . 3
⊢ ((0 < (cos
‘A) ⋀ (sin ‘A) < 0) ↔ ((sin ‘A) < 0 ⋀ 0
< (cos ‘A))) |
| 84 | 82, 83 | sylib 198 |
. 2
⊢ ((A ∈ ℝ ⋀ (3 ·
(π / 2)) < A ⋀ A < (2
· π)) → ((sin ‘A) < 0 ⋀ 0
< (cos ‘A))) |
| 85 | 12, 84 | sylbi 199 |
1
⊢ (A ∈ ((3 ·
(π / 2))(,)(2 · π)) → ((sin ‘A) < 0 ⋀ 0
< (cos ‘A))) |