Step * of Lemma rv-partial-sum-unroll

[m:ℕ+]. ∀[X:Top].  (rv-partial-sum(m;i.X[i]) rv-partial-sum(m 1;i.X[i]) X[m 1])
BY
((UnivCD THENA Auto)
   THEN RepUR ``rv-add rv-partial-sum qsum rng_sum mon_itop`` 0
   THEN (RW (AddrC [1] (RecUnfoldC `itop`)) 0)
   THEN (SplitOnConclITE THENA Auto)
   THEN Reduce 0
   THEN Try (Trivial)
   THEN Auto') }


Latex:


\mforall{}[m:\mBbbN{}\msupplus{}].  \mforall{}[X:Top].    (rv-partial-sum(m;i.X[i])  \msim{}  rv-partial-sum(m  -  1;i.X[i])  +  X[m  -  1])


By

((UnivCD  THENA  Auto)
  THEN  RepUR  ``rv-add  rv-partial-sum  qsum  rng\_sum  mon\_itop``  0
  THEN  (RW  (AddrC  [1]  (RecUnfoldC  `itop`))  0)
  THEN  (SplitOnConclITE  THENA  Auto)
  THEN  Reduce  0
  THEN  Try  (Trivial)
  THEN  Auto')




Home Index