Step
*
of Lemma
matrix-plus-minus-right
∀[k,m:ℕ]. ∀[r:Rng]. ∀[N:Matrix(k;m;r)].  (N + -(N) = 0 ∈ Matrix(k;m;r))
BY
{ (Auto
   THEN RepUR ``matrix`` 0
   THEN RepeatFor 2 ((FunExt THENA Auto))
   THEN RenameVar `y' (-1)
   THEN RepUR ``matrix-plus matrix-minus mx matrix-ap zero-matrix`` 0
   THEN Fold `matrix-ap` 0
   THEN RW RngNormC 0
   THEN Auto) }
Latex:
Latex:
\mforall{}[k,m:\mBbbN{}].  \mforall{}[r:Rng].  \mforall{}[N:Matrix(k;m;r)].    (N  +  -(N)  =  0)
By
Latex:
(Auto
  THEN  RepUR  ``matrix``  0
  THEN  RepeatFor  2  ((FunExt  THENA  Auto))
  THEN  RenameVar  `y'  (-1)
  THEN  RepUR  ``matrix-plus  matrix-minus  mx  matrix-ap  zero-matrix``  0
  THEN  Fold  `matrix-ap`  0
  THEN  RW  RngNormC  0
  THEN  Auto)
Home
Index