| n + m0 ≤ # ar, n0 + m0 ≤ # ar0, (n3 + n0) + m1 ≤ # ar0, n3 + m1 ≤ m0, n2 + m1 ≤ # ar2, (n + n3) + m1 ≤ # ar, ∀ n4. n4 < m1 → ar2[n2 + n4] = ar[(n + n3) + n4] ⊦ n2 + m1 ≤ # ar2 ∧ (n1 < m1 → ar2[n2 + n1] = copy(ar, n, ar0, n0, m0)[(n3 + n0) + n1]) |
n1 < m1, n + m0 ≤ # ar, n0 + m0 ≤ # ar0, (n3 + n0) + m1 ≤ # ar0, n3 + m1 ≤ m0, n2 + m1 ≤ # ar2, (n + n3) + m1 ≤ # ar, ∀ n4. n4 < m1 → ar2[n2 + n4] = ar[(n + n3) + n4] ⊦ ar2[n2 + n1] = copy(ar, n, ar0, n0, m0)[(n3 + n0) + n1]
Used simplifier rules: ⊦ m < n → n ≠ 0; (s)%f: ⊦ m < n → n ≠ 0; (forward) from specification nat-basic