---

Step * 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
⊢ sum_aux(i + d;f[i] + v;i + 1;x.f[x]) ~ primrec(d - 1;v;λj,x. (x + f[i + j])) + f[i + (d - 1)]
BY
{ ((Subst' i + d ~ (i + 1) + (d - 1) 0 THENA Auto) THEN (RWO "3" 0 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. 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)]

---

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{}  sum\_aux(i  +  d;f[i]  +  v;i  +  1;x.f[x])  \msim{}  primrec(d  -  1;v;\mlambda{}j,x.  (x  +  f[i  +  j]))  +  f[i  +  (d  -  1)]


By

---

Latex:
((Subst'  i  +  d  \msim{}  (i  +  1)  +  (d  -  1)  0  THENA  Auto)  THEN  (RWO  "3"  0  THENA  Auto))

---

Home Index