| same-subclasses(ty1 .jtelemtype .class, str, str0), has_classtype(ty1), type∃(str0, ty0), contains(str0, mkarraytype(ty1), ty0), type∃(str, ty3), type∃(str0, ty3), type∃(str, ty0), type∃(str0, ty1), contains(str, ty3, ty0), has_classtype(ty2), ty2 ≤ ty1, ty3 ≤ ty2, contains(str0, (ty3 ' + tys1) + ty0 '), type∃(str0, ty2), type∃(str, ty1), ty3 ≤ ty1, ∀ class. contains(str0, ty1 .jtelemtype, mkclasstype(class)) → same-subclasses(class, str, str0), ∀ ty0, str0, str, ty, tys0. # tys0 < # (ty3 + tys1) → ( has_classtype(ty) ∧ same-subclasses-contains(ty .jtelemtype .class, str, str0) ∧ type∃(str, ty) ∧ contains(str0, ty ' + tys0 + ty0 ') → contains(str, ty, ty0) ∨ dups(tys0) ∨ ty ∈ tys0) ⊦ same-subclasses(ty1 .jtelemtype .class, str, str0) ∧ (∀ class0. contains(str0, mkclasstype(ty1 .jtelemtype .class), mkclasstype(class0)) → same-subclasses(class0, str, str0)), mkarraytype(ty1) = ty3, mkarraytype(ty1) ∈ tys1, ty3 ∈ tys1, dups(tys1), type∃(str, ty2), ∃ ty4. ty4 ≤ mkarraytype(ty1) ∧ type∃(str, ty4) ∧ (is_classtype(ty4) → ¬ interface∃(str, ty4 .class) ∧ (∃ fs. fs ' ∈ instfields(ty4 .class) ∧ ty0 ≤ fs .type)) ∧ (is_arraytype(ty4) → ty0 ≤ ty4 .type) |
same-subclasses(ty1 .jtelemtype .class, str, str0), has_classtype(ty1), type∃(str0, ty0), contains(str0, mkarraytype(ty1), ty0), type∃(str, ty3), type∃(str0, ty3), type∃(str, ty0), type∃(str0, ty1), contains(str, ty3, ty0), has_classtype(ty2), ty2 ≤ ty1, ty3 ≤ ty2, contains(str0, (ty3 ' + tys1) + ty0 '), type∃(str0, ty2), type∃(str, ty1), ty3 ≤ ty1, contains(str0, ty1 .jtelemtype, mkclasstype(class)), ∀ class. contains(str0, ty1 .jtelemtype, mkclasstype(class)) → same-subclasses(class, str, str0), ∀ ty0, str0, str, ty, tys0. # tys0 < # (ty3 + tys1) → ( has_classtype(ty) ∧ same-subclasses-contains(ty .jtelemtype .class, str, str0) ∧ type∃(str, ty) ∧ contains(str0, ty ' + tys0 + ty0 ') → contains(str, ty, ty0) ∨ dups(tys0) ∨ ty ∈ tys0) ⊦ mkarraytype(ty1) = ty3, mkarraytype(ty1) ∈ tys1, ty3 ∈ tys1, dups(tys1), type∃(str, ty2), same-subclasses(class, str, str0), ∃ ty4. ty4 ≤ mkarraytype(ty1) ∧ type∃(str, ty4) ∧ (is_classtype(ty4) → ¬ interface∃(str, ty4 .class) ∧ (∃ fs. fs ' ∈ instfields(ty4 .class) ∧ ty0 ≤ fs .type)) ∧ (is_arraytype(ty4) → ty0 ≤ ty4 .type)
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ has_classtype(ty) → mkclasstype (ty .jtelemtype .class) = ty .jtelemtype])]]