Step
*
of Lemma
sum-as-primrec
∀[k:ℕ]. ∀[f:ℕk ⟶ ℤ]. (Σ(f[x] | x < k) ~ primrec(k;0;λj,x. (x + f[j])))
BY
{ (Auto THEN Unfold `sum` 0 THEN RWO "sum_aux-as-primrec" 0 THEN Try (EqCD) THEN Auto) }
Latex:
Latex:
\mforall{}[k:\mBbbN{}]. \mforall{}[f:\mBbbN{}k {}\mrightarrow{} \mBbbZ{}]. (\mSigma{}(f[x] | x < k) \msim{} primrec(k;0;\mlambda{}j,x. (x + f[j])))
By
Latex:
(Auto THEN Unfold `sum` 0 THEN RWO "sum\_aux-as-primrec" 0 THEN Try (EqCD) THEN Auto)
Home
Index