| Step | Hyp | Ref
| Expression |
| 1 | | crossp.1 |
. . . 4
⊢ 𝐴 ∈ (ℝ
↑m (1...3)) |
| 2 | | crossp.2 |
. . . 4
⊢ 𝐵 ∈ (ℝ
↑m (1...3)) |
| 3 | | crosspval 50655 |
. . . 4
⊢ ((𝐴 ∈ (ℝ
↑m (1...3)) ∧ 𝐵 ∈ (ℝ ↑m
(1...3))) → (𝐴⊠𝐵) = (𝑘 ∈ (1...3) ↦ if(𝑘 = 1, (((𝐴‘2) · (𝐵‘3)) − ((𝐴‘3) · (𝐵‘2))), if(𝑘 = 2, (((𝐴‘3) · (𝐵‘1)) − ((𝐴‘1) · (𝐵‘3))), (((𝐴‘1) · (𝐵‘2)) − ((𝐴‘2) · (𝐵‘1))))))) |
| 4 | 1, 2, 3 | mp2an 704 |
. . 3
⊢ (𝐴⊠𝐵) = (𝑘 ∈ (1...3) ↦ if(𝑘 = 1, (((𝐴‘2) · (𝐵‘3)) − ((𝐴‘3) · (𝐵‘2))), if(𝑘 = 2, (((𝐴‘3) · (𝐵‘1)) − ((𝐴‘1) · (𝐵‘3))), (((𝐴‘1) · (𝐵‘2)) − ((𝐴‘2) · (𝐵‘1)))))) |
| 5 | 4 | fveq1i 6882 |
. 2
⊢ ((𝐴⊠𝐵)‘3) = ((𝑘 ∈ (1...3) ↦ if(𝑘 = 1, (((𝐴‘2) · (𝐵‘3)) − ((𝐴‘3) · (𝐵‘2))), if(𝑘 = 2, (((𝐴‘3) · (𝐵‘1)) − ((𝐴‘1) · (𝐵‘3))), (((𝐴‘1) · (𝐵‘2)) − ((𝐴‘2) · (𝐵‘1))))))‘3) |
| 6 | | 3elfz13 50646 |
. . 3
⊢ 3 ∈
(1...3) |
| 7 | 1, 2 | crosspcle3i 50658 |
. . 3
⊢ (((𝐴‘1) · (𝐵‘2)) − ((𝐴‘2) · (𝐵‘1))) ∈
ℝ |
| 8 | | id 23 |
. . . . . . . 8
⊢ (𝑘 = 1 → 𝑘 = 1) |
| 9 | | 1ne3 50642 |
. . . . . . . . 9
⊢ 1 ≠
3 |
| 10 | 9 | a1i 11 |
. . . . . . . 8
⊢ (𝑘 = 1 → 1 ≠
3) |
| 11 | 8, 10 | eqnetrd 3025 |
. . . . . . 7
⊢ (𝑘 = 1 → 𝑘 ≠ 3) |
| 12 | 11 | necon2bi 2988 |
. . . . . 6
⊢ (𝑘 = 3 → ¬ 𝑘 = 1) |
| 13 | 12 | iffalsed 4498 |
. . . . 5
⊢ (𝑘 = 3 → if(𝑘 = 1, (((𝐴‘2) · (𝐵‘3)) − ((𝐴‘3) · (𝐵‘2))), if(𝑘 = 2, (((𝐴‘3) · (𝐵‘1)) − ((𝐴‘1) · (𝐵‘3))), (((𝐴‘1) · (𝐵‘2)) − ((𝐴‘2) · (𝐵‘1))))) = if(𝑘 = 2, (((𝐴‘3) · (𝐵‘1)) − ((𝐴‘1) · (𝐵‘3))), (((𝐴‘1) · (𝐵‘2)) − ((𝐴‘2) · (𝐵‘1))))) |
| 14 | | id 23 |
. . . . . . . 8
⊢ (𝑘 = 2 → 𝑘 = 2) |
| 15 | | 2ne3 50643 |
. . . . . . . . 9
⊢ 2 ≠
3 |
| 16 | 15 | a1i 11 |
. . . . . . . 8
⊢ (𝑘 = 2 → 2 ≠
3) |
| 17 | 14, 16 | eqnetrd 3025 |
. . . . . . 7
⊢ (𝑘 = 2 → 𝑘 ≠ 3) |
| 18 | 17 | necon2bi 2988 |
. . . . . 6
⊢ (𝑘 = 3 → ¬ 𝑘 = 2) |
| 19 | 18 | iffalsed 4498 |
. . . . 5
⊢ (𝑘 = 3 → if(𝑘 = 2, (((𝐴‘3) · (𝐵‘1)) − ((𝐴‘1) · (𝐵‘3))), (((𝐴‘1) · (𝐵‘2)) − ((𝐴‘2) · (𝐵‘1)))) = (((𝐴‘1) · (𝐵‘2)) − ((𝐴‘2) · (𝐵‘1)))) |
| 20 | 13, 19 | eqtrd 2798 |
. . . 4
⊢ (𝑘 = 3 → if(𝑘 = 1, (((𝐴‘2) · (𝐵‘3)) − ((𝐴‘3) · (𝐵‘2))), if(𝑘 = 2, (((𝐴‘3) · (𝐵‘1)) − ((𝐴‘1) · (𝐵‘3))), (((𝐴‘1) · (𝐵‘2)) − ((𝐴‘2) · (𝐵‘1))))) = (((𝐴‘1) · (𝐵‘2)) − ((𝐴‘2) · (𝐵‘1)))) |
| 21 | | eqid 2763 |
. . . 4
⊢ (𝑘 ∈ (1...3) ↦ if(𝑘 = 1, (((𝐴‘2) · (𝐵‘3)) − ((𝐴‘3) · (𝐵‘2))), if(𝑘 = 2, (((𝐴‘3) · (𝐵‘1)) − ((𝐴‘1) · (𝐵‘3))), (((𝐴‘1) · (𝐵‘2)) − ((𝐴‘2) · (𝐵‘1)))))) = (𝑘 ∈ (1...3) ↦ if(𝑘 = 1, (((𝐴‘2) · (𝐵‘3)) − ((𝐴‘3) · (𝐵‘2))), if(𝑘 = 2, (((𝐴‘3) · (𝐵‘1)) − ((𝐴‘1) · (𝐵‘3))), (((𝐴‘1) · (𝐵‘2)) − ((𝐴‘2) · (𝐵‘1)))))) |
| 22 | 20, 21 | fvmptg 6987 |
. . 3
⊢ ((3
∈ (1...3) ∧ (((𝐴‘1) · (𝐵‘2)) − ((𝐴‘2) · (𝐵‘1))) ∈ ℝ) → ((𝑘 ∈ (1...3) ↦ if(𝑘 = 1, (((𝐴‘2) · (𝐵‘3)) − ((𝐴‘3) · (𝐵‘2))), if(𝑘 = 2, (((𝐴‘3) · (𝐵‘1)) − ((𝐴‘1) · (𝐵‘3))), (((𝐴‘1) · (𝐵‘2)) − ((𝐴‘2) · (𝐵‘1))))))‘3) = (((𝐴‘1) · (𝐵‘2)) − ((𝐴‘2) · (𝐵‘1)))) |
| 23 | 6, 7, 22 | mp2an 704 |
. 2
⊢ ((𝑘 ∈ (1...3) ↦ if(𝑘 = 1, (((𝐴‘2) · (𝐵‘3)) − ((𝐴‘3) · (𝐵‘2))), if(𝑘 = 2, (((𝐴‘3) · (𝐵‘1)) − ((𝐴‘1) · (𝐵‘3))), (((𝐴‘1) · (𝐵‘2)) − ((𝐴‘2) · (𝐵‘1))))))‘3) = (((𝐴‘1) · (𝐵‘2)) − ((𝐴‘2) · (𝐵‘1))) |
| 24 | 5, 23 | eqtri 2786 |
1
⊢ ((𝐴⊠𝐵)‘3) = (((𝐴‘1) · (𝐵‘2)) − ((𝐴‘2) · (𝐵‘1))) |