| r ∈ st, okarray(r, ty, st), st[r -- _length] .intval ≤ 32767 ⊦ r = jvmref, s2i(i2s(st[r -- _length] .intval)) = st[r -- _length] .intval, st[r -- _length] .intval ∈short |
⊦ i ∈short ↔ (~32768) ≤ i ∧ i ≤ 32767
⊦ okarray(r, ty, st) → ¬ st[r -- _length] .intval < 0
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ ¬ i ≤ j ↔ j < i], [CSIMPSEQ : j0 ≠ 0, j ≤ j0 ⊦ i ≤ ((* j)) → i ≤ ((* j0))], [CSIMPFORWARD : ⊦ i < ((* j)) ∧ j < 0 → i < 0])], [EXTRATERMS : (st[r -- _length] .intval)]]