---

Step * of Lemma matrix-times-distrib-right

∀[n,k,m:ℕ]. ∀[r:Rng]. ∀[M,N:Matrix(n;k;r)]. ∀[K:Matrix(k;m;r)].  ((M + N*K) = (M*K) + (N*K) ∈ Matrix(n;m;r))
BY
{ (Auto
   THEN RepUR ``matrix`` 0
   THEN RepeatFor 2 ((FunExt THENA Auto))
   THEN RenameVar `y' (-1)
   THEN RepUR ``matrix-times matrix-plus mx matrix-ap`` 0
   THEN Fold `matrix-ap` 0
   THEN (RWO "rng_sum_plus<" 0 THEN Auto)
   THEN EqCDA
   THEN RW RngNormC 0
   THEN Auto) }

---

Latex:

---

Latex:
\mforall{}[n,k,m:\mBbbN{}].  \mforall{}[r:Rng].  \mforall{}[M,N:Matrix(n;k;r)].  \mforall{}[K:Matrix(k;m;r)].    ((M  +  N*K)  =  (M*K)  +  (N*K))


By

---

Latex:
(Auto
  THEN  RepUR  ``matrix``  0
  THEN  RepeatFor  2  ((FunExt  THENA  Auto))
  THEN  RenameVar  `y'  (-1)
  THEN  RepUR  ``matrix-times  matrix-plus  mx  matrix-ap``  0
  THEN  Fold  `matrix-ap`  0
  THEN  (RWO  "rng\_sum\_plus<"  0  THEN  Auto)
  THEN  EqCDA
  THEN  RW  RngNormC  0
  THEN  Auto)

---

Home Index