---

Step * 1 1 1 of Lemma sum_aux-as-primrec


1. d : ℤ
2. 0 < d
3. ∀[v,i:ℤ]. ∀[f:{i..i + (d - 1)-} ⟶ ℤ].  (sum_aux(i + (d - 1);v;i;x.f[x]) ~ primrec(d - 1;v;λj,x. (x + f[i + j])))
4. v : ℤ
5. i : ℤ
6. f : {i..i + d-} ⟶ ℤ
7. i < i + d
⊢ primrec(d - 1;f[i] + v;λj,x. (x + f[(i + 1) + j])) ~ primrec(d - 1;v;λj,x. (x + f[i + j])) + f[i + (d - 1)]
BY
{ (MoveToConcl (-4) THEN (GenConcl ⌜(d - 1) = k ∈ ℕ⌝⋅ THENA Auto)) }

1
1. d : ℤ
2. 0 < d
3. ∀[v,i:ℤ]. ∀[f:{i..i + (d - 1)-} ⟶ ℤ].  (sum_aux(i + (d - 1);v;i;x.f[x]) ~ primrec(d - 1;v;λj,x. (x + f[i + j])))
4. i : ℤ
5. f : {i..i + d-} ⟶ ℤ
6. i < i + d
7. k : ℕ
8. (d - 1) = k ∈ ℕ
⊢ ∀v:ℤ. (primrec(k;f[i] + v;λj,x. (x + f[(i + 1) + j])) ~ primrec(k;v;λj,x. (x + f[i + j])) + f[i + k])

---

Latex:

---

Latex:

1.  d  :  \mBbbZ{}
2.  0  <  d
3.  \mforall{}[v,i:\mBbbZ{}].  \mforall{}[f:\{i..i  +  (d  -  1)\msupminus{}\}  {}\mrightarrow{}  \mBbbZ{}].
          (sum\_aux(i  +  (d  -  1);v;i;x.f[x])  \msim{}  primrec(d  -  1;v;\mlambda{}j,x.  (x  +  f[i  +  j])))
4.  v  :  \mBbbZ{}
5.  i  :  \mBbbZ{}
6.  f  :  \{i..i  +  d\msupminus{}\}  {}\mrightarrow{}  \mBbbZ{}
7.  i  <  i  +  d
\mvdash{}  primrec(d  -  1;f[i]  +  v;\mlambda{}j,x.  (x  +  f[(i  +  1)  +  j]))  \msim{}  primrec(d  -  1;v;\mlambda{}j,x.  (x  +  f[i  +  j]))
+  f[i  +  (d  -  1)]


By

---

Latex:
(MoveToConcl  (-4)  THEN  (GenConcl  \mkleeneopen{}(d  -  1)  =  k\mkleeneclose{}\mcdot{}  THENA  Auto))

---

Home Index