Step
*
of Lemma
sympoint_wf
∀[e:EuclideanPlane]. ∀[a:Point]. ∀[p:{p:Point| a ≠ p} ].  (SymmetricPoint(a;p) ∈ {p':Point| p=a=p'} )
BY
{ (Auto THEN Unfold `sympoint` 0 THEN DoSubsume THEN Auto) }
1
1. e : EuclideanPlane
2. a : Point
3. p : {p:Point| a ≠ p} 
4. SCO(p;a;a;p) = SCO(p;a;a;p) ∈ {u:Point| au ≅ ap ∧ p_a_u ∧ (a ≠ p 
⇒ a ≠ u)} 
⊢ {u:Point| au ≅ ap ∧ p_a_u ∧ (a ≠ p 
⇒ a ≠ u)}  ⊆r {p':Point| p=a=p'} 
Latex:
Latex:
\mforall{}[e:EuclideanPlane].  \mforall{}[a:Point].  \mforall{}[p:\{p:Point|  a  \mneq{}  p\}  ].    (SymmetricPoint(a;p)  \mmember{}  \{p':Point|  p=a=p'\}  \000C)
By
Latex:
(Auto  THEN  Unfold  `sympoint`  0  THEN  DoSubsume  THEN  Auto)
Home
Index