| sk ' + sks0 ≠ [], unchanged(str, r, st, st0), fits(r, sk ' + sks0, st), ∀ str, r, st, st0. unchanged(str, r, st, st0) ∧ fits(r, sks0, st) → junkref(str, r, st) ∨ fits(r, sks0, st0) ⊦ junkref(str, r, st), r ≠ jvmref ∧ is_referencevalue(st0[r -- (sk ' + sks0) .first]) ∧ (is_classtype(st0[r -- _type] .type) → (sk ' + sks0) .first ∈ instfields(st0[r -- _type] .type .class)) ∧ ( is_arraytype(st0[r -- _type] .type) → is_indexkey((sk ' + sks0) .first) ∧ 0 ≤ (sk ' + sks0) .first .index ∧ (sk ' + sks0) .first .index < st0[r -- _length] .intval) ∧ fits(st0[r -- (sk ' + sks0) .first] .refval, (sk ' + sks0) .rest, st0) |
⊦ fits(jvmref, sks, st) ↔ sks = []
unchanged(str, r, st, st0), fits(r, sk ' + sks0, st), ∀ str, r, st, st0. unchanged(str, r, st, st0) ∧ fits(r, sks0, st) → junkref(str, r, st) ∨ fits(r, sks0, st0) ⊦ r = jvmref, junkref(str, r, st), fits(st0[r -- sk] .refval, sks0, st0) ∧ (is_arraytype(st0[r -- _type] .type) → ¬ is_fskey(sk) ∧ ¬ sk .index < 0 ∧ ¬ st0[r -- _length] .intval ≤ sk .index) ∧ (is_classtype(st0[r -- _type] .type) → sk ∈ instfields(st0[r -- _type] .type .class)) ∧ is_referencevalue(st0[r -- sk])
[[CONCRETESIMPRULES : ([CSIMPNAMEDSEQ : list, storekeys, e, ⊦ sk ' ≠ []], [CSIMPNAMEDSEQ : list, storekeys, app-02-ant, ⊦ ¬ sks + sks0 ≠ [] ↔ sks = [] ∧ sks0 = []], [CSIMPNAMEDSEQ : list, storekeys, c-07, ⊦ (sk ' + sks) .rest = sks], [CSIMPNAMEDSEQ : int-abs, , lels, ⊦ ¬ i < j ↔ j ≤ i], [CSIMPNAMEDSEQ : int-abs, , lels-01, ⊦ ¬ i ≤ j ↔ j < i], [CSIMPNAMEDSEQ : storekey, , test, ⊦ ¬ is_indexkey(sk) ↔ is_fskey(sk)], [CSIMPNAMEDSEQ : list, storekeys, c-08, ⊦ (sk ' + sks) .first = sk], [CSIMPNAMEDSEQ : list, storekeys, a, ⊦ (sks + sks0) + sks1 = sks + sks0 + sks1], [CSIMPNAMEDSEQ : list, storekeys, e-01, ⊦ sk ' + sks ≠ []])]]