Step
*
of Lemma
geo-segments-cross
∀e:HeytingGeometry. ∀p,b,q,a:Point.  ((∃c:Point. (a-p-c ∧ b-q-c ∧ c # ab)) 
⇒ (∃x:Point. (p-x-b ∧ q-x-a)))
BY
{ (Auto
   THEN ExRepD
   THEN (InstLemma `geo-inner-pasch-ex` [⌜e⌝;⌜a⌝;⌜b⌝;⌜c⌝;⌜p⌝;⌜q⌝]⋅ THENA Auto)
   THEN ParallelLast
   THEN Auto) }
Latex:
Latex:
\mforall{}e:HeytingGeometry.  \mforall{}p,b,q,a:Point.
    ((\mexists{}c:Point.  (a-p-c  \mwedge{}  b-q-c  \mwedge{}  c  \#  ab))  {}\mRightarrow{}  (\mexists{}x:Point.  (p-x-b  \mwedge{}  q-x-a)))
By
Latex:
(Auto
  THEN  ExRepD
  THEN  (InstLemma  `geo-inner-pasch-ex`  [\mkleeneopen{}e\mkleeneclose{};\mkleeneopen{}a\mkleeneclose{};\mkleeneopen{}b\mkleeneclose{};\mkleeneopen{}c\mkleeneclose{};\mkleeneopen{}p\mkleeneclose{};\mkleeneopen{}q\mkleeneclose{}]\mcdot{}  THENA  Auto)
  THEN  ParallelLast
  THEN  Auto)
Home
Index