| mkfs(class, ty, fieldvar) ' ∈ statfields(class), tdname∃(str, class), initdone(class, st), jvmref -- mkfs(class, ty, fieldvar) ' ∈ st, okval(st[jvmref -- mkfs(class, ty, fieldvar) '], ty), type∃(str, ty), jvmref ∈ st, validvals(str, rkvs1, st), validval(str, jvmref -- mkfs(class, ty, fieldvar) ', val, st), validvals(str, rkvs0, st), is_reftype(ty) → validrefval(str, st[jvmref -- mkfs(class, ty, fieldvar) '], ty, st) ⊦ ty = void_type, jvmref -- mkfs(class, ty, fieldvar) ' ∈ rkvs0, ( is_reftype(ty) → validrefval (str, st[rkvs1][((jvmref -- mkfs(class, ty, fieldvar) ') × val) '][rkvs0][jvmref -- mkfs(class, ty, fieldvar) '], ty, st[rkvs1][((jvmref -- mkfs(class, ty, fieldvar) ') × val) '][rkvs0])) ∧ okval(st[rkvs1][((jvmref -- mkfs(class, ty, fieldvar) ') × val) '][rkvs0][jvmref -- mkfs(class, ty, fieldvar) '], ty) |
mkfs(class, ty, fieldvar) ' ∈ statfields(class), tdname∃(str, class), initdone(class, st), jvmref -- mkfs(class, ty, fieldvar) ' ∈ st, okval(st[jvmref -- mkfs(class, ty, fieldvar) '], ty), type∃(str, ty), jvmref ∈ st, validvals(str, rkvs1, st), validval(str, jvmref -- mkfs(class, ty, fieldvar) ', val, st), validvals(str, rkvs0, st), is_reftype(ty) → validrefval(str, st[jvmref -- mkfs(class, ty, fieldvar) '], ty, st) ⊦ ty = void_type, jvmref -- mkfs(class, ty, fieldvar) ' ∈ rkvs0, (is_reftype(ty) → validrefval(str, val, ty, st[rkvs1][jvmref -- mkfs(class, ty, fieldvar) ', val][rkvs0])) ∧ okval(val, ty)
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ (st[rk, val][rk]) = val], [CSIMPSEQ : ⊦ ¬ rk ∈ rkvs → (st[rkvs][rk]) = st[rk]], [CSIMPSEQ : ⊦ st[(rk × val) '] = st[rk, val]])]]