Used simplifier rules: gen: ⊦ ;%disj: ⊦ 0 ≠ n +1;%inj: ⊦ n +1 = n0 +1 ↔ n = n0;%neq: ⊦ m ≠ n → (m < n +1 ↔ m < n);%lrec: ⊦ m +1 < n +1 ↔ m < n;