| ⊦ okarray(r, int_type, st) ∧ i < st[r -- _length] .intval ∧ 0 ≤ i → intval(st[r -- i '] .intval) = st[r -- i '] |
⊦ okarray(r, ty, st) → r ≠ jvmref ∧ r ∈ st
⊦ okarray(r, int_type, st) ∧ i < st[r -- _length] .intval ∧ 0 ≤ i → is_integervalue(st[r -- i '])
[[CONCRETESIMPRULES : ([CSIMPSEQ : is_integervalue(val) ⊦ intval(val .intval) = val], [CSIMPFORWARD : ⊦ i ≤ j ∧ j < j0 → i < j0], [CSIMPFORWARD : ⊦ i ≤ j ∧ 0 ≤ i → 0 ≤ j])]]