| st[r -- sks] .refval = refs .last, validrefs(str, r ' + refs, st[r -- _type] .type, st), fits(r, sks, st) ⊦ refs = [], junkref(str, r, st), path∃(str, r, refs .last, st) |
⊦ ¬ path∃(str, r, r0, st) ∧ r0 ∈ refs → ¬ validrefs(str, r ' + refs, ty, st)
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ refs .last ∈ refs ↔ refs ≠ []])], [EXTRATERMS : (str, r, refs .last, st, refs, st[r -- _type] .type)]]