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