Step
*
of Lemma
eu-seg-congruent_weakening
∀e:EuclideanPlane. ∀[s1,s2:Segment].  s1 ≡ s2 supposing s1 = s2 ∈ Segment
BY
{ (Auto THEN All (Unfold `eu-seg-congruent`) THEN HypSubst' (-1) 0 THEN Auto) }
Latex:
Latex:
\mforall{}e:EuclideanPlane.  \mforall{}[s1,s2:Segment].    s1  \mequiv{}  s2  supposing  s1  =  s2
By
Latex:
(Auto  THEN  All  (Unfold  `eu-seg-congruent`)  THEN  HypSubst'  (-1)  0  THEN  Auto)
Home
Index