---

Step * 1 1 1 2 of Lemma Euclid-Prop19-lemma2

.....antecedent..... 
1. e : EuclideanPlane
2. a : Point
3. b : Point
4. c : Point
5. d : Point
6. f : Point
7. a # bc
8. cbd < abd
9. a=d=c
10. a-f-c
11. cbf ≅a abf
12. x : Point
13. bx ≅ bc
14. out(b ax)
15. b # xc
16. x1 : Point
17. x-x1-c
18. out(b fx1)
19. abf ≅a xbx1
20. cbf ≅a cbx1
21. x' : Point
22. x-x'-c
23. out(b dx')
24. abd ≅a xbx'
25. cbd ≅a cbx'
26. xbx1 ≅a cbx1
⊢ cbx' < xbx'
BY
{ ((InstLemma `geo-cong-angle-preserves-lt-angle` [⌜e⌝;⌜c⌝;⌜b⌝;⌜d⌝;⌜c⌝;⌜b⌝;⌜x'⌝;⌜a⌝;⌜b⌝;⌜d⌝]⋅ THENA EAuto 1)
   THEN InstLemma `geo-cong-angle-preserves-lt-angle2` [⌜e⌝;⌜c⌝;⌜b⌝;⌜x'⌝;⌜x⌝;⌜b⌝;⌜x'⌝;⌜a⌝;⌜b⌝;⌜d⌝]⋅
   THEN EAuto 1) }

---

Latex:

---

Latex:
.....antecedent..... 
1.  e  :  EuclideanPlane
2.  a  :  Point
3.  b  :  Point
4.  c  :  Point
5.  d  :  Point
6.  f  :  Point
7.  a  \#  bc
8.  cbd  <  abd
9.  a=d=c
10.  a-f-c
11.  cbf  \mcong{}\msuba{}  abf
12.  x  :  Point
13.  bx  \mcong{}  bc
14.  out(b  ax)
15.  b  \#  xc
16.  x1  :  Point
17.  x-x1-c
18.  out(b  fx1)
19.  abf  \mcong{}\msuba{}  xbx1
20.  cbf  \mcong{}\msuba{}  cbx1
21.  x'  :  Point
22.  x-x'-c
23.  out(b  dx')
24.  abd  \mcong{}\msuba{}  xbx'
25.  cbd  \mcong{}\msuba{}  cbx'
26.  xbx1  \mcong{}\msuba{}  cbx1
\mvdash{}  cbx'  <  xbx'


By

---

Latex:
((InstLemma  `geo-cong-angle-preserves-lt-angle`  [\mkleeneopen{}e\mkleeneclose{};\mkleeneopen{}c\mkleeneclose{};\mkleeneopen{}b\mkleeneclose{};\mkleeneopen{}d\mkleeneclose{};\mkleeneopen{}c\mkleeneclose{};\mkleeneopen{}b\mkleeneclose{};\mkleeneopen{}x'\mkleeneclose{};\mkleeneopen{}a\mkleeneclose{};\mkleeneopen{}b\mkleeneclose{};\mkleeneopen{}d\mkleeneclose{}]\mcdot{}
    THENA  EAuto  1
    )
  THEN  InstLemma  `geo-cong-angle-preserves-lt-angle2`  [\mkleeneopen{}e\mkleeneclose{};\mkleeneopen{}c\mkleeneclose{};\mkleeneopen{}b\mkleeneclose{};\mkleeneopen{}x'\mkleeneclose{};\mkleeneopen{}x\mkleeneclose{};\mkleeneopen{}b\mkleeneclose{};\mkleeneopen{}x'\mkleeneclose{};\mkleeneopen{}a\mkleeneclose{};\mkleeneopen{}b\mkleeneclose{};\mkleeneopen{}d\mkleeneclose{}]\mcdot{}
  THEN  EAuto  1)

---

Home Index