---

Step * 1 1 of Lemma geo-between-same-side-or


1. e : BasicGeometry
2. A : Point
3. B : Point
4. C : Point
5. d : Point
6. A # B
7. C # d
8. B(ABC)
9. B(ABd)
10. p1 : Point
11. A-C-p1
12. Cp1 ≅ Cd
13. p2 : Point
14. p1-C-p2
15. Cp2 ≅ Cd
16. ¬¬(B(ACd) ∨ B(AdC))
17. p1 # d
⊢ B(ACd) ∨ B(AdC)
BY
{ ((OrRight THEN Auto)
   THEN ((((DoubleNegation THENM SupposeMore (-2)) THENA Auto) THEN (RemoveDoubleNegation THENA Auto))
         THEN D -1
         THEN Auto)
   THEN (Assert ⌜False⌝⋅ THEN Auto)
   THEN InstLemma `geo-construction-unicity` [⌜e⌝;⌜A⌝;⌜C⌝;⌜p1⌝;⌜d⌝]⋅
   THEN Auto) }

---

Latex:

---

Latex:

1.  e  :  BasicGeometry
2.  A  :  Point
3.  B  :  Point
4.  C  :  Point
5.  d  :  Point
6.  A  \#  B
7.  C  \#  d
8.  B(ABC)
9.  B(ABd)
10.  p1  :  Point
11.  A-C-p1
12.  Cp1  \mcong{}  Cd
13.  p2  :  Point
14.  p1-C-p2
15.  Cp2  \mcong{}  Cd
16.  \mneg{}\mneg{}(B(ACd)  \mvee{}  B(AdC))
17.  p1  \#  d
\mvdash{}  B(ACd)  \mvee{}  B(AdC)


By

---

Latex:
((OrRight  THEN  Auto)
  THEN  ((((DoubleNegation  THENM  SupposeMore  (-2))  THENA  Auto)  THEN  (RemoveDoubleNegation  THENA  Auto))
              THEN  D  -1
              THEN  Auto)
  THEN  (Assert  \mkleeneopen{}False\mkleeneclose{}\mcdot{}  THEN  Auto)
  THEN  InstLemma  `geo-construction-unicity`  [\mkleeneopen{}e\mkleeneclose{};\mkleeneopen{}A\mkleeneclose{};\mkleeneopen{}C\mkleeneclose{};\mkleeneopen{}p1\mkleeneclose{};\mkleeneopen{}d\mkleeneclose{}]\mcdot{}
  THEN  Auto)

---

Home Index