| ∀ sks0, r, sk, st, str. sks0 ⊑ sks ∧ fits(r, sks + sk ', st) → is_referencevalue(st[r -- sks0]) ∨ junkref(str, r, st), sks0 ⊑ sk0 + sks, fits(r, (sk0 + sks) + sk ', st) ⊦ is_referencevalue(st[r -- sks0]), junkref(str, r, st) |
sks0 ⊑ sk0 ' + sks, fits(r, (sk0 ' + sks) + sk ', st), ∀ sks0, r, sk, st, str. sks0 ⊑ sks ∧ fits(r, sks + sk ', st) → is_referencevalue(st[r -- sks0]) ∨ junkref(str, r, st) ⊦ is_referencevalue(st[r -- sks0]), junkref(str, r, st)
[[CONCRETESIMPRULES : ([CSIMPNAMEDSEQ : list, storekeys, c, ⊦ sk + sks = sk ' + sks])]]