| validrefs(str, refs0, ty, st[r -- mkfs(class, short_type, fieldvar) ', shortval(sho)]), is_shortvalue(st[r -- mkfs(class, short_type, fieldvar) ']) ⊦ refs0 = [], junkref(str, refs0 .first, st), validrefs(str, refs0, ty, st) |
validrefs(str, refs0, ty, st[r -- mkfs(class, short_type, fieldvar) ', shortval(sho)]) ∧ is_shortvalue(st[r -- mkfs(class, short_type, fieldvar) ']), ∀ sho, fieldvar, class, r, st, ty, str, refs. # refs < # refs0 → ( validrefs(str, refs, ty, st[r -- mkfs(class, short_type, fieldvar) ', shortval(sho)]) ∧ is_shortvalue(st[r -- mkfs(class, short_type, fieldvar) ']) → refs = [] ∨ junkref(str, refs .first, st) ∨ validrefs(str, refs, ty, st)) ⊦ refs0 = [] ∨ junkref(str, refs0 .first, st) ∨ validrefs(str, refs0, ty, st)
[[CONCRETESIMPRULES : ([CSIMPLESSPRED : <])], [EXTRATERMS : (# refs0)]]