Step * of Lemma geo-out-strict_transitivity

e:BasicGeometry. ∀a,b,c,d:Point.
  (b ≠  geo-out-strict(e;a;b;c)  geo-out-strict(e;a;c;d)  geo-out-strict(e;a;b;d))
BY
(((((Auto THEN All (Unfold  `geo-out-strict`)) THEN 0) THENA Auto) THEN -1)
   THEN (DNot THEN (RepeatFor (D 0) THENA Auto))
   THEN (DNot THEN (RepeatFor (D 0) THENA Auto))
   THEN Try (Complete (Auto))) }

1
1. BasicGeometry
2. Point
3. Point
4. Point
5. Point
6. b ≠ d
7. ¬a-b-d
8. ¬a-d-b
9. a-c-d
10. a-c-b
⊢ False

2
1. BasicGeometry
2. Point
3. Point
4. Point
5. Point
6. b ≠ d
7. ¬a-b-d
8. ¬a-d-b
9. a-d-c
10. a-b-c
⊢ False


Latex:


Latex:
\mforall{}e:BasicGeometry.  \mforall{}a,b,c,d:Point.
    (b  \mneq{}  d  {}\mRightarrow{}  geo-out-strict(e;a;b;c)  {}\mRightarrow{}  geo-out-strict(e;a;c;d)  {}\mRightarrow{}  geo-out-strict(e;a;b;d))


By


Latex:
(((((Auto  THEN  All  (Unfold    `geo-out-strict`))  THEN  D  0)  THENA  Auto)  THEN  D  -1)
  THEN  (DNot  8  THEN  (RepeatFor  2  (D  0)  THENA  Auto))
  THEN  (DNot  7  THEN  (RepeatFor  2  (D  0)  THENA  Auto))
  THEN  Try  (Complete  (Auto)))




Home Index