Step * of Lemma geo-conga-to-cong3

E:BasicGeometry. ∀a,b,c,d,e,f:Point.
  (a ≠ b
   c ≠ b
   d ≠ e
   f ≠ e
   abc ≅a def
   (∃a',c',d',f':Point. (out(b a'a) ∧ out(b cc') ∧ out(e d'd) ∧ out(e ff') ∧ Cong3(a'bc',d'ef'))))
BY
(((TACTIC:Auto THEN TACTIC:Unfold `geo-cong-angle` -1) THEN ExRepD)
   THEN InstConcl [⌜a'⌝;⌜c'⌝;⌜x'⌝;⌜z'⌝]⋅
   THEN Auto
   THEN Try (Unfold `geo-out` THEN Auto)
   THEN Unfold `geo-cong-tri` 0
   THEN Auto) }


Latex:


Latex:
\mforall{}E:BasicGeometry.  \mforall{}a,b,c,d,e,f:Point.
    (a  \mneq{}  b
    {}\mRightarrow{}  c  \mneq{}  b
    {}\mRightarrow{}  d  \mneq{}  e
    {}\mRightarrow{}  f  \mneq{}  e
    {}\mRightarrow{}  abc  \mcong{}\msuba{}  def
    {}\mRightarrow{}  (\mexists{}a',c',d',f':Point.  (out(b  a'a)  \mwedge{}  out(b  cc')  \mwedge{}  out(e  d'd)  \mwedge{}  out(e  ff')  \mwedge{}  Cong3(a'bc',d'ef'))))


By


Latex:
(((TACTIC:Auto  THEN  TACTIC:Unfold  `geo-cong-angle`  -1)  THEN  ExRepD)
  THEN  InstConcl  [\mkleeneopen{}a'\mkleeneclose{};\mkleeneopen{}c'\mkleeneclose{};\mkleeneopen{}x'\mkleeneclose{};\mkleeneopen{}z'\mkleeneclose{}]\mcdot{}
  THEN  Auto
  THEN  Try  (Unfold  `geo-out`  0  THEN  Auto)
  THEN  Unfold  `geo-cong-tri`  0
  THEN  Auto)




Home Index