| 0 < st0[r -- _length] .intval, n < i→n(st0[r -- _length] .intval), r ∈ st, r -- _length ∈ st, is_array(r, st), st ⊆ st0, n < # getarray(r, st0) ⊦ r -- n→i(n) ' ∈ st, st0[r -- _length] .intval = 0, st[r -- n→i(n) '] = st0[r -- n→i(n) '], getarray(r, st0) = [] |
0 < st0[r -- _length] .intval, n < i→n(st0[r -- _length] .intval), r ∈ st, r -- _length ∈ st, is_array(r, st), st ⊆ st0, n < # getarray(r, st0) ⊦ getarray(r, st0) = [], st0[r -- _length] .intval = 0, noval = st0[r -- n→i(n) '], r -- n→i(n) ' ∈ st
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ ∅[rk] = noval], [CSIMPSEQ : ⊦ ¬ rk ∈ st → st[rk] = ∅[rk]])]]