Step | Hyp | Ref
| Expression |
1 | | 1red 11211 |
. . . . . 6
β’ (π β 1 β
β) |
2 | 1 | rehalfcld 12455 |
. . . . 5
β’ (π β (1 / 2) β
β) |
3 | | heron.x |
. . . . . . 7
β’ π = (absβ(π΅ β πΆ)) |
4 | | heron.b |
. . . . . . . . 9
β’ (π β π΅ β β) |
5 | | heron.c |
. . . . . . . . 9
β’ (π β πΆ β β) |
6 | 4, 5 | subcld 11567 |
. . . . . . . 8
β’ (π β (π΅ β πΆ) β β) |
7 | 6 | abscld 15379 |
. . . . . . 7
β’ (π β (absβ(π΅ β πΆ)) β β) |
8 | 3, 7 | eqeltrid 2837 |
. . . . . 6
β’ (π β π β β) |
9 | | heron.y |
. . . . . . 7
β’ π = (absβ(π΄ β πΆ)) |
10 | | heron.a |
. . . . . . . . 9
β’ (π β π΄ β β) |
11 | 10, 5 | subcld 11567 |
. . . . . . . 8
β’ (π β (π΄ β πΆ) β β) |
12 | 11 | abscld 15379 |
. . . . . . 7
β’ (π β (absβ(π΄ β πΆ)) β β) |
13 | 9, 12 | eqeltrid 2837 |
. . . . . 6
β’ (π β π β β) |
14 | 8, 13 | remulcld 11240 |
. . . . 5
β’ (π β (π Β· π) β β) |
15 | 2, 14 | remulcld 11240 |
. . . 4
β’ (π β ((1 / 2) Β· (π Β· π)) β β) |
16 | | heron.o |
. . . . . . 7
β’ π = ((π΅ β πΆ)πΉ(π΄ β πΆ)) |
17 | | negpitopissre 26040 |
. . . . . . . . 9
β’
(-Ο(,]Ο) β β |
18 | | heron.f |
. . . . . . . . . 10
β’ πΉ = (π₯ β (β β {0}), π¦ β (β β {0})
β¦ (ββ(logβ(π¦ / π₯)))) |
19 | | heron.bc |
. . . . . . . . . . 11
β’ (π β π΅ β πΆ) |
20 | 4, 5, 19 | subne0d 11576 |
. . . . . . . . . 10
β’ (π β (π΅ β πΆ) β 0) |
21 | | heron.ac |
. . . . . . . . . . 11
β’ (π β π΄ β πΆ) |
22 | 10, 5, 21 | subne0d 11576 |
. . . . . . . . . 10
β’ (π β (π΄ β πΆ) β 0) |
23 | 18, 6, 20, 11, 22 | angcld 26299 |
. . . . . . . . 9
β’ (π β ((π΅ β πΆ)πΉ(π΄ β πΆ)) β (-Ο(,]Ο)) |
24 | 17, 23 | sselid 3979 |
. . . . . . . 8
β’ (π β ((π΅ β πΆ)πΉ(π΄ β πΆ)) β β) |
25 | 24 | recnd 11238 |
. . . . . . 7
β’ (π β ((π΅ β πΆ)πΉ(π΄ β πΆ)) β β) |
26 | 16, 25 | eqeltrid 2837 |
. . . . . 6
β’ (π β π β β) |
27 | 26 | sincld 16069 |
. . . . 5
β’ (π β (sinβπ) β
β) |
28 | 27 | abscld 15379 |
. . . 4
β’ (π β
(absβ(sinβπ))
β β) |
29 | 15, 28 | remulcld 11240 |
. . 3
β’ (π β (((1 / 2) Β· (π Β· π)) Β· (absβ(sinβπ))) β
β) |
30 | | halfge0 12425 |
. . . . . 6
β’ 0 β€ (1
/ 2) |
31 | 30 | a1i 11 |
. . . . 5
β’ (π β 0 β€ (1 /
2)) |
32 | 6 | absge0d 15387 |
. . . . . . 7
β’ (π β 0 β€ (absβ(π΅ β πΆ))) |
33 | 32, 3 | breqtrrdi 5189 |
. . . . . 6
β’ (π β 0 β€ π) |
34 | 11 | absge0d 15387 |
. . . . . . 7
β’ (π β 0 β€ (absβ(π΄ β πΆ))) |
35 | 34, 9 | breqtrrdi 5189 |
. . . . . 6
β’ (π β 0 β€ π) |
36 | 8, 13, 33, 35 | mulge0d 11787 |
. . . . 5
β’ (π β 0 β€ (π Β· π)) |
37 | 2, 14, 31, 36 | mulge0d 11787 |
. . . 4
β’ (π β 0 β€ ((1 / 2) Β·
(π Β· π))) |
38 | 27 | absge0d 15387 |
. . . 4
β’ (π β 0 β€
(absβ(sinβπ))) |
39 | 15, 28, 37, 38 | mulge0d 11787 |
. . 3
β’ (π β 0 β€ (((1 / 2) Β·
(π Β· π)) Β·
(absβ(sinβπ)))) |
40 | 29, 39 | sqrtsqd 15362 |
. 2
β’ (π β (ββ((((1 / 2)
Β· (π Β· π)) Β·
(absβ(sinβπ)))β2)) = (((1 / 2) Β· (π Β· π)) Β· (absβ(sinβπ)))) |
41 | | halfcn 12423 |
. . . . . . 7
β’ (1 / 2)
β β |
42 | 41 | a1i 11 |
. . . . . 6
β’ (π β (1 / 2) β
β) |
43 | 8 | recnd 11238 |
. . . . . . 7
β’ (π β π β β) |
44 | 13 | recnd 11238 |
. . . . . . 7
β’ (π β π β β) |
45 | 43, 44 | mulcld 11230 |
. . . . . 6
β’ (π β (π Β· π) β β) |
46 | 42, 45 | mulcld 11230 |
. . . . 5
β’ (π β ((1 / 2) Β· (π Β· π)) β β) |
47 | 28 | recnd 11238 |
. . . . 5
β’ (π β
(absβ(sinβπ))
β β) |
48 | 46, 47 | sqmuld 14119 |
. . . 4
β’ (π β ((((1 / 2) Β· (π Β· π)) Β· (absβ(sinβπ)))β2) = ((((1 / 2)
Β· (π Β· π))β2) Β·
((absβ(sinβπ))β2))) |
49 | | 2cnd 12286 |
. . . . . . 7
β’ (π β 2 β
β) |
50 | | 2ne0 12312 |
. . . . . . . 8
β’ 2 β
0 |
51 | 50 | a1i 11 |
. . . . . . 7
β’ (π β 2 β 0) |
52 | 45, 49, 51 | sqdivd 14120 |
. . . . . 6
β’ (π β (((π Β· π) / 2)β2) = (((π Β· π)β2) / (2β2))) |
53 | 45, 49, 51 | divrec2d 11990 |
. . . . . . 7
β’ (π β ((π Β· π) / 2) = ((1 / 2) Β· (π Β· π))) |
54 | 53 | oveq1d 7420 |
. . . . . 6
β’ (π β (((π Β· π) / 2)β2) = (((1 / 2) Β· (π Β· π))β2)) |
55 | | sq2 14157 |
. . . . . . . 8
β’
(2β2) = 4 |
56 | 55 | a1i 11 |
. . . . . . 7
β’ (π β (2β2) =
4) |
57 | 56 | oveq2d 7421 |
. . . . . 6
β’ (π β (((π Β· π)β2) / (2β2)) = (((π Β· π)β2) / 4)) |
58 | 52, 54, 57 | 3eqtr3d 2780 |
. . . . 5
β’ (π β (((1 / 2) Β· (π Β· π))β2) = (((π Β· π)β2) / 4)) |
59 | 16, 24 | eqeltrid 2837 |
. . . . . . 7
β’ (π β π β β) |
60 | 59 | resincld 16082 |
. . . . . 6
β’ (π β (sinβπ) β
β) |
61 | | absresq 15245 |
. . . . . 6
β’
((sinβπ)
β β β ((absβ(sinβπ))β2) = ((sinβπ)β2)) |
62 | 60, 61 | syl 17 |
. . . . 5
β’ (π β
((absβ(sinβπ))β2) = ((sinβπ)β2)) |
63 | 58, 62 | oveq12d 7423 |
. . . 4
β’ (π β ((((1 / 2) Β· (π Β· π))β2) Β·
((absβ(sinβπ))β2)) = ((((π Β· π)β2) / 4) Β· ((sinβπ)β2))) |
64 | 45 | sqcld 14105 |
. . . . . . . 8
β’ (π β ((π Β· π)β2) β β) |
65 | 27 | sqcld 14105 |
. . . . . . . 8
β’ (π β ((sinβπ)β2) β
β) |
66 | 64, 65 | mulcld 11230 |
. . . . . . 7
β’ (π β (((π Β· π)β2) Β· ((sinβπ)β2)) β
β) |
67 | | 4cn 12293 |
. . . . . . . . 9
β’ 4 β
β |
68 | 67 | a1i 11 |
. . . . . . . 8
β’ (π β 4 β
β) |
69 | | heron.s |
. . . . . . . . . . . 12
β’ π = (((π + π) + π) / 2) |
70 | 8, 13 | readdcld 11239 |
. . . . . . . . . . . . . 14
β’ (π β (π + π) β β) |
71 | | heron.z |
. . . . . . . . . . . . . . 15
β’ π = (absβ(π΄ β π΅)) |
72 | 10, 4 | subcld 11567 |
. . . . . . . . . . . . . . . 16
β’ (π β (π΄ β π΅) β β) |
73 | 72 | abscld 15379 |
. . . . . . . . . . . . . . 15
β’ (π β (absβ(π΄ β π΅)) β β) |
74 | 71, 73 | eqeltrid 2837 |
. . . . . . . . . . . . . 14
β’ (π β π β β) |
75 | 70, 74 | readdcld 11239 |
. . . . . . . . . . . . 13
β’ (π β ((π + π) + π) β β) |
76 | 75 | rehalfcld 12455 |
. . . . . . . . . . . 12
β’ (π β (((π + π) + π) / 2) β β) |
77 | 69, 76 | eqeltrid 2837 |
. . . . . . . . . . 11
β’ (π β π β β) |
78 | 77 | recnd 11238 |
. . . . . . . . . 10
β’ (π β π β β) |
79 | 78, 43 | subcld 11567 |
. . . . . . . . . 10
β’ (π β (π β π) β β) |
80 | 78, 79 | mulcld 11230 |
. . . . . . . . 9
β’ (π β (π Β· (π β π)) β β) |
81 | 78, 44 | subcld 11567 |
. . . . . . . . . 10
β’ (π β (π β π) β β) |
82 | 74 | recnd 11238 |
. . . . . . . . . . 11
β’ (π β π β β) |
83 | 78, 82 | subcld 11567 |
. . . . . . . . . 10
β’ (π β (π β π) β β) |
84 | 81, 83 | mulcld 11230 |
. . . . . . . . 9
β’ (π β ((π β π) Β· (π β π)) β β) |
85 | 80, 84 | mulcld 11230 |
. . . . . . . 8
β’ (π β ((π Β· (π β π)) Β· ((π β π) Β· (π β π))) β β) |
86 | 68, 85 | mulcld 11230 |
. . . . . . 7
β’ (π β (4 Β· ((π Β· (π β π)) Β· ((π β π) Β· (π β π)))) β β) |
87 | | 4ne0 12316 |
. . . . . . . 8
β’ 4 β
0 |
88 | 87 | a1i 11 |
. . . . . . 7
β’ (π β 4 β 0) |
89 | 49, 45 | sqmuld 14119 |
. . . . . . . . . 10
β’ (π β ((2 Β· (π Β· π))β2) = ((2β2) Β· ((π Β· π)β2))) |
90 | 56 | oveq1d 7420 |
. . . . . . . . . 10
β’ (π β ((2β2) Β·
((π Β· π)β2)) = (4 Β· ((π Β· π)β2))) |
91 | 89, 90 | eqtr2d 2773 |
. . . . . . . . 9
β’ (π β (4 Β· ((π Β· π)β2)) = ((2 Β· (π Β· π))β2)) |
92 | 91 | oveq1d 7420 |
. . . . . . . 8
β’ (π β ((4 Β· ((π Β· π)β2)) Β· ((sinβπ)β2)) = (((2 Β·
(π Β· π))β2) Β·
((sinβπ)β2))) |
93 | 68, 64, 65 | mulassd 11233 |
. . . . . . . 8
β’ (π β ((4 Β· ((π Β· π)β2)) Β· ((sinβπ)β2)) = (4 Β·
(((π Β· π)β2) Β·
((sinβπ)β2)))) |
94 | 49, 45 | mulcld 11230 |
. . . . . . . . . . . . 13
β’ (π β (2 Β· (π Β· π)) β β) |
95 | 94 | sqcld 14105 |
. . . . . . . . . . . 12
β’ (π β ((2 Β· (π Β· π))β2) β β) |
96 | 95, 65 | mulcld 11230 |
. . . . . . . . . . 11
β’ (π β (((2 Β· (π Β· π))β2) Β· ((sinβπ)β2)) β
β) |
97 | 44, 82 | mulcld 11230 |
. . . . . . . . . . . . . 14
β’ (π β (π Β· π) β β) |
98 | 49, 97 | mulcld 11230 |
. . . . . . . . . . . . 13
β’ (π β (2 Β· (π Β· π)) β β) |
99 | 98 | sqcld 14105 |
. . . . . . . . . . . 12
β’ (π β ((2 Β· (π Β· π))β2) β β) |
100 | 44 | sqcld 14105 |
. . . . . . . . . . . . . 14
β’ (π β (πβ2) β β) |
101 | 82 | sqcld 14105 |
. . . . . . . . . . . . . . 15
β’ (π β (πβ2) β β) |
102 | 43 | sqcld 14105 |
. . . . . . . . . . . . . . 15
β’ (π β (πβ2) β β) |
103 | 101, 102 | subcld 11567 |
. . . . . . . . . . . . . 14
β’ (π β ((πβ2) β (πβ2)) β β) |
104 | 100, 103 | addcld 11229 |
. . . . . . . . . . . . 13
β’ (π β ((πβ2) + ((πβ2) β (πβ2))) β β) |
105 | 104 | sqcld 14105 |
. . . . . . . . . . . 12
β’ (π β (((πβ2) + ((πβ2) β (πβ2)))β2) β
β) |
106 | 99, 105 | subcld 11567 |
. . . . . . . . . . 11
β’ (π β (((2 Β· (π Β· π))β2) β (((πβ2) + ((πβ2) β (πβ2)))β2)) β
β) |
107 | 26 | coscld 16070 |
. . . . . . . . . . . . 13
β’ (π β (cosβπ) β
β) |
108 | 107 | sqcld 14105 |
. . . . . . . . . . . 12
β’ (π β ((cosβπ)β2) β
β) |
109 | 95, 108 | mulcld 11230 |
. . . . . . . . . . 11
β’ (π β (((2 Β· (π Β· π))β2) Β· ((cosβπ)β2)) β
β) |
110 | | sincossq 16115 |
. . . . . . . . . . . . . 14
β’ (π β β β
(((sinβπ)β2) +
((cosβπ)β2)) =
1) |
111 | 26, 110 | syl 17 |
. . . . . . . . . . . . 13
β’ (π β (((sinβπ)β2) + ((cosβπ)β2)) = 1) |
112 | 111 | oveq2d 7421 |
. . . . . . . . . . . 12
β’ (π β (((2 Β· (π Β· π))β2) Β· (((sinβπ)β2) + ((cosβπ)β2))) = (((2 Β·
(π Β· π))β2) Β·
1)) |
113 | 95, 65, 108 | adddid 11234 |
. . . . . . . . . . . 12
β’ (π β (((2 Β· (π Β· π))β2) Β· (((sinβπ)β2) + ((cosβπ)β2))) = ((((2 Β·
(π Β· π))β2) Β·
((sinβπ)β2)) +
(((2 Β· (π Β·
π))β2) Β·
((cosβπ)β2)))) |
114 | 100 | 2timesd 12451 |
. . . . . . . . . . . . . . . . . 18
β’ (π β (2 Β· (πβ2)) = ((πβ2) + (πβ2))) |
115 | 100, 103,
100 | ppncand 11607 |
. . . . . . . . . . . . . . . . . 18
β’ (π β (((πβ2) + ((πβ2) β (πβ2))) + ((πβ2) β ((πβ2) β (πβ2)))) = ((πβ2) + (πβ2))) |
116 | 114, 115 | eqtr4d 2775 |
. . . . . . . . . . . . . . . . 17
β’ (π β (2 Β· (πβ2)) = (((πβ2) + ((πβ2) β (πβ2))) + ((πβ2) β ((πβ2) β (πβ2))))) |
117 | 103 | 2timesd 12451 |
. . . . . . . . . . . . . . . . . 18
β’ (π β (2 Β· ((πβ2) β (πβ2))) = (((πβ2) β (πβ2)) + ((πβ2) β (πβ2)))) |
118 | 100, 103,
103 | pnncand 11606 |
. . . . . . . . . . . . . . . . . 18
β’ (π β (((πβ2) + ((πβ2) β (πβ2))) β ((πβ2) β ((πβ2) β (πβ2)))) = (((πβ2) β (πβ2)) + ((πβ2) β (πβ2)))) |
119 | 117, 118 | eqtr4d 2775 |
. . . . . . . . . . . . . . . . 17
β’ (π β (2 Β· ((πβ2) β (πβ2))) = (((πβ2) + ((πβ2) β (πβ2))) β ((πβ2) β ((πβ2) β (πβ2))))) |
120 | 116, 119 | oveq12d 7423 |
. . . . . . . . . . . . . . . 16
β’ (π β ((2 Β· (πβ2)) Β· (2 Β·
((πβ2) β (πβ2)))) = ((((πβ2) + ((πβ2) β (πβ2))) + ((πβ2) β ((πβ2) β (πβ2)))) Β· (((πβ2) + ((πβ2) β (πβ2))) β ((πβ2) β ((πβ2) β (πβ2)))))) |
121 | | 2t2e4 12372 |
. . . . . . . . . . . . . . . . . . 19
β’ (2
Β· 2) = 4 |
122 | 121, 68 | eqeltrid 2837 |
. . . . . . . . . . . . . . . . . 18
β’ (π β (2 Β· 2) β
β) |
123 | 122, 100,
103 | mulassd 11233 |
. . . . . . . . . . . . . . . . 17
β’ (π β (((2 Β· 2) Β·
(πβ2)) Β·
((πβ2) β (πβ2))) = ((2 Β· 2)
Β· ((πβ2)
Β· ((πβ2)
β (πβ2))))) |
124 | 122, 100 | mulcld 11230 |
. . . . . . . . . . . . . . . . . . 19
β’ (π β ((2 Β· 2) Β·
(πβ2)) β
β) |
125 | 124, 101,
102 | subdid 11666 |
. . . . . . . . . . . . . . . . . 18
β’ (π β (((2 Β· 2) Β·
(πβ2)) Β·
((πβ2) β (πβ2))) = ((((2 Β· 2)
Β· (πβ2))
Β· (πβ2))
β (((2 Β· 2) Β· (πβ2)) Β· (πβ2)))) |
126 | 49 | sqvald 14104 |
. . . . . . . . . . . . . . . . . . . . 21
β’ (π β (2β2) = (2 Β·
2)) |
127 | 44, 82 | sqmuld 14119 |
. . . . . . . . . . . . . . . . . . . . 21
β’ (π β ((π Β· π)β2) = ((πβ2) Β· (πβ2))) |
128 | 126, 127 | oveq12d 7423 |
. . . . . . . . . . . . . . . . . . . 20
β’ (π β ((2β2) Β·
((π Β· π)β2)) = ((2 Β· 2)
Β· ((πβ2)
Β· (πβ2)))) |
129 | 49, 97 | sqmuld 14119 |
. . . . . . . . . . . . . . . . . . . 20
β’ (π β ((2 Β· (π Β· π))β2) = ((2β2) Β· ((π Β· π)β2))) |
130 | 122, 100,
101 | mulassd 11233 |
. . . . . . . . . . . . . . . . . . . 20
β’ (π β (((2 Β· 2) Β·
(πβ2)) Β· (πβ2)) = ((2 Β· 2)
Β· ((πβ2)
Β· (πβ2)))) |
131 | 128, 129,
130 | 3eqtr4d 2782 |
. . . . . . . . . . . . . . . . . . 19
β’ (π β ((2 Β· (π Β· π))β2) = (((2 Β· 2) Β·
(πβ2)) Β· (πβ2))) |
132 | 43, 44 | sqmuld 14119 |
. . . . . . . . . . . . . . . . . . . . . 22
β’ (π β ((π Β· π)β2) = ((πβ2) Β· (πβ2))) |
133 | 102, 100 | mulcomd 11231 |
. . . . . . . . . . . . . . . . . . . . . 22
β’ (π β ((πβ2) Β· (πβ2)) = ((πβ2) Β· (πβ2))) |
134 | 132, 133 | eqtrd 2772 |
. . . . . . . . . . . . . . . . . . . . 21
β’ (π β ((π Β· π)β2) = ((πβ2) Β· (πβ2))) |
135 | 126, 134 | oveq12d 7423 |
. . . . . . . . . . . . . . . . . . . 20
β’ (π β ((2β2) Β·
((π Β· π)β2)) = ((2 Β· 2)
Β· ((πβ2)
Β· (πβ2)))) |
136 | 122, 100,
102 | mulassd 11233 |
. . . . . . . . . . . . . . . . . . . 20
β’ (π β (((2 Β· 2) Β·
(πβ2)) Β· (πβ2)) = ((2 Β· 2)
Β· ((πβ2)
Β· (πβ2)))) |
137 | 135, 89, 136 | 3eqtr4d 2782 |
. . . . . . . . . . . . . . . . . . 19
β’ (π β ((2 Β· (π Β· π))β2) = (((2 Β· 2) Β·
(πβ2)) Β· (πβ2))) |
138 | 131, 137 | oveq12d 7423 |
. . . . . . . . . . . . . . . . . 18
β’ (π β (((2 Β· (π Β· π))β2) β ((2 Β· (π Β· π))β2)) = ((((2 Β· 2) Β·
(πβ2)) Β· (πβ2)) β (((2 Β·
2) Β· (πβ2))
Β· (πβ2)))) |
139 | 125, 138 | eqtr4d 2775 |
. . . . . . . . . . . . . . . . 17
β’ (π β (((2 Β· 2) Β·
(πβ2)) Β·
((πβ2) β (πβ2))) = (((2 Β·
(π Β· π))β2) β ((2 Β·
(π Β· π))β2))) |
140 | 49, 49, 100, 103 | mul4d 11422 |
. . . . . . . . . . . . . . . . 17
β’ (π β ((2 Β· 2) Β·
((πβ2) Β·
((πβ2) β (πβ2)))) = ((2 Β·
(πβ2)) Β· (2
Β· ((πβ2)
β (πβ2))))) |
141 | 123, 139,
140 | 3eqtr3d 2780 |
. . . . . . . . . . . . . . . 16
β’ (π β (((2 Β· (π Β· π))β2) β ((2 Β· (π Β· π))β2)) = ((2 Β· (πβ2)) Β· (2 Β·
((πβ2) β (πβ2))))) |
142 | 100, 103 | subcld 11567 |
. . . . . . . . . . . . . . . . 17
β’ (π β ((πβ2) β ((πβ2) β (πβ2))) β β) |
143 | | subsq 14170 |
. . . . . . . . . . . . . . . . 17
β’ ((((πβ2) + ((πβ2) β (πβ2))) β β β§ ((πβ2) β ((πβ2) β (πβ2))) β β)
β ((((πβ2) +
((πβ2) β (πβ2)))β2) β
(((πβ2) β
((πβ2) β (πβ2)))β2)) = ((((πβ2) + ((πβ2) β (πβ2))) + ((πβ2) β ((πβ2) β (πβ2)))) Β· (((πβ2) + ((πβ2) β (πβ2))) β ((πβ2) β ((πβ2) β (πβ2)))))) |
144 | 104, 142,
143 | syl2anc 584 |
. . . . . . . . . . . . . . . 16
β’ (π β ((((πβ2) + ((πβ2) β (πβ2)))β2) β (((πβ2) β ((πβ2) β (πβ2)))β2)) = ((((πβ2) + ((πβ2) β (πβ2))) + ((πβ2) β ((πβ2) β (πβ2)))) Β· (((πβ2) + ((πβ2) β (πβ2))) β ((πβ2) β ((πβ2) β (πβ2)))))) |
145 | 120, 141,
144 | 3eqtr4d 2782 |
. . . . . . . . . . . . . . 15
β’ (π β (((2 Β· (π Β· π))β2) β ((2 Β· (π Β· π))β2)) = ((((πβ2) + ((πβ2) β (πβ2)))β2) β (((πβ2) β ((πβ2) β (πβ2)))β2))) |
146 | 145 | oveq2d 7421 |
. . . . . . . . . . . . . 14
β’ (π β (((2 Β· (π Β· π))β2) β (((2 Β· (π Β· π))β2) β ((2 Β· (π Β· π))β2))) = (((2 Β· (π Β· π))β2) β ((((πβ2) + ((πβ2) β (πβ2)))β2) β (((πβ2) β ((πβ2) β (πβ2)))β2)))) |
147 | 99, 95 | nncand 11572 |
. . . . . . . . . . . . . 14
β’ (π β (((2 Β· (π Β· π))β2) β (((2 Β· (π Β· π))β2) β ((2 Β· (π Β· π))β2))) = ((2 Β· (π Β· π))β2)) |
148 | 142 | sqcld 14105 |
. . . . . . . . . . . . . . 15
β’ (π β (((πβ2) β ((πβ2) β (πβ2)))β2) β
β) |
149 | 99, 105, 148 | subsubd 11595 |
. . . . . . . . . . . . . 14
β’ (π β (((2 Β· (π Β· π))β2) β ((((πβ2) + ((πβ2) β (πβ2)))β2) β (((πβ2) β ((πβ2) β (πβ2)))β2))) = ((((2
Β· (π Β· π))β2) β (((πβ2) + ((πβ2) β (πβ2)))β2)) + (((πβ2) β ((πβ2) β (πβ2)))β2))) |
150 | 146, 147,
149 | 3eqtr3d 2780 |
. . . . . . . . . . . . 13
β’ (π β ((2 Β· (π Β· π))β2) = ((((2 Β· (π Β· π))β2) β (((πβ2) + ((πβ2) β (πβ2)))β2)) + (((πβ2) β ((πβ2) β (πβ2)))β2))) |
151 | 95 | mulridd 11227 |
. . . . . . . . . . . . 13
β’ (π β (((2 Β· (π Β· π))β2) Β· 1) = ((2 Β· (π Β· π))β2)) |
152 | 102, 100 | addcld 11229 |
. . . . . . . . . . . . . . . . . 18
β’ (π β ((πβ2) + (πβ2)) β β) |
153 | 45, 107 | mulcld 11230 |
. . . . . . . . . . . . . . . . . . 19
β’ (π β ((π Β· π) Β· (cosβπ)) β β) |
154 | 49, 153 | mulcld 11230 |
. . . . . . . . . . . . . . . . . 18
β’ (π β (2 Β· ((π Β· π) Β· (cosβπ))) β β) |
155 | 152, 154 | nncand 11572 |
. . . . . . . . . . . . . . . . 17
β’ (π β (((πβ2) + (πβ2)) β (((πβ2) + (πβ2)) β (2 Β· ((π Β· π) Β· (cosβπ))))) = (2 Β· ((π Β· π) Β· (cosβπ)))) |
156 | 100, 101 | subcld 11567 |
. . . . . . . . . . . . . . . . . . . 20
β’ (π β ((πβ2) β (πβ2)) β β) |
157 | 156, 102 | addcomd 11412 |
. . . . . . . . . . . . . . . . . . 19
β’ (π β (((πβ2) β (πβ2)) + (πβ2)) = ((πβ2) + ((πβ2) β (πβ2)))) |
158 | 100, 101,
102 | subsubd 11595 |
. . . . . . . . . . . . . . . . . . 19
β’ (π β ((πβ2) β ((πβ2) β (πβ2))) = (((πβ2) β (πβ2)) + (πβ2))) |
159 | 102, 100,
101 | addsubassd 11587 |
. . . . . . . . . . . . . . . . . . 19
β’ (π β (((πβ2) + (πβ2)) β (πβ2)) = ((πβ2) + ((πβ2) β (πβ2)))) |
160 | 157, 158,
159 | 3eqtr4d 2782 |
. . . . . . . . . . . . . . . . . 18
β’ (π β ((πβ2) β ((πβ2) β (πβ2))) = (((πβ2) + (πβ2)) β (πβ2))) |
161 | 18, 3, 9, 71, 16 | lawcos 26310 |
. . . . . . . . . . . . . . . . . . . 20
β’ (((π΄ β β β§ π΅ β β β§ πΆ β β) β§ (π΄ β πΆ β§ π΅ β πΆ)) β (πβ2) = (((πβ2) + (πβ2)) β (2 Β· ((π Β· π) Β· (cosβπ))))) |
162 | 10, 4, 5, 21, 19, 161 | syl32anc 1378 |
. . . . . . . . . . . . . . . . . . 19
β’ (π β (πβ2) = (((πβ2) + (πβ2)) β (2 Β· ((π Β· π) Β· (cosβπ))))) |
163 | 162 | oveq2d 7421 |
. . . . . . . . . . . . . . . . . 18
β’ (π β (((πβ2) + (πβ2)) β (πβ2)) = (((πβ2) + (πβ2)) β (((πβ2) + (πβ2)) β (2 Β· ((π Β· π) Β· (cosβπ)))))) |
164 | 160, 163 | eqtrd 2772 |
. . . . . . . . . . . . . . . . 17
β’ (π β ((πβ2) β ((πβ2) β (πβ2))) = (((πβ2) + (πβ2)) β (((πβ2) + (πβ2)) β (2 Β· ((π Β· π) Β· (cosβπ)))))) |
165 | 49, 45, 107 | mulassd 11233 |
. . . . . . . . . . . . . . . . 17
β’ (π β ((2 Β· (π Β· π)) Β· (cosβπ)) = (2 Β· ((π Β· π) Β· (cosβπ)))) |
166 | 155, 164,
165 | 3eqtr4d 2782 |
. . . . . . . . . . . . . . . 16
β’ (π β ((πβ2) β ((πβ2) β (πβ2))) = ((2 Β· (π Β· π)) Β· (cosβπ))) |
167 | 166 | oveq1d 7420 |
. . . . . . . . . . . . . . 15
β’ (π β (((πβ2) β ((πβ2) β (πβ2)))β2) = (((2 Β· (π Β· π)) Β· (cosβπ))β2)) |
168 | 94, 107 | sqmuld 14119 |
. . . . . . . . . . . . . . 15
β’ (π β (((2 Β· (π Β· π)) Β· (cosβπ))β2) = (((2 Β· (π Β· π))β2) Β· ((cosβπ)β2))) |
169 | 167, 168 | eqtr2d 2773 |
. . . . . . . . . . . . . 14
β’ (π β (((2 Β· (π Β· π))β2) Β· ((cosβπ)β2)) = (((πβ2) β ((πβ2) β (πβ2)))β2)) |
170 | 169 | oveq2d 7421 |
. . . . . . . . . . . . 13
β’ (π β ((((2 Β· (π Β· π))β2) β (((πβ2) + ((πβ2) β (πβ2)))β2)) + (((2 Β· (π Β· π))β2) Β· ((cosβπ)β2))) = ((((2 Β·
(π Β· π))β2) β (((πβ2) + ((πβ2) β (πβ2)))β2)) + (((πβ2) β ((πβ2) β (πβ2)))β2))) |
171 | 150, 151,
170 | 3eqtr4d 2782 |
. . . . . . . . . . . 12
β’ (π β (((2 Β· (π Β· π))β2) Β· 1) = ((((2 Β·
(π Β· π))β2) β (((πβ2) + ((πβ2) β (πβ2)))β2)) + (((2 Β· (π Β· π))β2) Β· ((cosβπ)β2)))) |
172 | 112, 113,
171 | 3eqtr3d 2780 |
. . . . . . . . . . 11
β’ (π β ((((2 Β· (π Β· π))β2) Β· ((sinβπ)β2)) + (((2 Β·
(π Β· π))β2) Β·
((cosβπ)β2))) =
((((2 Β· (π Β·
π))β2) β
(((πβ2) + ((πβ2) β (πβ2)))β2)) + (((2
Β· (π Β· π))β2) Β·
((cosβπ)β2)))) |
173 | 96, 106, 109, 172 | addcan2ad 11416 |
. . . . . . . . . 10
β’ (π β (((2 Β· (π Β· π))β2) Β· ((sinβπ)β2)) = (((2 Β·
(π Β· π))β2) β (((πβ2) + ((πβ2) β (πβ2)))β2))) |
174 | | subsq 14170 |
. . . . . . . . . . 11
β’ (((2
Β· (π Β· π)) β β β§ ((πβ2) + ((πβ2) β (πβ2))) β β) β (((2
Β· (π Β· π))β2) β (((πβ2) + ((πβ2) β (πβ2)))β2)) = (((2 Β· (π Β· π)) + ((πβ2) + ((πβ2) β (πβ2)))) Β· ((2 Β· (π Β· π)) β ((πβ2) + ((πβ2) β (πβ2)))))) |
175 | 98, 104, 174 | syl2anc 584 |
. . . . . . . . . 10
β’ (π β (((2 Β· (π Β· π))β2) β (((πβ2) + ((πβ2) β (πβ2)))β2)) = (((2 Β· (π Β· π)) + ((πβ2) + ((πβ2) β (πβ2)))) Β· ((2 Β· (π Β· π)) β ((πβ2) + ((πβ2) β (πβ2)))))) |
176 | 100, 101 | addcld 11229 |
. . . . . . . . . . . . . 14
β’ (π β ((πβ2) + (πβ2)) β β) |
177 | 98, 176, 102 | addsubassd 11587 |
. . . . . . . . . . . . 13
β’ (π β (((2 Β· (π Β· π)) + ((πβ2) + (πβ2))) β (πβ2)) = ((2 Β· (π Β· π)) + (((πβ2) + (πβ2)) β (πβ2)))) |
178 | 100, 101,
102 | addsubassd 11587 |
. . . . . . . . . . . . . 14
β’ (π β (((πβ2) + (πβ2)) β (πβ2)) = ((πβ2) + ((πβ2) β (πβ2)))) |
179 | 178 | oveq2d 7421 |
. . . . . . . . . . . . 13
β’ (π β ((2 Β· (π Β· π)) + (((πβ2) + (πβ2)) β (πβ2))) = ((2 Β· (π Β· π)) + ((πβ2) + ((πβ2) β (πβ2))))) |
180 | 177, 179 | eqtr2d 2773 |
. . . . . . . . . . . 12
β’ (π β ((2 Β· (π Β· π)) + ((πβ2) + ((πβ2) β (πβ2)))) = (((2 Β· (π Β· π)) + ((πβ2) + (πβ2))) β (πβ2))) |
181 | | binom2 14177 |
. . . . . . . . . . . . . . 15
β’ ((π β β β§ π β β) β ((π + π)β2) = (((πβ2) + (2 Β· (π Β· π))) + (πβ2))) |
182 | 44, 82, 181 | syl2anc 584 |
. . . . . . . . . . . . . 14
β’ (π β ((π + π)β2) = (((πβ2) + (2 Β· (π Β· π))) + (πβ2))) |
183 | 100, 98, 101 | add32d 11437 |
. . . . . . . . . . . . . 14
β’ (π β (((πβ2) + (2 Β· (π Β· π))) + (πβ2)) = (((πβ2) + (πβ2)) + (2 Β· (π Β· π)))) |
184 | 176, 98 | addcomd 11412 |
. . . . . . . . . . . . . 14
β’ (π β (((πβ2) + (πβ2)) + (2 Β· (π Β· π))) = ((2 Β· (π Β· π)) + ((πβ2) + (πβ2)))) |
185 | 182, 183,
184 | 3eqtrd 2776 |
. . . . . . . . . . . . 13
β’ (π β ((π + π)β2) = ((2 Β· (π Β· π)) + ((πβ2) + (πβ2)))) |
186 | 185 | oveq1d 7420 |
. . . . . . . . . . . 12
β’ (π β (((π + π)β2) β (πβ2)) = (((2 Β· (π Β· π)) + ((πβ2) + (πβ2))) β (πβ2))) |
187 | 44, 82 | addcld 11229 |
. . . . . . . . . . . . . . 15
β’ (π β (π + π) β β) |
188 | | subsq 14170 |
. . . . . . . . . . . . . . 15
β’ (((π + π) β β β§ π β β) β (((π + π)β2) β (πβ2)) = (((π + π) + π) Β· ((π + π) β π))) |
189 | 187, 43, 188 | syl2anc 584 |
. . . . . . . . . . . . . 14
β’ (π β (((π + π)β2) β (πβ2)) = (((π + π) + π) Β· ((π + π) β π))) |
190 | 69 | oveq2i 7416 |
. . . . . . . . . . . . . . . . 17
β’ (2
Β· π) = (2 Β·
(((π + π) + π) / 2)) |
191 | 75 | recnd 11238 |
. . . . . . . . . . . . . . . . . 18
β’ (π β ((π + π) + π) β β) |
192 | 191, 49, 51 | divcan2d 11988 |
. . . . . . . . . . . . . . . . 17
β’ (π β (2 Β· (((π + π) + π) / 2)) = ((π + π) + π)) |
193 | 190, 192 | eqtrid 2784 |
. . . . . . . . . . . . . . . 16
β’ (π β (2 Β· π) = ((π + π) + π)) |
194 | 43, 44, 82 | addassd 11232 |
. . . . . . . . . . . . . . . 16
β’ (π β ((π + π) + π) = (π + (π + π))) |
195 | 43, 187 | addcomd 11412 |
. . . . . . . . . . . . . . . 16
β’ (π β (π + (π + π)) = ((π + π) + π)) |
196 | 193, 194,
195 | 3eqtrd 2776 |
. . . . . . . . . . . . . . 15
β’ (π β (2 Β· π) = ((π + π) + π)) |
197 | 49, 78, 43 | subdid 11666 |
. . . . . . . . . . . . . . . 16
β’ (π β (2 Β· (π β π)) = ((2 Β· π) β (2 Β· π))) |
198 | 193, 194 | eqtrd 2772 |
. . . . . . . . . . . . . . . . 17
β’ (π β (2 Β· π) = (π + (π + π))) |
199 | 43 | 2timesd 12451 |
. . . . . . . . . . . . . . . . 17
β’ (π β (2 Β· π) = (π + π)) |
200 | 198, 199 | oveq12d 7423 |
. . . . . . . . . . . . . . . 16
β’ (π β ((2 Β· π) β (2 Β· π)) = ((π + (π + π)) β (π + π))) |
201 | 43, 187, 43 | pnpcand 11604 |
. . . . . . . . . . . . . . . 16
β’ (π β ((π + (π + π)) β (π + π)) = ((π + π) β π)) |
202 | 197, 200,
201 | 3eqtrd 2776 |
. . . . . . . . . . . . . . 15
β’ (π β (2 Β· (π β π)) = ((π + π) β π)) |
203 | 196, 202 | oveq12d 7423 |
. . . . . . . . . . . . . 14
β’ (π β ((2 Β· π) Β· (2 Β· (π β π))) = (((π + π) + π) Β· ((π + π) β π))) |
204 | 189, 203 | eqtr4d 2775 |
. . . . . . . . . . . . 13
β’ (π β (((π + π)β2) β (πβ2)) = ((2 Β· π) Β· (2 Β· (π β π)))) |
205 | 49, 78, 49, 79 | mul4d 11422 |
. . . . . . . . . . . . 13
β’ (π β ((2 Β· π) Β· (2 Β· (π β π))) = ((2 Β· 2) Β· (π Β· (π β π)))) |
206 | 121 | a1i 11 |
. . . . . . . . . . . . . 14
β’ (π β (2 Β· 2) =
4) |
207 | 206 | oveq1d 7420 |
. . . . . . . . . . . . 13
β’ (π β ((2 Β· 2) Β·
(π Β· (π β π))) = (4 Β· (π Β· (π β π)))) |
208 | 204, 205,
207 | 3eqtrd 2776 |
. . . . . . . . . . . 12
β’ (π β (((π + π)β2) β (πβ2)) = (4 Β· (π Β· (π β π)))) |
209 | 180, 186,
208 | 3eqtr2d 2778 |
. . . . . . . . . . 11
β’ (π β ((2 Β· (π Β· π)) + ((πβ2) + ((πβ2) β (πβ2)))) = (4 Β· (π Β· (π β π)))) |
210 | 98, 176 | subcld 11567 |
. . . . . . . . . . . . . 14
β’ (π β ((2 Β· (π Β· π)) β ((πβ2) + (πβ2))) β β) |
211 | 210, 102 | addcomd 11412 |
. . . . . . . . . . . . 13
β’ (π β (((2 Β· (π Β· π)) β ((πβ2) + (πβ2))) + (πβ2)) = ((πβ2) + ((2 Β· (π Β· π)) β ((πβ2) + (πβ2))))) |
212 | 178 | oveq2d 7421 |
. . . . . . . . . . . . . 14
β’ (π β ((2 Β· (π Β· π)) β (((πβ2) + (πβ2)) β (πβ2))) = ((2 Β· (π Β· π)) β ((πβ2) + ((πβ2) β (πβ2))))) |
213 | 98, 176, 102 | subsubd 11595 |
. . . . . . . . . . . . . 14
β’ (π β ((2 Β· (π Β· π)) β (((πβ2) + (πβ2)) β (πβ2))) = (((2 Β· (π Β· π)) β ((πβ2) + (πβ2))) + (πβ2))) |
214 | 212, 213 | eqtr3d 2774 |
. . . . . . . . . . . . 13
β’ (π β ((2 Β· (π Β· π)) β ((πβ2) + ((πβ2) β (πβ2)))) = (((2 Β· (π Β· π)) β ((πβ2) + (πβ2))) + (πβ2))) |
215 | 102, 176,
98 | subsub2d 11596 |
. . . . . . . . . . . . 13
β’ (π β ((πβ2) β (((πβ2) + (πβ2)) β (2 Β· (π Β· π)))) = ((πβ2) + ((2 Β· (π Β· π)) β ((πβ2) + (πβ2))))) |
216 | 211, 214,
215 | 3eqtr4d 2782 |
. . . . . . . . . . . 12
β’ (π β ((2 Β· (π Β· π)) β ((πβ2) + ((πβ2) β (πβ2)))) = ((πβ2) β (((πβ2) + (πβ2)) β (2 Β· (π Β· π))))) |
217 | 100, 101,
98 | addsubassd 11587 |
. . . . . . . . . . . . . . 15
β’ (π β (((πβ2) + (πβ2)) β (2 Β· (π Β· π))) = ((πβ2) + ((πβ2) β (2 Β· (π Β· π))))) |
218 | 101, 98 | subcld 11567 |
. . . . . . . . . . . . . . . 16
β’ (π β ((πβ2) β (2 Β· (π Β· π))) β β) |
219 | 100, 218 | addcomd 11412 |
. . . . . . . . . . . . . . 15
β’ (π β ((πβ2) + ((πβ2) β (2 Β· (π Β· π)))) = (((πβ2) β (2 Β· (π Β· π))) + (πβ2))) |
220 | 44, 82 | mulcomd 11231 |
. . . . . . . . . . . . . . . . . 18
β’ (π β (π Β· π) = (π Β· π)) |
221 | 220 | oveq2d 7421 |
. . . . . . . . . . . . . . . . 17
β’ (π β (2 Β· (π Β· π)) = (2 Β· (π Β· π))) |
222 | 221 | oveq2d 7421 |
. . . . . . . . . . . . . . . 16
β’ (π β ((πβ2) β (2 Β· (π Β· π))) = ((πβ2) β (2 Β· (π Β· π)))) |
223 | 222 | oveq1d 7420 |
. . . . . . . . . . . . . . 15
β’ (π β (((πβ2) β (2 Β· (π Β· π))) + (πβ2)) = (((πβ2) β (2 Β· (π Β· π))) + (πβ2))) |
224 | 217, 219,
223 | 3eqtrd 2776 |
. . . . . . . . . . . . . 14
β’ (π β (((πβ2) + (πβ2)) β (2 Β· (π Β· π))) = (((πβ2) β (2 Β· (π Β· π))) + (πβ2))) |
225 | | binom2sub 14179 |
. . . . . . . . . . . . . . 15
β’ ((π β β β§ π β β) β ((π β π)β2) = (((πβ2) β (2 Β· (π Β· π))) + (πβ2))) |
226 | 82, 44, 225 | syl2anc 584 |
. . . . . . . . . . . . . 14
β’ (π β ((π β π)β2) = (((πβ2) β (2 Β· (π Β· π))) + (πβ2))) |
227 | 224, 226 | eqtr4d 2775 |
. . . . . . . . . . . . 13
β’ (π β (((πβ2) + (πβ2)) β (2 Β· (π Β· π))) = ((π β π)β2)) |
228 | 227 | oveq2d 7421 |
. . . . . . . . . . . 12
β’ (π β ((πβ2) β (((πβ2) + (πβ2)) β (2 Β· (π Β· π)))) = ((πβ2) β ((π β π)β2))) |
229 | 82, 44 | subcld 11567 |
. . . . . . . . . . . . . . 15
β’ (π β (π β π) β β) |
230 | | subsq 14170 |
. . . . . . . . . . . . . . 15
β’ ((π β β β§ (π β π) β β) β ((πβ2) β ((π β π)β2)) = ((π + (π β π)) Β· (π β (π β π)))) |
231 | 43, 229, 230 | syl2anc 584 |
. . . . . . . . . . . . . 14
β’ (π β ((πβ2) β ((π β π)β2)) = ((π + (π β π)) Β· (π β (π β π)))) |
232 | 49, 78, 44 | subdid 11666 |
. . . . . . . . . . . . . . . 16
β’ (π β (2 Β· (π β π)) = ((2 Β· π) β (2 Β· π))) |
233 | 43, 44, 82 | add32d 11437 |
. . . . . . . . . . . . . . . . . 18
β’ (π β ((π + π) + π) = ((π + π) + π)) |
234 | 193, 233 | eqtrd 2772 |
. . . . . . . . . . . . . . . . 17
β’ (π β (2 Β· π) = ((π + π) + π)) |
235 | 44 | 2timesd 12451 |
. . . . . . . . . . . . . . . . 17
β’ (π β (2 Β· π) = (π + π)) |
236 | 234, 235 | oveq12d 7423 |
. . . . . . . . . . . . . . . 16
β’ (π β ((2 Β· π) β (2 Β· π)) = (((π + π) + π) β (π + π))) |
237 | 43, 82 | addcld 11229 |
. . . . . . . . . . . . . . . . . 18
β’ (π β (π + π) β β) |
238 | 237, 44, 44 | pnpcan2d 11605 |
. . . . . . . . . . . . . . . . 17
β’ (π β (((π + π) + π) β (π + π)) = ((π + π) β π)) |
239 | 43, 82, 44, 238 | assraddsubd 11624 |
. . . . . . . . . . . . . . . 16
β’ (π β (((π + π) + π) β (π + π)) = (π + (π β π))) |
240 | 232, 236,
239 | 3eqtrd 2776 |
. . . . . . . . . . . . . . 15
β’ (π β (2 Β· (π β π)) = (π + (π β π))) |
241 | 49, 78, 82 | subdid 11666 |
. . . . . . . . . . . . . . . 16
β’ (π β (2 Β· (π β π)) = ((2 Β· π) β (2 Β· π))) |
242 | 82 | 2timesd 12451 |
. . . . . . . . . . . . . . . . 17
β’ (π β (2 Β· π) = (π + π)) |
243 | 193, 242 | oveq12d 7423 |
. . . . . . . . . . . . . . . 16
β’ (π β ((2 Β· π) β (2 Β· π)) = (((π + π) + π) β (π + π))) |
244 | 43, 44 | addcld 11229 |
. . . . . . . . . . . . . . . . . 18
β’ (π β (π + π) β β) |
245 | 244, 82, 82 | pnpcan2d 11605 |
. . . . . . . . . . . . . . . . 17
β’ (π β (((π + π) + π) β (π + π)) = ((π + π) β π)) |
246 | 43, 82, 44 | subsub3d 11597 |
. . . . . . . . . . . . . . . . 17
β’ (π β (π β (π β π)) = ((π + π) β π)) |
247 | 245, 246 | eqtr4d 2775 |
. . . . . . . . . . . . . . . 16
β’ (π β (((π + π) + π) β (π + π)) = (π β (π β π))) |
248 | 241, 243,
247 | 3eqtrd 2776 |
. . . . . . . . . . . . . . 15
β’ (π β (2 Β· (π β π)) = (π β (π β π))) |
249 | 240, 248 | oveq12d 7423 |
. . . . . . . . . . . . . 14
β’ (π β ((2 Β· (π β π)) Β· (2 Β· (π β π))) = ((π + (π β π)) Β· (π β (π β π)))) |
250 | 231, 249 | eqtr4d 2775 |
. . . . . . . . . . . . 13
β’ (π β ((πβ2) β ((π β π)β2)) = ((2 Β· (π β π)) Β· (2 Β· (π β π)))) |
251 | 49, 81, 49, 83 | mul4d 11422 |
. . . . . . . . . . . . 13
β’ (π β ((2 Β· (π β π)) Β· (2 Β· (π β π))) = ((2 Β· 2) Β· ((π β π) Β· (π β π)))) |
252 | 206 | oveq1d 7420 |
. . . . . . . . . . . . 13
β’ (π β ((2 Β· 2) Β·
((π β π) Β· (π β π))) = (4 Β· ((π β π) Β· (π β π)))) |
253 | 250, 251,
252 | 3eqtrd 2776 |
. . . . . . . . . . . 12
β’ (π β ((πβ2) β ((π β π)β2)) = (4 Β· ((π β π) Β· (π β π)))) |
254 | 216, 228,
253 | 3eqtrd 2776 |
. . . . . . . . . . 11
β’ (π β ((2 Β· (π Β· π)) β ((πβ2) + ((πβ2) β (πβ2)))) = (4 Β· ((π β π) Β· (π β π)))) |
255 | 209, 254 | oveq12d 7423 |
. . . . . . . . . 10
β’ (π β (((2 Β· (π Β· π)) + ((πβ2) + ((πβ2) β (πβ2)))) Β· ((2 Β· (π Β· π)) β ((πβ2) + ((πβ2) β (πβ2))))) = ((4 Β· (π Β· (π β π))) Β· (4 Β· ((π β π) Β· (π β π))))) |
256 | 173, 175,
255 | 3eqtrd 2776 |
. . . . . . . . 9
β’ (π β (((2 Β· (π Β· π))β2) Β· ((sinβπ)β2)) = ((4 Β· (π Β· (π β π))) Β· (4 Β· ((π β π) Β· (π β π))))) |
257 | 68, 84 | mulcld 11230 |
. . . . . . . . . 10
β’ (π β (4 Β· ((π β π) Β· (π β π))) β β) |
258 | 68, 80, 257 | mulassd 11233 |
. . . . . . . . 9
β’ (π β ((4 Β· (π Β· (π β π))) Β· (4 Β· ((π β π) Β· (π β π)))) = (4 Β· ((π Β· (π β π)) Β· (4 Β· ((π β π) Β· (π β π)))))) |
259 | 80, 68, 84 | mul12d 11419 |
. . . . . . . . . 10
β’ (π β ((π Β· (π β π)) Β· (4 Β· ((π β π) Β· (π β π)))) = (4 Β· ((π Β· (π β π)) Β· ((π β π) Β· (π β π))))) |
260 | 259 | oveq2d 7421 |
. . . . . . . . 9
β’ (π β (4 Β· ((π Β· (π β π)) Β· (4 Β· ((π β π) Β· (π β π))))) = (4 Β· (4 Β· ((π Β· (π β π)) Β· ((π β π) Β· (π β π)))))) |
261 | 256, 258,
260 | 3eqtrd 2776 |
. . . . . . . 8
β’ (π β (((2 Β· (π Β· π))β2) Β· ((sinβπ)β2)) = (4 Β· (4
Β· ((π Β·
(π β π)) Β· ((π β π) Β· (π β π)))))) |
262 | 92, 93, 261 | 3eqtr3d 2780 |
. . . . . . 7
β’ (π β (4 Β· (((π Β· π)β2) Β· ((sinβπ)β2))) = (4 Β· (4
Β· ((π Β·
(π β π)) Β· ((π β π) Β· (π β π)))))) |
263 | 66, 86, 68, 88, 262 | mulcanad 11845 |
. . . . . 6
β’ (π β (((π Β· π)β2) Β· ((sinβπ)β2)) = (4 Β· ((π Β· (π β π)) Β· ((π β π) Β· (π β π))))) |
264 | 263 | oveq1d 7420 |
. . . . 5
β’ (π β ((((π Β· π)β2) Β· ((sinβπ)β2)) / 4) = ((4 Β·
((π Β· (π β π)) Β· ((π β π) Β· (π β π)))) / 4)) |
265 | 64, 65, 68, 88 | div23d 12023 |
. . . . 5
β’ (π β ((((π Β· π)β2) Β· ((sinβπ)β2)) / 4) = ((((π Β· π)β2) / 4) Β· ((sinβπ)β2))) |
266 | 77, 8 | resubcld 11638 |
. . . . . . . . 9
β’ (π β (π β π) β β) |
267 | 77, 266 | remulcld 11240 |
. . . . . . . 8
β’ (π β (π Β· (π β π)) β β) |
268 | 77, 13 | resubcld 11638 |
. . . . . . . . 9
β’ (π β (π β π) β β) |
269 | 77, 74 | resubcld 11638 |
. . . . . . . . 9
β’ (π β (π β π) β β) |
270 | 268, 269 | remulcld 11240 |
. . . . . . . 8
β’ (π β ((π β π) Β· (π β π)) β β) |
271 | 267, 270 | remulcld 11240 |
. . . . . . 7
β’ (π β ((π Β· (π β π)) Β· ((π β π) Β· (π β π))) β β) |
272 | 271 | recnd 11238 |
. . . . . 6
β’ (π β ((π Β· (π β π)) Β· ((π β π) Β· (π β π))) β β) |
273 | 272, 68, 88 | divcan3d 11991 |
. . . . 5
β’ (π β ((4 Β· ((π Β· (π β π)) Β· ((π β π) Β· (π β π)))) / 4) = ((π Β· (π β π)) Β· ((π β π) Β· (π β π)))) |
274 | 264, 265,
273 | 3eqtr3d 2780 |
. . . 4
β’ (π β ((((π Β· π)β2) / 4) Β· ((sinβπ)β2)) = ((π Β· (π β π)) Β· ((π β π) Β· (π β π)))) |
275 | 48, 63, 274 | 3eqtrd 2776 |
. . 3
β’ (π β ((((1 / 2) Β· (π Β· π)) Β· (absβ(sinβπ)))β2) = ((π Β· (π β π)) Β· ((π β π) Β· (π β π)))) |
276 | 275 | fveq2d 6892 |
. 2
β’ (π β (ββ((((1 / 2)
Β· (π Β· π)) Β·
(absβ(sinβπ)))β2)) = (ββ((π Β· (π β π)) Β· ((π β π) Β· (π β π))))) |
277 | 40, 276 | eqtr3d 2774 |
1
β’ (π β (((1 / 2) Β· (π Β· π)) Β· (absβ(sinβπ))) = (ββ((π Β· (π β π)) Β· ((π β π) Β· (π β π))))) |