Step
*
1
1
of Lemma
geo-zero-length-iff
1. e : BasicGeometry
2. a : Point
3. b : Point
4. extend OX by ab = X ∈ Length
⊢ a ≡ b
BY
{ (Unfold `geo-length-type` -1 THEN (EqTypeHD (-1) THENA Auto)) }
1
1. e : BasicGeometry
2. a : Point
3. b : Point
4. extend OX by ab = X ∈ pertype(λx,y. ((x ∈ {p:Point| O_X_p} ) ∧ (y ∈ {p:Point| O_X_p} ) ∧ x ≡ y))
5. [%1] : (extend OX by ab ∈ {p:Point| O_X_p} ) ∧ (X ∈ {p:Point| O_X_p} ) ∧ extend OX by ab ≡ X
⊢ a ≡ b
Latex:
Latex:
1.  e  :  BasicGeometry
2.  a  :  Point
3.  b  :  Point
4.  extend  OX  by  ab  =  X
\mvdash{}  a  \mequiv{}  b
By
Latex:
(Unfold  `geo-length-type`  -1  THEN  (EqTypeHD  (-1)  THENA  Auto))
Home
Index