Step * of Lemma stable__eu-congruent

e:EuclideanStructure. ∀[a,b,c,d:Point].  Stable{ab=cd}
BY
((UnivCD THENA Auto)
   THEN (DRecord THENA Auto)
   THEN (Assert ∀[a,b,c,d:e."Point"].  e."E" supposing ¬¬(e."E" d) BY
               (UseWitness ⌜e."Estable"⌝⋅ THEN Trivial))
   THEN RepUR ``eu-congruent stable`` 0
   THEN (D THENA Auto)
   THEN BackThruSomeHyp
   THEN Auto) }


Latex:


Latex:
\mforall{}e:EuclideanStructure.  \mforall{}[a,b,c,d:Point].    Stable\{ab=cd\}


By


Latex:
((UnivCD  THENA  Auto)
  THEN  (DRecord  1  THENA  Auto)
  THEN  (Assert  \mforall{}[a,b,c,d:e."Point"].    e."E"  a  b  c  d  supposing  \mneg{}\mneg{}(e."E"  a  b  c  d)  BY
                          (UseWitness  \mkleeneopen{}e."Estable"\mkleeneclose{}\mcdot{}  THEN  Trivial))
  THEN  RepUR  ``eu-congruent  stable``  0
  THEN  (D  0  THENA  Auto)
  THEN  BackThruSomeHyp
  THEN  Auto)




Home Index