---

Step * of Lemma geo-ge-cases

∀e:BasicGeometry. ∀a,b,c,d:Point.  (¬¬((ab > cd ∨ cd > ab) ∨ ab ≅ cd))
BY
{ ((Auto THEN (InstLemma  `geo-le-cases2` [⌜e⌝;⌜|ab|⌝;⌜|cd|⌝]⋅ THENA Auto))
   THEN (SupposeMore (-1) THENA Auto)
   THEN (D -1 THEN Auto)
   THEN D -1) }

1
1. e : BasicGeometry
2. a : Point
3. b : Point
4. c : Point
5. d : Point
6. |ab| < |cd|
⊢ ¬¬((ab > cd ∨ cd > ab) ∨ ab ≅ cd)

2
1. e : BasicGeometry
2. a : Point
3. b : Point
4. c : Point
5. d : Point
6. |cd| < |ab|
⊢ ¬¬((ab > cd ∨ cd > ab) ∨ ab ≅ cd)

---

Latex:

---

Latex:
\mforall{}e:BasicGeometry.  \mforall{}a,b,c,d:Point.    (\mneg{}\mneg{}((ab  >  cd  \mvee{}  cd  >  ab)  \mvee{}  ab  \mcong{}  cd))


By

---

Latex:
((Auto  THEN  (InstLemma    `geo-le-cases2`  [\mkleeneopen{}e\mkleeneclose{};\mkleeneopen{}|ab|\mkleeneclose{};\mkleeneopen{}|cd|\mkleeneclose{}]\mcdot{}  THENA  Auto))
  THEN  (SupposeMore  (-1)  THENA  Auto)
  THEN  (D  -1  THEN  Auto)
  THEN  D  -1)

---

Home Index