---

Step * of Lemma pgeo-leq-preserves-incidence

∀g:ProjectivePlane. ∀a:Point. ∀l,m:Line.  (a I l ⇒ l ≡ m ⇒ a I m)
BY
{ ((((((Auto THEN D 0) THENA Auto) THEN Unfold `pgeo-leq` 6) THEN D 6)
    THEN InstLemma `pgeo-plsep-to-lsep` [⌜g⌝;⌜m⌝;⌜l⌝;⌜a⌝]⋅
    THEN Auto)
   THEN FLemma `pgeo-lsep-sym` [-1]
   THEN Auto) }

---

Latex:

---

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


By

---

Latex:
((((((Auto  THEN  D  0)  THENA  Auto)  THEN  Unfold  `pgeo-leq`  6)  THEN  D  6)
    THEN  InstLemma  `pgeo-plsep-to-lsep`  [\mkleeneopen{}g\mkleeneclose{};\mkleeneopen{}m\mkleeneclose{};\mkleeneopen{}l\mkleeneclose{};\mkleeneopen{}a\mkleeneclose{}]\mcdot{}
    THEN  Auto)
  THEN  FLemma  `pgeo-lsep-sym`  [-1]
  THEN  Auto)

---

Home Index