| n0 + n1 ≤ # ar0, m + m1 ≤ n1 ⊦ copy(copy(ar0, n0, mkarray(n1), 0, n1), m, ar1, m0, m1) = copy(ar0, n0 + m, ar1, m0, m1) |
⊦ ar1 = ar2 ↔ # ar1 = # ar2 ∧ (∀ n. n < # ar1 → ar1[n] = ar2[n])
n0 + n1 ≤ # ar0, m + m1 ≤ n1 ⊦ # copy(copy(ar0, n0, mkarray(n1), 0, n1), m, ar1, m0, m1) = # copy(ar0, n0 + m, ar1, m0, m1) ∧ (∀ n. n < # copy(copy(ar0, n0, mkarray(n1), 0, n1), m, ar1, m0, m1) → copy(copy(ar0, n0, mkarray(n1), 0, n1), m, ar1, m0, m1)[n] = copy(ar0, n0 + m, ar1, m0, m1)[n])
Used terms: copy(ar0, n0 + m, ar1, m0, m1), copy(copy(ar0, n0, mkarray(n1), 0, n1), m, ar1, m0, m1)