| 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) |
r -- _length ∈ st, okbytearray(r, st), st ⊆ st0, j < st[r -- _length] .intval, r ∈ st, 0 ≤ j, 0 < st[r -- _length] .intval ⊦ st[r -- j '] .byteval = st0[r -- j '] .byteval
[[CONCRETESIMPRULES : ([CSIMPFORWARD : ⊦ r -- sk ∈ st → r ∈ st], [CSIMPFORWARD : ⊦ i ≤ j ∧ 0 ≤ i → 0 ≤ j], [CSIMPFORWARD : ⊦ i < j ∧ 0 ≤ i → 0 < j])]]