| n < # copy(ar1, m0, mkarray(m1), 0, m1), n < n3 ∨ n3 + n2 ≤ n, n + m0 < # ar1, m0 + m1 ≤ # ar1, n < m1 ⊦ ar1[n + m0] = (n < n3 ∨ n3 + n2 ≤ n ⊃ copy(ar1, m0, mkarray(m1), 0, m1)[n];ar0[n + n0 - n3]), m1 = 0, # ar1 = 0 |
n + m0 < # ar1, m0 + m1 ≤ # ar1, n < m1, n < n3 ∨ n3 + n2 ≤ n ⊦ m1 = 0, # ar1 = 0, ar1[n + m0] = copy(ar1, m0, mkarray(m1), 0, m1)[n]
Used simplifier rules: size-copy: ⊦ # copy(ar, m, ar0, m0, n) = # ar0;%Size-mkarray: ⊦ # mkarray(n) = n; from specification array