Step * of Lemma eu-add-length-cancel-right

[e:EuclideanPlane]. ∀[x,y,z:{p:Point| O_X_p} ].  y ∈ {p:Point| O_X_p}  supposing z ∈ {p:Point| O_X_p} 
BY
(InstLemma `eu-add-length-cancel-left` []
   THEN RepeatFor (ParallelLast')
   THEN RWO "eu-add-length-comm" 0
   THEN Auto) }


Latex:


Latex:
\mforall{}[e:EuclideanPlane].  \mforall{}[x,y,z:\{p:Point|  O\_X\_p\}  ].    x  =  y  supposing  x  +  z  =  y  +  z


By


Latex:
(InstLemma  `eu-add-length-cancel-left`  []
  THEN  RepeatFor  5  (ParallelLast')
  THEN  RWO  "eu-add-length-comm"  0
  THEN  Auto)




Home Index