| sk .fs = mkfs(class, ty, fieldvar), sk0 .fs = mkfs(class0, mkarraytype(ty0), fieldvar0), oktype(val, ty, st), goodfieldandtype(r0, sk, st), okarrays(r, fis0, st[r0 -- sk, val]), okarrays(r, fis0, st), is_indexkey(sk) ⊦ sk = sk0, sk = _type, sk = _length, okarray(st[r -- sk0], ty0, i, st[r0 -- sk, val]) ∧ is_fskey(sk0) ↔ okarray(st[r -- sk0], ty0, i, st) ∧ ¬ is_indexkey(sk0), sk ∈ fis0 |
⊦ is_indexkey(sk) ↔ (∃ i. sk = i ')
⊦ ¬ goodfieldandtype(r, i ', st)
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ _type ≠ i '], [CSIMPSEQ : ⊦ _length ≠ i '])], [EXTRATERMS : (sk)]]