| validval(str, rk, val, st), rk0 × val0 ∈ rkvs → validval(str, (rk0 × val0) .1, (rk0 × val0) .2, st), rk0 × val0 ∈ rkvs ⊦ validval(str, rk0, val0, st[rk, val]) |
validval(str, rk, val, st), rk0 × val0 ∈ rkvs, validval(str, rk0, val0, st) ⊦ validval(str, rk0, val0, st[rk, val])
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ (rk × val) .2 = val], [CSIMPSEQ : ⊦ (rk × val) .1 = rk])]]