Step
*
of Lemma
geo-sep_wf
∀[g:GeometryPrimitives]. ∀[a,b:Point].  (a # b ∈ ℙ)
BY
{ ((D 0 THENW Auto)
   THEN Unfold `geo-primitives` 1
   THEN Unfold `geo-sep` 0
   THEN Unfold `geo-gt-prim` 0
   THEN (Unfold `geo-point` 0 THEN Unfold `geo-point` 1)
   THEN DRecord 1
   THEN Auto) }
Latex:
Latex:
\mforall{}[g:GeometryPrimitives].  \mforall{}[a,b:Point].    (a  \#  b  \mmember{}  \mBbbP{})
By
Latex:
((D  0  THENW  Auto)
  THEN  Unfold  `geo-primitives`  1
  THEN  Unfold  `geo-sep`  0
  THEN  Unfold  `geo-gt-prim`  0
  THEN  (Unfold  `geo-point`  0  THEN  Unfold  `geo-point`  1)
  THEN  DRecord  1
  THEN  Auto)
Home
Index