| 0 ≤ i ⊦ (r -- sk ∈ addarray(r, ty, i, st) ↔ r -- sk ∈ addarray(r, ty, mklist(initial_value(ty), i→n(i)), st)) ∧ (addarray(r, ty, i, st)[r -- sk]) = (addarray(r, ty, mklist(initial_value(ty), i→n(i)), st)[r -- sk]) |
⊦ r ≠ r0 ∨ r = r0 ∧ is_fskey(sk) ∧ sk ≠ _length ∧ sk ≠ _type ∨ r = r0 ∧ is_indexkey(sk) ∧ (sk .index < 0 ∨ j ≤ sk .index) → (addarray(r, ty, j, st)[r0 -- sk]) = st[r0 -- sk]
¬ (r ≠ r ∨ r = r ∧ is_fskey(sk) ∧ sk ≠ _length ∧ sk ≠ _type ∨ r = r ∧ is_indexkey(sk) ∧ (sk .index < 0 ∨ i ≤ sk .index)), 0 ≤ i ⊦ (r -- sk ∈ addarray(r, ty, i, st) ↔ r -- sk ∈ addarray(r, ty, mklist(initial_value(ty), i→n(i)), st)) ∧ (addarray(r, ty, i, st)[r -- sk]) = (addarray(r, ty, mklist(initial_value(ty), i→n(i)), st)[r -- sk])
r ≠ r ∨ r = r ∧ is_fskey(sk) ∧ sk ≠ _length ∧ sk ≠ _type ∨ r = r ∧ is_indexkey(sk) ∧ (sk .index < 0 ∨ i ≤ sk .index), 0 ≤ i ⊦ (r -- sk ∈ addarray(r, ty, i, st) ↔ r -- sk ∈ addarray(r, ty, mklist(initial_value(ty), i→n(i)), st)) ∧ st[r -- sk] = (addarray(r, ty, mklist(initial_value(ty), i→n(i)), st)[r -- sk])
[[CONCRETESIMPRULES : ()], [EXTRATERMS : (sk, r, st, i, ty, r)]]