| # ar = n2 + n1 + 1, n1 < # ar, ∀ ar, n0, m. # ar = n0 + m + 1 ∧ m < # ar ∧ m < n1 ∧ n1 ≤ # ar → rev(ar, n1)[m] = ar[n0] ⊦ rev(ar, n1)[n1, ar[n2]][n1] = ar[n2] |
⊦ m < # ar → ar[m, a][m] = a
# ar = n2 + n1 + 1, n1 < # ar, ∀ ar, n0, m. # ar = n0 + m + 1 ∧ m < # ar ∧ m < n1 ∧ n1 ≤ # ar → rev(ar, n1)[m] = ar[n0] ⊦ rev(ar, n1)[n1, ar[n2]][n1] = ar[n2], n1 < # rev(ar, n1)
Used terms: ar[n2], n1, rev(ar, n1)