| jvmref -- mkfs(class, ty, fieldvar) ' ≠ r -- mkfs(class0, ty0, fieldvar0) ', 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[jvmref -- mkfs(class, ty, fieldvar) '], ty, st[r -- mkfs(class0, ty0, fieldvar0) ', val])) ∧ okval(st[jvmref -- mkfs(class, ty, fieldvar) '], ty) |
type∃(str, ty), jvmref ∈ st, is_reftype(ty), okval(val, ty0), 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) ']), validrefval(str, st[jvmref -- mkfs(class, ty, fieldvar) '], ty, st), jvmref ≠ r ∨ class ≠ class0 ∨ ty ≠ ty0 ∨ fieldvar ≠ fieldvar0 ⊦ mkfs(class0, ty0, fieldvar0) ' = _length, ty0 = void_type, r -- mkfs(class0, ty0, fieldvar0) ' = _uninit, ty = void_type, is_referencevalue(val), validrefval(str, st[jvmref -- mkfs(class, ty, fieldvar) '], ty, st[r -- mkfs(class0, ty0, fieldvar0) ', val])
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ is_reftype(ty) → ( okval(val, ty) ↔ is_referencevalue(val))], [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)])]]