| tys1 + ty ' = ty2 ' + tys, contains(str, tys1 + ty ' + tys0), tdname+∃(str, class0), class0 ≤ class1, mkfs(class, ty3, fieldvar) ' ∈ instfields(class0), ty2 ≤ ty3, contains(str, ty ' + tys0), contains(str, ty2 ' + tys), tdname+∃(str, class1) ⊦ interface∃(str, class0), ty ≠ ty2 ∧ ¬ ty ∈ tys, ¬ ty2 ∈ tys1 ∧ ty2 ≠ ty, ∃ fs. fs ' ∈ instfields(class0) ∧ ty2 ≤ fs .type |
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ mkfs(class, ty, fieldvar) .type = ty])], [EXTRATERMS : (mkfs(class, ty3, fieldvar))]]