| ∀ st, vals0, ty0, ty, r0, r, vals1. # vals1 < # [] → (true → r = r0 ∨ addarray(r, ty, vals1, addarray(r0, ty0, vals0, st)) = addarray(r0, ty0, vals0, addarray(r, ty, vals1, st))) ⊦ r0 = r, (addarray(r0, ty0, vals0, st[r -- _type, typeval(mkarraytype(ty))])[r -- _length, intval(0)]) = addarray(r0, ty0, vals0, st[r -- _type, typeval(mkarraytype(ty))][r -- _length, intval(0)]) |
⊦ r ≠ r0 → (addarray(r, ty, vals, st)[r0 -- sk, val]) = addarray(r, ty, vals, st[r0 -- sk, val])
[[CONCRETESIMPRULES : ()], [EXTRATERMS : (intval(0), _length, r, st[r -- _type, typeval(mkarraytype(ty))], vals0, ty0, r0)]]