Step
*
1
2
1
of Lemma
unique-angles-in-half-plane-better
1. e : EuclideanPlane
2. a : Point
3. b : Point
4. c : Point
5. q : Point
6. a leftof bc
7. q leftof bc
8. qbc ≅a abc
9. u : Point
10. a-b-u
11. bu ≅ OX
12. q1 : Point
13. u-b-q1
14. bq1 ≅ bq
15. bc ≅ bc
16. bq ≅ bq1
⊢ cbq ≅a cbq1
BY
{ ((Assert cbq ≅a abc BY
          (FLemma `geo-cong-angle-symmetry` [8] THEN Auto))
   THEN InstLemma  `geo-cong-angle-transitivity` [⌜e⌝;⌜c⌝;⌜b⌝;⌜q⌝;⌜a⌝;⌜b⌝;⌜c⌝;⌜c⌝;⌜b⌝;⌜q1⌝]⋅
   THEN Auto) }
1
.....antecedent..... 
1. e : EuclideanPlane
2. a : Point
3. b : Point
4. c : Point
5. q : Point
6. a leftof bc
7. q leftof bc
8. qbc ≅a abc
9. u : Point
10. a-b-u
11. bu ≅ OX
12. q1 : Point
13. u-b-q1
14. bq1 ≅ bq
15. bc ≅ bc
16. bq ≅ bq1
17. cbq ≅a abc
⊢ abc ≅a cbq1
Latex:
Latex:
1.  e  :  EuclideanPlane
2.  a  :  Point
3.  b  :  Point
4.  c  :  Point
5.  q  :  Point
6.  a  leftof  bc
7.  q  leftof  bc
8.  qbc  \mcong{}\msuba{}  abc
9.  u  :  Point
10.  a-b-u
11.  bu  \mcong{}  OX
12.  q1  :  Point
13.  u-b-q1
14.  bq1  \mcong{}  bq
15.  bc  \mcong{}  bc
16.  bq  \mcong{}  bq1
\mvdash{}  cbq  \mcong{}\msuba{}  cbq1
By
Latex:
((Assert  cbq  \mcong{}\msuba{}  abc  BY
                (FLemma  `geo-cong-angle-symmetry`  [8]  THEN  Auto))
  THEN  InstLemma    `geo-cong-angle-transitivity`  [\mkleeneopen{}e\mkleeneclose{};\mkleeneopen{}c\mkleeneclose{};\mkleeneopen{}b\mkleeneclose{};\mkleeneopen{}q\mkleeneclose{};\mkleeneopen{}a\mkleeneclose{};\mkleeneopen{}b\mkleeneclose{};\mkleeneopen{}c\mkleeneclose{};\mkleeneopen{}c\mkleeneclose{};\mkleeneopen{}b\mkleeneclose{};\mkleeneopen{}q1\mkleeneclose{}]\mcdot{}
  THEN  Auto)
Home
Index