| n < n1 ⊦ splice(ar0, n0, ar1, n1, m0)[n] = (# ar1 ≤ n ⊃ zero;ar1[n]), m0 = 0, max(# ar1, n1 + m0) ≤ n |
n < max(# ar1, n1 + m0), n < n1 ⊦ splice(ar0, n0, ar1, 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% ⊦ m ≤ n ↔ ¬ n < m; (ss)