| sk .fs = mkfs(class0, ty, fieldvar), st[r -- sk] = refval(r0), st[r -- _type] .type = mkclasstype(class), is_referencevalue(st[r0 -- sks0]), r1 ∈ st, is_obj(str, r, st), sk ∈ instfields(class), fits(r0, sks0, st[r1 -- i ', byteval(by)]), okarray(r1, byte_type, st), ∀ st, r, r1, i, by, str. is_referencevalue(st[r -- sks0]) ∧ okarray(r1, byte_type, st) ∧ fits(r, sks0, st[r1 -- i ', byteval(by)]) ∧ r1 ∈ st → r1 = jvmref ∨ fits(r, sks0, st) ∨ junkref(str, r, st) ⊦ is_fskey(sk), r = r1, r = jvmref, r1 = jvmref, sks0 = [], fits(r0, sks0, st), mkfs(class0, ty, fieldvar) ' ∈ instfields(class) ∧ is_referencevalue(st[r -- mkfs(class0, ty, fieldvar) ']) ∧ st[r -- mkfs(class0, ty, fieldvar) '] .refval ≠ jvmref ∧ (¬ st[st[r -- mkfs(class0, ty, fieldvar) '] .refval -- _type] .type ≤ ty ∨ junkref(str, st[r -- mkfs(class0, ty, fieldvar) '] .refval, st)) |
sk .fs = mkfs(class0, ty, fieldvar), st[r -- sk] = refval(r0), st[r -- _type] .type = mkclasstype(class), is_referencevalue(st[r0 -- sks0]), r1 ∈ st, is_obj(str, r, st), sk ∈ instfields(class), fits(r0, sks0, st[r1 -- i ', byteval(by)]), okarray(r1, byte_type, st), is_indexkey(sk), ∀ st, r, r1, i, by, str. is_referencevalue(st[r -- sks0]) ∧ okarray(r1, byte_type, st) ∧ fits(r, sks0, st[r1 -- i ', byteval(by)]) ∧ r1 ∈ st → r1 = jvmref ∨ fits(r, sks0, st) ∨ junkref(str, r, st) ⊦ r = r1, r = jvmref, r1 = jvmref, sks0 = [], fits(r0, sks0, st), mkfs(class0, ty, fieldvar) ' ∈ instfields(class) ∧ is_referencevalue(st[r -- mkfs(class0, ty, fieldvar) ']) ∧ st[r -- mkfs(class0, ty, fieldvar) '] .refval ≠ jvmref ∧ (¬ st[st[r -- mkfs(class0, ty, fieldvar) '] .refval -- _type] .type ≤ ty ∨ junkref(str, st[r -- mkfs(class0, ty, fieldvar) '] .refval, st))
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ ¬ is_fskey(sk) ↔ is_indexkey(sk)])]]