| ⊦ cyclic(str, r, st) ↔ (∃ refs, r0. ¬ dups(refs) ∧ r0 ∈ refs ∧ refs .first = r ∧ validrefs(str, refs + r0 ', st[refs .first -- _type] .type, st)) |
⊦ cyclic(str, r, st) ↔ (∃ refs. dups(refs) ∧ refs .first = r ∧ validrefs(str, refs, st[r -- _type] .type, st))
⊦ (∃ refs. dups(refs) ∧ refs .first = r ∧ validrefs(str, refs, st[r -- _type] .type, st)) ↔ (∃ refs, r0. ¬ dups(refs) ∧ r0 ∈ refs ∧ refs .first = r ∧ validrefs(str, refs + r0 ', st[refs .first -- _type] .type, st))
[[CONCRETESIMPRULES : ()], [EXTRATERMS : (st, r, str)]]