Proof of Theorem affineequiv
| Step | Hyp | Ref
| Expression |
| 1 | | affineequiv.c |
. . . . . . . 8
⊢ (𝜑 → 𝐶 ∈ ℂ) |
| 2 | | affineequiv.d |
. . . . . . . . 9
⊢ (𝜑 → 𝐷 ∈ ℂ) |
| 3 | 2, 1 | mulcld 11260 |
. . . . . . . 8
⊢ (𝜑 → (𝐷 · 𝐶) ∈ ℂ) |
| 4 | | affineequiv.a |
. . . . . . . . 9
⊢ (𝜑 → 𝐴 ∈ ℂ) |
| 5 | 2, 4 | mulcld 11260 |
. . . . . . . 8
⊢ (𝜑 → (𝐷 · 𝐴) ∈ ℂ) |
| 6 | 1, 3, 5 | subsubd 11627 |
. . . . . . 7
⊢ (𝜑 → (𝐶 − ((𝐷 · 𝐶) − (𝐷 · 𝐴))) = ((𝐶 − (𝐷 · 𝐶)) + (𝐷 · 𝐴))) |
| 7 | 1, 3 | subcld 11599 |
. . . . . . . 8
⊢ (𝜑 → (𝐶 − (𝐷 · 𝐶)) ∈ ℂ) |
| 8 | 7, 5 | addcomd 11442 |
. . . . . . 7
⊢ (𝜑 → ((𝐶 − (𝐷 · 𝐶)) + (𝐷 · 𝐴)) = ((𝐷 · 𝐴) + (𝐶 − (𝐷 · 𝐶)))) |
| 9 | 6, 8 | eqtr2d 2772 |
. . . . . 6
⊢ (𝜑 → ((𝐷 · 𝐴) + (𝐶 − (𝐷 · 𝐶))) = (𝐶 − ((𝐷 · 𝐶) − (𝐷 · 𝐴)))) |
| 10 | | 1cnd 11235 |
. . . . . . . . 9
⊢ (𝜑 → 1 ∈
ℂ) |
| 11 | 10, 2, 1 | subdird 11699 |
. . . . . . . 8
⊢ (𝜑 → ((1 − 𝐷) · 𝐶) = ((1 · 𝐶) − (𝐷 · 𝐶))) |
| 12 | 1 | mullidd 11258 |
. . . . . . . . 9
⊢ (𝜑 → (1 · 𝐶) = 𝐶) |
| 13 | 12 | oveq1d 7425 |
. . . . . . . 8
⊢ (𝜑 → ((1 · 𝐶) − (𝐷 · 𝐶)) = (𝐶 − (𝐷 · 𝐶))) |
| 14 | 11, 13 | eqtrd 2771 |
. . . . . . 7
⊢ (𝜑 → ((1 − 𝐷) · 𝐶) = (𝐶 − (𝐷 · 𝐶))) |
| 15 | 14 | oveq2d 7426 |
. . . . . 6
⊢ (𝜑 → ((𝐷 · 𝐴) + ((1 − 𝐷) · 𝐶)) = ((𝐷 · 𝐴) + (𝐶 − (𝐷 · 𝐶)))) |
| 16 | | affineequiv.b |
. . . . . . . 8
⊢ (𝜑 → 𝐵 ∈ ℂ) |
| 17 | 1, 16 | subcld 11599 |
. . . . . . . 8
⊢ (𝜑 → (𝐶 − 𝐵) ∈ ℂ) |
| 18 | 1, 4 | subcld 11599 |
. . . . . . . . 9
⊢ (𝜑 → (𝐶 − 𝐴) ∈ ℂ) |
| 19 | 2, 18 | mulcld 11260 |
. . . . . . . 8
⊢ (𝜑 → (𝐷 · (𝐶 − 𝐴)) ∈ ℂ) |
| 20 | 16, 17, 19 | addsubassd 11619 |
. . . . . . 7
⊢ (𝜑 → ((𝐵 + (𝐶 − 𝐵)) − (𝐷 · (𝐶 − 𝐴))) = (𝐵 + ((𝐶 − 𝐵) − (𝐷 · (𝐶 − 𝐴))))) |
| 21 | 16, 1 | pncan3d 11602 |
. . . . . . . 8
⊢ (𝜑 → (𝐵 + (𝐶 − 𝐵)) = 𝐶) |
| 22 | 2, 1, 4 | subdid 11698 |
. . . . . . . 8
⊢ (𝜑 → (𝐷 · (𝐶 − 𝐴)) = ((𝐷 · 𝐶) − (𝐷 · 𝐴))) |
| 23 | 21, 22 | oveq12d 7428 |
. . . . . . 7
⊢ (𝜑 → ((𝐵 + (𝐶 − 𝐵)) − (𝐷 · (𝐶 − 𝐴))) = (𝐶 − ((𝐷 · 𝐶) − (𝐷 · 𝐴)))) |
| 24 | 20, 23 | eqtr3d 2773 |
. . . . . 6
⊢ (𝜑 → (𝐵 + ((𝐶 − 𝐵) − (𝐷 · (𝐶 − 𝐴)))) = (𝐶 − ((𝐷 · 𝐶) − (𝐷 · 𝐴)))) |
| 25 | 9, 15, 24 | 3eqtr4d 2781 |
. . . . 5
⊢ (𝜑 → ((𝐷 · 𝐴) + ((1 − 𝐷) · 𝐶)) = (𝐵 + ((𝐶 − 𝐵) − (𝐷 · (𝐶 − 𝐴))))) |
| 26 | 25 | eqeq2d 2747 |
. . . 4
⊢ (𝜑 → (𝐵 = ((𝐷 · 𝐴) + ((1 − 𝐷) · 𝐶)) ↔ 𝐵 = (𝐵 + ((𝐶 − 𝐵) − (𝐷 · (𝐶 − 𝐴)))))) |
| 27 | 16 | addridd 11440 |
. . . . 5
⊢ (𝜑 → (𝐵 + 0) = 𝐵) |
| 28 | 27 | eqeq1d 2738 |
. . . 4
⊢ (𝜑 → ((𝐵 + 0) = (𝐵 + ((𝐶 − 𝐵) − (𝐷 · (𝐶 − 𝐴)))) ↔ 𝐵 = (𝐵 + ((𝐶 − 𝐵) − (𝐷 · (𝐶 − 𝐴)))))) |
| 29 | | 0cnd 11233 |
. . . . 5
⊢ (𝜑 → 0 ∈
ℂ) |
| 30 | 17, 19 | subcld 11599 |
. . . . 5
⊢ (𝜑 → ((𝐶 − 𝐵) − (𝐷 · (𝐶 − 𝐴))) ∈ ℂ) |
| 31 | 16, 29, 30 | addcand 11443 |
. . . 4
⊢ (𝜑 → ((𝐵 + 0) = (𝐵 + ((𝐶 − 𝐵) − (𝐷 · (𝐶 − 𝐴)))) ↔ 0 = ((𝐶 − 𝐵) − (𝐷 · (𝐶 − 𝐴))))) |
| 32 | 26, 28, 31 | 3bitr2d 307 |
. . 3
⊢ (𝜑 → (𝐵 = ((𝐷 · 𝐴) + ((1 − 𝐷) · 𝐶)) ↔ 0 = ((𝐶 − 𝐵) − (𝐷 · (𝐶 − 𝐴))))) |
| 33 | | eqcom 2743 |
. . 3
⊢ (0 =
((𝐶 − 𝐵) − (𝐷 · (𝐶 − 𝐴))) ↔ ((𝐶 − 𝐵) − (𝐷 · (𝐶 − 𝐴))) = 0) |
| 34 | 32, 33 | bitrdi 287 |
. 2
⊢ (𝜑 → (𝐵 = ((𝐷 · 𝐴) + ((1 − 𝐷) · 𝐶)) ↔ ((𝐶 − 𝐵) − (𝐷 · (𝐶 − 𝐴))) = 0)) |
| 35 | 17, 19 | subeq0ad 11609 |
. 2
⊢ (𝜑 → (((𝐶 − 𝐵) − (𝐷 · (𝐶 − 𝐴))) = 0 ↔ (𝐶 − 𝐵) = (𝐷 · (𝐶 − 𝐴)))) |
| 36 | 34, 35 | bitrd 279 |
1
⊢ (𝜑 → (𝐵 = ((𝐷 · 𝐴) + ((1 − 𝐷) · 𝐶)) ↔ (𝐶 − 𝐵) = (𝐷 · (𝐶 − 𝐴)))) |