n < # ar ⊦ rev(ar)[n] = ar[# ar - n + 1]
Used simplifier rules: ⊦ m < n → n ≠ 0; (s)%f: ⊦ m < n → n ≠ 0; (forward) from specification nat-basic