---

Step * of Lemma not-lt-and-symm-le

∀[e:BasicGeometry]. ∀[p,q:Length].  (p ≤ q ⇒ q < p ⇒ False)
BY
{ (Auto
   THEN (InstLemma `geo-lt_transitivity` [⌜e⌝;⌜p⌝;⌜q⌝;⌜p⌝]⋅ THEN Auto)
   THEN FLemma `geo-lt-irrefl` [-1]
   THEN Auto) }

---

Latex:

---

Latex:
\mforall{}[e:BasicGeometry].  \mforall{}[p,q:Length].    (p  \mleq{}  q  {}\mRightarrow{}  q  <  p  {}\mRightarrow{}  False)


By

---

Latex:
(Auto
  THEN  (InstLemma  `geo-lt\_transitivity`  [\mkleeneopen{}e\mkleeneclose{};\mkleeneopen{}p\mkleeneclose{};\mkleeneopen{}q\mkleeneclose{};\mkleeneopen{}p\mkleeneclose{}]\mcdot{}  THEN  Auto)
  THEN  FLemma  `geo-lt-irrefl`  [-1]
  THEN  Auto)

---

Home Index