| ⊦ id○(ar0[n, a], ar1, n) ↔ id○(ar0, ar1, n) |
# ar0 = # ar1, m < # ar1, ∀ m. m < # ar1 ∧ m ≠ n → ar0[m] = ar1[m] ⊦ ar0[m] = ar1[m], m = n
Used simplifier rules: Idexcept: ⊦ id○(ar0, ar1, n) ↔ # ar0 = # ar1 ∧ (∀ m. m < # ar0 ∧ m ≠ n → ar0[m] = ar1[m]);% ⊦ m < n → n ≠ 0; (s)%lf-01: ⊦ m < n ∧ n = n0 → m < n0; (forward) from specification nat-basic%f: ⊦ m < n → n ≠ 0; (forward) from specification nat-basic% ⊦ m ≠ n → ar[n, a][m] = ar[m]; (s)% ⊦ # ar[n, a] = # ar; (s)