Step * of Lemma rv-add-0

[rv:RealVectorSpace]. ∀[x:Point].  x ≡ x
BY
(Auto THEN (Assert r0*x r1*x ≡ r1*x BY ((RWO "rv-mul-add" THENA Auto) THEN nRNorm THEN Auto))) }

1
1. rv RealVectorSpace
2. Point
3. r0*x r1*x ≡ r1*x
⊢ x ≡ x


Latex:


Latex:
\mforall{}[rv:RealVectorSpace].  \mforall{}[x:Point].    0  +  x  \mequiv{}  x


By


Latex:
(Auto  THEN  (Assert  r0*x  +  r1*x  \mequiv{}  r1*x  BY  ((RWO  "rv-mul-add"  0  THENA  Auto)  THEN  nRNorm  0  THEN  Auto)))




Home Index