| ty2 ≤ ty3, mkfs(class, ty3, fieldvar) ' ∈ instfields(class0), is_reftype(ty2), type∃(str, ty2), tdname+∃(str, class0), class0 ≤ class1, tdname+∃(str, class1), class1 ≤ class2, tdname+∃(str, class2), class0 ≤ class2, is_arraytype(ty2) → fs ' = _length, is_classtype(ty2) → ¬ interface∃(str, ty2 .class) ∧ fs ' ∈ instfields(ty2 .class) ⊦ interface∃(str, class0), ty2 ≤ mkclasstype(class2), ∃ fs. fs ' ∈ instfields(class0) ∧ ty2 ≤ fs .type |
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ mkfs(class, ty, fieldvar) .type = ty])], [EXTRATERMS : (mkfs(class, ty3, fieldvar))]]