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