| # ar = n0 + n + 1, n < # ar ⊦ rev(ar)[n0] = ar[n], n0 < # ar |
# ar = n0 + n + 1, n < # ar, n < n0, # ar ≤ n0 ⊦ rev(ar)[n0] = ar[n]
Used simplifier rules: ⊦ m < n → n ≠ 0; (s)%f: ⊦ m < n → n ≠ 0; (forward) from specification nat-basic%fle: ⊦ m < n ∧ n ≤ n0 → m < n0; (forward) from specification nat% ⊦ m < n ↔ ¬ n ≤ m; (ss)