---

Step * 2 of Lemma eu-seg-congruent-iff-length


1. e : EuclideanPlane@i'
2. [s] : Segment
3. [t] : Segment
4. |s| = |t| ∈ {p:Point| O_X_p} 
⊢ s ≡ t
BY
{ (Unfold `eu-length` -1
   THEN Unfold `eu-seg-congruent` 0
   THEN (Unhide THENA Auto)
   THEN (EqTypeHD (-1) THENA Auto)
   THEN RWO "eu-extend-equal-iff-congruent" (-2)
   THEN Auto) }

---

Latex:

---

Latex:

1.  e  :  EuclideanPlane@i'
2.  [s]  :  Segment
3.  [t]  :  Segment
4.  |s|  =  |t|
\mvdash{}  s  \mequiv{}  t


By

---

Latex:
(Unfold  `eu-length`  -1
  THEN  Unfold  `eu-seg-congruent`  0
  THEN  (Unhide  THENA  Auto)
  THEN  (EqTypeHD  (-1)  THENA  Auto)
  THEN  RWO  "eu-extend-equal-iff-congruent"  (-2)
  THEN  Auto)

---

Home Index