| i ≤ j, 0 ≤ i, 0 ≤ j ⊦ getarray(r, 0, i, addarray(r, int_type, j, st)) = mklist(intval(0), i→n(i)) |
⊦ addarray(r, ty, i, st) = addarray(r, initial_value(ty), i, st[r -- _type, typeval(mkarraytype(ty))][r -- _length, intval(i)])
i ≤ j, 0 ≤ i, 0 ≤ j ⊦ getarray(r, 0, i, addarray(r, initial_value(int_type), j, st[r -- _type, typeval(mkarraytype(int_type))][r -- _length, intval(j)])) = mklist(intval(0), i→n(i))
[[CONCRETESIMPRULES : ()], [EXTRATERMS : (st, j, int_type, r)]]