---

Step * of Lemma not-gt-and-lt

∀g:EuclideanPlane. ∀a,b,c,d:Point.  (ab > cd ⇒ |ab| < |cd| ⇒ False)
BY
{ ((Auto THEN (FLemma  `geo-lt-implies-gt-strong` [-1] THENA Auto))
   THEN (InstLemma `geo-gt-trans` [⌜g⌝;⌜c⌝;⌜d⌝;⌜a⌝;⌜b⌝;⌜c⌝;⌜d⌝]⋅ THEN Auto)
   THEN InstLemma `geo-gt-irrefl` [⌜g⌝;⌜c⌝;⌜d⌝]⋅
   THEN Auto) }

---

Latex:

---

Latex:
\mforall{}g:EuclideanPlane.  \mforall{}a,b,c,d:Point.    (ab  >  cd  {}\mRightarrow{}  |ab|  <  |cd|  {}\mRightarrow{}  False)


By

---

Latex:
((Auto  THEN  (FLemma    `geo-lt-implies-gt-strong`  [-1]  THENA  Auto))
  THEN  (InstLemma  `geo-gt-trans`  [\mkleeneopen{}g\mkleeneclose{};\mkleeneopen{}c\mkleeneclose{};\mkleeneopen{}d\mkleeneclose{};\mkleeneopen{}a\mkleeneclose{};\mkleeneopen{}b\mkleeneclose{};\mkleeneopen{}c\mkleeneclose{};\mkleeneopen{}d\mkleeneclose{}]\mcdot{}  THEN  Auto)
  THEN  InstLemma  `geo-gt-irrefl`  [\mkleeneopen{}g\mkleeneclose{};\mkleeneopen{}c\mkleeneclose{};\mkleeneopen{}d\mkleeneclose{}]\mcdot{}
  THEN  Auto)

---

Home Index