| reachable-n(H, n, r, r) ⊦ reachable-n(H, n0 * n, r, r) |
reachable-n(H, n, r, r) ⊦ reachable-n(H, 0 * n, r, r)
∀ H, n, r. reachable-n(H, n, r, r) → reachable-n(H, n1 * n, r, r), reachable-n(H, n, r, r) ⊦ reachable-n(H, n1 +1 * n, r, r)
[[CONCRETESIMPRULES : ([CSIMPGEN : nat generated by 0, +1;])]]