| compat(str, val, ty, st), compatrefs(str, st), compatstatic(str, st), _mode ∈ st, compatmode(str, st[_mode], st) ⊦ ty = void_type, mkfs(class, ty, fieldvar) ' = _length, compatmode(str, st[r -- mkfs(class, ty, fieldvar) ', val][_mode], st[r -- mkfs(class, ty, fieldvar) ', val]) |
⊦ rk ≠ rk0 → (st[rk0, val][rk]) = st[rk]
_mode ≠ r -- mkfs(class, ty, fieldvar) ', compat(str, val, ty, st), compatrefs(str, st), compatstatic(str, st), _mode ∈ st, compatmode(str, st[_mode], st) ⊦ ty = void_type, mkfs(class, ty, fieldvar) ' = _length, compatmode(str, st[_mode], st[r -- mkfs(class, ty, fieldvar) ', val])
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ ty ≠ void_type → _mode ≠ r -- mkfs(class, ty, fieldvar) '])], [EXTRATERMS : (_mode, val, r -- mkfs(class, ty, fieldvar) ', st)]]