Step
*
of Lemma
reg-seq-list-add-as-l_sum
∀[L:(ℕ+ ⟶ ℤ) List]. (reg-seq-list-add(L) = (λn.l_sum(map(λx.(x n);L))) ∈ (ℕ+ ⟶ ℤ))
BY
{ (Auto
   THEN Unfold `reg-seq-list-add` 0
   THEN EqCD
   THEN Auto
   THEN (RWO "cbv_list_accum-is-list_accum" 0 THEN Try (RWO "l_sum_as_accum" 0))
   THEN Auto) }
Latex:
Latex:
\mforall{}[L:(\mBbbN{}\msupplus{}  {}\mrightarrow{}  \mBbbZ{})  List].  (reg-seq-list-add(L)  =  (\mlambda{}n.l\_sum(map(\mlambda{}x.(x  n);L))))
By
Latex:
(Auto
  THEN  Unfold  `reg-seq-list-add`  0
  THEN  EqCD
  THEN  Auto
  THEN  (RWO  "cbv\_list\_accum-is-list\_accum"  0  THEN  Try  (RWO  "l\_sum\_as\_accum"  0))
  THEN  Auto)
Home
Index