| i ' ≠ [] ∧ n→i(# r ') = countrefs(i ') ∧ posints(i '), 0 ≤ i ⊦ addmultiarrays(r ', i ' .first, [], mktype_from_dims(ty, countdims(i ', j)), getdims(i '), st) = addarray(r, mktype_from_dims(ty, countdims(i ', j)), i, st) |
⊦ countrefs(i ') = 1
⊦ 0 ≤ i → getdims(i ') = i '
0 ≤ i ⊦ addmultiarrays(r ', i, [], mktype_from_dims(ty, countdims(i ', j)), i ', st) = addarray(r, mktype_from_dims(ty, countdims(i ', j)), i, st)
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ i ≤ 0 ∧ 0 ≤ j → i ≤ j], [CSIMPSEQ : ⊦ posints(i ') ↔ 0 ≤ i], [CSIMPSEQ : ⊦ i ' ≠ []], [CSIMPSEQ : ⊦ i ' .first = i], [CSIMPSEQ : ⊦ # r ' = 0 +1])]]