---

Step * 1 of Lemma ip-five-segment


1. rv : InnerProductSpace
2. a : Point
3. b : Point
4. c : Point
5. d : Point
6. A : Point
7. B : Point
8. C : Point
9. D : Point
10. ||A - C|| = (||A - B|| + ||B - C||)
11. ||a - c|| = (||a - b|| + ||b - c||)
12. a # b
13. a_b_c
14. A_B_C
15. ab=AB
16. bc=BC
17. ad=AD
18. bd=BD
⊢ cd=CD
BY
{ ((StableCases ⌜b # c⌝⋅ THENA Auto) THEN Try (Fold `ss-eq` (-1))) }

1
1. rv : InnerProductSpace
2. a : Point
3. b : Point
4. c : Point
5. d : Point
6. A : Point
7. B : Point
8. C : Point
9. D : Point
10. ||A - C|| = (||A - B|| + ||B - C||)
11. ||a - c|| = (||a - b|| + ||b - c||)
12. a # b
13. a_b_c
14. A_B_C
15. ab=AB
16. bc=BC
17. ad=AD
18. bd=BD
19. b # c
⊢ cd=CD

2
1. rv : InnerProductSpace
2. a : Point
3. b : Point
4. c : Point
5. d : Point
6. A : Point
7. B : Point
8. C : Point
9. D : Point
10. ||A - C|| = (||A - B|| + ||B - C||)
11. ||a - c|| = (||a - b|| + ||b - c||)
12. a # b
13. a_b_c
14. A_B_C
15. ab=AB
16. bc=BC
17. ad=AD
18. bd=BD
19. b ≡ c
⊢ cd=CD

---

Latex:

---

Latex:

1.  rv  :  InnerProductSpace
2.  a  :  Point
3.  b  :  Point
4.  c  :  Point
5.  d  :  Point
6.  A  :  Point
7.  B  :  Point
8.  C  :  Point
9.  D  :  Point
10.  ||A  -  C||  =  (||A  -  B||  +  ||B  -  C||)
11.  ||a  -  c||  =  (||a  -  b||  +  ||b  -  c||)
12.  a  \#  b
13.  a\_b\_c
14.  A\_B\_C
15.  ab=AB
16.  bc=BC
17.  ad=AD
18.  bd=BD
\mvdash{}  cd=CD


By

---

Latex:
((StableCases  \mkleeneopen{}b  \#  c\mkleeneclose{}\mcdot{}  THENA  Auto)  THEN  Try  (Fold  `ss-eq`  (-1)))

---

Home Index