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