| okbytearray(r, st), st ⊆ st0 ⊦ ¬ 0 < st[r -- _length] .intval ∧ ¬ 0 < st0[r -- _length] .intval, st[r -- _length] .intval = st0[r -- _length] .intval ∧ (0 ≤ j ∧ j < st[r -- _length] .intval → st[r -- j '] .byteval = st0[r -- j '] .byteval) |
⊦ rk ∈ st ∧ st ⊆ st1 → st1[rk] = st[rk]
⊦ ¬ r -- _length ∈ st → ¬ okbytearray(r, st)
r -- _length ∈ st ∧ st ⊆ st0, okbytearray(r, st), st ⊆ st0 ⊦ ¬ 0 < st[r -- _length] .intval ∧ ¬ 0 < st[r -- _length] .intval, st[r -- _length] .intval = st[r -- _length] .intval ∧ (0 ≤ j ∧ j < st[r -- _length] .intval → st[r -- j '] .byteval = st0[r -- j '] .byteval)
[[CONCRETESIMPRULES : ()], [EXTRATERMS : (r -- _length, st, st0)]]