| ⊦ 0 < n → newref_list(n, st) = newref(st) + newref_list(n -1, st[newref(st) -- 0 ', noval]) |
⊦ newref_list(n, st) = newref(st) ' + newref_list(n - 1, st[newref(st) -- 0 ', noval]), n = 0
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ 0 < n ↔ n ≠ 0], [CSIMPSEQ : ⊦ r + refs = r ' + refs], [CSIMPSEQ : ⊦ n -1 = n - 1])]]