Step
*
of Lemma
rv-add-0
∀[rv:RealVectorSpace]. ∀[x:Point]. 0 + x ≡ x
BY
{ (Auto THEN (Assert r0*x + r1*x ≡ r1*x BY ((RWO "rv-mul-add" 0 THENA Auto) THEN nRNorm 0 THEN Auto))) }
1
1. rv : RealVectorSpace
2. x : Point
3. r0*x + r1*x ≡ r1*x
⊢ 0 + 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