Step
*
of Lemma
geo-add-length-cancel-right
∀[e:BasicGeometry]. ∀[x,y,z:Length].  x = y ∈ Length supposing x + z = y + z ∈ Length
BY
{ (InstLemma `geo-add-length-cancel-left` []
   THEN RepeatFor 5 (ParallelLast')
   THEN RWO "geo-add-length-comm" 0
   THEN Auto{1,3}-1⋅) }
Latex:
Latex:
\mforall{}[e:BasicGeometry].  \mforall{}[x,y,z:Length].    x  =  y  supposing  x  +  z  =  y  +  z
By
Latex:
(InstLemma  `geo-add-length-cancel-left`  []
  THEN  RepeatFor  5  (ParallelLast')
  THEN  RWO  "geo-add-length-comm"  0
  THEN  Auto\{1,3\}-1\mcdot{})
Home
Index