| st[r -- _type] = typeval(mkarraytype(ty0)), st[r -- _length] = intval(i), 0 ≤ i, r -- _length ∈ st, r -- _type ∈ st, ty0 ≤ ty, r ∈ st, ∀ j. ¬ j < 0 ∧ ¬ i ≤ j → okval(st[r -- j '], ty), ∀ j. ¬ j < 0 ∧ ¬ i ≤ j → r -- j ' ∈ st ⊦ r = jvmref, is_arrayref(r, i, st0 ∪ st) |
⊦ is_arrayref(r, i, st) ↔ (∀ j. 0 ≤ j ∧ j < i → r -- j ' ∈ st)
st[r -- _type] = typeval(mkarraytype(ty0)), st[r -- _length] = intval(i), 0 ≤ i, r -- _length ∈ st, r -- _type ∈ st, ty0 ≤ ty, r ∈ st, ∀ j. ¬ j < 0 ∧ ¬ i ≤ j → okval(st[r -- j '], ty), ∀ j. ¬ j < 0 ∧ ¬ i ≤ j → r -- j ' ∈ st ⊦ r = jvmref, ∀ j. 0 ≤ j ∧ j < i → r -- j ' ∈ st0 ∪ st
[[CONCRETESIMPRULES : ()], [EXTRATERMS : (st0 ∪ st, i, r)]]