| n0 = m0 +1, reachable-n(H, m, r, r0), reachable-n(H, m + n * n0, r, r0), m + n * n0 ≤ n ⊦ n0 = 0, ∃ r0. reachable-n(H, n, r, r0) |
n * m0 = 0, reachable-n(H, n, r0, r0) ⊦ ∃ r1. reachable-n(H, n, r0, r1)
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ reachable-n(H, 0, r, r0) ↔ r = r0], [CSIMPSEQ : ⊦ 0 + m = m], [CSIMPSEQ : ⊦ m + n = 0 ↔ m = 0 ∧ n = 0], [CSIMPSEQ : ⊦ m + m0 ≤ m ↔ m0 = 0], [CSIMPSEQ : ⊦ m * n = n * m], [CSIMPSEQ : ⊦ m0 * m * n = (m0 * m) * n], [CSIMPSEQ : ⊦ m * (n + 1) = m * n + m], [CSIMPSEQ : ⊦ m + n = n + m], [CSIMPSEQ : ⊦ (m + n0) + n1 = m + n0 + n1], [CSIMPSEQ : ⊦ m + 1 ≠ 0], [CSIMPSEQ : ⊦ m +1 = m + 1])]]