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