| Step | Hyp | Ref
| Expression |
| 1 | | crosspdot0i.1 |
. . . 4
⊢ 𝐴 ∈ (ℝ
↑m (1...3)) |
| 2 | | ovex 7443 |
. . . . 5
⊢ (ℝ
↑m (1...3)) ∈ V |
| 3 | 2, 2 | mpoex 8072 |
. . . 4
⊢ (𝑤 ∈ (ℝ
↑m (1...3)), 𝑧 ∈ (ℝ ↑m (1...3))
↦ (ℝfld Σg (𝑘 ∈ (1...3) ↦ ((𝐴‘𝑘) · ((𝑤⊠𝑧)‘𝑘))))) ∈ V |
| 4 | | fveq1 6880 |
. . . . . . . . 9
⊢ (𝑠 = 𝐴 → (𝑠‘𝑘) = (𝐴‘𝑘)) |
| 5 | 4 | oveq1d 7425 |
. . . . . . . 8
⊢ (𝑠 = 𝐴 → ((𝑠‘𝑘) · ((𝑤⊠𝑧)‘𝑘)) = ((𝐴‘𝑘) · ((𝑤⊠𝑧)‘𝑘))) |
| 6 | 5 | mpteq2dv 5205 |
. . . . . . 7
⊢ (𝑠 = 𝐴 → (𝑘 ∈ (1...3) ↦ ((𝑠‘𝑘) · ((𝑤⊠𝑧)‘𝑘))) = (𝑘 ∈ (1...3) ↦ ((𝐴‘𝑘) · ((𝑤⊠𝑧)‘𝑘)))) |
| 7 | 6 | oveq2d 7426 |
. . . . . 6
⊢ (𝑠 = 𝐴 → (ℝfld
Σg (𝑘 ∈ (1...3) ↦ ((𝑠‘𝑘) · ((𝑤⊠𝑧)‘𝑘)))) = (ℝfld
Σg (𝑘 ∈ (1...3) ↦ ((𝐴‘𝑘) · ((𝑤⊠𝑧)‘𝑘))))) |
| 8 | 7 | mpoeq3dv 7489 |
. . . . 5
⊢ (𝑠 = 𝐴 → (𝑤 ∈ (ℝ ↑m (1...3)),
𝑧 ∈ (ℝ
↑m (1...3)) ↦ (ℝfld
Σg (𝑘 ∈ (1...3) ↦ ((𝑠‘𝑘) · ((𝑤⊠𝑧)‘𝑘))))) = (𝑤 ∈ (ℝ ↑m (1...3)),
𝑧 ∈ (ℝ
↑m (1...3)) ↦ (ℝfld
Σg (𝑘 ∈ (1...3) ↦ ((𝐴‘𝑘) · ((𝑤⊠𝑧)‘𝑘)))))) |
| 9 | | df-tripp 50654 |
. . . . 5
⊢ tripp =
(𝑠 ∈ (ℝ
↑m (1...3)) ↦ (𝑤 ∈ (ℝ ↑m (1...3)),
𝑧 ∈ (ℝ
↑m (1...3)) ↦ (ℝfld
Σg (𝑘 ∈ (1...3) ↦ ((𝑠‘𝑘) · ((𝑤⊠𝑧)‘𝑘)))))) |
| 10 | 8, 9 | fvmptg 6987 |
. . . 4
⊢ ((𝐴 ∈ (ℝ
↑m (1...3)) ∧ (𝑤 ∈ (ℝ ↑m (1...3)),
𝑧 ∈ (ℝ
↑m (1...3)) ↦ (ℝfld
Σg (𝑘 ∈ (1...3) ↦ ((𝐴‘𝑘) · ((𝑤⊠𝑧)‘𝑘))))) ∈ V) → (tripp‘𝐴) = (𝑤 ∈ (ℝ ↑m (1...3)),
𝑧 ∈ (ℝ
↑m (1...3)) ↦ (ℝfld
Σg (𝑘 ∈ (1...3) ↦ ((𝐴‘𝑘) · ((𝑤⊠𝑧)‘𝑘)))))) |
| 11 | 1, 3, 10 | mp2an 704 |
. . 3
⊢
(tripp‘𝐴) =
(𝑤 ∈ (ℝ
↑m (1...3)), 𝑧 ∈ (ℝ ↑m (1...3))
↦ (ℝfld Σg (𝑘 ∈ (1...3) ↦ ((𝐴‘𝑘) · ((𝑤⊠𝑧)‘𝑘))))) |
| 12 | 11 | oveqi 7423 |
. 2
⊢ (𝐵(tripp‘𝐴)𝐶) = (𝐵(𝑤 ∈ (ℝ ↑m (1...3)),
𝑧 ∈ (ℝ
↑m (1...3)) ↦ (ℝfld
Σg (𝑘 ∈ (1...3) ↦ ((𝐴‘𝑘) · ((𝑤⊠𝑧)‘𝑘)))))𝐶) |
| 13 | | eqidd 2764 |
. . . 4
⊢ (𝐴 ∈ (ℝ
↑m (1...3)) → (𝑤 ∈ (ℝ ↑m (1...3)),
𝑧 ∈ (ℝ
↑m (1...3)) ↦ (ℝfld
Σg (𝑘 ∈ (1...3) ↦ ((𝐴‘𝑘) · ((𝑤⊠𝑧)‘𝑘))))) = (𝑤 ∈ (ℝ ↑m (1...3)),
𝑧 ∈ (ℝ
↑m (1...3)) ↦ (ℝfld
Σg (𝑘 ∈ (1...3) ↦ ((𝐴‘𝑘) · ((𝑤⊠𝑧)‘𝑘)))))) |
| 14 | | simprl 782 |
. . . . . . . . 9
⊢ ((𝐴 ∈ (ℝ
↑m (1...3)) ∧ (𝑤 = 𝐵 ∧ 𝑧 = 𝐶)) → 𝑤 = 𝐵) |
| 15 | | simprr 784 |
. . . . . . . . 9
⊢ ((𝐴 ∈ (ℝ
↑m (1...3)) ∧ (𝑤 = 𝐵 ∧ 𝑧 = 𝐶)) → 𝑧 = 𝐶) |
| 16 | 14, 15 | oveq12d 7428 |
. . . . . . . 8
⊢ ((𝐴 ∈ (ℝ
↑m (1...3)) ∧ (𝑤 = 𝐵 ∧ 𝑧 = 𝐶)) → (𝑤⊠𝑧) = (𝐵⊠𝐶)) |
| 17 | 16 | fveq1d 6883 |
. . . . . . 7
⊢ ((𝐴 ∈ (ℝ
↑m (1...3)) ∧ (𝑤 = 𝐵 ∧ 𝑧 = 𝐶)) → ((𝑤⊠𝑧)‘𝑘) = ((𝐵⊠𝐶)‘𝑘)) |
| 18 | 17 | oveq2d 7426 |
. . . . . 6
⊢ ((𝐴 ∈ (ℝ
↑m (1...3)) ∧ (𝑤 = 𝐵 ∧ 𝑧 = 𝐶)) → ((𝐴‘𝑘) · ((𝑤⊠𝑧)‘𝑘)) = ((𝐴‘𝑘) · ((𝐵⊠𝐶)‘𝑘))) |
| 19 | 18 | mpteq2dv 5205 |
. . . . 5
⊢ ((𝐴 ∈ (ℝ
↑m (1...3)) ∧ (𝑤 = 𝐵 ∧ 𝑧 = 𝐶)) → (𝑘 ∈ (1...3) ↦ ((𝐴‘𝑘) · ((𝑤⊠𝑧)‘𝑘))) = (𝑘 ∈ (1...3) ↦ ((𝐴‘𝑘) · ((𝐵⊠𝐶)‘𝑘)))) |
| 20 | 19 | oveq2d 7426 |
. . . 4
⊢ ((𝐴 ∈ (ℝ
↑m (1...3)) ∧ (𝑤 = 𝐵 ∧ 𝑧 = 𝐶)) → (ℝfld
Σg (𝑘 ∈ (1...3) ↦ ((𝐴‘𝑘) · ((𝑤⊠𝑧)‘𝑘)))) = (ℝfld
Σg (𝑘 ∈ (1...3) ↦ ((𝐴‘𝑘) · ((𝐵⊠𝐶)‘𝑘))))) |
| 21 | | crosspdot0i.2 |
. . . . 5
⊢ 𝐵 ∈ (ℝ
↑m (1...3)) |
| 22 | 21 | a1i 11 |
. . . 4
⊢ (𝐴 ∈ (ℝ
↑m (1...3)) → 𝐵 ∈ (ℝ ↑m
(1...3))) |
| 23 | | crosspdot0i.3 |
. . . . 5
⊢ 𝐶 ∈ (ℝ
↑m (1...3)) |
| 24 | 23 | a1i 11 |
. . . 4
⊢ (𝐴 ∈ (ℝ
↑m (1...3)) → 𝐶 ∈ (ℝ ↑m
(1...3))) |
| 25 | | ovexd 7445 |
. . . 4
⊢ (𝐴 ∈ (ℝ
↑m (1...3)) → (ℝfld
Σg (𝑘 ∈ (1...3) ↦ ((𝐴‘𝑘) · ((𝐵⊠𝐶)‘𝑘)))) ∈ V) |
| 26 | 13, 20, 22, 24, 25 | ovmpod 7562 |
. . 3
⊢ (𝐴 ∈ (ℝ
↑m (1...3)) → (𝐵(𝑤 ∈ (ℝ ↑m (1...3)),
𝑧 ∈ (ℝ
↑m (1...3)) ↦ (ℝfld
Σg (𝑘 ∈ (1...3) ↦ ((𝐴‘𝑘) · ((𝑤⊠𝑧)‘𝑘)))))𝐶) = (ℝfld
Σg (𝑘 ∈ (1...3) ↦ ((𝐴‘𝑘) · ((𝐵⊠𝐶)‘𝑘))))) |
| 27 | 1, 26 | ax-mp 5 |
. 2
⊢ (𝐵(𝑤 ∈ (ℝ ↑m (1...3)),
𝑧 ∈ (ℝ
↑m (1...3)) ↦ (ℝfld
Σg (𝑘 ∈ (1...3) ↦ ((𝐴‘𝑘) · ((𝑤⊠𝑧)‘𝑘)))))𝐶) = (ℝfld
Σg (𝑘 ∈ (1...3) ↦ ((𝐴‘𝑘) · ((𝐵⊠𝐶)‘𝑘)))) |
| 28 | 12, 27 | eqtri 2786 |
1
⊢ (𝐵(tripp‘𝐴)𝐶) = (ℝfld
Σg (𝑘 ∈ (1...3) ↦ ((𝐴‘𝑘) · ((𝐵⊠𝐶)‘𝑘)))) |