| ⊦ ks(n) = K _ t1 ↔ t1 = K ∧ n = 1 |
⊦ ks(0) = K
⊦ ks(n + 1) = ks(n) _ K
⊦ ks(0) = K
⊦ ks(n) = K ↔ n = 0
[[CONCRETESIMPRULES : ([CSIMPGEN : nat generated by 0, +1;], [CSIMPSEQ : ⊦ t _ t0 ≠ K], [CSIMPSEQ : ⊦ m +1 = m + 1], [CSIMPSEQ : ⊦ (m + n0) + n1 = m + n0 + n1], [CSIMPSEQ : ⊦ m + n = n + m], [CSIMPSEQ : ⊦ 1 = m + 1 ↔ m = 0], [CSIMPSEQ : ⊦ t _ t0 = t1 _ t2 ↔ t = t1 ∧ t0 = t2])]]