| ∀ st, r0, str, ty, fs, val. is_arraytype(st[r0 -- _type] .type) ∧ validrefs(str, acc, ty, st) → fs ' = _type ∨ fs ' = _length ∨ acc = [] ∨ junkref(str, acc .first, st) ∨ dups(acc .butlast) ∨ validrefs(str, acc, ty, st[r0 -- fs ', val]), is_arraytype(st[r0 -- _type] .type), validrefs(str, r + acc, ty, st) ⊦ fs ' = _type, fs ' = _length, r + acc = [], junkref(str, (r + acc) .first, st), dups((r + acc) .butlast), validrefs(str, r + acc, ty, st[r0 -- fs ', val]) |
is_arraytype(st[r0 -- _type] .type), validrefs(str, r ' + acc, ty, st), ∀ st, r0, str, ty, fs, val. is_arraytype(st[r0 -- _type] .type) ∧ validrefs(str, acc, ty, st) → fs ' = _type ∨ fs ' = _length ∨ acc = [] ∨ junkref(str, acc .first, st) ∨ dups(acc .butlast) ∨ validrefs(str, acc, ty, st[r0 -- fs ', val]) ⊦ fs ' = _type, fs ' = _length, junkref(str, r, st), dups((r ' + acc) .butlast), validrefs(str, r ' + acc, ty, st[r0 -- fs ', val])
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ (r ' + refs) .first = r], [CSIMPSEQ : ⊦ (refs + refs0) + refs1 = refs + refs0 + refs1], [CSIMPSEQ : ⊦ r ' + refs ≠ []], [CSIMPSEQ : ⊦ r + refs = r ' + refs])]]