Step
*
2
of Lemma
geo-line-eq_functionality
1. e : EuclideanPlane
2. l : Line
3. m : Line
4. l1 : Line
5. m1 : Line
6. l ≡ l1
7. m ≡ m1
8. l1 ≡ m1
⊢ l ≡ m
BY
{ ((InstLemma  `geo-line-eq_transitivity` [⌜e⌝;⌜l⌝;⌜l1⌝;⌜m1⌝]⋅ THEN Auto)
   THEN (InstLemma  `geo-line-eq_transitivity` [⌜e⌝;⌜l⌝;⌜m1⌝;⌜m⌝]⋅
         THENA (Auto THEN FLemma `geo-line-eq_inversion` [7] THEN Auto)
         )
   THEN Auto) }
Latex:
Latex:
1.  e  :  EuclideanPlane
2.  l  :  Line
3.  m  :  Line
4.  l1  :  Line
5.  m1  :  Line
6.  l  \mequiv{}  l1
7.  m  \mequiv{}  m1
8.  l1  \mequiv{}  m1
\mvdash{}  l  \mequiv{}  m
By
Latex:
((InstLemma    `geo-line-eq\_transitivity`  [\mkleeneopen{}e\mkleeneclose{};\mkleeneopen{}l\mkleeneclose{};\mkleeneopen{}l1\mkleeneclose{};\mkleeneopen{}m1\mkleeneclose{}]\mcdot{}  THEN  Auto)
  THEN  (InstLemma    `geo-line-eq\_transitivity`  [\mkleeneopen{}e\mkleeneclose{};\mkleeneopen{}l\mkleeneclose{};\mkleeneopen{}m1\mkleeneclose{};\mkleeneopen{}m\mkleeneclose{}]\mcdot{}
              THENA  (Auto  THEN  FLemma  `geo-line-eq\_inversion`  [7]  THEN  Auto)
              )
  THEN  Auto)
Home
Index