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