Step
*
1
2
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. p2 # d
⊢ B(ACd) ∨ B(AdC)
BY
{ ((OrLeft 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⌝;⌜p1⌝;⌜C⌝;⌜p2⌝;⌜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. p2 \# d
\mvdash{} B(ACd) \mvee{} B(AdC)
By
Latex:
((OrLeft 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{}p1\mkleeneclose{};\mkleeneopen{}C\mkleeneclose{};\mkleeneopen{}p2\mkleeneclose{};\mkleeneopen{}d\mkleeneclose{}]\mcdot{}
THEN Auto)
Home
Index