Step * of Lemma dist-lemma-le

g:EuclideanPlane. ∀a,b,c,d,e,f:Point.  (D(a;b;c;d;e;f)  |ef| ≤ |ab| |cd|)
BY
(Auto
   THEN Unfold `dist` -1
   THEN ExRepD
   THEN (Assert ⌜|a'u| ≤ |a'b'| |b'c'|⌝⋅ THENM Auto)
   THEN RWO "geo-add-length-between-iff" 12
   THEN Auto
   THEN FLemma `geo-le-from-be` [13]⋅
   THEN Auto) }


Latex:


Latex:
\mforall{}g:EuclideanPlane.  \mforall{}a,b,c,d,e,f:Point.    (D(a;b;c;d;e;f)  {}\mRightarrow{}  |ef|  \mleq{}  |ab|  +  |cd|)


By


Latex:
(Auto
  THEN  Unfold  `dist`  -1
  THEN  ExRepD
  THEN  (Assert  \mkleeneopen{}|a'u|  \mleq{}  |a'b'|  +  |b'c'|\mkleeneclose{}\mcdot{}  THENM  Auto)
  THEN  RWO  "geo-add-length-between-iff"  12
  THEN  Auto
  THEN  FLemma  `geo-le-from-be`  [13]\mcdot{}
  THEN  Auto)




Home Index