| ⊦ r = r0, okarray(refval(r), short_type, i, addobj(r0, class1, fis, st)) ↔ okarray(refval(r), short_type, i, st) |
⊦ ¬ is_classtype(ty) ∧ ¬ is_arraytype(ty) ∧ r ≠ r0 → (okarray(refval(r), ty, i, addobj(r0, class1, fis, st)) ↔ okarray(refval(r), ty, i, st))
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ ¬ is_classtype(short_type)], [CSIMPSEQ : ⊦ ¬ is_arraytype(short_type)])], [EXTRATERMS : (st, fis, class1, r0, i, short_type, r)]]