| validrefs(str, refs, ty, st), okbytearray(r, st), ∀ by, i, ty, str, st, r, refs0. # refs0 < # refs → (okbytearray(r, st) ∧ validrefs(str, refs0, ty, st) → validrefs(str, refs0, ty, st[r -- i ', byteval(by)])) ⊦ ∀ r, refs0. refs ≠ r ' + refs0, validrefs(str, refs, ty, st[r -- i ', byteval(by)]) |
validrefs(str, r0 ' + refs0, ty, st), okbytearray(r, st), ∀ by, i, ty, str, st, r, refs1. # refs1 < # (r0 ' + refs0) → (okbytearray(r, st) ∧ validrefs(str, refs1, ty, st) → validrefs(str, refs1, ty, st[r -- i ', byteval(by)])) ⊦ validrefs(str, r0 ' + refs0, ty, st[r -- i ', byteval(by)])
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ (refs + refs0) + refs1 = refs + refs0 + refs1])]]