Step
*
of Lemma
rng_times_lsum_l
∀r:Rng. ∀A:Type. ∀as:A List. ∀f:A ⟶ |r|. ∀u:|r|.  ((u * (Σ{A,r} x ∈ as. f[x])) = (Σ{A,r} x ∈ as. (u * f[x])) ∈ |r|)
BY
{ (InductionOnList⋅ THEN Reduce 0 THEN Auto THEN ((RWH (RevHypC 5) 0 THENM RW RngNormC 0) THEN Auto)) }
Latex:
Latex:
\mforall{}r:Rng.  \mforall{}A:Type.  \mforall{}as:A  List.  \mforall{}f:A  {}\mrightarrow{}  |r|.  \mforall{}u:|r|.
    ((u  *  (\mSigma{}\{A,r\}  x  \mmember{}  as.  f[x]))  =  (\mSigma{}\{A,r\}  x  \mmember{}  as.  (u  *  f[x])))
By
Latex:
(InductionOnList\mcdot{}  THEN  Reduce  0  THEN  Auto  THEN  ((RWH  (RevHypC  5)  0  THENM  RW  RngNormC  0)  THEN  Auto))
Home
Index