Step
*
2
2
of Lemma
straight-angle-sum2
1. e : EuclideanPlane
2. a : Point
3. b : Point
4. c : Point
5. x : Point
6. y : Point
7. z : Point
8. i : Point
9. j : Point
10. k : Point
11. p : Point
12. p' : Point
13. d' : Point
14. f' : Point
15. abc ≅a ip'p
16. kp'p ≅a xyz
17. B(p'p'p)
18. out(p' id')
19. out(p' kf')
20. d'-p'-f'
21. out(y xz)
22. i-p'-k
23. y # x
24. y # z
25. out(p' kp)
26. j ≡ p'
⊢ B(abc)
BY
{ ((InstLemma `angle-cong-preserves-straight-angle` [⌜e⌝;⌜a⌝;⌜b⌝;⌜c⌝;⌜i⌝;⌜p'⌝;⌜p⌝]⋅ THEN EAuto 1)
   THEN InstLemma  `extended-out-preserves-between` [⌜e⌝;⌜p'⌝;⌜k⌝;⌜p⌝;⌜i⌝]⋅
   THEN Auto) }
Latex:
Latex:
1.  e  :  EuclideanPlane
2.  a  :  Point
3.  b  :  Point
4.  c  :  Point
5.  x  :  Point
6.  y  :  Point
7.  z  :  Point
8.  i  :  Point
9.  j  :  Point
10.  k  :  Point
11.  p  :  Point
12.  p'  :  Point
13.  d'  :  Point
14.  f'  :  Point
15.  abc  \mcong{}\msuba{}  ip'p
16.  kp'p  \mcong{}\msuba{}  xyz
17.  B(p'p'p)
18.  out(p'  id')
19.  out(p'  kf')
20.  d'-p'-f'
21.  out(y  xz)
22.  i-p'-k
23.  y  \#  x
24.  y  \#  z
25.  out(p'  kp)
26.  j  \mequiv{}  p'
\mvdash{}  B(abc)
By
Latex:
((InstLemma  `angle-cong-preserves-straight-angle`  [\mkleeneopen{}e\mkleeneclose{};\mkleeneopen{}a\mkleeneclose{};\mkleeneopen{}b\mkleeneclose{};\mkleeneopen{}c\mkleeneclose{};\mkleeneopen{}i\mkleeneclose{};\mkleeneopen{}p'\mkleeneclose{};\mkleeneopen{}p\mkleeneclose{}]\mcdot{}  THEN  EAuto  1)
  THEN  InstLemma    `extended-out-preserves-between`  [\mkleeneopen{}e\mkleeneclose{};\mkleeneopen{}p'\mkleeneclose{};\mkleeneopen{}k\mkleeneclose{};\mkleeneopen{}p\mkleeneclose{};\mkleeneopen{}i\mkleeneclose{}]\mcdot{}
  THEN  Auto)
Home
Index