| st[r1 -- _length] = intval(j), r1 -- _length ∈ st, 0 ≤ j, r1 ∈ st ⊦ r1 = jvmref, r = r1, r1 -- _type ∈ st ∧ is_typevalue(st[r1 -- _type]) ∧ st[r1 -- _type] .type = mkarraytype(byte_type) ∧ is_arrayref(r1, j, putArray(vals, r, i, st)) ∧ (∀ j0. ¬ j0 < 0 ∧ ¬ j ≤ j0 → is_bytevalue(st[r1 -- j0 '])) ↔ is_referencevalue(refval(r1)) ∧ ( refval(r1) .refval ≠ jvmref → refval(r1) .refval -- _type ∈ st ∧ is_typevalue(st[refval(r1) .refval -- _type]) ∧ st[refval(r1) .refval -- _type] .type ≤ mkarraytype(byte_type)) ∧ is_arrayref(r1, j, st) ∧ (∀ j0. 0 ≤ j0 ∧ j0 < j → is_bytevalue(st[r1 -- j0 '])) |
st[r1 -- _length] = intval(j), st[r1 -- _type] .type = mkarraytype(byte_type), r1 -- _length ∈ st, 0 ≤ j, r1 ∈ st, r1 -- _type ∈ st, is_typevalue(st[r1 -- _type]) ⊦ r1 = jvmref, r = r1, 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 ']))
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ ty ≤ mkarraytype(byte_type) ↔ ty = mkarraytype(byte_type)], [CSIMPSEQ : ⊦ refval(r) .refval = r], [CSIMPSEQ : ⊦ is_referencevalue(refval(r))])]]