⊦ countdims([], i) = i
∀ i. ¬ (0 ≤ i ∧ countdims(ints0, i) < 0), 0 ≤ i, countdims(i0 + ints0, i) < 0 ⊦
[[CONCRETESIMPRULES : ([CSIMPGEN : intlist generated by [], +;], [CSIMPSEQ : ⊦ i ≤ j → (¬ ¬ j < i ↔ false)])]]