| okval(val, ty0), 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, jvmref ≠ r ∨ class ≠ class0 ∨ ty ≠ ty0 ∨ fieldvar ≠ fieldvar0, is_reftype(ty) → validrefval(str, st[jvmref -- mkfs(class, ty, fieldvar) '], ty, st) ⊦ mkfs(class0, ty0, fieldvar0) ' = _length, ty0 = void_type, r -- mkfs(class0, ty0, fieldvar0) ' = _uninit, ty = void_type, is_referencevalue(val), ( is_reftype(ty) → validrefval (str, st[r -- mkfs(class0, ty0, fieldvar0) ', val][jvmref -- mkfs(class, ty, fieldvar) '], ty, st[r -- mkfs(class0, ty0, fieldvar0) ', val])) ∧ is_fskey(mkfs(class, ty, fieldvar) ') ∧ jvmref -- mkfs(class, ty, fieldvar) ' ∈ st[r -- mkfs(class0, ty0, fieldvar0) ', val] ∧ okval(st[r -- mkfs(class0, ty0, fieldvar0) ', val][jvmref -- mkfs(class, ty, fieldvar) '], mkfs(class, ty, fieldvar) ' .fs .type) |
okval(val, ty0), 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, jvmref ≠ r ∨ class ≠ class0 ∨ ty ≠ ty0 ∨ fieldvar ≠ fieldvar0, is_reftype(ty) → validrefval(str, st[jvmref -- mkfs(class, ty, fieldvar) '], ty, st) ⊦ mkfs(class0, ty0, fieldvar0) ' = _length, ty0 = void_type, r -- mkfs(class0, ty0, fieldvar0) ' = _uninit, ty = void_type, is_referencevalue(val), ( is_reftype(ty) → validrefval (str, st[r -- mkfs(class0, ty0, fieldvar0) ', val][jvmref -- mkfs(class, ty, fieldvar) '], ty, st[r -- mkfs(class0, ty0, fieldvar0) ', val])) ∧ okval(st[r -- mkfs(class0, ty0, fieldvar0) ', val][jvmref -- mkfs(class, ty, fieldvar) '], ty)
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ mkfs(class, ty, fieldvar) .type = ty], [CSIMPSEQ : ⊦ fs ' .fs = fs], [CSIMPSEQ : ⊦ mkfs(class1, ty, fieldvar) = mkfs(class2, ty0, fieldvar0) ↔ ¬ ¬ ( class1 = class2 ∧ ty = ty0 ∧ fieldvar = fieldvar0)], [CSIMPSEQ : ⊦ fs ' = fs0 ' ↔ fs = fs0], [CSIMPSEQ : ⊦ r -- sk = r0 -- sk0 ↔ ¬ ¬ (r = r0 ∧ sk = sk0)], [CSIMPSEQ : ⊦ rk ∈ st[rk0, val] ↔ rk = rk0 ∨ rk ∈ st], [CSIMPSEQ : ⊦ is_fskey(fs ')])]]