| validref(str, r, ty, st), validval(str, rk, val, st), validvals(str, rkvs0, st), ∀ str, r, ty, st. validref(str, r, ty, st) ∧ validvals(str, rkvs0, st) → validref(str, r, ty, st[rkvs0]) ⊦ validref(str, r, ty, st[(rk × val) ' + rkvs0]) |
⊦ st[(rk × val) ' + rkvs] = (st[rk, val][rkvs])
validref(str, r, ty, st), validval(str, rk, val, st), validvals(str, rkvs0, st), ∀ str, r, ty, st. validref(str, r, ty, st) ∧ validvals(str, rkvs0, st) → validref(str, r, ty, st[rkvs0]) ⊦ validref(str, r, ty, st[rk, val][rkvs0])
[[CONCRETESIMPRULES : ()], [EXTRATERMS : (rkvs0, val, rk, st)]]