| sk ' + sks0 ≠ [], st[r0 -- sks0] = refval(r1), fis .keys = instfields(class), st[r0 -- sks] = refval(r1), fis[sk] = refval(r0), sk ∈ fis, fits(r0, sks, st), fits(r0, sks0, st), newref(r, st), validfieldinits(str, fis, st) ⊦ sks0 = sks, sks0 = [], sks = [], r1 = jvmref, r = jvmref, r0 = jvmref, dups(fis .vals .nonnullrefs), junkref(str, r, addobj(r, class, fis, st)), (addobj(r, class, fis, st)[r -- (sk ' + sks)]) = (addobj(r, class, fis, st)[r -- (sk ' + sks0)]) ∧ (addobj(r, class, fis, st)[r -- (sk ' + sks)]) .refval ≠ jvmref ∧ r ≠ jvmref ∧ is_referencevalue(addobj(r, class, fis, st)[r -- (sk ' + sks0) .first]) ∧ ( is_classtype((addobj(r, class, fis, st)[r -- _type]) .type) → (sk ' + sks0) .first ∈ instfields((addobj(r, class, fis, st)[r -- _type]) .type .class)) ∧ ( is_arraytype((addobj(r, class, fis, st)[r -- _type]) .type) → is_indexkey((sk ' + sks0) .first) ∧ 0 ≤ (sk ' + sks0) .first .index ∧ (sk ' + sks0) .first .index < (addobj(r, class, fis, st)[r -- _length]) .intval) ∧ fits((addobj(r, class, fis, st)[r -- (sk ' + sks0) .first]) .refval, (sk ' + sks0) .rest, addobj(r, class, fis, st)) ∧ fits(r0, sks, addobj(r, class, fis, st)) ∧ sk ∈ instfields(class) |
fis[sk] = refval(r0), st[r0 -- sks] = refval(r1), fis .keys = instfields(class), st[r0 -- sks0] = refval(r1), validfieldinits(str, fis, st), newref(r, st), fits(r0, sks0, st), fits(r0, sks, st), sk ∈ fis ⊦ r0 = jvmref, r = jvmref, r1 = jvmref, sks = [], sks0 = [], sks0 = sks, junkref(str, r, addobj(r, class, fis, st)), dups(fis .vals .nonnullrefs), sk ∈ instfields(class) ∧ fits(r0, sks, addobj(r, class, fis, st)) ∧ fits(r0, sks0, addobj(r, class, fis, st)) ∧ (addobj(r, class, fis, st)[r -- (sk ' + sks)]) .refval ≠ jvmref ∧ (addobj(r, class, fis, st)[r -- (sk ' + sks)]) = (addobj(r, class, fis, st)[r -- (sk ' + sks0)])
[[CONCRETESIMPRULES : ([CSIMPNAMEDSEQ : javavalue, , sel-09, ⊦ refval(r) .refval = r], [CSIMPNAMEDSEQ : javavalue, , test-19, ⊦ is_referencevalue(refval(r))], [CSIMPNAMEDSEQ : list, storekeys, c-07, ⊦ (sk ' + sks) .rest = sks], [CSIMPNAMEDSEQ : javatype, , test-28, ⊦ ¬ is_arraytype (mkclasstype(class))], [CSIMPNAMEDSEQ : javatype, , sel-02, ⊦ mkclasstype(class) .class = class], [CSIMPNAMEDSEQ : javatype, , test-10, ⊦ is_classtype (mkclasstype(class))], [CSIMPNAMEDSEQ : javavalue, , sel-11, ⊦ typeval(ty) .type = ty], [CSIMPNAMEDSEQ : addfuns, , add-type, ¬ _type ∈ fis ⊦ (addobj(r, class1, fis, st) [r -- _type ] ) = typeval(mkclasstype(class1))], [CSIMPNAMEDSEQ : addfuns, , instfields-type, ⊦ fis .keys = instfields(class) → ¬ _type ∈ fis], [CSIMPNAMEDSEQ : addfuns, , add-in-09, ⊦ sk ∈ fis → (addobj(r, class, fis, st) [r -- sk ] ) = fis[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 ≠ []])]]