| sk = fs ', oktype(val, fs .type, st), is_fskey(sk), goodfieldsandtypes(r, sks, st) ⊦ sk = _type, goodfieldsandtypes(r, sks, st[r0 -- sk, val]) |
oktype(val, fs .type, st), goodfieldsandtypes(r, sks, st) ⊦ fs ' = _type, goodfieldsandtypes(r, sks, st[r0 -- fs ', val])
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ is_fskey(fs ')])]]