| validvals(str, rkvs, st), validval(str, r -- sk, val, st) ⊦ validval(str, r -- sk, val, st[rkvs]) |
⊦ validval(str, r -- sk, val, st) ↔ (is_fskey(sk) → validval(str, val, sk .fs .type, st) ∧ sk .fs .type ≠ void_type ∧ sk ≠ _length) ∧ (is_indexkey(sk) → validval(str, val, st[r -- _type] .type .type, st))
validvals(str, rkvs, st), validval(str, r -- sk, val, st) ⊦ (is_fskey(sk) → validval(str, val, sk .fs .type, st[rkvs]) ∧ sk .fs .type ≠ void_type ∧ sk ≠ _length) ∧ (is_indexkey(sk) → validval(str, val, (st[rkvs][r -- _type]) .type .type, st[rkvs]))
[[CONCRETESIMPRULES : ()], [EXTRATERMS : (st[rkvs], val, sk, r, str)]]