| ¬ r ≠ r0 ⊦ fs ' = _length, fs ' = _type, okarray(r, byte_type, st[r0 -- fs ', val]) ↔ okarray(r, byte_type, st) |
⊦ okarray(r, ty, st) ∧ fs ' ≠ _type ∧ fs ' ≠ _length → okarray(r, ty, st[r -- fs ', val])
⊦ okarray(r, ty, st) → r ≠ jvmref ∧ r ∈ st
okarray(r0, byte_type, st[r0 -- fs ', val]) ⊦ r0 = jvmref, fs ' = _type, fs ' = _length, okarray(r0, byte_type, st)
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ r ∈ st[r -- sk, val]])]]