Step
*
1
1
1
1
2
2
1
of Lemma
geo-perp-midsegments
.....assertion..... 
1. e : BasicGeometry
2. a : Point
3. b : Point
4. c : Point
5. Rabc
6. c' : Point
7. d : Point
8. p : Point
9. c'=p=d
10. c'=a=c
11. d=b=c
12. a # b
13. p # a
14. d # a
15. b' : Point
16. b=a=b'
17. d' : Point
18. d=a=d'
19. p' : Point
20. p=a=p'
21. Rb'bc
22. Rbb'c'
⊢ d'=b'=c'
BY
{ (InstLemma `symmetry_preserves_midpoint` [⌜e⌝;⌜d⌝;⌜b⌝;⌜c⌝;⌜d'⌝;⌜b'⌝;⌜c'⌝;⌜a⌝]⋅ THEN Auto) }
1
1. e : BasicGeometry
2. a : Point
3. b : Point
4. c : Point
5. Rabc
6. c' : Point
7. d : Point
8. p : Point
9. c'=p=d
10. c'=a=c
11. d=b=c
12. a # b
13. p # a
14. d # a
15. b' : Point
16. b=a=b'
17. d' : Point
18. d=a=d'
19. p' : Point
20. p=a=p'
21. Rb'bc
22. Rbb'c'
23. d=a=d'
24. b=a=b'
⊢ c=a=c'
Latex:
Latex:
.....assertion..... 
1.  e  :  BasicGeometry
2.  a  :  Point
3.  b  :  Point
4.  c  :  Point
5.  Rabc
6.  c'  :  Point
7.  d  :  Point
8.  p  :  Point
9.  c'=p=d
10.  c'=a=c
11.  d=b=c
12.  a  \#  b
13.  p  \#  a
14.  d  \#  a
15.  b'  :  Point
16.  b=a=b'
17.  d'  :  Point
18.  d=a=d'
19.  p'  :  Point
20.  p=a=p'
21.  Rb'bc
22.  Rbb'c'
\mvdash{}  d'=b'=c'
By
Latex:
(InstLemma  `symmetry\_preserves\_midpoint`  [\mkleeneopen{}e\mkleeneclose{};\mkleeneopen{}d\mkleeneclose{};\mkleeneopen{}b\mkleeneclose{};\mkleeneopen{}c\mkleeneclose{};\mkleeneopen{}d'\mkleeneclose{};\mkleeneopen{}b'\mkleeneclose{};\mkleeneopen{}c'\mkleeneclose{};\mkleeneopen{}a\mkleeneclose{}]\mcdot{}  THEN  Auto)
Home
Index