Proof of Theorem sincos4thpi
| Step | Hyp | Ref
| Expression |
| 1 | | halfcn 9205 |
. . . . . . . . . 10
⊢ (1 / 2)
∈ ℂ |
| 2 | | ax-1cn 7972 |
. . . . . . . . . . 11
⊢ 1 ∈
ℂ |
| 3 | | 2halves 9220 |
. . . . . . . . . . 11
⊢ (1 ∈
ℂ → ((1 / 2) + (1 / 2)) = 1) |
| 4 | 2, 3 | ax-mp 5 |
. . . . . . . . . 10
⊢ ((1 / 2)
+ (1 / 2)) = 1 |
| 5 | | sincosq1eq 15075 |
. . . . . . . . . 10
⊢ (((1 / 2)
∈ ℂ ∧ (1 / 2) ∈ ℂ ∧ ((1 / 2) + (1 / 2)) = 1)
→ (sin‘((1 / 2) · (π / 2))) = (cos‘((1 / 2) ·
(π / 2)))) |
| 6 | 1, 1, 4, 5 | mp3an 1348 |
. . . . . . . . 9
⊢
(sin‘((1 / 2) · (π / 2))) = (cos‘((1 / 2) ·
(π / 2))) |
| 7 | 6 | oveq2i 5933 |
. . . . . . . 8
⊢
((sin‘((1 / 2) · (π / 2))) · (sin‘((1 / 2)
· (π / 2)))) = ((sin‘((1 / 2) · (π / 2))) ·
(cos‘((1 / 2) · (π / 2)))) |
| 8 | 7 | oveq2i 5933 |
. . . . . . 7
⊢ (2
· ((sin‘((1 / 2) · (π / 2))) · (sin‘((1 /
2) · (π / 2))))) = (2 · ((sin‘((1 / 2) · (π /
2))) · (cos‘((1 / 2) · (π / 2))))) |
| 9 | | 2cn 9061 |
. . . . . . . . . . . 12
⊢ 2 ∈
ℂ |
| 10 | | pire 15022 |
. . . . . . . . . . . . 13
⊢ π
∈ ℝ |
| 11 | 10 | recni 8038 |
. . . . . . . . . . . 12
⊢ π
∈ ℂ |
| 12 | | 2ap0 9083 |
. . . . . . . . . . . 12
⊢ 2 #
0 |
| 13 | 2, 9, 11, 9, 12, 12 | divmuldivapi 8799 |
. . . . . . . . . . 11
⊢ ((1 / 2)
· (π / 2)) = ((1 · π) / (2 · 2)) |
| 14 | 11 | mullidi 8029 |
. . . . . . . . . . . 12
⊢ (1
· π) = π |
| 15 | | 2t2e4 9145 |
. . . . . . . . . . . 12
⊢ (2
· 2) = 4 |
| 16 | 14, 15 | oveq12i 5934 |
. . . . . . . . . . 11
⊢ ((1
· π) / (2 · 2)) = (π / 4) |
| 17 | 13, 16 | eqtri 2217 |
. . . . . . . . . 10
⊢ ((1 / 2)
· (π / 2)) = (π / 4) |
| 18 | 17 | fveq2i 5561 |
. . . . . . . . 9
⊢
(sin‘((1 / 2) · (π / 2))) = (sin‘(π /
4)) |
| 19 | 18, 18 | oveq12i 5934 |
. . . . . . . 8
⊢
((sin‘((1 / 2) · (π / 2))) · (sin‘((1 / 2)
· (π / 2)))) = ((sin‘(π / 4)) · (sin‘(π /
4))) |
| 20 | 19 | oveq2i 5933 |
. . . . . . 7
⊢ (2
· ((sin‘((1 / 2) · (π / 2))) · (sin‘((1 /
2) · (π / 2))))) = (2 · ((sin‘(π / 4)) ·
(sin‘(π / 4)))) |
| 21 | 9, 12 | recidapi 8770 |
. . . . . . . . . . 11
⊢ (2
· (1 / 2)) = 1 |
| 22 | 21 | oveq1i 5932 |
. . . . . . . . . 10
⊢ ((2
· (1 / 2)) · (π / 2)) = (1 · (π /
2)) |
| 23 | | 2re 9060 |
. . . . . . . . . . . . 13
⊢ 2 ∈
ℝ |
| 24 | 10, 23, 12 | redivclapi 8806 |
. . . . . . . . . . . 12
⊢ (π /
2) ∈ ℝ |
| 25 | 24 | recni 8038 |
. . . . . . . . . . 11
⊢ (π /
2) ∈ ℂ |
| 26 | 9, 1, 25 | mulassi 8035 |
. . . . . . . . . 10
⊢ ((2
· (1 / 2)) · (π / 2)) = (2 · ((1 / 2) · (π /
2))) |
| 27 | 25 | mullidi 8029 |
. . . . . . . . . 10
⊢ (1
· (π / 2)) = (π / 2) |
| 28 | 22, 26, 27 | 3eqtr3i 2225 |
. . . . . . . . 9
⊢ (2
· ((1 / 2) · (π / 2))) = (π / 2) |
| 29 | 28 | fveq2i 5561 |
. . . . . . . 8
⊢
(sin‘(2 · ((1 / 2) · (π / 2)))) =
(sin‘(π / 2)) |
| 30 | 1, 25 | mulcli 8031 |
. . . . . . . . 9
⊢ ((1 / 2)
· (π / 2)) ∈ ℂ |
| 31 | | sin2t 11914 |
. . . . . . . . 9
⊢ (((1 / 2)
· (π / 2)) ∈ ℂ → (sin‘(2 · ((1 / 2)
· (π / 2)))) = (2 · ((sin‘((1 / 2) · (π / 2)))
· (cos‘((1 / 2) · (π / 2)))))) |
| 32 | 30, 31 | ax-mp 5 |
. . . . . . . 8
⊢
(sin‘(2 · ((1 / 2) · (π / 2)))) = (2 ·
((sin‘((1 / 2) · (π / 2))) · (cos‘((1 / 2)
· (π / 2))))) |
| 33 | | sinhalfpi 15032 |
. . . . . . . 8
⊢
(sin‘(π / 2)) = 1 |
| 34 | 29, 32, 33 | 3eqtr3i 2225 |
. . . . . . 7
⊢ (2
· ((sin‘((1 / 2) · (π / 2))) · (cos‘((1 /
2) · (π / 2))))) = 1 |
| 35 | 8, 20, 34 | 3eqtr3i 2225 |
. . . . . 6
⊢ (2
· ((sin‘(π / 4)) · (sin‘(π / 4)))) =
1 |
| 36 | 35 | fveq2i 5561 |
. . . . 5
⊢
(√‘(2 · ((sin‘(π / 4)) ·
(sin‘(π / 4))))) = (√‘1) |
| 37 | | 4re 9067 |
. . . . . . . . 9
⊢ 4 ∈
ℝ |
| 38 | | 4ap0 9089 |
. . . . . . . . 9
⊢ 4 #
0 |
| 39 | 10, 37, 38 | redivclapi 8806 |
. . . . . . . 8
⊢ (π /
4) ∈ ℝ |
| 40 | | resincl 11885 |
. . . . . . . 8
⊢ ((π /
4) ∈ ℝ → (sin‘(π / 4)) ∈
ℝ) |
| 41 | 39, 40 | ax-mp 5 |
. . . . . . 7
⊢
(sin‘(π / 4)) ∈ ℝ |
| 42 | 41, 41 | remulcli 8040 |
. . . . . 6
⊢
((sin‘(π / 4)) · (sin‘(π / 4))) ∈
ℝ |
| 43 | | 0le2 9080 |
. . . . . 6
⊢ 0 ≤
2 |
| 44 | 41 | msqge0i 8644 |
. . . . . 6
⊢ 0 ≤
((sin‘(π / 4)) · (sin‘(π / 4))) |
| 45 | 23, 42, 43, 44 | sqrtmulii 11299 |
. . . . 5
⊢
(√‘(2 · ((sin‘(π / 4)) ·
(sin‘(π / 4))))) = ((√‘2) ·
(√‘((sin‘(π / 4)) · (sin‘(π /
4))))) |
| 46 | | sqrt1 11211 |
. . . . 5
⊢
(√‘1) = 1 |
| 47 | 36, 45, 46 | 3eqtr3ri 2226 |
. . . 4
⊢ 1 =
((√‘2) · (√‘((sin‘(π / 4)) ·
(sin‘(π / 4))))) |
| 48 | 42 | sqrtcli 11285 |
. . . . . . 7
⊢ (0 ≤
((sin‘(π / 4)) · (sin‘(π / 4))) →
(√‘((sin‘(π / 4)) · (sin‘(π / 4)))) ∈
ℝ) |
| 49 | 44, 48 | ax-mp 5 |
. . . . . 6
⊢
(√‘((sin‘(π / 4)) · (sin‘(π / 4))))
∈ ℝ |
| 50 | 49 | recni 8038 |
. . . . 5
⊢
(√‘((sin‘(π / 4)) · (sin‘(π / 4))))
∈ ℂ |
| 51 | | sqrt2re 12331 |
. . . . . . 7
⊢
(√‘2) ∈ ℝ |
| 52 | 51 | recni 8038 |
. . . . . 6
⊢
(√‘2) ∈ ℂ |
| 53 | | 2pos 9081 |
. . . . . . . 8
⊢ 0 <
2 |
| 54 | 23, 53 | sqrtgt0ii 11296 |
. . . . . . 7
⊢ 0 <
(√‘2) |
| 55 | 51, 54 | gt0ap0ii 8655 |
. . . . . 6
⊢
(√‘2) # 0 |
| 56 | 52, 55 | pm3.2i 272 |
. . . . 5
⊢
((√‘2) ∈ ℂ ∧ (√‘2) #
0) |
| 57 | | divmulap2 8703 |
. . . . 5
⊢ ((1
∈ ℂ ∧ (√‘((sin‘(π / 4)) ·
(sin‘(π / 4)))) ∈ ℂ ∧ ((√‘2) ∈ ℂ
∧ (√‘2) # 0)) → ((1 / (√‘2)) =
(√‘((sin‘(π / 4)) · (sin‘(π / 4)))) ↔
1 = ((√‘2) · (√‘((sin‘(π / 4)) ·
(sin‘(π / 4))))))) |
| 58 | 2, 50, 56, 57 | mp3an 1348 |
. . . 4
⊢ ((1 /
(√‘2)) = (√‘((sin‘(π / 4)) ·
(sin‘(π / 4)))) ↔ 1 = ((√‘2) ·
(√‘((sin‘(π / 4)) · (sin‘(π /
4)))))) |
| 59 | 47, 58 | mpbir 146 |
. . 3
⊢ (1 /
(√‘2)) = (√‘((sin‘(π / 4)) ·
(sin‘(π / 4)))) |
| 60 | | 0re 8026 |
. . . . 5
⊢ 0 ∈
ℝ |
| 61 | | pipos 15024 |
. . . . . . . 8
⊢ 0 <
π |
| 62 | | 4pos 9087 |
. . . . . . . 8
⊢ 0 <
4 |
| 63 | 10, 37, 61, 62 | divgt0ii 8946 |
. . . . . . 7
⊢ 0 <
(π / 4) |
| 64 | | 1re 8025 |
. . . . . . . 8
⊢ 1 ∈
ℝ |
| 65 | | pigt2lt4 15020 |
. . . . . . . . . . 11
⊢ (2 <
π ∧ π < 4) |
| 66 | 65 | simpri 113 |
. . . . . . . . . 10
⊢ π <
4 |
| 67 | 10, 37, 37, 62 | ltdiv1ii 8956 |
. . . . . . . . . 10
⊢ (π
< 4 ↔ (π / 4) < (4 / 4)) |
| 68 | 66, 67 | mpbi 145 |
. . . . . . . . 9
⊢ (π /
4) < (4 / 4) |
| 69 | 37 | recni 8038 |
. . . . . . . . . 10
⊢ 4 ∈
ℂ |
| 70 | 69, 38 | dividapi 8772 |
. . . . . . . . 9
⊢ (4 / 4) =
1 |
| 71 | 68, 70 | breqtri 4058 |
. . . . . . . 8
⊢ (π /
4) < 1 |
| 72 | 39, 64, 71 | ltleii 8129 |
. . . . . . 7
⊢ (π /
4) ≤ 1 |
| 73 | | 0xr 8073 |
. . . . . . . 8
⊢ 0 ∈
ℝ* |
| 74 | | elioc2 10011 |
. . . . . . . 8
⊢ ((0
∈ ℝ* ∧ 1 ∈ ℝ) → ((π / 4) ∈
(0(,]1) ↔ ((π / 4) ∈ ℝ ∧ 0 < (π / 4) ∧ (π /
4) ≤ 1))) |
| 75 | 73, 64, 74 | mp2an 426 |
. . . . . . 7
⊢ ((π /
4) ∈ (0(,]1) ↔ ((π / 4) ∈ ℝ ∧ 0 < (π / 4)
∧ (π / 4) ≤ 1)) |
| 76 | 39, 63, 72, 75 | mpbir3an 1181 |
. . . . . 6
⊢ (π /
4) ∈ (0(,]1) |
| 77 | | sin01gt0 11927 |
. . . . . 6
⊢ ((π /
4) ∈ (0(,]1) → 0 < (sin‘(π / 4))) |
| 78 | 76, 77 | ax-mp 5 |
. . . . 5
⊢ 0 <
(sin‘(π / 4)) |
| 79 | 60, 41, 78 | ltleii 8129 |
. . . 4
⊢ 0 ≤
(sin‘(π / 4)) |
| 80 | 41 | sqrtmsqi 11287 |
. . . 4
⊢ (0 ≤
(sin‘(π / 4)) → (√‘((sin‘(π / 4)) ·
(sin‘(π / 4)))) = (sin‘(π / 4))) |
| 81 | 79, 80 | ax-mp 5 |
. . 3
⊢
(√‘((sin‘(π / 4)) · (sin‘(π / 4))))
= (sin‘(π / 4)) |
| 82 | 59, 81 | eqtr2i 2218 |
. 2
⊢
(sin‘(π / 4)) = (1 / (√‘2)) |
| 83 | 59, 81 | eqtri 2217 |
. . 3
⊢ (1 /
(√‘2)) = (sin‘(π / 4)) |
| 84 | 17 | fveq2i 5561 |
. . . 4
⊢
(cos‘((1 / 2) · (π / 2))) = (cos‘(π /
4)) |
| 85 | 6, 18, 84 | 3eqtr3i 2225 |
. . 3
⊢
(sin‘(π / 4)) = (cos‘(π / 4)) |
| 86 | 83, 85 | eqtr2i 2218 |
. 2
⊢
(cos‘(π / 4)) = (1 / (√‘2)) |
| 87 | 82, 86 | pm3.2i 272 |
1
⊢
((sin‘(π / 4)) = (1 / (√‘2)) ∧ (cos‘(π
/ 4)) = (1 / (√‘2))) |