| ∀ i, ints0, refs, st, ty, r, ints1. ints#(ints1) < ints#(ints) → (true → (addarraymultlist(r, ty, st, refs, ints1, ints0, i)[_mode]) = st[_mode]) ⊦ (addarraymultlist(r, ty, st, refs, ints, ints0, i)[_mode]) = st[_mode], # ints = 1 ∧ ¬ 0 < ints .first |
⊦ # ints = 1 ∧ ints .first > 0 → addarraymultlist(r, ty, st, refs, ints, ints0, i) = addarray(r, mktype_from_dims(ty, i), ints0 .first, st)
¬ (# ints = 1 ∧ ints .first > 0), ∀ i, ints0, refs, st, ty, r, ints1. ints#(ints1) < ints#(ints) → (true → (addarraymultlist(r, ty, st, refs, ints1, ints0, i)[_mode]) = st[_mode]) ⊦ (addarraymultlist(r, ty, st, refs, ints, ints0, i)[_mode]) = st[_mode], # ints = 1 ∧ ¬ 0 < ints .first
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ (addarray(r, ty, i, st)[_mode]) = st[_mode]])], [EXTRATERMS : (i, ints0, ints, refs, st, ty, r)]]