| st[r -- sk0] = refval(r1), st[r -- sks0] .refval = st[r1 -- sks] .refval, sks0 + sk ' ⊑ sk0 ' + sks, r ≠ st[r1 -- sks] .refval ∨ sk0 ≠ sk, is_classtype(st[r -- _type] .type) → sk0 ∈ instfields(st[r -- _type] .type .class), sks0 .rest + sk ' ⊑ sks → st[r1 -- sks0 .rest] .refval ≠ st[r1 -- sks] .refval ⊦ sks0 = [], sks = [], fits(r1, sks + sk ' + sks1, st[st[r1 -- sks] .refval -- sk, val]) ↔ fits(r1, sks + sk ' + sks1, st), (is_arraytype(st[r -- _type] .type) → is_indexkey(sk0) ∧ 0 ≤ sk0 .index ∧ sk0 .index < st[r -- _length] .intval) ∧ fits(r1, sks + sk ' + sks1, st[st[r1 -- sks] .refval -- sk, val]) ↔ (is_arraytype(st[r -- _type] .type) → ¬ is_fskey(sk0) ∧ ¬ sk0 .index < 0 ∧ ¬ st[r -- _length] .intval ≤ sk0 .index) ∧ fits(r1, sks + sk ' + sks1, st), sk = _type, sk = _length, r = jvmref |
sks0 = sk1 + sks2, st[r -- sk0] = refval(r1), st[r -- sks0] .refval = st[r1 -- sks] .refval, sks0 + sk ' ⊑ sk0 ' + sks, r ≠ st[r1 -- sks] .refval ∨ sk0 ≠ sk, is_classtype(st[r -- _type] .type) → sk0 ∈ instfields(st[r -- _type] .type .class), sks2 + sk ' ⊑ sks → st[r1 -- sks2] .refval ≠ st[r1 -- sks] .refval ⊦ sks0 = [], sks = [], fits(r1, sks + sk ' + sks1, st[st[r1 -- sks] .refval -- sk, val]) ↔ fits(r1, sks + sk ' + sks1, st), (is_arraytype(st[r -- _type] .type) → is_indexkey(sk0) ∧ 0 ≤ sk0 .index ∧ sk0 .index < st[r -- _length] .intval) ∧ fits(r1, sks + sk ' + sks1, st[st[r1 -- sks] .refval -- sk, val]) ↔ (is_arraytype(st[r -- _type] .type) → ¬ is_fskey(sk0) ∧ ¬ sk0 .index < 0 ∧ ¬ st[r -- _length] .intval ≤ sk0 .index) ∧ fits(r1, sks + sk ' + sks1, st), sk = _type, sk = _length, r = jvmref
[[CONCRETESIMPRULES : ([CSIMPELIM : sks ≠ [] ⊦ sk = sks .first ∧ sks0 = sks .rest ↔ sks = sk + sks0])], [EXTRATERMS : (sks0, sk1, sks2)]]