| sk .fs = mkfs(class, ty, fieldvar), validval(str, r -- sk, val0, st), validval(str, rk, val, st) ⊦ r -- _type = rk, (is_fskey(sk) → validval(str, val0, ty, st[rk, val]) ∧ ty ≠ void_type ∧ sk ≠ _length) ∧ (is_indexkey(sk) → validval(str, val0, (st[rk, val][r -- _type]) .type .type, st[rk, val])) |
sk .fs = mkfs(class, ty, fieldvar), validval(str, r -- sk, val0, st), validval(str, rk, val, st) ⊦ r -- _type = rk, (is_fskey(sk) → validval(str, val0, ty, st[rk, val]) ∧ ty ≠ void_type ∧ sk ≠ _length) ∧ (is_indexkey(sk) → validval(str, val0, st[r -- _type] .type .type, st[rk, val]))
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ rk ≠ rk0 → (st[rk0, val][rk]) = st[rk]])]]