---

Step * 1 1 1 1 of Lemma geo-add-length-between


1. e : BasicGeometry
2. a : Point
3. b : Point
4. c : Point
5. B(abc)
6. O # X
7. x : {x:Point| B(OXx) ∧ Xx ≅ ac} 
8. Xx ≅ ac
9. B(OXx)
10. y : {x:Point| B(OXx) ∧ Xx ≅ ab} 
11. Xy ≅ ab
12. B(OXy)
13. z : {x:Point| B(OXx) ∧ Xx ≅ bc} 
14. Xz ≅ bc
15. B(OXz)
16. O # y
17. w : {x:Point| B(Oyx) ∧ yx ≅ Xz} 
18. yw ≅ Xz
19. B(Oyw)
20. a # b
⊢ Xw ≅ Xx
BY
{ (InstLemma `geo-three-segment` [⌜e⌝;⌜a⌝;⌜b⌝;⌜c⌝;⌜X⌝;⌜y⌝;⌜w⌝]⋅ THEN Auto) }

---

Latex:

---

Latex:

1.  e  :  BasicGeometry
2.  a  :  Point
3.  b  :  Point
4.  c  :  Point
5.  B(abc)
6.  O  \#  X
7.  x  :  \{x:Point|  B(OXx)  \mwedge{}  Xx  \mcong{}  ac\} 
8.  Xx  \mcong{}  ac
9.  B(OXx)
10.  y  :  \{x:Point|  B(OXx)  \mwedge{}  Xx  \mcong{}  ab\} 
11.  Xy  \mcong{}  ab
12.  B(OXy)
13.  z  :  \{x:Point|  B(OXx)  \mwedge{}  Xx  \mcong{}  bc\} 
14.  Xz  \mcong{}  bc
15.  B(OXz)
16.  O  \#  y
17.  w  :  \{x:Point|  B(Oyx)  \mwedge{}  yx  \mcong{}  Xz\} 
18.  yw  \mcong{}  Xz
19.  B(Oyw)
20.  a  \#  b
\mvdash{}  Xw  \mcong{}  Xx


By

---

Latex:
(InstLemma  `geo-three-segment`  [\mkleeneopen{}e\mkleeneclose{};\mkleeneopen{}a\mkleeneclose{};\mkleeneopen{}b\mkleeneclose{};\mkleeneopen{}c\mkleeneclose{};\mkleeneopen{}X\mkleeneclose{};\mkleeneopen{}y\mkleeneclose{};\mkleeneopen{}w\mkleeneclose{}]\mcdot{}  THEN  Auto)

---

Home Index