| n0 + m = n1 + n2, # ar = n0 + m + 1, # ar = n2 + n1 + 1, m < n2 + n1, m < n1, m < # ar, n1 < # ar, ∀ ar0, n, m0. # ar0 = n + m0 + 1 ∧ m0 < n1 ∧ n1 ≤ # ar0 ∧ m0 < # ar0 → # ar0 = 0 ∨ rev(ar0, n1)[m0] = ar0[n] ⊦ n2 + n1 = 0, n0 = 0, n1 = 0, m = n1, rev(ar, n1)[m] = ar[n0], # ar = 0 |
Used simplifier rules: lels-03: ⊦ m < n → m ≤ n; from specification nat Used terms: ar, n0, m