| m < # ar ⊦ # ar[m, a][m, b] = # ar[m, b] ∧ (∀ n. n < # ar[m, a][m, b] → ar[m, a][m, b][n] = ar[m, b][n]) |
m < # ar, n < # ar ⊦ ar[m, a][m, b][n] = ar[m, b][n], # ar = 0
Used simplifier rules: Size-put: ⊦ # ar[n, a] = # ar;%f: ⊦ m < n → n ≠ 0; (forward) from specification nat-basic1