| tys = ty0 + tys0 ⊦ tys = [], (∃ ty. is_arraytype(ty) ∧ ty .type = int_type ∧ type∃(str, ty) ∧ ty0 ≤ ty .type ∧ contains(str, tys)) ↔ tys = int_type ' |
⊦ (∃ ty. is_arraytype(ty) ∧ ty .type = int_type ∧ type∃(str, ty) ∧ ty0 ≤ ty .type ∧ contains(str, ty0 ' + tys0)) ↔ ty0 ' + tys0 = int_type '
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ (tys + tys0) + tys1 = tys + tys0 + tys1], [CSIMPSEQ : ⊦ ty ' + tys ≠ []], [CSIMPSEQ : ⊦ ty + tys = ty ' + tys])]]