| st ⊆ st0, path∃(str, r, r1, st) ⊦ junkref(str, r, st), path∃(str, r, r1, st0) |
⊦ validref(str, r, ty, st) ∧ path∃(str, r, r1, st) ∧ st ⊆ st0 → path∃(str, r, r1, st0)
¬ (validref(str, r, st[r -- _type] .type, st) ∧ path∃(str, r, r1, st) ∧ st ⊆ st0), st ⊆ st0, path∃(str, r, r1, st) ⊦ junkref(str, r, st), path∃(str, r, r1, st0)
[[CONCRETESIMPRULES : ()], [EXTRATERMS : (st, st[r -- _type] .type, st0, r1, r, str)]]