| mkfs(`java.lang.Object' .class, void_type, `type' .field) ' .fs = mkfs(class, ty, fieldvar), r1 ∈ st, okval(val, ty), r1 -- mkfs(`java.lang.Object' .class, void_type, `type' .field) ' ∈ st, okval(st[r1 -- mkfs(`java.lang.Object' .class, void_type, `type' .field) '], ty) ⊦ ty = void_type, class+∃(str, val .type .class) ∧ ¬ is_abstract(val .type .class) ∧ is_obj(r1, st[r1 -- mkfs(`java.lang.Object' .class, void_type, `type' .field) ', val]) ↔ is_obj(str, r1, st) |
⊦ fs ' .fs = fs
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ mkfs(class, ty, fieldvar) = mkfs(class0, ty0, fieldvar0) ↔ class = class0 ∧ ty = ty0 ∧ fieldvar = fieldvar0])], [EXTRATERMS : (mkfs (`java.lang.Object' .class, void_type, `type' .field))]]