Step
*
2
of Lemma
interior-angles-unique2-symm
1. e : EuclideanPlane
2. a : Point
3. b : Point
4. c : Point
5. d : Point
6. a' : Point
7. c' : Point
8. p : Point
9. c leftof ab
10. d leftof ab
11. p leftof ab
12. out(b aa')
13. out(b cc')
14. a'_p_c'
15. p ≠ c'
16. abd < abc
17. abp ≅a abd
18. p ≠ a
19. q : Point
20. p-b-q
21. bq ≅ OX
22. f : Point
23. q-b-f
24. bf ≅ bd
25. f leftof ab
26. d ≡ f
⊢ out(b dp)
BY
{ ((InstLemma `geo-out-iff-between1` [⌜e⌝;⌜b⌝;⌜f⌝;⌜p⌝;⌜q⌝] ⋅ THEN Auto)
   THEN (D -2 THEN Auto)
   THEN RWO "26" 0
   THEN Auto) }
Latex:
Latex:
1.  e  :  EuclideanPlane
2.  a  :  Point
3.  b  :  Point
4.  c  :  Point
5.  d  :  Point
6.  a'  :  Point
7.  c'  :  Point
8.  p  :  Point
9.  c  leftof  ab
10.  d  leftof  ab
11.  p  leftof  ab
12.  out(b  aa')
13.  out(b  cc')
14.  a'\_p\_c'
15.  p  \mneq{}  c'
16.  abd  <  abc
17.  abp  \mcong{}\msuba{}  abd
18.  p  \mneq{}  a
19.  q  :  Point
20.  p-b-q
21.  bq  \mcong{}  OX
22.  f  :  Point
23.  q-b-f
24.  bf  \mcong{}  bd
25.  f  leftof  ab
26.  d  \mequiv{}  f
\mvdash{}  out(b  dp)
By
Latex:
((InstLemma  `geo-out-iff-between1`  [\mkleeneopen{}e\mkleeneclose{};\mkleeneopen{}b\mkleeneclose{};\mkleeneopen{}f\mkleeneclose{};\mkleeneopen{}p\mkleeneclose{};\mkleeneopen{}q\mkleeneclose{}]  \mcdot{}  THEN  Auto)
  THEN  (D  -2  THEN  Auto)
  THEN  RWO  "26"  0
  THEN  Auto)
Home
Index