Used simplifier rules: Put-same: ⊦ m < # ar → ar[m, a][m] = a;%Put-other: ⊦ m ≠ n → ar[n, a][m] = ar[m]; Used formulas: n = m