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