| ar[i→n(i0) % i→n(i)] ' + x = tolist(mk(ar, i, i0, n→i(# x) + 1), 1 + # x), i0 < n→i(# ar), inv(mk(ar, i, i0, n→i(# x) + 1)), inv(mk(ar, i, (i0 + 1) % i, n→i(# x))), 0 ≤ i0, ar[i→n(i0) % i→n(i)] ∈ tolist(mk(ar, i, i0, n→i(# x) + 1), 1 + # x) ⊦ # ar = 0, ar[i→n(i0) % i→n(i)] = ar[i→n(i0)] |
⊦ m < n → m % n = m
¬ i→n(i0) < i→n(i), ar[i→n(i0) % i→n(i)] ' + x = tolist(mk(ar, i, i0, n→i(# x) + 1), 1 + # x), i0 < n→i(# ar), inv(mk(ar, i, i0, n→i(# x) + 1)), inv(mk(ar, i, (i0 + 1) % i, n→i(# x))), 0 ≤ i0, ar[i→n(i0) % i→n(i)] ∈ tolist(mk(ar, i, i0, n→i(# x) + 1), 1 + # x) ⊦ # ar = 0, ar[i→n(i0) % i→n(i)] = ar[i→n(i0)]
[[CONCRETESIMPRULES : ()], [EXTRATERMS : (i→n(i), i→n(i0))]]