| ar[m] = ar[n0], ar[m1] = ar[n], m1 ≤ m0, n0 < # ar, m < # ar, m0 < # ar, n < # ar, m1 < n, m1 < # ar, m1 + 1 < # ar, m1 < m0 → (∀ n. m1 < n ∧ n < # ar → ar[m1] ≠ ar[n] ∨ ar[m1] = a), ∀ m1. m1 < m0 → (∀ n. m1 < n ∧ n < # ar → ar[m1] ≠ ar[n] ∨ ar[m1] = a), ∀ n0. m0 < n0 ∧ n0 < # ar → ar[n0] ≠ ar[m0] ∨ ar[n0] = a ⊦ m1 = m0, ar[n] = a, m = n0, ar[n0] = a |
ar[m1] = ar[n], ar[m] = ar[n0], m1 < m0, m1 + 1 < # ar, m1 < # ar, m1 < n, n < # ar, m0 < # ar, m < # ar, n0 < # ar, ∀ n. m1 < n ∧ n < # ar → ar[m1] ≠ ar[n] ∨ ar[m1] = a, ∀ n0. m0 < n0 ∧ n0 < # ar → ar[n0] ≠ ar[m0] ∨ ar[n0] = a, ∀ m1. m1 < m0 → (∀ n. m1 < n ∧ n < # ar → ar[m1] ≠ ar[n] ∨ ar[m1] = a) ⊦ ar[n0] = a, m = n0, ar[n] = a, m1 = m0
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ m < n → n ≠ 0], [CSIMPFORWARD : ⊦ m < n → n ≠ 0], [CSIMPSEQ : ⊦ m ≠ n → (m ≤ n ↔ m < n)])]]