| 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), validvals(str, rkvs0, st), okval(val, ty) ∧ (is_referencevalue(val) → validrefval(str, val, ty, st)), is_reftype(ty) → validrefval(str, st[jvmref -- mkfs(class, ty, fieldvar) '], ty, st) ⊦ ty = void_type, mkfs(class, ty, fieldvar) ' = _length, 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) |
is_reftype(ty), mkfs(class, ty, fieldvar) ' ∈ statfields(class), tdname∃(str, class), initdone(class, st), jvmref -- mkfs(class, ty, fieldvar) ' ∈ st, is_referencevalue(st[jvmref -- mkfs(class, ty, fieldvar) ']), type∃(str, ty), jvmref ∈ st, validvals(str, rkvs1, st), validvals(str, rkvs0, st), is_referencevalue(val), validrefval(str, val, ty, st), validrefval(str, st[jvmref -- mkfs(class, ty, fieldvar) '], ty, st) ⊦ ty = void_type, mkfs(class, ty, fieldvar) ' = _length, jvmref -- mkfs(class, ty, fieldvar) ' ∈ rkvs0, validrefval(str, val, ty, st[rkvs1][jvmref -- mkfs(class, ty, fieldvar) ', val][rkvs0])
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ is_reftype(ty) → ( okval(val, ty) ↔ is_referencevalue(val))])]]