Step
*
2
4
of Lemma
Euclid-Prop19-lemma2_1
.....aux..... 
1. e : EuclideanPlane
2. a : Point
3. b : Point
4. c : Point
5. d : Point
6. f : Point
7. a # bc
8. abd ≅a cbd
9. a=d=c
10. a-f-c
11. cbf < abf
12. p : Point
13. a-p-f
14. abp ≅a cbf
15. f # d
16. Colinear(c;f;d)
17. d-c-f
⊢ B(cfd)
BY
{ ((Assert False BY
          (Assert c-f-c BY
                 (D 0 THEN D 9 THEN Auto)))
   THEN D -1
   THEN FLemma `geo-between-same` [-2]
   THEN Auto) }
Latex:
Latex:
.....aux..... 
1.  e  :  EuclideanPlane
2.  a  :  Point
3.  b  :  Point
4.  c  :  Point
5.  d  :  Point
6.  f  :  Point
7.  a  \#  bc
8.  abd  \mcong{}\msuba{}  cbd
9.  a=d=c
10.  a-f-c
11.  cbf  <  abf
12.  p  :  Point
13.  a-p-f
14.  abp  \mcong{}\msuba{}  cbf
15.  f  \#  d
16.  Colinear(c;f;d)
17.  d-c-f
\mvdash{}  B(cfd)
By
Latex:
((Assert  False  BY
                (Assert  c-f-c  BY
                              (D  0  THEN  D  9  THEN  Auto)))
  THEN  D  -1
  THEN  FLemma  `geo-between-same`  [-2]
  THEN  Auto)
Home
Index