| ¬ r1 ≠ r0 ⊦ r = r0, (r1 -- fs ' ∈ addobj(r0, class, fis, st) ↔ r1 -- fs ' ∈ addobj(r0, class, fis, putByteArray(bytes, r, i, st))) ∧ (addobj(r0, class, fis, st)[r1 -- fs ']) = (addobj(r0, class, fis, putByteArray(bytes, r, i, st))[r1 -- fs ']) |
⊦ r -- sk ∈ addobj(r, class, fis, st) ↔ ¬ ¬ (sk ∈ fis ∨ sk = _type ∨ r -- sk ∈ st)
⊦ r = r0, (addobj(r0, class, fis, st)[r0 -- fs ']) = (addobj(r0, class, fis, putByteArray(bytes, r, i, st))[r0 -- fs '])
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ r0 -- fs ' ∈ putByteArray(bytes, r, j, st) ↔ r0 -- fs ' ∈ st])]]