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