---

Step * of Lemma geo-add-length-zero

∀[e:BasicGeometry]. ∀[x:Length].  (x + X = x ∈ Length)
BY
{ (Auto THEN D -1 THEN EqTypeCD THEN Auto THEN Unfold `geo-add-length` 0) }

1
1. e : BasicGeometry
2. x : Base
3. x1 : Base
4. x = x1 ∈ pertype(λx,y. ((x ∈ {p:Point| O_X_p} ) ∧ (y ∈ {p:Point| O_X_p} ) ∧ x ≡ y))
5. x ∈ {p:Point| O_X_p} 
6. x1 ∈ {p:Point| O_X_p} 
7. x ≡ x1
⊢ extend Ox by XX ≡ x1

---

Latex:

---

Latex:
\mforall{}[e:BasicGeometry].  \mforall{}[x:Length].    (x  +  X  =  x)


By

---

Latex:
(Auto  THEN  D  -1  THEN  EqTypeCD  THEN  Auto  THEN  Unfold  `geo-add-length`  0)

---

Home Index