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