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` 0 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