| newref_list(i→n(countrefs(ints)), st) = r ' + refs, 0 ≤ i, posints(ints), class ∈ claset, jvmref -- mkfs(class, void_type, `initstate' .field) ' ∈ st ∧ st[jvmref -- mkfs(class, void_type, `initstate' .field) '] = initval(undone) ∨ ¬ jvmref -- mkfs(class, void_type, `initstate' .field) ' ∈ st ∧ _uninit ∈ st, ¬ jvmref -- mkfs(class, void_type, `initstate' .field) ' ∈ st ∨ (addarrays(r ' + refs, ty, ints, i, st)[jvmref -- mkfs(class, void_type, `initstate' .field) ']) ≠ initval(undone) ⊦ claset = ∅, ints = [], # claset = 0, jvmref = r, 1 + # refs = i→n(countrefs(ints)), jvmref ∈ refs, ¬ jvmref -- mkfs(class, void_type, `initstate' .field) ' ∈ st ∧ _uninit ∈ addarrays(r ' + refs, ty, ints, i, st) |
⊦ # refs ≠ # refs0 → refs ≠ refs0
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ # newref_list(n, st) = n], [CSIMPSEQ : ⊦ # (refs + refs0) = # refs + # refs0], [CSIMPSEQ : ⊦ # r ' = 0 +1], [CSIMPSEQ : ⊦ (refs + refs0) + refs1 = refs + refs0 + refs1])], [EXTRATERMS : (r ' + refs, newref_list(i→n(countrefs(ints)), st))]]