Metamath Proof Explorer


Theorem hvsubcan2i

Description: Vector cancellation law. (Contributed by NM, 3-Sep-1999) (New usage is discouraged.)

Ref Expression
Hypotheses hvnegdi.1 ⊢ A ∈ ℋ
hvnegdi.2 ⊢ B ∈ ℋ
Assertion hvsubcan2i ⊢ A + ℎ B + ℎ A - ℎ B = 2 ⋅ ℎ A

Proof

Step Hyp Ref Expression
1 hvnegdi.1 ⊢ A ∈ ℋ
2 hvnegdi.2 ⊢ B ∈ ℋ
3 1 2 hvsubvali ⊢ A - ℎ B = A + ℎ -1 ⋅ ℎ B
4 3 oveq2i ⊢ A + ℎ B + ℎ A - ℎ B = A + ℎ B + ℎ A + ℎ -1 ⋅ ℎ B
5 neg1cn ⊢ − 1 ∈ ℂ
6 5 2 hvmulcli ⊢ -1 ⋅ ℎ B ∈ ℋ
7 1 2 1 6 hvadd4i ⊢ A + ℎ B + ℎ A + ℎ -1 ⋅ ℎ B = A + ℎ A + ℎ B + ℎ -1 ⋅ ℎ B
8 hv2times ⊢ A ∈ ℋ → 2 ⋅ ℎ A = A + ℎ A
9 1 8 ax-mp ⊢ 2 ⋅ ℎ A = A + ℎ A
10 9 eqcomi ⊢ A + ℎ A = 2 ⋅ ℎ A
11 2 hvnegidi ⊢ B + ℎ -1 ⋅ ℎ B = 0 ℎ
12 10 11 oveq12i ⊢ A + ℎ A + ℎ B + ℎ -1 ⋅ ℎ B = 2 ⋅ ℎ A + ℎ 0 ℎ
13 7 12 eqtri ⊢ A + ℎ B + ℎ A + ℎ -1 ⋅ ℎ B = 2 ⋅ ℎ A + ℎ 0 ℎ
14 2cn ⊢ 2 ∈ ℂ
15 14 1 hvmulcli ⊢ 2 ⋅ ℎ A ∈ ℋ
16 ax-hvaddid ⊢ 2 ⋅ ℎ A ∈ ℋ → 2 ⋅ ℎ A + ℎ 0 ℎ = 2 ⋅ ℎ A
17 15 16 ax-mp ⊢ 2 ⋅ ℎ A + ℎ 0 ℎ = 2 ⋅ ℎ A
18 13 17 eqtri ⊢ A + ℎ B + ℎ A + ℎ -1 ⋅ ℎ B = 2 ⋅ ℎ A
19 4 18 eqtri ⊢ A + ℎ B + ℎ A - ℎ B = 2 ⋅ ℎ A