| ∀ str, ty, st, r. junkrefs(str, acc, ty, st -- r) → r ∈ acc ∨ junkrefs(str, acc, ty, st), junkrefs(str, r0 + acc, ty, st -- r) ⊦ r ∈ r0 + acc, junkrefs(str, r0 + acc, ty, st) |
junkrefs(str, r0 ' + acc, ty, st -- r), ∀ str, ty, st, r. junkrefs(str, acc, ty, st -- r) → r ∈ acc ∨ junkrefs(str, acc, ty, st) ⊦ r = r0, r ∈ acc, junkrefs(str, r0 ' + acc, ty, st)
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ (refs + refs0) + refs1 = refs + refs0 + refs1], [CSIMPSEQ : ⊦ ¬ r ∈ r0 ' + refs ↔ r ≠ r0 ∧ ¬ r ∈ refs], [CSIMPSEQ : ⊦ r + refs = r ' + refs])]]