| ⊦ r ∈ refs0 ∧ validrefs(str, refs0 + r1, ty, st0) ∧ validref(str, r, st[r -- _type] .type, st) ∧ st ⊆ st0 → validref(str, r1, st[r1 -- _type] .type, st) |
validref(str, r, st[r -- _type] .type, st), st ⊆ st0, r ∈ refs0, validrefs(str, refs0 + r1 ', ty, st0) ⊦ validref(str, r1, st[r1 -- _type] .type, st)
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ refs + r = refs + r '])]]