Metamath Proof Explorer


Theorem ttgplusg

Description: The addition operation of a subcomplex Hilbert space augmented with betweenness. (Contributed by Thierry Arnoux, 25-Mar-2019) (Revised by AV, 29-Oct-2024)

Ref Expression
Hypotheses ttgval.n ⊢ G = to𝒢 Tarski ⁡ H
ttgplusg.1 ⊢ + ˙ = + H
Assertion ttgplusg ⊢ + ˙ = + G

Proof

Step Hyp Ref Expression
1 ttgval.n ⊢ G = to𝒢 Tarski ⁡ H
2 ttgplusg.1 ⊢ + ˙ = + H
3 plusgid ⊢ + 𝑔 = Slot + ndx
4 slotslnbpsd ⊢ Line 𝒢 ⁡ ndx ≠ Base ndx ∧ Line 𝒢 ⁡ ndx ≠ + ndx ∧ Line 𝒢 ⁡ ndx ≠ ⋅ ndx ∧ Line 𝒢 ⁡ ndx ≠ dist ⁡ ndx
5 simplr ⊢ Line 𝒢 ⁡ ndx ≠ Base ndx ∧ Line 𝒢 ⁡ ndx ≠ + ndx ∧ Line 𝒢 ⁡ ndx ≠ ⋅ ndx ∧ Line 𝒢 ⁡ ndx ≠ dist ⁡ ndx → Line 𝒢 ⁡ ndx ≠ + ndx
6 4 5 ax-mp ⊢ Line 𝒢 ⁡ ndx ≠ + ndx
7 6 necomi ⊢ + ndx ≠ Line 𝒢 ⁡ ndx
8 slotsinbpsd ⊢ Itv ⁡ ndx ≠ Base ndx ∧ Itv ⁡ ndx ≠ + ndx ∧ Itv ⁡ ndx ≠ ⋅ ndx ∧ Itv ⁡ ndx ≠ dist ⁡ ndx
9 simplr ⊢ Itv ⁡ ndx ≠ Base ndx ∧ Itv ⁡ ndx ≠ + ndx ∧ Itv ⁡ ndx ≠ ⋅ ndx ∧ Itv ⁡ ndx ≠ dist ⁡ ndx → Itv ⁡ ndx ≠ + ndx
10 8 9 ax-mp ⊢ Itv ⁡ ndx ≠ + ndx
11 10 necomi ⊢ + ndx ≠ Itv ⁡ ndx
12 1 3 7 11 ttglem ⊢ + H = + G
13 2 12 eqtri ⊢ + ˙ = + G