Step | Hyp | Ref
| Expression |
1 | | coscl 11717 |
. . 3
β’ (π΄ β β β
(cosβπ΄) β
β) |
2 | | coscl 11717 |
. . 3
β’ (π΅ β β β
(cosβπ΅) β
β) |
3 | | addcom 8096 |
. . 3
β’
(((cosβπ΄)
β β β§ (cosβπ΅) β β) β ((cosβπ΄) + (cosβπ΅)) = ((cosβπ΅) + (cosβπ΄))) |
4 | 1, 2, 3 | syl2an 289 |
. 2
β’ ((π΄ β β β§ π΅ β β) β
((cosβπ΄) +
(cosβπ΅)) =
((cosβπ΅) +
(cosβπ΄))) |
5 | | halfaddsub 9155 |
. . . . 5
β’ ((π΄ β β β§ π΅ β β) β
((((π΄ + π΅) / 2) + ((π΄ β π΅) / 2)) = π΄ β§ (((π΄ + π΅) / 2) β ((π΄ β π΅) / 2)) = π΅)) |
6 | 5 | simprd 114 |
. . . 4
β’ ((π΄ β β β§ π΅ β β) β (((π΄ + π΅) / 2) β ((π΄ β π΅) / 2)) = π΅) |
7 | 6 | fveq2d 5521 |
. . 3
β’ ((π΄ β β β§ π΅ β β) β
(cosβ(((π΄ + π΅) / 2) β ((π΄ β π΅) / 2))) = (cosβπ΅)) |
8 | 5 | simpld 112 |
. . . 4
β’ ((π΄ β β β§ π΅ β β) β (((π΄ + π΅) / 2) + ((π΄ β π΅) / 2)) = π΄) |
9 | 8 | fveq2d 5521 |
. . 3
β’ ((π΄ β β β§ π΅ β β) β
(cosβ(((π΄ + π΅) / 2) + ((π΄ β π΅) / 2))) = (cosβπ΄)) |
10 | 7, 9 | oveq12d 5895 |
. 2
β’ ((π΄ β β β§ π΅ β β) β
((cosβ(((π΄ + π΅) / 2) β ((π΄ β π΅) / 2))) + (cosβ(((π΄ + π΅) / 2) + ((π΄ β π΅) / 2)))) = ((cosβπ΅) + (cosβπ΄))) |
11 | | halfaddsubcl 9154 |
. . . . 5
β’ ((π΄ β β β§ π΅ β β) β (((π΄ + π΅) / 2) β β β§ ((π΄ β π΅) / 2) β β)) |
12 | | coscl 11717 |
. . . . . 6
β’ (((π΄ + π΅) / 2) β β β
(cosβ((π΄ + π΅) / 2)) β
β) |
13 | | coscl 11717 |
. . . . . 6
β’ (((π΄ β π΅) / 2) β β β
(cosβ((π΄ β
π΅) / 2)) β
β) |
14 | | mulcl 7940 |
. . . . . 6
β’
(((cosβ((π΄ +
π΅) / 2)) β β
β§ (cosβ((π΄
β π΅) / 2)) β
β) β ((cosβ((π΄ + π΅) / 2)) Β· (cosβ((π΄ β π΅) / 2))) β β) |
15 | 12, 13, 14 | syl2an 289 |
. . . . 5
β’ ((((π΄ + π΅) / 2) β β β§ ((π΄ β π΅) / 2) β β) β
((cosβ((π΄ + π΅) / 2)) Β·
(cosβ((π΄ β
π΅) / 2))) β
β) |
16 | 11, 15 | syl 14 |
. . . 4
β’ ((π΄ β β β§ π΅ β β) β
((cosβ((π΄ + π΅) / 2)) Β·
(cosβ((π΄ β
π΅) / 2))) β
β) |
17 | | sincl 11716 |
. . . . . 6
β’ (((π΄ + π΅) / 2) β β β
(sinβ((π΄ + π΅) / 2)) β
β) |
18 | | sincl 11716 |
. . . . . 6
β’ (((π΄ β π΅) / 2) β β β
(sinβ((π΄ β
π΅) / 2)) β
β) |
19 | | mulcl 7940 |
. . . . . 6
β’
(((sinβ((π΄ +
π΅) / 2)) β β
β§ (sinβ((π΄
β π΅) / 2)) β
β) β ((sinβ((π΄ + π΅) / 2)) Β· (sinβ((π΄ β π΅) / 2))) β β) |
20 | 17, 18, 19 | syl2an 289 |
. . . . 5
β’ ((((π΄ + π΅) / 2) β β β§ ((π΄ β π΅) / 2) β β) β
((sinβ((π΄ + π΅) / 2)) Β·
(sinβ((π΄ β
π΅) / 2))) β
β) |
21 | 11, 20 | syl 14 |
. . . 4
β’ ((π΄ β β β§ π΅ β β) β
((sinβ((π΄ + π΅) / 2)) Β·
(sinβ((π΄ β
π΅) / 2))) β
β) |
22 | 16, 21, 16 | ppncand 8310 |
. . 3
β’ ((π΄ β β β§ π΅ β β) β
((((cosβ((π΄ + π΅) / 2)) Β·
(cosβ((π΄ β
π΅) / 2))) +
((sinβ((π΄ + π΅) / 2)) Β·
(sinβ((π΄ β
π΅) / 2)))) +
(((cosβ((π΄ + π΅) / 2)) Β·
(cosβ((π΄ β
π΅) / 2))) β
((sinβ((π΄ + π΅) / 2)) Β·
(sinβ((π΄ β
π΅) / 2))))) =
(((cosβ((π΄ + π΅) / 2)) Β·
(cosβ((π΄ β
π΅) / 2))) +
((cosβ((π΄ + π΅) / 2)) Β·
(cosβ((π΄ β
π΅) /
2))))) |
23 | | cossub 11751 |
. . . . 5
β’ ((((π΄ + π΅) / 2) β β β§ ((π΄ β π΅) / 2) β β) β
(cosβ(((π΄ + π΅) / 2) β ((π΄ β π΅) / 2))) = (((cosβ((π΄ + π΅) / 2)) Β· (cosβ((π΄ β π΅) / 2))) + ((sinβ((π΄ + π΅) / 2)) Β· (sinβ((π΄ β π΅) / 2))))) |
24 | | cosadd 11747 |
. . . . 5
β’ ((((π΄ + π΅) / 2) β β β§ ((π΄ β π΅) / 2) β β) β
(cosβ(((π΄ + π΅) / 2) + ((π΄ β π΅) / 2))) = (((cosβ((π΄ + π΅) / 2)) Β· (cosβ((π΄ β π΅) / 2))) β ((sinβ((π΄ + π΅) / 2)) Β· (sinβ((π΄ β π΅) / 2))))) |
25 | 23, 24 | oveq12d 5895 |
. . . 4
β’ ((((π΄ + π΅) / 2) β β β§ ((π΄ β π΅) / 2) β β) β
((cosβ(((π΄ + π΅) / 2) β ((π΄ β π΅) / 2))) + (cosβ(((π΄ + π΅) / 2) + ((π΄ β π΅) / 2)))) = ((((cosβ((π΄ + π΅) / 2)) Β· (cosβ((π΄ β π΅) / 2))) + ((sinβ((π΄ + π΅) / 2)) Β· (sinβ((π΄ β π΅) / 2)))) + (((cosβ((π΄ + π΅) / 2)) Β· (cosβ((π΄ β π΅) / 2))) β ((sinβ((π΄ + π΅) / 2)) Β· (sinβ((π΄ β π΅) / 2)))))) |
26 | 11, 25 | syl 14 |
. . 3
β’ ((π΄ β β β§ π΅ β β) β
((cosβ(((π΄ + π΅) / 2) β ((π΄ β π΅) / 2))) + (cosβ(((π΄ + π΅) / 2) + ((π΄ β π΅) / 2)))) = ((((cosβ((π΄ + π΅) / 2)) Β· (cosβ((π΄ β π΅) / 2))) + ((sinβ((π΄ + π΅) / 2)) Β· (sinβ((π΄ β π΅) / 2)))) + (((cosβ((π΄ + π΅) / 2)) Β· (cosβ((π΄ β π΅) / 2))) β ((sinβ((π΄ + π΅) / 2)) Β· (sinβ((π΄ β π΅) / 2)))))) |
27 | 16 | 2timesd 9163 |
. . 3
β’ ((π΄ β β β§ π΅ β β) β (2
Β· ((cosβ((π΄ +
π΅) / 2)) Β·
(cosβ((π΄ β
π΅) / 2)))) =
(((cosβ((π΄ + π΅) / 2)) Β·
(cosβ((π΄ β
π΅) / 2))) +
((cosβ((π΄ + π΅) / 2)) Β·
(cosβ((π΄ β
π΅) /
2))))) |
28 | 22, 26, 27 | 3eqtr4d 2220 |
. 2
β’ ((π΄ β β β§ π΅ β β) β
((cosβ(((π΄ + π΅) / 2) β ((π΄ β π΅) / 2))) + (cosβ(((π΄ + π΅) / 2) + ((π΄ β π΅) / 2)))) = (2 Β· ((cosβ((π΄ + π΅) / 2)) Β· (cosβ((π΄ β π΅) / 2))))) |
29 | 4, 10, 28 | 3eqtr2d 2216 |
1
β’ ((π΄ β β β§ π΅ β β) β
((cosβπ΄) +
(cosβπ΅)) = (2
Β· ((cosβ((π΄ +
π΅) / 2)) Β·
(cosβ((π΄ β
π΅) /
2))))) |