| st[r -- sks] = refval(refs0 .last), st[refs0 .last -- _type] .type = mkclasstype(class), st[refs0 .last -- fs '] = refval(r), # sks = # refs0, fs ' ∈ instfields(class), validrefs(`docs2store', r ' + refs0, mkclasstype(`java.lang.Object' .class), st), fits(r, sks, st), ∀ n. n ≠ 0 ∧ ¬ # refs0 < n → st[r -- firstn(n, sks)] .refval = (r ' + refs0)[n] ⊦ refs0 .last = jvmref, refs0 = [], fits(st[refs0 .last -- (fs ' ' + sks)] .refval, fs ' ' + sks, st) |
⊦ sks ≠ [] → st[r -- (sk ' + sks)] = st[st[r -- sk] .refval -- sks]
sks ≠ [], st[r -- sks] = refval(refs0 .last), st[refs0 .last -- _type] .type = mkclasstype(class), st[refs0 .last -- fs '] = refval(r), # sks = # refs0, fs ' ∈ instfields(class), validrefs(`docs2store', r ' + refs0, mkclasstype(`java.lang.Object' .class), st), fits(r, sks, st), ∀ n. n ≠ 0 ∧ ¬ # refs0 < n → st[r -- firstn(n, sks)] .refval = (r ' + refs0)[n] ⊦ refs0 .last = jvmref, refs0 = [], fits(st[st[refs0 .last -- fs '] .refval -- sks] .refval, fs ' ' + sks, st)
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ st[r -- []] = refval(r)], [CSIMPSEQ : ⊦ refval(r) = refval(r0) ↔ r = r0], [CSIMPSEQ : ⊦ # [] = 0], [CSIMPSEQ : ⊦ # refs = 0 ↔ refs = []])], [EXTRATERMS : (sks, fs ', refs0 .last, st)]]