| val = refval(r), 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, validref(str, r, ty, st[rkvs1][jvmref -- mkfs(class, ty, fieldvar) ', val][rkvs0]) |
⊦ validrefval(str, refval(r), ty, st) ↔ validref(str, r, ty, st)
validrefval(str, st[jvmref -- mkfs(class, ty, fieldvar) '], ty, st), 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), validref(str, r, ty, st) ⊦ ty = void_type, mkfs(class, ty, fieldvar) ' = _length, jvmref -- mkfs(class, ty, fieldvar) ' ∈ rkvs0, validref(str, r, ty, st[rkvs1][jvmref -- mkfs(class, ty, fieldvar) ', refval(r)][rkvs0])
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ is_referencevalue(refval(r))])]]