| reachable-n(H, n, r, r), ∀ H, n, r. reachable-n(H, n, r, r) → reachable-n(H, n1 * n, r, r) ⊦ reachable-n(H, n * n1 + n, r, r) |
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ m * n = n * m], [CSIMPSEQ : ⊦ reachable-n(H, n, r, r0) ∧ reachable-n(H, n0, r0, r1) → ( ¬ reachable-n (H, n + n0, r, r1) ↔ false)], [CSIMPSEQ : ⊦ (m + n0) + n1 = m + n0 + n1], [CSIMPSEQ : ⊦ m + n = n + m])], [EXTRATERMS : (H, n, r)]]