| okarray(val, ty, i, st), is_referencevalue(val) ⊦ refval(r) = val, val .refval = jvmref, (0 ≤ j ∧ j < i → okval(st[r -- sk, val0][val .refval -- j '], ty)) ∧ is_arrayref(val .refval, i, st[r -- sk, val0]) ∧ ¬ i < 0 ∧ (st[r -- sk, val0][val .refval -- _length]) = intval(i) ∧ (val .refval = r ∧ _length = sk ∨ val .refval -- _length ∈ st) ∧ (st[r -- sk, val0][val .refval -- _type]) .type .type ≤ ty ∧ is_arraytype((st[r -- sk, val0][val .refval -- _type]) .type) ∧ is_typevalue(st[r -- sk, val0][val .refval -- _type]) ∧ (val .refval = r ∧ _type = sk ∨ val .refval -- _type ∈ st) |
val = refval(r0), okarray(val, ty, i, st), is_referencevalue(val) ⊦ refval(r) = val, r0 = jvmref, (0 ≤ j ∧ j < i → okval(st[r -- sk, val0][r0 -- j '], ty)) ∧ is_arrayref(r0, i, st[r -- sk, val0]) ∧ ¬ i < 0 ∧ (st[r -- sk, val0][r0 -- _length]) = intval(i) ∧ (r0 = r ∧ _length = sk ∨ r0 -- _length ∈ st) ∧ (st[r -- sk, val0][r0 -- _type]) .type .type ≤ ty ∧ is_arraytype((st[r -- sk, val0][r0 -- _type]) .type) ∧ is_typevalue(st[r -- sk, val0][r0 -- _type]) ∧ (r0 = r ∧ _type = sk ∨ r0 -- _type ∈ st)
[[CONCRETESIMPRULES : ([CSIMPELIM : ⊦ is_referencevalue(val) → ( r = val .refval ↔ val = refval(r))])], [EXTRATERMS : (val, r0)]]