| is_fskey(sk), 0 < i, ∀ val0, st, val, r0, sk, i0. i→n(i0) < i→n(i) → (is_fskey(sk) → addarray(r0, val, i0, st[r0 -- sk, val0]) = (addarray(r0, val, i0, st)[r0 -- sk, val0])) ⊦ (addarray(r0, val, i - 1, st[r0 -- sk, val0])[r0 -- (i - 1) ', val]) = (addarray(r0, val, i, st)[r0 -- sk, val0]) |
i = i1 + 1, is_fskey(sk), 0 < i, ∀ val0, st, val, r0, sk, i0. i→n(i0) < i→n(i) → (is_fskey(sk) → addarray(r0, val, i0, st[r0 -- sk, val0]) = (addarray(r0, val, i0, st)[r0 -- sk, val0])) ⊦ (addarray(r0, val, i1, st[r0 -- sk, val0])[r0 -- i1 ', val]) = (addarray(r0, val, i, st)[r0 -- sk, val0])
[[CONCRETESIMPRULES : ([CSIMPELIM : ⊦ i0 = i - j ↔ i = i0 + j])], [EXTRATERMS : (i, 1, i1)]]