| (st[st[r4 -- sks] .refval -- i ', refval(r4)][r4 -- (sks + i ' ' + sks1)]) = refval(r1), st[st[r4 -- sks] .refval -- _type] .type = mkarraytype(ty), st[st[r4 -- sks] .refval -- sks0] = refval(r1), fits(r4, sks + i ' ' + sks1, st[st[r4 -- sks] .refval -- i ', refval(r4)]), disjoint(str, st[r4 -- sks] .refval ' + r4 ', st), validref(str, r4, ty, st), fits(st[r4 -- sks] .refval, sks0, st), i < st[st[r4 -- sks] .refval -- _length] .intval, 0 ≤ i, 0 < st[st[r4 -- sks] .refval -- _length] .intval ⊦ r4 = jvmref, sks0 = i ' ' + sks + i ' ' + sks1, st[r4 -- sks] .refval = jvmref, st[r4 -- sks] .refval = r4, r1 = jvmref, sks0 = [], junkref(str, st[r4 -- sks] .refval, st), hasSharing(r4, st), hasSharing(st[r4 -- sks] .refval, st), ∃ sks2. ¬ (sks2 + i ' ' ⊑ sks → st[r4 -- sks2] .refval ≠ st[r4 -- sks] .refval), ∃ sks2, sks1. sks0 = sks2 + i ' ' + sks1 ∧ st[st[r4 -- sks] .refval -- sks2] .refval = st[r4 -- sks] .refval ∧ (∀ sks3. sks3 + i ' ' ⊑ sks2 → st[st[r4 -- sks] .refval -- sks3] .refval ≠ st[r4 -- sks] .refval) |
st[r4 -- sks] = refval(r) ∧ is_referencevalue(st[r4 -- sks]), (st[r -- i ', refval(r4)][r4 -- (sks + i ' ' + sks1)]) = refval(r1), st[r -- _type] .type = mkarraytype(ty), st[r -- sks0] = refval(r1), fits(r4, sks + i ' ' + sks1, st[r -- i ', refval(r4)]), disjoint(str, r ' + r4 ', st), validref(str, r4, ty, st), fits(r, sks0, st), i < st[r -- _length] .intval, 0 ≤ i, 0 < st[r -- _length] .intval ⊦ r4 = jvmref, sks0 = i ' ' + sks + i ' ' + sks1, r = jvmref, r = r4, r1 = jvmref, sks0 = [], junkref(str, r, st), hasSharing(r4, st), hasSharing(r, st), ∃ sks2. ¬ (sks2 + i ' ' ⊑ sks → st[r4 -- sks2] .refval ≠ r), ∃ sks2, sks1. sks0 = sks2 + i ' ' + sks1 ∧ st[r -- sks2] .refval = r ∧ (∀ sks3. sks3 + i ' ' ⊑ sks2 → st[r -- sks3] .refval ≠ r)
[[CONCRETESIMPRULES : ([CSIMPNAMEDSEQ : valuefuns, , refval-xtra, ⊦ ¬ is_referencevalue(val) → val .refval = jvmref], [CSIMPELIM : is_referencevalue(val) ⊦ r = val .refval ↔ val = refval(r)])], [EXTRATERMS : (st[r4 -- sks], r)]]