Step
*
of Lemma
eu-extend_wf
∀[e:EuclideanStructure]. ∀[a:Point]. ∀[b:{b:Point| ¬(a = b ∈ Point)} ]. ∀[c,d:Point].  ((extend ab by cd) ∈ Point)
BY
{ (ProveWfLemma THEN All (Unfolds ``eu-point``)⋅ THEN DRecord 1 THEN Auto) }
Latex:
Latex:
\mforall{}[e:EuclideanStructure].  \mforall{}[a:Point].  \mforall{}[b:\{b:Point|  \mneg{}(a  =  b)\}  ].  \mforall{}[c,d:Point].
    ((extend  ab  by  cd)  \mmember{}  Point)
By
Latex:
(ProveWfLemma  THEN  All  (Unfolds  ``eu-point``)\mcdot{}  THEN  DRecord  1  THEN  Auto)
Home
Index