| newref_list(1 + m, st[newref(st) -- 0 ', noval]) ≠ [], ∀ st. newref_list(m + 1, st) .butlast = newref_list(m, st) ⊦ newref(st) ' + newref_list(1 + m, st[newref(st) -- 0 ', noval]) .butlast = newref(st) ' + newref_list(m, st[newref(st) -- 0 ', noval]) |
∀ st. newref_list(m + 1, st) .butlast = newref_list(m, st) ⊦ newref_list(1 + m, st[newref(st) -- 0 ', noval]) = [], newref_list(1 + m, st[newref(st) -- 0 ', noval]) .butlast = newref_list(m, st[newref(st) -- 0 ', noval])
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ (refs + refs0) + refs1 = refs + refs0 + refs1], [CSIMPSEQ : ⊦ refs + refs0 = refs + refs1 ↔ refs0 = refs1])]]