---

Step * 1 1 1 1 of Lemma eu-add-length-comm


1. e : EuclideanPlane
2. x : Point
3. O_X_x
4. y : Point
5. O_X_y
6. ¬(O = X ∈ Point)
7. ¬(O = x ∈ Point)
8. ¬(O = y ∈ Point)
9. a : Point
10. b : Point
11. O_y_b
12. yb=Xx
13. O_x_a
14. xa=Xy
⊢ a = b ∈ Point
BY
{ (AddBetweenEqFacts THEN InstLemma `eu-construction-unicity` [⌜e⌝;⌜O⌝;⌜X⌝;⌜a⌝;⌜b⌝]⋅ THEN Auto) }

1
.....antecedent..... 
1. e : EuclideanPlane
2. x : Point
3. O_X_x
4. y : Point
5. O_X_y
6. ¬(O = X ∈ Point)
7. ¬(O = x ∈ Point)
8. ¬(O = y ∈ Point)
9. a : Point
10. b : Point
11. O_y_b
12. yb=Xx
13. O_x_a
14. xa=Xy
15. a_x_O
16. b_y_O
17. y_X_O
18. x_X_O
19. a_x_X
20. b_y_X
21. X_x_a
22. X_y_b
23. O_X_a
24. O_X_b
25. b_X_O
26. a_X_O
⊢ Xb=Xa

---

Latex:

---

Latex:

1.  e  :  EuclideanPlane
2.  x  :  Point
3.  O\_X\_x
4.  y  :  Point
5.  O\_X\_y
6.  \mneg{}(O  =  X)
7.  \mneg{}(O  =  x)
8.  \mneg{}(O  =  y)
9.  a  :  Point
10.  b  :  Point
11.  O\_y\_b
12.  yb=Xx
13.  O\_x\_a
14.  xa=Xy
\mvdash{}  a  =  b


By

---

Latex:
(AddBetweenEqFacts  THEN  InstLemma  `eu-construction-unicity`  [\mkleeneopen{}e\mkleeneclose{};\mkleeneopen{}O\mkleeneclose{};\mkleeneopen{}X\mkleeneclose{};\mkleeneopen{}a\mkleeneclose{};\mkleeneopen{}b\mkleeneclose{}]\mcdot{}  THEN  Auto)

---

Home Index