| ¬(n1 < n2 ∨ n2 + m0 ≤ n1), m0 ≤ # ar1, m0 + n ≤ # ar1, n1 < # ar2 ⊦ copy(ar0, n0, ar1, 0, # ar1)[n1 + n - n2] = (n1 < n2 ∨ n2 + m0 ≤ n1 ⊃ ar2[n1];ar0[n1 + n0 + n - n2]), # ar2 = 0 |
n2 < # ar2, n1 < n2 + m0, n2 ≤ n1, n1 < # ar2, m0 + n ≤ # ar1, m0 ≤ # ar1 ⊦ n2 + m0 = 0, copy(ar0, n0, ar1, 0, # ar1)[(n1 - n2) + n] = ar0[(n1 - n2) + n0 + n], # ar2 = 0, m0 = 0
Used simplifier rules: l-01: ⊦ m < m + n ↔ n ≠ 0; from specification nat-basic2%fle-01: ⊦ m ≤ n ∧ n < n0 → m < n0; (forward) from specification nat%f: ⊦ m < n → n ≠ 0; (forward) from specification nat-basic1%lels-01: ⊦ ¬ m ≤ n ↔ n < m; from specification nat%c: ⊦ m + n = n + m; from specification nat-basic2%a: ⊦ (m + n0) + n1 = m + n0 + n1; from specification nat-basic2%add-01: ⊦ n ≤ m → m + n0 - n = (m - n) + n0; from specification nat%lels: ⊦ ¬ m < n ↔ n ≤ m; from specification nat