| mkfs(class, int_type, fieldvar) ' ∈ statfields(class), tdname∃(str, class), initdone(class, st), validfield(str, jvmref, mkfs(class, int_type, fieldvar) ', st) ⊦ validfield(str, jvmref, mkfs(class, int_type, fieldvar) ', st[jvmref -- mkfs(class, int_type, fieldvar) ', intval(i)]) |
⊦ validfield(str, r, sk, st) ↔ goodfieldandtype(r, sk, st) ∧ type∃(str, sk .fs .type) ∧ sk .fs .type ≠ void_type ∧ (is_reftype(sk .fs .type) → validrefval(str, st[r -- sk], sk .fs .type, st))
mkfs(class, int_type, fieldvar) ' ∈ statfields(class), tdname∃(str, class), initdone(class, st), validfield(str, jvmref, mkfs(class, int_type, fieldvar) ', st) ⊦ goodfieldandtype(jvmref, mkfs(class, int_type, fieldvar) ', st[jvmref -- mkfs(class, int_type, fieldvar) ', intval(i)]) ∧ type∃(str, mkfs(class, int_type, fieldvar) ' .fs .type) ∧ mkfs(class, int_type, fieldvar) ' .fs .type ≠ void_type ∧ ( is_reftype(mkfs(class, int_type, fieldvar) ' .fs .type) → validrefval (str, st[jvmref -- mkfs(class, int_type, fieldvar) ', intval(i)][jvmref -- mkfs(class, int_type, fieldvar) '], mkfs(class, int_type, fieldvar) ' .fs .type, st[jvmref -- mkfs(class, int_type, fieldvar) ', intval(i)]))
[[CONCRETESIMPRULES : ()], [EXTRATERMS : (st[jvmref -- mkfs(class, int_type, fieldvar) ', intval(i)], mkfs(class, int_type, fieldvar) ', jvmref, str)]]