Proof of Theorem mulsubaddmulsub
| Step | Hyp | Ref
| Expression |
| 1 | | simplr 769 |
. . . 4
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ)) → 𝐵 ∈
ℂ) |
| 2 | | simprl 771 |
. . . 4
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ)) → 𝐶 ∈
ℂ) |
| 3 | 1, 2 | mulcld 11281 |
. . 3
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ)) → (𝐵 · 𝐶) ∈ ℂ) |
| 4 | | subaddmulsub 11726 |
. . 3
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ) ∧ (𝐵 · 𝐶) ∈ ℂ) → ((𝐵 · 𝐶) − ((𝐴 + 𝐵) · (𝐶 − 𝐷))) = ((((𝐵 · 𝐶) − (𝐴 · 𝐶)) − (𝐵 · 𝐶)) + ((𝐴 · 𝐷) + (𝐵 · 𝐷)))) |
| 5 | 3, 4 | mpd3an3 1464 |
. 2
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ)) → ((𝐵 · 𝐶) − ((𝐴 + 𝐵) · (𝐶 − 𝐷))) = ((((𝐵 · 𝐶) − (𝐴 · 𝐶)) − (𝐵 · 𝐶)) + ((𝐴 · 𝐷) + (𝐵 · 𝐷)))) |
| 6 | | simpll 767 |
. . . . . . . 8
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ)) → 𝐴 ∈
ℂ) |
| 7 | 6, 2 | mulcld 11281 |
. . . . . . 7
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ)) → (𝐴 · 𝐶) ∈ ℂ) |
| 8 | 3, 7, 3 | sub32d 11652 |
. . . . . 6
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ)) →
(((𝐵 · 𝐶) − (𝐴 · 𝐶)) − (𝐵 · 𝐶)) = (((𝐵 · 𝐶) − (𝐵 · 𝐶)) − (𝐴 · 𝐶))) |
| 9 | 3 | subidd 11608 |
. . . . . . 7
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ)) → ((𝐵 · 𝐶) − (𝐵 · 𝐶)) = 0) |
| 10 | 9 | oveq1d 7446 |
. . . . . 6
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ)) →
(((𝐵 · 𝐶) − (𝐵 · 𝐶)) − (𝐴 · 𝐶)) = (0 − (𝐴 · 𝐶))) |
| 11 | 8, 10 | eqtrd 2777 |
. . . . 5
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ)) →
(((𝐵 · 𝐶) − (𝐴 · 𝐶)) − (𝐵 · 𝐶)) = (0 − (𝐴 · 𝐶))) |
| 12 | | df-neg 11495 |
. . . . 5
⊢ -(𝐴 · 𝐶) = (0 − (𝐴 · 𝐶)) |
| 13 | 11, 12 | eqtr4di 2795 |
. . . 4
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ)) →
(((𝐵 · 𝐶) − (𝐴 · 𝐶)) − (𝐵 · 𝐶)) = -(𝐴 · 𝐶)) |
| 14 | 13 | oveq1d 7446 |
. . 3
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ)) →
((((𝐵 · 𝐶) − (𝐴 · 𝐶)) − (𝐵 · 𝐶)) + ((𝐴 · 𝐷) + (𝐵 · 𝐷))) = (-(𝐴 · 𝐶) + ((𝐴 · 𝐷) + (𝐵 · 𝐷)))) |
| 15 | 7 | negcld 11607 |
. . . . 5
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ)) → -(𝐴 · 𝐶) ∈ ℂ) |
| 16 | | simprr 773 |
. . . . . . 7
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ)) → 𝐷 ∈
ℂ) |
| 17 | 6, 16 | mulcld 11281 |
. . . . . 6
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ)) → (𝐴 · 𝐷) ∈ ℂ) |
| 18 | 1, 16 | mulcld 11281 |
. . . . . 6
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ)) → (𝐵 · 𝐷) ∈ ℂ) |
| 19 | 17, 18 | addcld 11280 |
. . . . 5
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ)) → ((𝐴 · 𝐷) + (𝐵 · 𝐷)) ∈ ℂ) |
| 20 | 15, 19 | addcomd 11463 |
. . . 4
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ)) →
(-(𝐴 · 𝐶) + ((𝐴 · 𝐷) + (𝐵 · 𝐷))) = (((𝐴 · 𝐷) + (𝐵 · 𝐷)) + -(𝐴 · 𝐶))) |
| 21 | 19, 7 | negsubd 11626 |
. . . 4
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ)) →
(((𝐴 · 𝐷) + (𝐵 · 𝐷)) + -(𝐴 · 𝐶)) = (((𝐴 · 𝐷) + (𝐵 · 𝐷)) − (𝐴 · 𝐶))) |
| 22 | 20, 21 | eqtrd 2777 |
. . 3
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ)) →
(-(𝐴 · 𝐶) + ((𝐴 · 𝐷) + (𝐵 · 𝐷))) = (((𝐴 · 𝐷) + (𝐵 · 𝐷)) − (𝐴 · 𝐶))) |
| 23 | 14, 22 | eqtrd 2777 |
. 2
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ)) →
((((𝐵 · 𝐶) − (𝐴 · 𝐶)) − (𝐵 · 𝐶)) + ((𝐴 · 𝐷) + (𝐵 · 𝐷))) = (((𝐴 · 𝐷) + (𝐵 · 𝐷)) − (𝐴 · 𝐶))) |
| 24 | 5, 23 | eqtrd 2777 |
1
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ)) → ((𝐵 · 𝐶) − ((𝐴 + 𝐵) · (𝐶 − 𝐷))) = (((𝐴 · 𝐷) + (𝐵 · 𝐷)) − (𝐴 · 𝐶))) |