| ∀ st. newref_list(m, st) = [] ↔ m = 0 ⊦ newref_list(m +1, st) = [] ↔ m +1 = 0 |
newref_list(m + 1, st) = [], ∀ st. newref_list(m, st) = [] ↔ m = 0 ⊦
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ m + n = n + m], [CSIMPSEQ : ⊦ (m + n0) + n1 = m + n0 + n1], [CSIMPSEQ : ⊦ m + 1 ≠ 0], [CSIMPSEQ : ⊦ m +1 = m + 1])]]