| ¬ ( is_obj(str, r, st[r -- mkfs(class, mkclasstype(class1), fieldvar) ', refval(r)]) ∧ (st[r -- mkfs(class, mkclasstype(class1), fieldvar) ', refval(r)][r -- _type]) .type ≤ mkclasstype(class0)), st[r -- _type] .type = mkclasstype(class0), mkfs(class, mkclasstype(class1), fieldvar) ' ∈ instfields(class0), is_valid_ref(str, r, st), class0 ≤ class1 ⊦ r = jvmref, validrefs(str, r ' + r ', mkclasstype(class0), st[r -- mkfs(class, mkclasstype(class1), fieldvar) ', refval(r)]) |
st[r -- _type] .type = mkclasstype(class0), class0 ≤ class1, is_valid_ref(str, r, st), mkfs(class, mkclasstype(class1), fieldvar) ' ∈ instfields(class0) ⊦ r = jvmref, validrefs(str, r ' + r ', mkclasstype(class0), st[r -- mkfs(class, mkclasstype(class1), fieldvar) ', refval(r)]), is_obj(str, r, st[r -- mkfs(class, mkclasstype(class1), fieldvar) ', refval(r)])
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ class ≤ class], [CSIMPSEQ : ⊦ mkclasstype(class1) ≤ mkclasstype(class2) ↔ class1 ≤ class2], [CSIMPSEQ : ⊦ (st[ r0 -- mkfs (class, mkclasstype(class0), fieldvar) ', val] [r -- _type ] ) = st[r -- _type]])]]