| ∀ ty, ty0, str, st. ty ≤ ty0 ∧ validrefs(str, acc, ty, st) → validrefs(str, acc, ty0, st), ty ≤ ty0, validrefs(str, r + acc, ty, st) ⊦ validrefs(str, r + acc, ty0, st) |
ty ≤ ty0, validrefs(str, r ' + acc, ty, st), ∀ ty, ty0, str, st. ty ≤ ty0 ∧ validrefs(str, acc, ty, st) → validrefs(str, acc, ty0, st) ⊦ validrefs(str, r ' + acc, ty0, st)
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ (refs + refs0) + refs1 = refs + refs0 + refs1], [CSIMPSEQ : ⊦ r + refs = r ' + refs])]]