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