| i0 ' + ints0 ≠ [] ∧ n→i(# (r ' + refs)) = countrefs(i0 ' + ints0) ∧ posints(i0 ' + ints0), 1 + n→i(# refs) = countrefs(i0 ' + ints0), is_newref_list(r ' + refs, st), 0 ≤ i, posints(ints0), 0 ≤ i0 ⊦ (addmultiarrays(r ' + refs, (i0 ' + ints0) .first, [], mktype_from_dims(ty, countdims(i0 ' + ints0, i)), getdims(i0 ' + ints0), st)[r -- _length]) = intval(i0) |
1 + n→i(# refs) = countrefs(i0 ' + ints0), is_newref_list(r ' + refs, st), 0 ≤ i, posints(ints0), 0 ≤ i0 ⊦ (addmultiarrays(r ' + refs, i0, [], mktype_from_dims(ty, countdims(i0 ' + ints0, i)), getdims(i0 ' + ints0), st)[r -- _length]) = intval(i0)
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ i ≤ 0 ∧ 0 ≤ j → i ≤ j], [CSIMPSEQ : ⊦ posints(i ' + ints) ↔ 0 ≤ i ∧ posints(ints)], [CSIMPSEQ : ⊦ i ' + ints ≠ []], [CSIMPSEQ : ⊦ (ints + ints0) + ints1 = ints + ints0 + ints1], [CSIMPSEQ : ⊦ (i ' + ints) .first = i], [CSIMPSEQ : ⊦ m + n = n + m], [CSIMPSEQ : ⊦ (m + n0) + n1 = m + n0 + n1], [CSIMPSEQ : ⊦ n→i(m + n) = n→i(m) + n→i(n)], [CSIMPSEQ : ⊦ (refs + refs0) + refs1 = refs + refs0 + refs1], [CSIMPSEQ : ⊦ # r ' = 0 +1], [CSIMPSEQ : ⊦ # (refs + refs0) = # refs + # refs0])]]