| 0 ≤ n→i(# vals) + i, 0 ≤ j, 0 ≤ i, i ≤ j, j ≤ n→i(# vals) + i ⊦ rk = r -- _length, (rk ∈ putArray(vals, r, i, addarray(r, ty, j, st)) ↔ rk ∈ addarray(r, ty, mklist(initial_value(ty), i→n(i)) + vals, st)) ∧ (putArray(vals, r, i, addarray(r, ty, j, st))[rk]) = (addarray(r, ty, mklist(initial_value(ty), i→n(i)) + vals, st)[rk]) |
⊦ rk .ref ≠ r → (addarray(r, ty, vals, st)[rk]) = st[rk]
¬ rk .ref ≠ r, 0 ≤ n→i(# vals) + i, 0 ≤ j, 0 ≤ i, i ≤ j, j ≤ n→i(# vals) + i ⊦ rk = r -- _length, (rk ∈ putArray(vals, r, i, addarray(r, ty, j, st)) ↔ rk ∈ addarray(r, ty, mklist(initial_value(ty), i→n(i)) + vals, st)) ∧ (putArray(vals, r, i, addarray(r, ty, j, st))[rk]) = (addarray(r, ty, mklist(initial_value(ty), i→n(i)) + vals, st)[rk])
rk .ref ≠ r, 0 ≤ n→i(# vals) + i, 0 ≤ j, 0 ≤ i, i ≤ j, j ≤ n→i(# vals) + i ⊦ rk = r -- _length, (rk ∈ putArray(vals, r, i, addarray(r, ty, j, st)) ↔ rk ∈ addarray(r, ty, mklist(initial_value(ty), i→n(i)) + vals, st)) ∧ (putArray(vals, r, i, addarray(r, ty, j, st))[rk]) = st[rk]
[[CONCRETESIMPRULES : ()], [EXTRATERMS : (rk, st, mklist(initial_value(ty), i→n(i)) + vals, ty, r)]]