Step
*
of Lemma
geo-add-length_functionality
∀[e:BasicGeometry]. ∀[x,y,x',y':{p:Point| O_X_p} ].  (x + y ≡ x' + y') supposing (x ≡ x' and y ≡ y')
BY
{ (Auto THEN Unfold `geo-add-length` 0) }
1
1. e : BasicGeometry
2. x : {p:Point| O_X_p} 
3. y : {p:Point| O_X_p} 
4. x' : {p:Point| O_X_p} 
5. y' : {p:Point| O_X_p} 
6. y ≡ y'
7. x ≡ x'
⊢ extend Ox by Xy ≡ extend Ox' by Xy'
Latex:
Latex:
\mforall{}[e:BasicGeometry].  \mforall{}[x,y,x',y':\{p:Point|  O\_X\_p\}  ].    (x  +  y  \mequiv{}  x'  +  y')  supposing  (x  \mequiv{}  x'  and  y  \mequiv{}  y')
By
Latex:
(Auto  THEN  Unfold  `geo-add-length`  0)
Home
Index