| ∀ st, ty, j, r, vals0. # vals0 < # vals1 + 1 → (true → (r -- j ' ∈ addarray(r, ty, vals0, st) ↔ ¬ j < 0 ∧ ¬ n→i(# vals0) ≤ j ∨ r -- j ' ∈ st)) ⊦ r -- j ' ∈ (addarray(r, ty, vals1, st)[r -- n→i(# vals1) ', val]) ↔ r -- j ' ∈ st ∨ ¬ j < 0 ∧ ¬ n→i(# vals1) < j |
⊦ rk ∈ st[rk0, val] ↔ rk = rk0 ∨ rk ∈ st
∀ st, ty, j, r, vals0. # vals0 < # vals1 + 1 → (true → (r -- j ' ∈ addarray(r, ty, vals0, st) ↔ ¬ j < 0 ∧ ¬ n→i(# vals0) ≤ j ∨ r -- j ' ∈ st)) ⊦ r -- j ' = r -- n→i(# vals1) ' ∨ r -- j ' ∈ addarray(r, ty, vals1, st) ↔ r -- j ' ∈ st ∨ ¬ j < 0 ∧ ¬ n→i(# vals1) < j
[[CONCRETESIMPRULES : ()], [EXTRATERMS : (val, r -- n→i(# vals1) ', addarray(r, ty, vals1, st), r -- j ')]]