| okbytearray(r, st), ∃ n. n < # getarray(r, 0, st[r -- _length] .intval, st) ∧ (getarray(r, 0, st[r -- _length] .intval, st)[n]) = val ⊦ mkjavavalues(bytevalues(getarray(r, 0, st[r -- _length] .intval, st))) = getarray(r, 0, st[r -- _length] .intval, st), is_bytevalue(val) |
⊦ okbytearray(r, st) → (st[r -- _length] .intval ≤ 0 ↔ st[r -- _length] .intval = 0)
n < # getarray(r, 0, st[r -- _length] .intval, st), okbytearray(r, st) ⊦ mkjavavalues(bytevalues(getarray(r, 0, st[r -- _length] .intval, st))) = getarray(r, 0, st[r -- _length] .intval, st), st[r -- _length] .intval = 0, is_bytevalue(getarray(r, 0, st[r -- _length] .intval, st)[n])
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ getarray(r, i, j, st) = [] ↔ j ≤ 0], [CSIMPSEQ : ⊦ # vals = 0 ↔ vals = []], [CSIMPFORWARD : ⊦ m < n → n ≠ 0])]]