| ∀ st. ¬ dups(newref_list(m, st)), dups(newref_list(m +1, st)) ⊦ |
⊦ newref_list(n + 1, st) = newref(st) + newref_list(n, st[newref(st) -- 0 ', noval])
∀ st. ¬ dups(newref_list(m, st)) ⊦ ¬ newref(st) ∈ newref_list(m, st[newref(st) -- 0 ', noval]) ∧ ¬ dups(newref_list(m, st[newref(st) -- 0 ', noval]))
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ (refs + refs0) + refs1 = refs + refs0 + refs1], [CSIMPSEQ : ⊦ dups(r ' + refs) ↔ ¬ ¬ (r ∈ refs ∨ dups(refs))], [CSIMPSEQ : ⊦ m + n = n + m], [CSIMPSEQ : ⊦ (m + n0) + n1 = m + n0 + n1], [CSIMPSEQ : ⊦ r + refs = r ' + refs], [CSIMPSEQ : ⊦ m +1 = m + 1])]]