| str ≠ str0 ⊦ (st[r -- mkfs(class, ty, str .field) ', val][r0 -- mkfs(class0, ty0, str0 .field) ']) = st[r0 -- mkfs(class0, ty0, str0 .field) '] |
⊦ (st[rk0, val][rk]) = ((rk = rk0 ⊃ val; st[rk]))
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ stringvar .field = stringvar0 .field ↔ stringvar = stringvar0], [CSIMPSEQ : ⊦ mkfs(class1, ty, fieldvar) = mkfs(class2, ty0, fieldvar0) ↔ ¬ ¬ ( class1 = class2 ∧ ty = ty0 ∧ fieldvar = fieldvar0)], [CSIMPSEQ : ⊦ fs ' = fs0 ' ↔ fs = fs0], [CSIMPSEQ : ⊦ r -- sk = r0 -- sk0 ↔ ¬ ¬ (r = r0 ∧ sk = sk0)])]]