Step
*
1
1
1
1
2
of Lemma
Euclid-Prop9
1. e : EuclideanPlane
2. a : Point
3. b : Point
4. c : Point
5. c # ba
6. x : Point
7. c_a_x ∧ ax ≅ cb
8. y : Point
9. c_b_y ∧ by ≅ ca
10. cx ≅ cy
11. c # bx
12. c # yx
13. d : Point
14. [%10] : x-d-y ∧ xd ≅ dy
15. d ≠ c
⊢ acd ≅a bcd
BY
{ (Unfold `geo-cong-angle` 0 THEN SplitAndConcl THEN Try (InstConcl [⌜x⌝;⌜d⌝;⌜y⌝;⌜d⌝]⋅) THEN Auto) }
Latex:
Latex:
1. e : EuclideanPlane
2. a : Point
3. b : Point
4. c : Point
5. c \# ba
6. x : Point
7. c\_a\_x \mwedge{} ax \mcong{} cb
8. y : Point
9. c\_b\_y \mwedge{} by \mcong{} ca
10. cx \mcong{} cy
11. c \# bx
12. c \# yx
13. d : Point
14. [\%10] : x-d-y \mwedge{} xd \mcong{} dy
15. d \mneq{} c
\mvdash{} acd \mcong{}\msuba{} bcd
By
Latex:
(Unfold `geo-cong-angle` 0 THEN SplitAndConcl THEN Try (InstConcl [\mkleeneopen{}x\mkleeneclose{};\mkleeneopen{}d\mkleeneclose{};\mkleeneopen{}y\mkleeneclose{};\mkleeneopen{}d\mkleeneclose{}]\mcdot{}) THEN Auto)
Home
Index