| ints = i0 + ints0, n→i(# refs) = countrefs(ints), posints(ints), is_fskey(sk) ⊦ ints = [], sk = _length, sk = _type, (addmultiarrays(refs, i0, [], mktype_from_dims(ty, countdims(ints, i)), getdims(ints), st)[r -- sk]) = st[r -- sk] |
n→i(# refs) = countrefs(i0 ' + ints0), is_fskey(sk), posints(ints0), 0 ≤ i0 ⊦ sk = _length, sk = _type, (addmultiarrays(refs, i0, [], mktype_from_dims(ty, countdims(i0 ' + ints0, i)), getdims(i0 ' + ints0), st)[r -- sk]) = st[r -- sk]
[[CONCRETESIMPRULES : ([CSIMPFORWARD : ⊦ i ≤ j ∧ 0 ≤ i → 0 ≤ j], [CSIMPSEQ : ⊦ posints(i ' + ints) ↔ 0 ≤ i ∧ posints(ints)], [CSIMPSEQ : ⊦ (ints + ints0) + ints1 = ints + ints0 + ints1], [CSIMPSEQ : ⊦ i ' + ints ≠ []], [CSIMPSEQ : ⊦ i + ints = i ' + ints])]]