| level⊆(str, str0), validref(str, r, ty, st), validrefs(str0, r ' + refs0, st[r -- _type] .type, st) ⊦ r = (r ' + refs0) .last, path∃(str, r, (r ' + refs0) .last, st), dups(refs0), r ∈ refs0 |
level⊆(str, str0), validref(str, r, ty, st), validrefs(str0, r ' + refs0, st[r -- _type] .type, st) ⊦ refs0 = [], r = (r ' + refs0) .last, path∃(str, r, (r ' + refs0) .last, st), dups(refs0), r ∈ refs0
[[CONCRETESIMPRULES : ([CSIMPNAMEDSEQ : list, references, app, ⊦ refs + [] = refs], [CSIMPNAMEDSEQ : list, references, a, ⊦ (refs + refs0) + refs1 = refs + refs0 + refs1], [CSIMPNAMEDSEQ : list-last, references, l, ⊦ r ' .last = r])], [EXTRAFMAS : (refs0 = [])]]