| ¬ n < # getarray(r, st0), st ⊆ st0, is_array(r, st), r -- _length ∈ st, r ∈ st, n < i→n(st0[r -- _length] .intval), 0 < st0[r -- _length] .intval ⊦ st[r -- n→i(n) '] = (getarray(r, st0)[n]), st0[r -- _length] .intval = 0 |
st ⊆ st0, is_array(r, st), r -- _length ∈ st, r ∈ st, n < i→n(st0[r -- _length] .intval), 0 < st0[r -- _length] .intval, # getarray(r, st0) ≤ n, # getarray(r, st0) < i→n(st0[r -- _length] .intval) ⊦ st[r -- n→i(n) '] = (getarray(r, st0)[n]), st0[r -- _length] .intval = 0
[[CONCRETESIMPRULES : ([CSIMPFORWARD : ⊦ m ≤ n ∧ n < n0 → m < n0], [CSIMPSEQ : ⊦ ¬ m < n ↔ n ≤ m])]]