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