| class+∃(str, (addarray(r, ty, i, st)[r -- _type]) .type .class) ∧ ¬ is_abstract((addarray(r, ty, i, st)[r -- _type]) .type .class) ∧ is_obj(r, addarray(r, ty, i, st)) ⊦ |
⊦ (addarray(r, ty, i, st)[r -- _type]) = typeval(mkarraytype(ty))
⊦ ¬ is_obj(r, addarray(r, ty, i, st))
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ typeval(ty) .type = ty])]]