Proof of Theorem ptolemy
| Step | Hyp | Ref
 | Expression | 
| 1 |   | addcl 8004 | 
. . . . . . . . . . 11
⊢ ((𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ) → (𝐶 + 𝐷) ∈ ℂ) | 
| 2 | 1 | 3ad2ant2 1021 | 
. . . . . . . . . 10
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ) ∧ ((𝐴 + 𝐵) + (𝐶 + 𝐷)) = π) → (𝐶 + 𝐷) ∈ ℂ) | 
| 3 | 2 | coscld 11876 | 
. . . . . . . . 9
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ) ∧ ((𝐴 + 𝐵) + (𝐶 + 𝐷)) = π) → (cos‘(𝐶 + 𝐷)) ∈ ℂ) | 
| 4 | 3 | negnegd 8328 | 
. . . . . . . 8
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ) ∧ ((𝐴 + 𝐵) + (𝐶 + 𝐷)) = π) → --(cos‘(𝐶 + 𝐷)) = (cos‘(𝐶 + 𝐷))) | 
| 5 |   | addlid 8165 | 
. . . . . . . . . . . . . . 15
⊢ ((𝐶 + 𝐷) ∈ ℂ → (0 + (𝐶 + 𝐷)) = (𝐶 + 𝐷)) | 
| 6 | 5 | oveq1d 5937 | 
. . . . . . . . . . . . . 14
⊢ ((𝐶 + 𝐷) ∈ ℂ → ((0 + (𝐶 + 𝐷)) − ((𝐴 + 𝐵) + (𝐶 + 𝐷))) = ((𝐶 + 𝐷) − ((𝐴 + 𝐵) + (𝐶 + 𝐷)))) | 
| 7 | 2, 6 | syl 14 | 
. . . . . . . . . . . . 13
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ) ∧ ((𝐴 + 𝐵) + (𝐶 + 𝐷)) = π) → ((0 + (𝐶 + 𝐷)) − ((𝐴 + 𝐵) + (𝐶 + 𝐷))) = ((𝐶 + 𝐷) − ((𝐴 + 𝐵) + (𝐶 + 𝐷)))) | 
| 8 |   | 0cnd 8019 | 
. . . . . . . . . . . . . 14
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ) ∧ ((𝐴 + 𝐵) + (𝐶 + 𝐷)) = π) → 0 ∈
ℂ) | 
| 9 |   | addcl 8004 | 
. . . . . . . . . . . . . . . 16
⊢ ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) → (𝐴 + 𝐵) ∈ ℂ) | 
| 10 | 9 | adantr 276 | 
. . . . . . . . . . . . . . 15
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ)) → (𝐴 + 𝐵) ∈ ℂ) | 
| 11 | 10 | 3adant3 1019 | 
. . . . . . . . . . . . . 14
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ) ∧ ((𝐴 + 𝐵) + (𝐶 + 𝐷)) = π) → (𝐴 + 𝐵) ∈ ℂ) | 
| 12 | 8, 11, 2 | pnpcan2d 8375 | 
. . . . . . . . . . . . 13
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ) ∧ ((𝐴 + 𝐵) + (𝐶 + 𝐷)) = π) → ((0 + (𝐶 + 𝐷)) − ((𝐴 + 𝐵) + (𝐶 + 𝐷))) = (0 − (𝐴 + 𝐵))) | 
| 13 |   | simp3 1001 | 
. . . . . . . . . . . . . 14
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ) ∧ ((𝐴 + 𝐵) + (𝐶 + 𝐷)) = π) → ((𝐴 + 𝐵) + (𝐶 + 𝐷)) = π) | 
| 14 | 13 | oveq2d 5938 | 
. . . . . . . . . . . . 13
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ) ∧ ((𝐴 + 𝐵) + (𝐶 + 𝐷)) = π) → ((𝐶 + 𝐷) − ((𝐴 + 𝐵) + (𝐶 + 𝐷))) = ((𝐶 + 𝐷) − π)) | 
| 15 | 7, 12, 14 | 3eqtr3rd 2238 | 
. . . . . . . . . . . 12
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ) ∧ ((𝐴 + 𝐵) + (𝐶 + 𝐷)) = π) → ((𝐶 + 𝐷) − π) = (0 − (𝐴 + 𝐵))) | 
| 16 |   | df-neg 8200 | 
. . . . . . . . . . . 12
⊢ -(𝐴 + 𝐵) = (0 − (𝐴 + 𝐵)) | 
| 17 | 15, 16 | eqtr4di 2247 | 
. . . . . . . . . . 11
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ) ∧ ((𝐴 + 𝐵) + (𝐶 + 𝐷)) = π) → ((𝐶 + 𝐷) − π) = -(𝐴 + 𝐵)) | 
| 18 | 17 | fveq2d 5562 | 
. . . . . . . . . 10
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ) ∧ ((𝐴 + 𝐵) + (𝐶 + 𝐷)) = π) → (cos‘((𝐶 + 𝐷) − π)) = (cos‘-(𝐴 + 𝐵))) | 
| 19 |   | cosmpi 15052 | 
. . . . . . . . . . 11
⊢ ((𝐶 + 𝐷) ∈ ℂ → (cos‘((𝐶 + 𝐷) − π)) = -(cos‘(𝐶 + 𝐷))) | 
| 20 | 2, 19 | syl 14 | 
. . . . . . . . . 10
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ) ∧ ((𝐴 + 𝐵) + (𝐶 + 𝐷)) = π) → (cos‘((𝐶 + 𝐷) − π)) = -(cos‘(𝐶 + 𝐷))) | 
| 21 |   | cosneg 11892 | 
. . . . . . . . . . 11
⊢ ((𝐴 + 𝐵) ∈ ℂ → (cos‘-(𝐴 + 𝐵)) = (cos‘(𝐴 + 𝐵))) | 
| 22 | 11, 21 | syl 14 | 
. . . . . . . . . 10
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ) ∧ ((𝐴 + 𝐵) + (𝐶 + 𝐷)) = π) → (cos‘-(𝐴 + 𝐵)) = (cos‘(𝐴 + 𝐵))) | 
| 23 | 18, 20, 22 | 3eqtr3d 2237 | 
. . . . . . . . 9
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ) ∧ ((𝐴 + 𝐵) + (𝐶 + 𝐷)) = π) → -(cos‘(𝐶 + 𝐷)) = (cos‘(𝐴 + 𝐵))) | 
| 24 | 23 | negeqd 8221 | 
. . . . . . . 8
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ) ∧ ((𝐴 + 𝐵) + (𝐶 + 𝐷)) = π) → --(cos‘(𝐶 + 𝐷)) = -(cos‘(𝐴 + 𝐵))) | 
| 25 | 4, 24 | eqtr3d 2231 | 
. . . . . . 7
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ) ∧ ((𝐴 + 𝐵) + (𝐶 + 𝐷)) = π) → (cos‘(𝐶 + 𝐷)) = -(cos‘(𝐴 + 𝐵))) | 
| 26 | 25 | oveq2d 5938 | 
. . . . . 6
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ) ∧ ((𝐴 + 𝐵) + (𝐶 + 𝐷)) = π) → ((cos‘(𝐶 − 𝐷)) − (cos‘(𝐶 + 𝐷))) = ((cos‘(𝐶 − 𝐷)) − -(cos‘(𝐴 + 𝐵)))) | 
| 27 |   | subcl 8225 | 
. . . . . . . . . 10
⊢ ((𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ) → (𝐶 − 𝐷) ∈ ℂ) | 
| 28 | 27 | adantl 277 | 
. . . . . . . . 9
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ)) → (𝐶 − 𝐷) ∈ ℂ) | 
| 29 | 28 | coscld 11876 | 
. . . . . . . 8
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ)) →
(cos‘(𝐶 − 𝐷)) ∈
ℂ) | 
| 30 | 29 | 3adant3 1019 | 
. . . . . . 7
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ) ∧ ((𝐴 + 𝐵) + (𝐶 + 𝐷)) = π) → (cos‘(𝐶 − 𝐷)) ∈ ℂ) | 
| 31 | 11 | coscld 11876 | 
. . . . . . 7
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ) ∧ ((𝐴 + 𝐵) + (𝐶 + 𝐷)) = π) → (cos‘(𝐴 + 𝐵)) ∈ ℂ) | 
| 32 | 30, 31 | subnegd 8344 | 
. . . . . 6
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ) ∧ ((𝐴 + 𝐵) + (𝐶 + 𝐷)) = π) → ((cos‘(𝐶 − 𝐷)) − -(cos‘(𝐴 + 𝐵))) = ((cos‘(𝐶 − 𝐷)) + (cos‘(𝐴 + 𝐵)))) | 
| 33 | 26, 32 | eqtrd 2229 | 
. . . . 5
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ) ∧ ((𝐴 + 𝐵) + (𝐶 + 𝐷)) = π) → ((cos‘(𝐶 − 𝐷)) − (cos‘(𝐶 + 𝐷))) = ((cos‘(𝐶 − 𝐷)) + (cos‘(𝐴 + 𝐵)))) | 
| 34 | 33 | oveq1d 5937 | 
. . . 4
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ) ∧ ((𝐴 + 𝐵) + (𝐶 + 𝐷)) = π) → (((cos‘(𝐶 − 𝐷)) − (cos‘(𝐶 + 𝐷))) / 2) = (((cos‘(𝐶 − 𝐷)) + (cos‘(𝐴 + 𝐵))) / 2)) | 
| 35 | 34 | oveq2d 5938 | 
. . 3
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ) ∧ ((𝐴 + 𝐵) + (𝐶 + 𝐷)) = π) → ((((cos‘(𝐴 − 𝐵)) − (cos‘(𝐴 + 𝐵))) / 2) + (((cos‘(𝐶 − 𝐷)) − (cos‘(𝐶 + 𝐷))) / 2)) = ((((cos‘(𝐴 − 𝐵)) − (cos‘(𝐴 + 𝐵))) / 2) + (((cos‘(𝐶 − 𝐷)) + (cos‘(𝐴 + 𝐵))) / 2))) | 
| 36 |   | subcl 8225 | 
. . . . . . . 8
⊢ ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) → (𝐴 − 𝐵) ∈ ℂ) | 
| 37 | 36 | 3ad2ant1 1020 | 
. . . . . . 7
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ) ∧ ((𝐴 + 𝐵) + (𝐶 + 𝐷)) = π) → (𝐴 − 𝐵) ∈ ℂ) | 
| 38 | 37 | coscld 11876 | 
. . . . . 6
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ) ∧ ((𝐴 + 𝐵) + (𝐶 + 𝐷)) = π) → (cos‘(𝐴 − 𝐵)) ∈ ℂ) | 
| 39 | 38, 31 | subcld 8337 | 
. . . . 5
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ) ∧ ((𝐴 + 𝐵) + (𝐶 + 𝐷)) = π) → ((cos‘(𝐴 − 𝐵)) − (cos‘(𝐴 + 𝐵))) ∈ ℂ) | 
| 40 | 30, 31 | addcld 8046 | 
. . . . 5
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ) ∧ ((𝐴 + 𝐵) + (𝐶 + 𝐷)) = π) → ((cos‘(𝐶 − 𝐷)) + (cos‘(𝐴 + 𝐵))) ∈ ℂ) | 
| 41 |   | 2cn 9061 | 
. . . . . . 7
⊢ 2 ∈
ℂ | 
| 42 |   | 2ap0 9083 | 
. . . . . . 7
⊢ 2 #
0 | 
| 43 | 41, 42 | pm3.2i 272 | 
. . . . . 6
⊢ (2 ∈
ℂ ∧ 2 # 0) | 
| 44 | 43 | a1i 9 | 
. . . . 5
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ) ∧ ((𝐴 + 𝐵) + (𝐶 + 𝐷)) = π) → (2 ∈ ℂ ∧ 2
# 0)) | 
| 45 |   | divdirap 8724 | 
. . . . 5
⊢
((((cos‘(𝐴
− 𝐵)) −
(cos‘(𝐴 + 𝐵))) ∈ ℂ ∧
((cos‘(𝐶 −
𝐷)) + (cos‘(𝐴 + 𝐵))) ∈ ℂ ∧ (2 ∈ ℂ
∧ 2 # 0)) → ((((cos‘(𝐴 − 𝐵)) − (cos‘(𝐴 + 𝐵))) + ((cos‘(𝐶 − 𝐷)) + (cos‘(𝐴 + 𝐵)))) / 2) = ((((cos‘(𝐴 − 𝐵)) − (cos‘(𝐴 + 𝐵))) / 2) + (((cos‘(𝐶 − 𝐷)) + (cos‘(𝐴 + 𝐵))) / 2))) | 
| 46 | 39, 40, 44, 45 | syl3anc 1249 | 
. . . 4
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ) ∧ ((𝐴 + 𝐵) + (𝐶 + 𝐷)) = π) → ((((cos‘(𝐴 − 𝐵)) − (cos‘(𝐴 + 𝐵))) + ((cos‘(𝐶 − 𝐷)) + (cos‘(𝐴 + 𝐵)))) / 2) = ((((cos‘(𝐴 − 𝐵)) − (cos‘(𝐴 + 𝐵))) / 2) + (((cos‘(𝐶 − 𝐷)) + (cos‘(𝐴 + 𝐵))) / 2))) | 
| 47 | 38, 31, 30 | nppcan3d 8364 | 
. . . . 5
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ) ∧ ((𝐴 + 𝐵) + (𝐶 + 𝐷)) = π) → (((cos‘(𝐴 − 𝐵)) − (cos‘(𝐴 + 𝐵))) + ((cos‘(𝐶 − 𝐷)) + (cos‘(𝐴 + 𝐵)))) = ((cos‘(𝐴 − 𝐵)) + (cos‘(𝐶 − 𝐷)))) | 
| 48 | 47 | oveq1d 5937 | 
. . . 4
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ) ∧ ((𝐴 + 𝐵) + (𝐶 + 𝐷)) = π) → ((((cos‘(𝐴 − 𝐵)) − (cos‘(𝐴 + 𝐵))) + ((cos‘(𝐶 − 𝐷)) + (cos‘(𝐴 + 𝐵)))) / 2) = (((cos‘(𝐴 − 𝐵)) + (cos‘(𝐶 − 𝐷))) / 2)) | 
| 49 | 46, 48 | eqtr3d 2231 | 
. . 3
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ) ∧ ((𝐴 + 𝐵) + (𝐶 + 𝐷)) = π) → ((((cos‘(𝐴 − 𝐵)) − (cos‘(𝐴 + 𝐵))) / 2) + (((cos‘(𝐶 − 𝐷)) + (cos‘(𝐴 + 𝐵))) / 2)) = (((cos‘(𝐴 − 𝐵)) + (cos‘(𝐶 − 𝐷))) / 2)) | 
| 50 | 35, 49 | eqtrd 2229 | 
. 2
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ) ∧ ((𝐴 + 𝐵) + (𝐶 + 𝐷)) = π) → ((((cos‘(𝐴 − 𝐵)) − (cos‘(𝐴 + 𝐵))) / 2) + (((cos‘(𝐶 − 𝐷)) − (cos‘(𝐶 + 𝐷))) / 2)) = (((cos‘(𝐴 − 𝐵)) + (cos‘(𝐶 − 𝐷))) / 2)) | 
| 51 |   | sinmul 11909 | 
. . . 4
⊢ ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) →
((sin‘𝐴) ·
(sin‘𝐵)) =
(((cos‘(𝐴 −
𝐵)) −
(cos‘(𝐴 + 𝐵))) / 2)) | 
| 52 | 51 | 3ad2ant1 1020 | 
. . 3
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ) ∧ ((𝐴 + 𝐵) + (𝐶 + 𝐷)) = π) → ((sin‘𝐴) · (sin‘𝐵)) = (((cos‘(𝐴 − 𝐵)) − (cos‘(𝐴 + 𝐵))) / 2)) | 
| 53 |   | sinmul 11909 | 
. . . 4
⊢ ((𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ) →
((sin‘𝐶) ·
(sin‘𝐷)) =
(((cos‘(𝐶 −
𝐷)) −
(cos‘(𝐶 + 𝐷))) / 2)) | 
| 54 | 53 | 3ad2ant2 1021 | 
. . 3
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ) ∧ ((𝐴 + 𝐵) + (𝐶 + 𝐷)) = π) → ((sin‘𝐶) · (sin‘𝐷)) = (((cos‘(𝐶 − 𝐷)) − (cos‘(𝐶 + 𝐷))) / 2)) | 
| 55 | 52, 54 | oveq12d 5940 | 
. 2
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ) ∧ ((𝐴 + 𝐵) + (𝐶 + 𝐷)) = π) → (((sin‘𝐴) · (sin‘𝐵)) + ((sin‘𝐶) · (sin‘𝐷))) = ((((cos‘(𝐴 − 𝐵)) − (cos‘(𝐴 + 𝐵))) / 2) + (((cos‘(𝐶 − 𝐷)) − (cos‘(𝐶 + 𝐷))) / 2))) | 
| 56 |   | simplr 528 | 
. . . . . . . . 9
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ)) → 𝐵 ∈
ℂ) | 
| 57 |   | simpll 527 | 
. . . . . . . . 9
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ)) → 𝐴 ∈
ℂ) | 
| 58 |   | simprl 529 | 
. . . . . . . . 9
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ)) → 𝐶 ∈
ℂ) | 
| 59 | 56, 57, 58 | pnpcan2d 8375 | 
. . . . . . . 8
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ)) → ((𝐵 + 𝐶) − (𝐴 + 𝐶)) = (𝐵 − 𝐴)) | 
| 60 | 59 | fveq2d 5562 | 
. . . . . . 7
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ)) →
(cos‘((𝐵 + 𝐶) − (𝐴 + 𝐶))) = (cos‘(𝐵 − 𝐴))) | 
| 61 | 60 | 3adant3 1019 | 
. . . . . 6
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ) ∧ ((𝐴 + 𝐵) + (𝐶 + 𝐷)) = π) → (cos‘((𝐵 + 𝐶) − (𝐴 + 𝐶))) = (cos‘(𝐵 − 𝐴))) | 
| 62 | 1 | adantl 277 | 
. . . . . . . . . . . . 13
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ)) → (𝐶 + 𝐷) ∈ ℂ) | 
| 63 | 10, 62, 28 | 3jca 1179 | 
. . . . . . . . . . . 12
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ)) → ((𝐴 + 𝐵) ∈ ℂ ∧ (𝐶 + 𝐷) ∈ ℂ ∧ (𝐶 − 𝐷) ∈ ℂ)) | 
| 64 | 63 | 3adant3 1019 | 
. . . . . . . . . . 11
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ) ∧ ((𝐴 + 𝐵) + (𝐶 + 𝐷)) = π) → ((𝐴 + 𝐵) ∈ ℂ ∧ (𝐶 + 𝐷) ∈ ℂ ∧ (𝐶 − 𝐷) ∈ ℂ)) | 
| 65 |   | addass 8009 | 
. . . . . . . . . . 11
⊢ (((𝐴 + 𝐵) ∈ ℂ ∧ (𝐶 + 𝐷) ∈ ℂ ∧ (𝐶 − 𝐷) ∈ ℂ) → (((𝐴 + 𝐵) + (𝐶 + 𝐷)) + (𝐶 − 𝐷)) = ((𝐴 + 𝐵) + ((𝐶 + 𝐷) + (𝐶 − 𝐷)))) | 
| 66 | 64, 65 | syl 14 | 
. . . . . . . . . 10
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ) ∧ ((𝐴 + 𝐵) + (𝐶 + 𝐷)) = π) → (((𝐴 + 𝐵) + (𝐶 + 𝐷)) + (𝐶 − 𝐷)) = ((𝐴 + 𝐵) + ((𝐶 + 𝐷) + (𝐶 − 𝐷)))) | 
| 67 |   | oveq1 5929 | 
. . . . . . . . . . 11
⊢ (((𝐴 + 𝐵) + (𝐶 + 𝐷)) = π → (((𝐴 + 𝐵) + (𝐶 + 𝐷)) + (𝐶 − 𝐷)) = (π + (𝐶 − 𝐷))) | 
| 68 | 67 | 3ad2ant3 1022 | 
. . . . . . . . . 10
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ) ∧ ((𝐴 + 𝐵) + (𝐶 + 𝐷)) = π) → (((𝐴 + 𝐵) + (𝐶 + 𝐷)) + (𝐶 − 𝐷)) = (π + (𝐶 − 𝐷))) | 
| 69 |   | simpl 109 | 
. . . . . . . . . . . . . 14
⊢ ((𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ) → 𝐶 ∈
ℂ) | 
| 70 |   | simpr 110 | 
. . . . . . . . . . . . . 14
⊢ ((𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ) → 𝐷 ∈
ℂ) | 
| 71 | 69, 70, 69 | 3jca 1179 | 
. . . . . . . . . . . . 13
⊢ ((𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ) → (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ ∧ 𝐶 ∈
ℂ)) | 
| 72 | 71 | 3ad2ant2 1021 | 
. . . . . . . . . . . 12
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ) ∧ ((𝐴 + 𝐵) + (𝐶 + 𝐷)) = π) → (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ ∧ 𝐶 ∈ ℂ)) | 
| 73 |   | ppncan 8268 | 
. . . . . . . . . . . . 13
⊢ ((𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ ∧ 𝐶 ∈ ℂ) → ((𝐶 + 𝐷) + (𝐶 − 𝐷)) = (𝐶 + 𝐶)) | 
| 74 | 73 | oveq2d 5938 | 
. . . . . . . . . . . 12
⊢ ((𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ ∧ 𝐶 ∈ ℂ) → ((𝐴 + 𝐵) + ((𝐶 + 𝐷) + (𝐶 − 𝐷))) = ((𝐴 + 𝐵) + (𝐶 + 𝐶))) | 
| 75 | 72, 74 | syl 14 | 
. . . . . . . . . . 11
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ) ∧ ((𝐴 + 𝐵) + (𝐶 + 𝐷)) = π) → ((𝐴 + 𝐵) + ((𝐶 + 𝐷) + (𝐶 − 𝐷))) = ((𝐴 + 𝐵) + (𝐶 + 𝐶))) | 
| 76 |   | simp1 999 | 
. . . . . . . . . . . 12
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ) ∧ ((𝐴 + 𝐵) + (𝐶 + 𝐷)) = π) → (𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ)) | 
| 77 | 69, 69 | jca 306 | 
. . . . . . . . . . . . 13
⊢ ((𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ) → (𝐶 ∈ ℂ ∧ 𝐶 ∈
ℂ)) | 
| 78 | 77 | 3ad2ant2 1021 | 
. . . . . . . . . . . 12
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ) ∧ ((𝐴 + 𝐵) + (𝐶 + 𝐷)) = π) → (𝐶 ∈ ℂ ∧ 𝐶 ∈ ℂ)) | 
| 79 |   | add4 8187 | 
. . . . . . . . . . . 12
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐶 ∈ ℂ)) → ((𝐴 + 𝐵) + (𝐶 + 𝐶)) = ((𝐴 + 𝐶) + (𝐵 + 𝐶))) | 
| 80 | 76, 78, 79 | syl2anc 411 | 
. . . . . . . . . . 11
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ) ∧ ((𝐴 + 𝐵) + (𝐶 + 𝐷)) = π) → ((𝐴 + 𝐵) + (𝐶 + 𝐶)) = ((𝐴 + 𝐶) + (𝐵 + 𝐶))) | 
| 81 |   | addcl 8004 | 
. . . . . . . . . . . . . . 15
⊢ ((𝐴 ∈ ℂ ∧ 𝐶 ∈ ℂ) → (𝐴 + 𝐶) ∈ ℂ) | 
| 82 | 81 | ad2ant2r 509 | 
. . . . . . . . . . . . . 14
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ)) → (𝐴 + 𝐶) ∈ ℂ) | 
| 83 |   | addcl 8004 | 
. . . . . . . . . . . . . . 15
⊢ ((𝐵 ∈ ℂ ∧ 𝐶 ∈ ℂ) → (𝐵 + 𝐶) ∈ ℂ) | 
| 84 | 83 | ad2ant2lr 510 | 
. . . . . . . . . . . . . 14
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ)) → (𝐵 + 𝐶) ∈ ℂ) | 
| 85 | 82, 84 | jca 306 | 
. . . . . . . . . . . . 13
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ)) → ((𝐴 + 𝐶) ∈ ℂ ∧ (𝐵 + 𝐶) ∈ ℂ)) | 
| 86 | 85 | 3adant3 1019 | 
. . . . . . . . . . . 12
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ) ∧ ((𝐴 + 𝐵) + (𝐶 + 𝐷)) = π) → ((𝐴 + 𝐶) ∈ ℂ ∧ (𝐵 + 𝐶) ∈ ℂ)) | 
| 87 |   | addcom 8163 | 
. . . . . . . . . . . 12
⊢ (((𝐴 + 𝐶) ∈ ℂ ∧ (𝐵 + 𝐶) ∈ ℂ) → ((𝐴 + 𝐶) + (𝐵 + 𝐶)) = ((𝐵 + 𝐶) + (𝐴 + 𝐶))) | 
| 88 | 86, 87 | syl 14 | 
. . . . . . . . . . 11
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ) ∧ ((𝐴 + 𝐵) + (𝐶 + 𝐷)) = π) → ((𝐴 + 𝐶) + (𝐵 + 𝐶)) = ((𝐵 + 𝐶) + (𝐴 + 𝐶))) | 
| 89 | 75, 80, 88 | 3eqtrd 2233 | 
. . . . . . . . . 10
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ) ∧ ((𝐴 + 𝐵) + (𝐶 + 𝐷)) = π) → ((𝐴 + 𝐵) + ((𝐶 + 𝐷) + (𝐶 − 𝐷))) = ((𝐵 + 𝐶) + (𝐴 + 𝐶))) | 
| 90 | 66, 68, 89 | 3eqtr3rd 2238 | 
. . . . . . . . 9
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ) ∧ ((𝐴 + 𝐵) + (𝐶 + 𝐷)) = π) → ((𝐵 + 𝐶) + (𝐴 + 𝐶)) = (π + (𝐶 − 𝐷))) | 
| 91 |   | picn 15023 | 
. . . . . . . . . . 11
⊢ π
∈ ℂ | 
| 92 |   | addcom 8163 | 
. . . . . . . . . . 11
⊢ ((π
∈ ℂ ∧ (𝐶
− 𝐷) ∈ ℂ)
→ (π + (𝐶 −
𝐷)) = ((𝐶 − 𝐷) + π)) | 
| 93 | 91, 28, 92 | sylancr 414 | 
. . . . . . . . . 10
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ)) → (π +
(𝐶 − 𝐷)) = ((𝐶 − 𝐷) + π)) | 
| 94 | 93 | 3adant3 1019 | 
. . . . . . . . 9
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ) ∧ ((𝐴 + 𝐵) + (𝐶 + 𝐷)) = π) → (π + (𝐶 − 𝐷)) = ((𝐶 − 𝐷) + π)) | 
| 95 | 90, 94 | eqtrd 2229 | 
. . . . . . . 8
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ) ∧ ((𝐴 + 𝐵) + (𝐶 + 𝐷)) = π) → ((𝐵 + 𝐶) + (𝐴 + 𝐶)) = ((𝐶 − 𝐷) + π)) | 
| 96 | 95 | fveq2d 5562 | 
. . . . . . 7
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ) ∧ ((𝐴 + 𝐵) + (𝐶 + 𝐷)) = π) → (cos‘((𝐵 + 𝐶) + (𝐴 + 𝐶))) = (cos‘((𝐶 − 𝐷) + π))) | 
| 97 |   | cosppi 15054 | 
. . . . . . . . 9
⊢ ((𝐶 − 𝐷) ∈ ℂ → (cos‘((𝐶 − 𝐷) + π)) = -(cos‘(𝐶 − 𝐷))) | 
| 98 | 28, 97 | syl 14 | 
. . . . . . . 8
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ)) →
(cos‘((𝐶 −
𝐷) + π)) =
-(cos‘(𝐶 −
𝐷))) | 
| 99 | 98 | 3adant3 1019 | 
. . . . . . 7
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ) ∧ ((𝐴 + 𝐵) + (𝐶 + 𝐷)) = π) → (cos‘((𝐶 − 𝐷) + π)) = -(cos‘(𝐶 − 𝐷))) | 
| 100 | 96, 99 | eqtrd 2229 | 
. . . . . 6
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ) ∧ ((𝐴 + 𝐵) + (𝐶 + 𝐷)) = π) → (cos‘((𝐵 + 𝐶) + (𝐴 + 𝐶))) = -(cos‘(𝐶 − 𝐷))) | 
| 101 | 61, 100 | oveq12d 5940 | 
. . . . 5
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ) ∧ ((𝐴 + 𝐵) + (𝐶 + 𝐷)) = π) → ((cos‘((𝐵 + 𝐶) − (𝐴 + 𝐶))) − (cos‘((𝐵 + 𝐶) + (𝐴 + 𝐶)))) = ((cos‘(𝐵 − 𝐴)) − -(cos‘(𝐶 − 𝐷)))) | 
| 102 |   | subcl 8225 | 
. . . . . . . . . 10
⊢ ((𝐵 ∈ ℂ ∧ 𝐴 ∈ ℂ) → (𝐵 − 𝐴) ∈ ℂ) | 
| 103 | 102 | ancoms 268 | 
. . . . . . . . 9
⊢ ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) → (𝐵 − 𝐴) ∈ ℂ) | 
| 104 | 103 | adantr 276 | 
. . . . . . . 8
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ)) → (𝐵 − 𝐴) ∈ ℂ) | 
| 105 | 104 | coscld 11876 | 
. . . . . . 7
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ)) →
(cos‘(𝐵 − 𝐴)) ∈
ℂ) | 
| 106 | 105, 29 | subnegd 8344 | 
. . . . . 6
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ)) →
((cos‘(𝐵 −
𝐴)) −
-(cos‘(𝐶 −
𝐷))) = ((cos‘(𝐵 − 𝐴)) + (cos‘(𝐶 − 𝐷)))) | 
| 107 | 106 | 3adant3 1019 | 
. . . . 5
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ) ∧ ((𝐴 + 𝐵) + (𝐶 + 𝐷)) = π) → ((cos‘(𝐵 − 𝐴)) − -(cos‘(𝐶 − 𝐷))) = ((cos‘(𝐵 − 𝐴)) + (cos‘(𝐶 − 𝐷)))) | 
| 108 | 101, 107 | eqtrd 2229 | 
. . . 4
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ) ∧ ((𝐴 + 𝐵) + (𝐶 + 𝐷)) = π) → ((cos‘((𝐵 + 𝐶) − (𝐴 + 𝐶))) − (cos‘((𝐵 + 𝐶) + (𝐴 + 𝐶)))) = ((cos‘(𝐵 − 𝐴)) + (cos‘(𝐶 − 𝐷)))) | 
| 109 | 108 | oveq1d 5937 | 
. . 3
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ) ∧ ((𝐴 + 𝐵) + (𝐶 + 𝐷)) = π) → (((cos‘((𝐵 + 𝐶) − (𝐴 + 𝐶))) − (cos‘((𝐵 + 𝐶) + (𝐴 + 𝐶)))) / 2) = (((cos‘(𝐵 − 𝐴)) + (cos‘(𝐶 − 𝐷))) / 2)) | 
| 110 |   | sinmul 11909 | 
. . . . 5
⊢ (((𝐵 + 𝐶) ∈ ℂ ∧ (𝐴 + 𝐶) ∈ ℂ) → ((sin‘(𝐵 + 𝐶)) · (sin‘(𝐴 + 𝐶))) = (((cos‘((𝐵 + 𝐶) − (𝐴 + 𝐶))) − (cos‘((𝐵 + 𝐶) + (𝐴 + 𝐶)))) / 2)) | 
| 111 | 84, 82, 110 | syl2anc 411 | 
. . . 4
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ)) →
((sin‘(𝐵 + 𝐶)) · (sin‘(𝐴 + 𝐶))) = (((cos‘((𝐵 + 𝐶) − (𝐴 + 𝐶))) − (cos‘((𝐵 + 𝐶) + (𝐴 + 𝐶)))) / 2)) | 
| 112 | 111 | 3adant3 1019 | 
. . 3
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ) ∧ ((𝐴 + 𝐵) + (𝐶 + 𝐷)) = π) → ((sin‘(𝐵 + 𝐶)) · (sin‘(𝐴 + 𝐶))) = (((cos‘((𝐵 + 𝐶) − (𝐴 + 𝐶))) − (cos‘((𝐵 + 𝐶) + (𝐴 + 𝐶)))) / 2)) | 
| 113 |   | cosneg 11892 | 
. . . . . . . 8
⊢ ((𝐴 − 𝐵) ∈ ℂ → (cos‘-(𝐴 − 𝐵)) = (cos‘(𝐴 − 𝐵))) | 
| 114 | 36, 113 | syl 14 | 
. . . . . . 7
⊢ ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) →
(cos‘-(𝐴 −
𝐵)) = (cos‘(𝐴 − 𝐵))) | 
| 115 |   | negsubdi2 8285 | 
. . . . . . . 8
⊢ ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) → -(𝐴 − 𝐵) = (𝐵 − 𝐴)) | 
| 116 | 115 | fveq2d 5562 | 
. . . . . . 7
⊢ ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) →
(cos‘-(𝐴 −
𝐵)) = (cos‘(𝐵 − 𝐴))) | 
| 117 | 114, 116 | eqtr3d 2231 | 
. . . . . 6
⊢ ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) →
(cos‘(𝐴 − 𝐵)) = (cos‘(𝐵 − 𝐴))) | 
| 118 | 117 | 3ad2ant1 1020 | 
. . . . 5
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ) ∧ ((𝐴 + 𝐵) + (𝐶 + 𝐷)) = π) → (cos‘(𝐴 − 𝐵)) = (cos‘(𝐵 − 𝐴))) | 
| 119 | 118 | oveq1d 5937 | 
. . . 4
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ) ∧ ((𝐴 + 𝐵) + (𝐶 + 𝐷)) = π) → ((cos‘(𝐴 − 𝐵)) + (cos‘(𝐶 − 𝐷))) = ((cos‘(𝐵 − 𝐴)) + (cos‘(𝐶 − 𝐷)))) | 
| 120 | 119 | oveq1d 5937 | 
. . 3
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ) ∧ ((𝐴 + 𝐵) + (𝐶 + 𝐷)) = π) → (((cos‘(𝐴 − 𝐵)) + (cos‘(𝐶 − 𝐷))) / 2) = (((cos‘(𝐵 − 𝐴)) + (cos‘(𝐶 − 𝐷))) / 2)) | 
| 121 | 109, 112,
120 | 3eqtr4d 2239 | 
. 2
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ) ∧ ((𝐴 + 𝐵) + (𝐶 + 𝐷)) = π) → ((sin‘(𝐵 + 𝐶)) · (sin‘(𝐴 + 𝐶))) = (((cos‘(𝐴 − 𝐵)) + (cos‘(𝐶 − 𝐷))) / 2)) | 
| 122 | 50, 55, 121 | 3eqtr4d 2239 | 
1
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ) ∧ ((𝐴 + 𝐵) + (𝐶 + 𝐷)) = π) → (((sin‘𝐴) · (sin‘𝐵)) + ((sin‘𝐶) · (sin‘𝐷))) = ((sin‘(𝐵 + 𝐶)) · (sin‘(𝐴 + 𝐶)))) |