Proof of Theorem sincos4thpi
Step | Hyp | Ref
| Expression |
1 | | halfcn 9071 |
. . . . . . . . . 10
⊢ (1 / 2)
∈ ℂ |
2 | | ax-1cn 7846 |
. . . . . . . . . . 11
⊢ 1 ∈
ℂ |
3 | | 2halves 9086 |
. . . . . . . . . . 11
⊢ (1 ∈
ℂ → ((1 / 2) + (1 / 2)) = 1) |
4 | 2, 3 | ax-mp 5 |
. . . . . . . . . 10
⊢ ((1 / 2)
+ (1 / 2)) = 1 |
5 | | sincosq1eq 13400 |
. . . . . . . . . 10
⊢ (((1 / 2)
∈ ℂ ∧ (1 / 2) ∈ ℂ ∧ ((1 / 2) + (1 / 2)) = 1)
→ (sin‘((1 / 2) · (π / 2))) = (cos‘((1 / 2) ·
(π / 2)))) |
6 | 1, 1, 4, 5 | mp3an 1327 |
. . . . . . . . 9
⊢
(sin‘((1 / 2) · (π / 2))) = (cos‘((1 / 2) ·
(π / 2))) |
7 | 6 | oveq2i 5853 |
. . . . . . . 8
⊢
((sin‘((1 / 2) · (π / 2))) · (sin‘((1 / 2)
· (π / 2)))) = ((sin‘((1 / 2) · (π / 2))) ·
(cos‘((1 / 2) · (π / 2)))) |
8 | 7 | oveq2i 5853 |
. . . . . . 7
⊢ (2
· ((sin‘((1 / 2) · (π / 2))) · (sin‘((1 /
2) · (π / 2))))) = (2 · ((sin‘((1 / 2) · (π /
2))) · (cos‘((1 / 2) · (π / 2))))) |
9 | | 2cn 8928 |
. . . . . . . . . . . 12
⊢ 2 ∈
ℂ |
10 | | pire 13347 |
. . . . . . . . . . . . 13
⊢ π
∈ ℝ |
11 | 10 | recni 7911 |
. . . . . . . . . . . 12
⊢ π
∈ ℂ |
12 | | 2ap0 8950 |
. . . . . . . . . . . 12
⊢ 2 #
0 |
13 | 2, 9, 11, 9, 12, 12 | divmuldivapi 8668 |
. . . . . . . . . . 11
⊢ ((1 / 2)
· (π / 2)) = ((1 · π) / (2 · 2)) |
14 | 11 | mulid2i 7902 |
. . . . . . . . . . . 12
⊢ (1
· π) = π |
15 | | 2t2e4 9011 |
. . . . . . . . . . . 12
⊢ (2
· 2) = 4 |
16 | 14, 15 | oveq12i 5854 |
. . . . . . . . . . 11
⊢ ((1
· π) / (2 · 2)) = (π / 4) |
17 | 13, 16 | eqtri 2186 |
. . . . . . . . . 10
⊢ ((1 / 2)
· (π / 2)) = (π / 4) |
18 | 17 | fveq2i 5489 |
. . . . . . . . 9
⊢
(sin‘((1 / 2) · (π / 2))) = (sin‘(π /
4)) |
19 | 18, 18 | oveq12i 5854 |
. . . . . . . 8
⊢
((sin‘((1 / 2) · (π / 2))) · (sin‘((1 / 2)
· (π / 2)))) = ((sin‘(π / 4)) · (sin‘(π /
4))) |
20 | 19 | oveq2i 5853 |
. . . . . . 7
⊢ (2
· ((sin‘((1 / 2) · (π / 2))) · (sin‘((1 /
2) · (π / 2))))) = (2 · ((sin‘(π / 4)) ·
(sin‘(π / 4)))) |
21 | 9, 12 | recidapi 8639 |
. . . . . . . . . . 11
⊢ (2
· (1 / 2)) = 1 |
22 | 21 | oveq1i 5852 |
. . . . . . . . . 10
⊢ ((2
· (1 / 2)) · (π / 2)) = (1 · (π /
2)) |
23 | | 2re 8927 |
. . . . . . . . . . . . 13
⊢ 2 ∈
ℝ |
24 | 10, 23, 12 | redivclapi 8675 |
. . . . . . . . . . . 12
⊢ (π /
2) ∈ ℝ |
25 | 24 | recni 7911 |
. . . . . . . . . . 11
⊢ (π /
2) ∈ ℂ |
26 | 9, 1, 25 | mulassi 7908 |
. . . . . . . . . 10
⊢ ((2
· (1 / 2)) · (π / 2)) = (2 · ((1 / 2) · (π /
2))) |
27 | 25 | mulid2i 7902 |
. . . . . . . . . 10
⊢ (1
· (π / 2)) = (π / 2) |
28 | 22, 26, 27 | 3eqtr3i 2194 |
. . . . . . . . 9
⊢ (2
· ((1 / 2) · (π / 2))) = (π / 2) |
29 | 28 | fveq2i 5489 |
. . . . . . . 8
⊢
(sin‘(2 · ((1 / 2) · (π / 2)))) =
(sin‘(π / 2)) |
30 | 1, 25 | mulcli 7904 |
. . . . . . . . 9
⊢ ((1 / 2)
· (π / 2)) ∈ ℂ |
31 | | sin2t 11690 |
. . . . . . . . 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 13357 |
. . . . . . . 8
⊢
(sin‘(π / 2)) = 1 |
34 | 29, 32, 33 | 3eqtr3i 2194 |
. . . . . . 7
⊢ (2
· ((sin‘((1 / 2) · (π / 2))) · (cos‘((1 /
2) · (π / 2))))) = 1 |
35 | 8, 20, 34 | 3eqtr3i 2194 |
. . . . . 6
⊢ (2
· ((sin‘(π / 4)) · (sin‘(π / 4)))) =
1 |
36 | 35 | fveq2i 5489 |
. . . . 5
⊢
(√‘(2 · ((sin‘(π / 4)) ·
(sin‘(π / 4))))) = (√‘1) |
37 | | 4re 8934 |
. . . . . . . . 9
⊢ 4 ∈
ℝ |
38 | | 4ap0 8956 |
. . . . . . . . 9
⊢ 4 #
0 |
39 | 10, 37, 38 | redivclapi 8675 |
. . . . . . . 8
⊢ (π /
4) ∈ ℝ |
40 | | resincl 11661 |
. . . . . . . 8
⊢ ((π /
4) ∈ ℝ → (sin‘(π / 4)) ∈
ℝ) |
41 | 39, 40 | ax-mp 5 |
. . . . . . 7
⊢
(sin‘(π / 4)) ∈ ℝ |
42 | 41, 41 | remulcli 7913 |
. . . . . 6
⊢
((sin‘(π / 4)) · (sin‘(π / 4))) ∈
ℝ |
43 | | 0le2 8947 |
. . . . . 6
⊢ 0 ≤
2 |
44 | 41 | msqge0i 8515 |
. . . . . 6
⊢ 0 ≤
((sin‘(π / 4)) · (sin‘(π / 4))) |
45 | 23, 42, 43, 44 | sqrtmulii 11076 |
. . . . 5
⊢
(√‘(2 · ((sin‘(π / 4)) ·
(sin‘(π / 4))))) = ((√‘2) ·
(√‘((sin‘(π / 4)) · (sin‘(π /
4))))) |
46 | | sqrt1 10988 |
. . . . 5
⊢
(√‘1) = 1 |
47 | 36, 45, 46 | 3eqtr3ri 2195 |
. . . 4
⊢ 1 =
((√‘2) · (√‘((sin‘(π / 4)) ·
(sin‘(π / 4))))) |
48 | 42 | sqrtcli 11062 |
. . . . . . 7
⊢ (0 ≤
((sin‘(π / 4)) · (sin‘(π / 4))) →
(√‘((sin‘(π / 4)) · (sin‘(π / 4)))) ∈
ℝ) |
49 | 44, 48 | ax-mp 5 |
. . . . . 6
⊢
(√‘((sin‘(π / 4)) · (sin‘(π / 4))))
∈ ℝ |
50 | 49 | recni 7911 |
. . . . 5
⊢
(√‘((sin‘(π / 4)) · (sin‘(π / 4))))
∈ ℂ |
51 | | sqrt2re 12095 |
. . . . . . 7
⊢
(√‘2) ∈ ℝ |
52 | 51 | recni 7911 |
. . . . . 6
⊢
(√‘2) ∈ ℂ |
53 | | 2pos 8948 |
. . . . . . . 8
⊢ 0 <
2 |
54 | 23, 53 | sqrtgt0ii 11073 |
. . . . . . 7
⊢ 0 <
(√‘2) |
55 | 51, 54 | gt0ap0ii 8526 |
. . . . . 6
⊢
(√‘2) # 0 |
56 | 52, 55 | pm3.2i 270 |
. . . . 5
⊢
((√‘2) ∈ ℂ ∧ (√‘2) #
0) |
57 | | divmulap2 8572 |
. . . . 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 1327 |
. . . 4
⊢ ((1 /
(√‘2)) = (√‘((sin‘(π / 4)) ·
(sin‘(π / 4)))) ↔ 1 = ((√‘2) ·
(√‘((sin‘(π / 4)) · (sin‘(π /
4)))))) |
59 | 47, 58 | mpbir 145 |
. . 3
⊢ (1 /
(√‘2)) = (√‘((sin‘(π / 4)) ·
(sin‘(π / 4)))) |
60 | | 0re 7899 |
. . . . 5
⊢ 0 ∈
ℝ |
61 | | pipos 13349 |
. . . . . . . 8
⊢ 0 <
π |
62 | | 4pos 8954 |
. . . . . . . 8
⊢ 0 <
4 |
63 | 10, 37, 61, 62 | divgt0ii 8814 |
. . . . . . 7
⊢ 0 <
(π / 4) |
64 | | 1re 7898 |
. . . . . . . 8
⊢ 1 ∈
ℝ |
65 | | pigt2lt4 13345 |
. . . . . . . . . . 11
⊢ (2 <
π ∧ π < 4) |
66 | 65 | simpri 112 |
. . . . . . . . . 10
⊢ π <
4 |
67 | 10, 37, 37, 62 | ltdiv1ii 8824 |
. . . . . . . . . 10
⊢ (π
< 4 ↔ (π / 4) < (4 / 4)) |
68 | 66, 67 | mpbi 144 |
. . . . . . . . 9
⊢ (π /
4) < (4 / 4) |
69 | 37 | recni 7911 |
. . . . . . . . . 10
⊢ 4 ∈
ℂ |
70 | 69, 38 | dividapi 8641 |
. . . . . . . . 9
⊢ (4 / 4) =
1 |
71 | 68, 70 | breqtri 4007 |
. . . . . . . 8
⊢ (π /
4) < 1 |
72 | 39, 64, 71 | ltleii 8001 |
. . . . . . 7
⊢ (π /
4) ≤ 1 |
73 | | 0xr 7945 |
. . . . . . . 8
⊢ 0 ∈
ℝ* |
74 | | elioc2 9872 |
. . . . . . . 8
⊢ ((0
∈ ℝ* ∧ 1 ∈ ℝ) → ((π / 4) ∈
(0(,]1) ↔ ((π / 4) ∈ ℝ ∧ 0 < (π / 4) ∧ (π /
4) ≤ 1))) |
75 | 73, 64, 74 | mp2an 423 |
. . . . . . 7
⊢ ((π /
4) ∈ (0(,]1) ↔ ((π / 4) ∈ ℝ ∧ 0 < (π / 4)
∧ (π / 4) ≤ 1)) |
76 | 39, 63, 72, 75 | mpbir3an 1169 |
. . . . . 6
⊢ (π /
4) ∈ (0(,]1) |
77 | | sin01gt0 11702 |
. . . . . 6
⊢ ((π /
4) ∈ (0(,]1) → 0 < (sin‘(π / 4))) |
78 | 76, 77 | ax-mp 5 |
. . . . 5
⊢ 0 <
(sin‘(π / 4)) |
79 | 60, 41, 78 | ltleii 8001 |
. . . 4
⊢ 0 ≤
(sin‘(π / 4)) |
80 | 41 | sqrtmsqi 11064 |
. . . 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 2187 |
. 2
⊢
(sin‘(π / 4)) = (1 / (√‘2)) |
83 | 59, 81 | eqtri 2186 |
. . 3
⊢ (1 /
(√‘2)) = (sin‘(π / 4)) |
84 | 17 | fveq2i 5489 |
. . . 4
⊢
(cos‘((1 / 2) · (π / 2))) = (cos‘(π /
4)) |
85 | 6, 18, 84 | 3eqtr3i 2194 |
. . 3
⊢
(sin‘(π / 4)) = (cos‘(π / 4)) |
86 | 83, 85 | eqtr2i 2187 |
. 2
⊢
(cos‘(π / 4)) = (1 / (√‘2)) |
87 | 82, 86 | pm3.2i 270 |
1
⊢
((sin‘(π / 4)) = (1 / (√‘2)) ∧ (cos‘(π
/ 4)) = (1 / (√‘2))) |