⊦ i ≤ 0 → addarray(r, val, i, st) = st
0 < i ∨ r ∈ st ⊦ r ∈ addarray(r, val, i, st)
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ ¬ i < j ↔ j ≤ i])]]