| st[r1 -- _length] = intval(j), st[r1 -- _type] = typeval(mkarraytype(byte_type)), r1 -- _type ∈ st, r1 ∈ st, 0 ≤ j, r1 -- _length ∈ st ⊦ is_arrayref(r1, j, putArray(vals, r, i, st)) ∧ (∀ j0. ¬ j0 < 0 ∧ ¬ j ≤ j0 → is_bytevalue(st[r1 -- j0 '])) ↔ is_arrayref(r1, j, st) ∧ (∀ j0. 0 ≤ j0 ∧ j0 < j → is_bytevalue(st[r1 -- j0 '])), r = r1, r1 = jvmref |
⊦ is_arrayref(r, i, st) ↔ (∀ j. 0 ≤ j ∧ j < i → r -- j ' ∈ st)
st[r1 -- _length] = intval(j), st[r1 -- _type] = typeval(mkarraytype(byte_type)), r1 -- _type ∈ st, r1 ∈ st, 0 ≤ j, r1 -- _length ∈ st ⊦ (∀ j0. 0 ≤ j0 ∧ j0 < j → r1 -- j0 ' ∈ putArray(vals, r, i, st)) ∧ (∀ j0. ¬ j0 < 0 ∧ ¬ j ≤ j0 → is_bytevalue(st[r1 -- j0 '])) ↔ is_arrayref(r1, j, st) ∧ (∀ j0. 0 ≤ j0 ∧ j0 < j → is_bytevalue(st[r1 -- j0 '])), r = r1, r1 = jvmref
[[CONCRETESIMPRULES : ()], [EXTRATERMS : (putArray(vals, r, i, st), j, r1)]]