Step 
*
 of Lemma 
euclidean-point-eq
∀[e:EuclideanPlane]. ∀[p,q:Point].  p = q ∈ Point supposing ¬¬(p = q ∈ Point)
BY
 
{ (Auto THEN EuContradiction THEN Auto) }
 
Latex: 
Latex:
\mforall{}[e:EuclideanPlane].  \mforall{}[p,q:Point].    p  =  q  supposing  \mneg{}\mneg{}(p  =  q)
 By 
Latex:
(Auto  THEN  EuContradiction  THEN  Auto)
Home
Index