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