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