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