| n < # ar1, m0 < # ar1, m + m1 ≤ n1, n0 + n1 ≤ # ar0, m0 ≤ n ⊦ (m0 + m1 ≤ n ⊃ ar1[n];copy(ar0, n0, mkarray(n1), 0, n1)[(n - m0) + m]) = (m0 + m1 ≤ n ⊃ ar1[n];ar0[(n - m0) + n0 + m]) |
m0 < # ar1, n < # ar1, m0 ≤ n, n0 + n1 ≤ # ar0, m + m1 ≤ n1 ⊦ (m0 + m1 ≤ n ⊃ ar1[n];copy(ar0, n0, mkarray(n1), 0, n1)[(n - m0) + m]) = (m0 + m1 ≤ n ⊃ ar1[n];ar0[(n - m0) + n0 + m]), m0 + m1 ≤ n
Used formulas: m0 + m1 ≤ n