| # refs + # refs1 = # refs2 + # refs0, # sks0 = 2 + # refs2 + # refs0, # refs0 < # refs, fits(r, sks0, st), validrefs(str, (r ' + refs0) + st[r -- firstn(1 + # refs0, sks0)] .refval ' + refs2 + r0 ', st[r -- _type] .type, st), validrefs(str, (r ' + refs) + r1 ' + refs1 + r0 ', st[r -- _type] .type, st), 1 + # refs0 ≠ 0 ∧ ¬ # sks0 < 1 + # refs0 → st[r -- firstn(1 + # refs0, sks0)] .refval = ((r ' + refs) + r1 ' + refs1 + r0 ')[1 + # refs0] ⊦ r0 = jvmref, r1 = r0, st[r -- firstn(1 + # refs0, sks0)] .refval = r1, # refs = # refs0, refs = [], hasSharing(r, st), path∃(str, r1, st[r -- firstn(1 + # refs0, sks0)] .refval, st), path∃(str, st[r -- firstn(1 + # refs0, sks0)] .refval, r1, st) |
# refs + # refs1 = # refs2 + # refs0, # sks0 = 2 + # refs2 + # refs0, # refs0 < # refs, fits(r, sks0, st), validrefs(str, (r ' + refs0) + st[r -- firstn(1 + # refs0, sks0)] .refval ' + refs2 + r0 ', st[r -- _type] .type, st), validrefs(str, (r ' + refs) + r1 ' + refs1 + r0 ', st[r -- _type] .type, st), ¬ # sks0 ≤ # refs0 → st[r -- firstn(1 + # refs0, sks0)] .refval = refs[# refs0] ⊦ r0 = jvmref, r1 = r0, st[r -- firstn(1 + # refs0, sks0)] .refval = r1, # refs = # refs0, refs = [], hasSharing(r, st), path∃(str, r1, st[r -- firstn(1 + # refs0, sks0)] .refval, st), path∃(str, st[r -- firstn(1 + # refs0, sks0)] .refval, r1, st)
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ (refs + refs0) + refs1 = refs + refs0 + refs1], [CSIMPSEQ : ⊦ n < # refs → (refs + refs0)[n] = refs[n]], [CSIMPSEQ : ⊦ (r ' + refs)[n + 1] = refs[n]], [CSIMPSEQ : ⊦ ¬ m < n ↔ n ≤ m], [CSIMPSEQ : ⊦ m < n + 1 ↔ ¬ n < m], [CSIMPSEQ : ⊦ m + n = n + m], [CSIMPSEQ : ⊦ (m + n0) + n1 = m + n0 + n1], [CSIMPSEQ : ⊦ m + 1 ≠ 0])]]