Step * of Lemma rv-mul-sep

rv:RealVectorSpace. ∀a,b:ℝ. ∀x,y:Point.  (a*x b*y  (a ≠ b ∨ y))
BY
((D THENA Auto) THEN UseWitness ⌜rv."*sep"⌝⋅ THEN (D THENA Auto) THEN RepUR ``rv-mul`` THEN Trivial) }


Latex:


Latex:
\mforall{}rv:RealVectorSpace.  \mforall{}a,b:\mBbbR{}.  \mforall{}x,y:Point.    (a*x  \#  b*y  {}\mRightarrow{}  (a  \mneq{}  b  \mvee{}  x  \#  y))


By


Latex:
((D  0  THENA  Auto)
  THEN  UseWitness  \mkleeneopen{}rv."*sep"\mkleeneclose{}\mcdot{}
  THEN  (D  1  THENA  Auto)
  THEN  RepUR  ``rv-mul``  0
  THEN  Trivial)




Home Index