| ¬ ( # refs + 1 = i→n(countrefs(i0 ' + getdims(i0 ' + ints0) .rest)) ∧ getdims(i0 ' + ints0) ≠ [] ∧ 0 ≤ i0 ∧ posints(getdims(i0 ' + ints0)) ∧ ¬ 0 ∈ getdims(i0 ' + ints0) .butlast ∧ i0 ≤ getdims(i0 ' + ints0) .first ∧ n→i(# []) + i0 = getdims(i0 ' + ints0) .first), 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) |
⊦ getdims(ints) = [] ↔ ints = []
⊦ ¬ posints(getdims(ints)) ↔ false
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), # refs + 1 = i→n(countrefs(i0 ' + getdims(i0 ' + ints0) .rest)) ∧ ¬ 0 ∈ getdims(i0 ' + ints0) .butlast ∧ ¬ getdims(i0 ' + ints0) .first < i0 ∧ ¬ i0 < getdims(i0 ' + ints0) .first
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ ¬ i < j → (i ≠ j ↔ j < i)], [CSIMPSEQ : ⊦ i + j = j + i], [CSIMPSEQ : ⊦ i + j + i0 = (i + j) + i0], [CSIMPSEQ : ⊦ i + 0 = i], [CSIMPSEQ : ⊦ # [] = 0], [CSIMPSEQ : ⊦ i ≤ j → (¬ ¬ j < i ↔ false)], [CSIMPSEQ : ⊦ ¬ i ≤ j ↔ j < i], [CSIMPSEQ : ⊦ (ints + ints0) + ints1 = ints + ints0 + ints1], [CSIMPSEQ : ⊦ i ' ≠ []], [CSIMPSEQ : ⊦ ¬ ints + ints0 ≠ [] ↔ ints = [] ∧ ints0 = []])]]