| fits(r, sks, st), unchanged(str, r, st, st0) ⊦ st[r -- sks] = st0[r -- sks], junkref(str, r, st) |
⊦ ¬ junkref(str, r, st) ∧ unchanged(str, r, st, st1) → ¬ junkref(str, r, st1)
¬ junkref(str, r, st) ∧ unchanged(str, r, st, st0) → ¬ junkref(str, r, st0), fits(r, sks, st), unchanged(str, r, st, st0) ⊦ st[r -- sks] = st0[r -- sks], junkref(str, r, st)
[[CONCRETESIMPRULES : ()], [EXTRATERMS : (str, r, st, st0)]]