| ⊦ i < 0 ∨ j ≤ i → (r -- i ' ∈ addarray(r, ty, j, st) ↔ r -- i ' ∈ st) |
⊦ rk ∈ st → rk ∈ addarray(r, ty, i, st)
⊦ r ∈ addarray(r, ty0, i, st)
r -- i ' ∈ addarray(r, ty, j, st), i < 0 ∨ j ≤ i ⊦ r -- i ' ∈ st
[[CONCRETESIMPRULES : ([CSIMPFORWARD : ⊦ r -- sk ∈ st → r ∈ st])]]