⊦ reachS(a, S, n) ↔ (∀ b. b ∈ S → reach(a, b, n) ∧ ¬ reach<(a, b, n))
∀ b. b ∈ S → reach(a, b, n) ∧ ¬ reach<(a, b, n) ⊦ reachS(a, S -- b, n)
[[CONCRETESIMPRULES : ()], [EXTRATERMS : (n, S, a)]]