---

Step * 1 of Lemma right-angles-not-complementary


1. e : BasicGeometry
2. a : Point
3. b : Point
4. c : Point
5. Rabc
6. Racb
7. b ≠ c
8. c' : Point
9. c=b=c'
10. c'=b=c
11. a ≠ c
12. a' : Point
13. a=c=a'
14. a'=c=a
⊢ b ≡ c
BY
{ (Assert Racc' BY
         ((BLemma `right-angle-symmetry` THENA Auto)
          THEN Using [`a',⌜b⌝] (BLemma `right-angle-colinear`)⋅
          THEN EAuto 1)) }

1
1. e : BasicGeometry
2. a : Point
3. b : Point
4. c : Point
5. Rabc
6. Racb
7. b ≠ c
8. c' : Point
9. c=b=c'
10. c'=b=c
11. a ≠ c
12. a' : Point
13. a=c=a'
14. a'=c=a
15. Racc'
⊢ b ≡ c

---

Latex:

---

Latex:

1.  e  :  BasicGeometry
2.  a  :  Point
3.  b  :  Point
4.  c  :  Point
5.  Rabc
6.  Racb
7.  b  \mneq{}  c
8.  c'  :  Point
9.  c=b=c'
10.  c'=b=c
11.  a  \mneq{}  c
12.  a'  :  Point
13.  a=c=a'
14.  a'=c=a
\mvdash{}  b  \mequiv{}  c


By

---

Latex:
(Assert  Racc'  BY
              ((BLemma  `right-angle-symmetry`  THENA  Auto)
                THEN  Using  [`a',\mkleeneopen{}b\mkleeneclose{}]  (BLemma  `right-angle-colinear`)\mcdot{}
                THEN  EAuto  1))

---

Home Index