| tys + mkclasstype(class0) ' ≠ [], contains(str0, (ty0 ' + tys1) + mkclasstype(class0) '), mkfs(class1, ty1, fieldvar) ' ∈ instfields(class2), ty0 ≤ ty1, same-subclasses-contains(class, str, str0), tdname+∃(str0, class), class2 ≤ class, tdname+∃(str0, class2), # tys ≤ # tys1, type∃(str0, ty0 .jtelemtype) ∧ is_reftype(ty0 .jtelemtype) ∧ (∃ ty1. ty1 ≤ ty0 .jtelemtype ∧ type∃(str0, ty1) ∧ (is_classtype(ty1) → ¬ interface∃(str0, ty1 .class) ∧ (∃ fs. fs ' ∈ instfields(ty1 .class) ∧ (tys + mkclasstype(class0) ') .first ≤ fs .type)) ∧ (is_arraytype(ty1) → (tys + mkclasstype(class0) ') .first ≤ ty1 .type) ∧ contains(str0, tys + mkclasstype(class0) ')), ∀ class0, str0, str, class, tys0. # tys0 < # (ty0 + tys1) → (same-subclasses-contains(class, str, str0) ∧ contains(str0, mkclasstype(class) ' + tys0 + mkclasstype(class0) ') → tdname+∃(str, class0)) ⊦ has_classtype(ty0), same-subclasses-contains(ty0 .jtelemtype .class, str, str0) ∧ contains(str0, mkclasstype(ty0 .jtelemtype .class) ' + tys + mkclasstype(class0) '), class = `java.lang.Object' .class, is_classtype(ty0), tdname+∃(str, class0), interface∃(str0, class2) |
contains(str0, (ty0 ' + tys1) + mkclasstype(class0) '), mkfs(class1, ty1, fieldvar) ' ∈ instfields(class2), ty0 ≤ ty1, same-subclasses-contains(class, str, str0), tdname+∃(str0, class), class2 ≤ class, tdname+∃(str0, class2), # tys ≤ # tys1, type∃(str0, ty0 .jtelemtype), is_reftype(ty0 .jtelemtype), ty ≤ ty0 .jtelemtype, type∃(str0, ty), contains(str0, tys + mkclasstype(class0) '), is_arraytype(ty) → (tys + mkclasstype(class0) ') .first ≤ ty .type, is_classtype(ty) → ¬ interface∃(str0, ty .class) ∧ fs ' ∈ instfields(ty .class) ∧ (tys + mkclasstype(class0) ') .first ≤ fs .type, ∀ class0, str0, str, class, tys0. # tys0 < # (ty0 + tys1) → (same-subclasses-contains(class, str, str0) ∧ contains(str0, mkclasstype(class) ' + tys0 + mkclasstype(class0) ') → tdname+∃(str, class0)) ⊦ class = `java.lang.Object' .class, has_classtype(ty0), tdname+∃(str, class0), interface∃(str0, class2), same-subclasses-contains(ty0 .jtelemtype .class, str, str0) ∧ contains(str0, mkclasstype(ty0 .jtelemtype .class) ' + tys + mkclasstype(class0) ')
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ ¬ has_classtype(ty) → ¬ is_classtype(ty)], [CSIMPSEQ : ⊦ (tys + tys0) + tys1 = tys + tys0 + tys1], [CSIMPSEQ : ⊦ tys + ty ' ≠ []])]]