| st ⊆ st0, okarray(val, ty, i, st) ⊦ val .refval = jvmref, (0 ≤ j ∧ j < i → okval(st0[val .refval -- j '], ty)) ∧ is_arrayref(val .refval, i, st0) ∧ ¬ i < 0 ∧ st0[val .refval -- _length] = intval(i) ∧ val .refval -- _length ∈ st0 ∧ okreftype(val, mkarraytype(ty), st0) |
val = refval(r) ∧ is_referencevalue(val), st ⊆ st0, okarray(val, ty, i, st) ⊦ r = jvmref, (0 ≤ j ∧ j < i → okval(st0[r -- j '], ty)) ∧ is_arrayref(r, i, st0) ∧ ¬ i < 0 ∧ st0[r -- _length] = intval(i) ∧ r -- _length ∈ st0 ∧ okreftype(val, mkarraytype(ty), st0)
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ ¬ is_referencevalue(val) → val .refval = jvmref], [CSIMPELIM : is_referencevalue(val) ⊦ r = val .refval ↔ val = refval(r)])], [EXTRATERMS : (val, r)]]