| ⊦ goodfieldandtype(r, sk, st[r0 -- i ', val]) ↔ goodfieldandtype(r, sk, st) |
⊦ goodfieldandtype(r, sk, st) ↔ ¬ ¬ (is_fskey(sk) ∧ r -- sk ∈ st ∧ okval(st[r -- sk], sk .fs .type))
⊦ is_fskey(sk) ∧ r -- sk ∈ st[r0 -- i ', val] ∧ okval(st[r0 -- i ', val][r -- sk], sk .fs .type) ↔ ¬ is_indexkey(sk) ∧ r -- sk ∈ st ∧ okval(st[r -- sk], sk .fs .type)
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ ¬ is_fskey(sk) ↔ is_indexkey(sk)])]]