| okbytearray(r, st), unchanged(str, r, st, st0) ⊦ st[r -- _length] .intval ≤ 0 ∧ st0[r -- _length] .intval ≤ 0 ∨ 0 ≤ st[r -- _length] .intval ∧ st[r -- _length] .intval = st0[r -- _length] .intval ∧ (∀ j1. 0 ≤ j1 ∧ j1 < st[r -- _length] .intval → st[r -- j1 '] .byteval = st0[r -- j1 '] .byteval) |
okbytearray(r, st), unchanged(str, r, st, st0) ⊦ st[r -- _length] .intval = 0 ∧ ¬ 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)
[[CONCRETESIMPRULES : ([CSIMPNAMEDSEQ : okfuns, , okbar-len, ⊦ okbytearray(r, st) → ¬ st[r -- _length] .intval < 0], [CSIMPNAMEDSEQ : int-abs, , lels-01, ⊦ ¬ i ≤ j ↔ j < i], [CSIMPNAMEDSEQ : okfuns, , okbytearray-length-zero, ⊦ okbytearray(r, st) → ( st[r -- _length] .intval ≤ 0 ↔ st[r -- _length] .intval = 0)])]]