---

Step * of Lemma geo-line-eq-preserves-incidence

∀g:EuclideanPlane. ∀a:Point. ∀l,m:Line.  (a I l ⇒ l ≡ m ⇒ a I m)
BY
{ (Auto THEN (Assert l = m ∈ LINE BY (EqTypeCD THEN Auto)) THEN RWO "-1<" 0 THEN Auto) }

---

Latex:

---

Latex:
\mforall{}g:EuclideanPlane.  \mforall{}a:Point.  \mforall{}l,m:Line.    (a  I  l  {}\mRightarrow{}  l  \mequiv{}  m  {}\mRightarrow{}  a  I  m)


By

---

Latex:
(Auto  THEN  (Assert  l  =  m  BY  (EqTypeCD  THEN  Auto))  THEN  RWO  "-1<"  0  THEN  Auto)

---

Home Index