| n < n1, n < max(# ar1, n1 + m0), # ar1 < n1 + m0 ⊦ copy(ar0, n0, resize(ar1, n1 + m0), n1, m0)[n] = (# ar1 ≤ n ⊃ zero;ar1[n]), m0 = 0 |
n < n1 + m0, # ar1 < n1 + m0, n < n1 ⊦ copy(ar0, n0, resize(ar1, n1 + m0), n1, m0)[n] = (# ar1 ≤ n ⊃ zero;ar1[n]), m0 = 0
Used simplifier rules: ⊦ m < n → n ≠ 0; (s)%f: ⊦ m < n → n ≠ 0; (forward) from specification nat-basic% ⊦ n < m → max(n, m) = m; (s)