---

Step * 1 1 1 of Lemma geo-triangle-inequality-lt-sep


1. e : BasicGeometry
2. a : Point
3. b : Point
4. c : Point
5. d : Point
6. g : Point
7. h : Point
8. |ab| < |gh| + |cd|
9. |cd| < |ab| + |gh|
10. |gh| < |cd| + |ab|
11. c ≠ d
12. g ≠ h
13. |cd| ≠ |ab| + |gh|
14. |cd| ≠ |gh|
15. |cd| < |gh|
⊢ a ≠ b
BY
{ ((Assert |cd| + |cc| < |cd| + |ab| BY
          (InstLemma `geo-lt_transitivity` [⌜e⌝;⌜|cd|⌝;⌜|gh|⌝;⌜|cd| + |ab|⌝]⋅ THEN EAuto 1))
   THEN (FLemma `geo-add-length-cancel-left-lt` [-1] THEN Auto)
   THEN FLemma `geo-lt-sep` [-1]
   THEN Auto) }

---

Latex:

---

Latex:

1.  e  :  BasicGeometry
2.  a  :  Point
3.  b  :  Point
4.  c  :  Point
5.  d  :  Point
6.  g  :  Point
7.  h  :  Point
8.  |ab|  <  |gh|  +  |cd|
9.  |cd|  <  |ab|  +  |gh|
10.  |gh|  <  |cd|  +  |ab|
11.  c  \mneq{}  d
12.  g  \mneq{}  h
13.  |cd|  \mneq{}  |ab|  +  |gh|
14.  |cd|  \mneq{}  |gh|
15.  |cd|  <  |gh|
\mvdash{}  a  \mneq{}  b


By

---

Latex:
((Assert  |cd|  +  |cc|  <  |cd|  +  |ab|  BY
                (InstLemma  `geo-lt\_transitivity`  [\mkleeneopen{}e\mkleeneclose{};\mkleeneopen{}|cd|\mkleeneclose{};\mkleeneopen{}|gh|\mkleeneclose{};\mkleeneopen{}|cd|  +  |ab|\mkleeneclose{}]\mcdot{}  THEN  EAuto  1))
  THEN  (FLemma  `geo-add-length-cancel-left-lt`  [-1]  THEN  Auto)
  THEN  FLemma  `geo-lt-sep`  [-1]
  THEN  Auto)

---

Home Index