| ∀ r, i, class1, st. is_arrayref(r, i, addclass(class1, fis0, st)) ↔ is_arrayref(r, i, st) ⊦ is_arrayref(r, i, addclass(class1, (sk × val) ' + fis0, st)) ↔ is_arrayref(r, i, st), ¬ is_indexkey(sk) ∧ sk .fs .class ≠ class1 |
sk .fs = mkfs(class, ty, fieldvar), ∀ r, i, class1, st. is_arrayref(r, i, addclass(class1, fis0, st)) ↔ is_arrayref(r, i, st) ⊦ is_arrayref(r, i, addclass(class1, (sk × val) ' + fis0, st)) ↔ is_arrayref(r, i, st), ¬ is_indexkey(sk) ∧ class ≠ class1
[[CONCRETESIMPRULES : ([CSIMPELIM : ⊦ class = fs .class ∧ ty = fs .type ∧ fieldvar = fs .field ↔ fs = mkfs(class, ty, fieldvar)])], [EXTRATERMS : (sk .fs, class, ty, fieldvar)]]