| ⊦ r = jvmref ∨ (addarray(r, ty, i, st)[r -- _type]) .type ≤ mkarraytype(ty) ∧ ¬ junkref(str, r, addarray(r, ty, i, st)) ↔ r = jvmref ∨ ¬ i < 0 ∧ type∃(str, ty) ∧ ty .jtelemtype ≠ abstract_type ∧ ty .jtelemtype ≠ void_type |
⊦ type∃(str, ty) ∧ r ≠ jvmref ∧ 0 ≤ i ∧ ty .jtelemtype ≠ abstract_type ∧ ty .jtelemtype ≠ void_type → ¬ junkref(str, r, addarray(r, ty, i, st))
⊦ r = jvmref, junkref(str, r, addarray(r, ty, i, st)), ¬ i < 0 ∧ type∃(str, ty) ∧ ty .jtelemtype ≠ abstract_type ∧ ty .jtelemtype ≠ void_type
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ ¬ i < j ↔ j ≤ i], [CSIMPSEQ : ⊦ ty ≤ ty], [CSIMPSEQ : ⊦ mkarraytype(ty) ≤ mkarraytype(ty0) ↔ ty ≤ ty0], [CSIMPSEQ : ⊦ typeval(ty) .type = ty], [CSIMPSEQ : ⊦ (addarray(r, ty, i, st) [r -- _type ] ) = typeval(mkarraytype(ty))])]]