| 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]) |
n < # ar, m < # ar ⊦ ar[m, a][m, b][n] = ar[m, b][n]
Used simplifier rules: Size-put: ⊦ # ar[n, a] = # ar;% ⊦ m < n → n ≠ 0; (s)%f: ⊦ m < n → n ≠ 0; (forward) from specification nat-basic