| n1 < # ar1, n ≤ # ar0, n0 ≤ # ar1, m + n ≤ # ar, m0 + n0 ≤ m ⊦ (n0 ≤ n1 ⊃ ar1[n1];copy(ar0, 0, ar, m, n)[n1 + m0]) = (n0 ≤ n1 ⊃ ar1[n1];ar[n1 + m0]) |
¬ n0 ≤ n1, n1 < # ar1, n ≤ # ar0, n0 ≤ # ar1, m + n ≤ # ar, m0 + n0 ≤ m ⊦ copy(ar0, 0, ar, m, n)[n1 + m0] = (n0 ≤ n1 ⊃ ar1[n1];ar[n1 + m0])