| ∀ str, r, st, st0, r1, ty. validref(str, r, st[r -- _type] .type, st) ∧ st ⊆ st0 ∧ r ∈ acc ∧ validrefs(str, acc + r1 ', ty, st0) → validref(str, r1, st[r1 -- _type] .type, st), validref(str, r, st[r -- _type] .type, st), st ⊆ st0, r ∈ r0 + acc, validrefs(str, (r0 + acc) + r1 ', ty, st0) ⊦ validref(str, r1, st[r1 -- _type] .type, st) |
validref(str, r, st[r -- _type] .type, st), st ⊆ st0, validrefs(str, (r0 ' + acc) + r1 ', ty, st0), ∀ str, r, st, st0, r1, ty. validref(str, r, st[r -- _type] .type, st) ∧ st ⊆ st0 ∧ r ∈ acc ∧ validrefs(str, acc + r1 ', ty, st0) → validref(str, r1, st[r1 -- _type] .type, st) ⊦ validref(str, r1, st[r1 -- _type] .type, st), r ≠ r0 ∧ ¬ r ∈ acc
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ (refs + refs0) + refs1 = refs + refs0 + refs1], [CSIMPSEQ : ⊦ r ∈ r0 ' ↔ r = r0], [CSIMPSEQ : ⊦ r ∈ refs + refs0 ↔ ¬ ¬ (r ∈ refs ∨ r ∈ refs0)], [CSIMPSEQ : ⊦ r + refs = r ' + refs])]]