Proof of Theorem sincos4thpi
| Step | Hyp | Ref
| Expression |
| 1 | | 2re 5981 |
. . . . . . . . . . . 12
⊢ 2 ∈ ℝ |
| 2 | | 2ne0 5992 |
. . . . . . . . . . . 12
⊢ 2 ≠ 0 |
| 3 | 1, 2 | rereccl 5803 |
. . . . . . . . . . 11
⊢ (1 / 2) ∈ ℝ |
| 4 | 3 | recn 5326 |
. . . . . . . . . 10
⊢ (1 / 2) ∈ ℂ |
| 5 | | ax1cn 5281 |
. . . . . . . . . . 11
⊢ 1 ∈ ℂ |
| 6 | | 2halvest 6041 |
. . . . . . . . . . 11
⊢ (1 ∈ ℂ → ((1 /
2) + (1 / 2)) = 1) |
| 7 | 5, 6 | ax-mp 7 |
. . . . . . . . . 10
⊢ ((1 / 2) + (1 / 2)) =
1 |
| 8 | | sincosq1eq 8704 |
. . . . . . . . . 10
⊢ (((1 / 2) ∈ ℂ ⋀ (1 / 2) ∈
ℂ ⋀ ((1 /
2) + (1 / 2)) = 1) → (sin ‘((1 / 2) · (π / 2))) =
(cos ‘((1 / 2) · (π / 2)))) |
| 9 | 4, 4, 7, 8 | mp3an 918 |
. . . . . . . . 9
⊢ (sin ‘((1 / 2)
· (π / 2))) = (cos ‘((1 / 2) · (π /
2))) |
| 10 | 9 | opreq2i 3978 |
. . . . . . . 8
⊢ ((sin ‘((1 / 2)
· (π / 2))) · (sin ‘((1 / 2) ·
(π / 2)))) = ((sin ‘((1 / 2) · (π / 2)))
· (cos ‘((1 / 2) · (π / 2)))) |
| 11 | 10 | opreq2i 3978 |
. . . . . . 7
⊢ (2 · ((sin
‘((1 / 2) · (π / 2))) · (sin ‘((1 / 2)
· (π / 2))))) = (2 · ((sin ‘((1 / 2) ·
(π / 2))) · (cos ‘((1 / 2) · (π /
2))))) |
| 12 | | 2cn 5982 |
. . . . . . . . . . . 12
⊢ 2 ∈ ℂ |
| 13 | | pire 8672 |
. . . . . . . . . . . . 13
⊢ π ∈ ℝ |
| 14 | 13 | recn 5326 |
. . . . . . . . . . . 12
⊢ π ∈ ℂ |
| 15 | 5, 12, 14, 12, 2, 2 | divmuldiv 5788 |
. . . . . . . . . . 11
⊢ ((1 / 2) ·
(π / 2)) = ((1 · π) / (2 · 2)) |
| 16 | 14 | mulid2 5345 |
. . . . . . . . . . . 12
⊢ (1 · π) =
π |
| 17 | | 2t2e4 6024 |
. . . . . . . . . . . 12
⊢ (2 · 2) =
4 |
| 18 | 16, 17 | opreq12i 3979 |
. . . . . . . . . . 11
⊢ ((1 · π)
/ (2 · 2)) = (π / 4) |
| 19 | 15, 18 | eqtr 1498 |
. . . . . . . . . 10
⊢ ((1 / 2) ·
(π / 2)) = (π / 4) |
| 20 | 19 | fveq2i 3733 |
. . . . . . . . 9
⊢ (sin ‘((1 / 2)
· (π / 2))) = (sin ‘(π / 4)) |
| 21 | 20, 20 | opreq12i 3979 |
. . . . . . . 8
⊢ ((sin ‘((1 / 2)
· (π / 2))) · (sin ‘((1 / 2) ·
(π / 2)))) = ((sin ‘(π / 4)) · (sin
‘(π / 4))) |
| 22 | 21 | opreq2i 3978 |
. . . . . . 7
⊢ (2 · ((sin
‘((1 / 2) · (π / 2))) · (sin ‘((1 / 2)
· (π / 2))))) = (2 · ((sin ‘(π / 4))
· (sin ‘(π / 4)))) |
| 23 | 12, 2 | recid 5740 |
. . . . . . . . . . 11
⊢ (2 · (1 / 2)) =
1 |
| 24 | 23 | opreq1i 3977 |
. . . . . . . . . 10
⊢ ((2 · (1 / 2))
· (π / 2)) = (1 · (π / 2)) |
| 25 | 13, 1, 2 | redivcl 5800 |
. . . . . . . . . . . 12
⊢ (π / 2) ∈ ℝ |
| 26 | 25 | recn 5326 |
. . . . . . . . . . 11
⊢ (π / 2) ∈ ℂ |
| 27 | 12, 4, 26 | mulass 5337 |
. . . . . . . . . 10
⊢ ((2 · (1 / 2))
· (π / 2)) = (2 · ((1 / 2) · (π /
2))) |
| 28 | 26 | mulid2 5345 |
. . . . . . . . . 10
⊢ (1 · (π /
2)) = (π / 2) |
| 29 | 24, 27, 28 | 3eqtr3 1506 |
. . . . . . . . 9
⊢ (2 · ((1 / 2)
· (π / 2))) = (π / 2) |
| 30 | 29 | fveq2i 3733 |
. . . . . . . 8
⊢ (sin ‘(2 ·
((1 / 2) · (π / 2)))) = (sin ‘(π /
2)) |
| 31 | 4, 26 | mulcl 5333 |
. . . . . . . . 9
⊢ ((1 / 2) ·
(π / 2)) ∈ ℂ |
| 32 | | sin2tt 7462 |
. . . . . . . . 9
⊢ (((1 / 2) ·
(π / 2)) ∈ ℂ → (sin ‘(2 · ((1 / 2) ·
(π / 2)))) = (2 · ((sin ‘((1 / 2) · (π
/ 2))) · (cos ‘((1 / 2) · (π / 2)))))) |
| 33 | 31, 32 | ax-mp 7 |
. . . . . . . 8
⊢ (sin ‘(2 ·
((1 / 2) · (π / 2)))) = (2 · ((sin ‘((1 / 2)
· (π / 2))) · (cos ‘((1 / 2) ·
(π / 2))))) |
| 34 | | sinhalfpi 8675 |
. . . . . . . 8
⊢ (sin ‘(π /
2)) = 1 |
| 35 | 30, 33, 34 | 3eqtr3 1506 |
. . . . . . 7
⊢ (2 · ((sin
‘((1 / 2) · (π / 2))) · (cos ‘((1 / 2)
· (π / 2))))) = 1 |
| 36 | 11, 22, 35 | 3eqtr3 1506 |
. . . . . 6
⊢ (2 · ((sin
‘(π / 4)) · (sin ‘(π / 4)))) =
1 |
| 37 | 36 | fveq2i 3733 |
. . . . 5
⊢ (√ ‘(2
· ((sin ‘(π / 4)) · (sin ‘(π /
4))))) = (√ ‘1) |
| 38 | | 4re 5984 |
. . . . . . . . 9
⊢ 4 ∈ ℝ |
| 39 | | 4pos 5994 |
. . . . . . . . . 10
⊢ 0 < 4 |
| 40 | 38, 39 | gt0ne0i 5629 |
. . . . . . . . 9
⊢ 4 ≠ 0 |
| 41 | 13, 38, 40 | redivcl 5800 |
. . . . . . . 8
⊢ (π / 4) ∈ ℝ |
| 42 | | resinclt 7438 |
. . . . . . . 8
⊢ ((π / 4) ∈ ℝ → (sin
‘(π / 4)) ∈ ℝ) |
| 43 | 41, 42 | ax-mp 7 |
. . . . . . 7
⊢ (sin ‘(π /
4)) ∈ ℝ |
| 44 | 43, 43 | remulcl 5347 |
. . . . . 6
⊢ ((sin ‘(π
/ 4)) · (sin ‘(π / 4))) ∈ ℝ |
| 45 | | 0re 5452 |
. . . . . . 7
⊢ 0 ∈ ℝ |
| 46 | | 2pos 5991 |
. . . . . . 7
⊢ 0 < 2 |
| 47 | 45, 1, 46 | ltlei 5593 |
. . . . . 6
⊢ 0 ≤ 2 |
| 48 | 43 | msqge0 5626 |
. . . . . 6
⊢ 0 ≤ ((sin
‘(π / 4)) · (sin ‘(π / 4))) |
| 49 | 1, 44, 47, 48 | sqrmuli 6705 |
. . . . 5
⊢ (√ ‘(2
· ((sin ‘(π / 4)) · (sin ‘(π /
4))))) = ((√ ‘2) · (√ ‘((sin ‘(π
/ 4)) · (sin ‘(π / 4))))) |
| 50 | | sqr1 6717 |
. . . . 5
⊢ (√ ‘1) =
1 |
| 51 | 37, 49, 50 | 3eqtr3r 1507 |
. . . 4
⊢ 1 = ((√ ‘2)
· (√ ‘((sin ‘(π / 4)) · (sin
‘(π / 4))))) |
| 52 | | sqr2re 6731 |
. . . . . 6
⊢ (√ ‘2) ∈ ℝ |
| 53 | 52 | recn 5326 |
. . . . 5
⊢ (√ ‘2) ∈ ℂ |
| 54 | | sqrclt 6711 |
. . . . . . 7
⊢ ((((sin
‘(π / 4)) · (sin ‘(π / 4))) ∈ ℝ ⋀ 0 ≤ ((sin ‘(π / 4)) ·
(sin ‘(π / 4)))) → (√ ‘((sin
‘(π / 4)) · (sin ‘(π / 4)))) ∈ ℝ) |
| 55 | 44, 48, 54 | mp2an 699 |
. . . . . 6
⊢ (√ ‘((sin
‘(π / 4)) · (sin ‘(π / 4)))) ∈ ℝ |
| 56 | 55 | recn 5326 |
. . . . 5
⊢ (√ ‘((sin
‘(π / 4)) · (sin ‘(π / 4)))) ∈ ℂ |
| 57 | | sqr00t 6715 |
. . . . . . . . 9
⊢ ((2 ∈ ℝ ⋀ 0 ≤ 2) → ((√ ‘2) = 0 ↔
2 = 0)) |
| 58 | 1, 47, 57 | mp2an 699 |
. . . . . . . 8
⊢ ((√ ‘2) = 0
↔ 2 = 0) |
| 59 | 58 | necon3bii 1601 |
. . . . . . 7
⊢ ((√ ‘2) ≠ 0
↔ 2 ≠ 0) |
| 60 | 2, 59 | mpbir 190 |
. . . . . 6
⊢ (√ ‘2) ≠
0 |
| 61 | | divmul2t 5720 |
. . . . . 6
⊢ (((1 ∈ ℂ ⋀ (√ ‘2) ∈ ℂ ⋀ (√ ‘((sin ‘(π / 4))
· (sin ‘(π / 4)))) ∈
ℂ) ⋀
(√ ‘2) ≠ 0) → ((1 / (√ ‘2)) = (√
‘((sin ‘(π / 4)) · (sin ‘(π /
4)))) ↔ 1 = ((√ ‘2) · (√ ‘((sin
‘(π / 4)) · (sin ‘(π /
4))))))) |
| 62 | 60, 61 | mpan2 698 |
. . . . 5
⊢ ((1 ∈ ℂ ⋀ (√ ‘2) ∈ ℂ ⋀ (√ ‘((sin ‘(π / 4))
· (sin ‘(π / 4)))) ∈
ℂ) → ((1 / (√ ‘2)) =
(√ ‘((sin ‘(π / 4)) · (sin
‘(π / 4)))) ↔ 1 = ((√ ‘2) · (√
‘((sin ‘(π / 4)) · (sin ‘(π /
4))))))) |
| 63 | 5, 53, 56, 62 | mp3an 918 |
. . . 4
⊢ ((1 / (√ ‘2))
= (√ ‘((sin ‘(π / 4)) · (sin
‘(π / 4)))) ↔ 1 = ((√ ‘2) · (√
‘((sin ‘(π / 4)) · (sin ‘(π /
4)))))) |
| 64 | 51, 63 | mpbir 190 |
. . 3
⊢ (1 / (√ ‘2)) =
(√ ‘((sin ‘(π / 4)) · (sin
‘(π / 4)))) |
| 65 | | pipos 8673 |
. . . . . . . 8
⊢ 0 <
π |
| 66 | 13, 38, 65, 39 | divgt0i 5862 |
. . . . . . 7
⊢ 0 < (π /
4) |
| 67 | | 1re 5447 |
. . . . . . . 8
⊢ 1 ∈ ℝ |
| 68 | | pigt2lt4 8670 |
. . . . . . . . . . 11
⊢ (2 < π ⋀ π < 4) |
| 69 | 68 | pm3.27i 324 |
. . . . . . . . . 10
⊢ π <
4 |
| 70 | 13, 38, 38, 39 | ltdiv1i 5825 |
. . . . . . . . . 10
⊢ (π < 4 ↔
(π / 4) < (4 / 4)) |
| 71 | 69, 70 | mpbi 189 |
. . . . . . . . 9
⊢ (π / 4) < (4
/ 4) |
| 72 | 38 | recn 5326 |
. . . . . . . . . 10
⊢ 4 ∈ ℂ |
| 73 | 72, 40 | divid 5771 |
. . . . . . . . 9
⊢ (4 / 4) = 1 |
| 74 | 71, 73 | breqtr 2643 |
. . . . . . . 8
⊢ (π / 4) <
1 |
| 75 | 41, 67, 74 | ltlei 5593 |
. . . . . . 7
⊢ (π / 4) ≤
1 |
| 76 | | elioc2t 6391 |
. . . . . . . . 9
⊢ ((0 ∈ ℝ ⋀ 1 ∈ ℝ) → ((π / 4) ∈ (0(,]1) ↔ ((π / 4) ∈ ℝ ⋀ 0 < (π / 4) ⋀ (π / 4) ≤ 1))) |
| 77 | 45, 67, 76 | mp2an 699 |
. . . . . . . 8
⊢ ((π / 4) ∈ (0(,]1) ↔ ((π / 4) ∈ ℝ ⋀ 0 < (π / 4) ⋀ (π / 4) ≤ 1)) |
| 78 | 77 | biimpr 152 |
. . . . . . 7
⊢ (((π / 4) ∈ ℝ ⋀ 0 < (π / 4) ⋀ (π / 4) ≤ 1) → (π /
4) ∈ (0(,]1)) |
| 79 | 41, 66, 75, 78 | mp3an 918 |
. . . . . 6
⊢ (π / 4) ∈ (0(,]1) |
| 80 | | sin01gt0 7477 |
. . . . . 6
⊢ ((π / 4) ∈ (0(,]1) → 0 < (sin ‘(π /
4))) |
| 81 | 79, 80 | ax-mp 7 |
. . . . 5
⊢ 0 < (sin
‘(π / 4)) |
| 82 | 45, 43, 81 | ltlei 5593 |
. . . 4
⊢ 0 ≤ (sin
‘(π / 4)) |
| 83 | 43 | sqrmsq 6710 |
. . . 4
⊢ (0 ≤ (sin
‘(π / 4)) → (√ ‘((sin ‘(π /
4)) · (sin ‘(π / 4)))) = (sin ‘(π /
4))) |
| 84 | 82, 83 | ax-mp 7 |
. . 3
⊢ (√ ‘((sin
‘(π / 4)) · (sin ‘(π / 4)))) = (sin
‘(π / 4)) |
| 85 | 64, 84 | eqtr2 1499 |
. 2
⊢ (sin ‘(π /
4)) = (1 / (√ ‘2)) |
| 86 | 19 | fveq2i 3733 |
. . . 4
⊢ (cos ‘((1 / 2)
· (π / 2))) = (cos ‘(π / 4)) |
| 87 | 9, 20, 86 | 3eqtr3 1506 |
. . 3
⊢ (sin ‘(π /
4)) = (cos ‘(π / 4)) |
| 88 | 64, 84, 87 | 3eqtrr 1503 |
. 2
⊢ (cos ‘(π /
4)) = (1 / (√ ‘2)) |
| 89 | 85, 88 | pm3.2i 285 |
1
⊢ ((sin ‘(π
/ 4)) = (1 / (√ ‘2)) ⋀ (cos
‘(π / 4)) = (1 / (√ ‘2))) |