| m2 = m0, # ar = n, ¬ bv0, ar1 = ar, a1 = a, ar[m] = ar[n0], m ≠ n0, ar[n0] ≠ a, m0 < # ar, m < # ar, n0 < # ar, ∀ 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), (bv0 ⊃ (ar[m1] ≠ ar[n2] ∨ ar[m1] = a ∨ m1 = n2 ∨ ¬ m1 < # ar ∨ ¬ n2 < # ar) ; (∃ m1. ¬ (m1 < m2 + 1 → (∀ n. m1 < n ∧ n < # ar → ar[m1] ≠ ar[n] ∨ ar[m1] = a))) ) ∨ ¬ m2 + 1 ≤ # ar ∨ (∀ m, n. ¬ (ar1[m] = ar1[n] ∧ ar[m] ≠ a1 ∧ m ≠ n ∧ m < # ar1 ∧ n < # ar1)) ∨ m2 + 1 ≤ m0 ⊦ |
ar[m] = ar[n0], m0 < # ar, m < # ar, n0 < # ar, ∀ 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), ¬ (¬ m0 < m1 → (m1 < n ∧ n < # ar → ar[m1] ≠ ar[n] ∨ ar[m1] = a)) ∨ (∀ m2, n1. ar[m2] ≠ ar[n1] ∨ ar[m2] = a ∨ m2 = n1 ∨ ¬ m2 < # ar ∨ ¬ n1 < # ar) ⊦ ar[n0] = a, m = n0
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ m + m0 ≤ m ↔ m0 = 0], [CSIMPSEQ : ⊦ m < n → (n ≤ m ↔ false)], [CSIMPSEQ : ⊦ ¬ m < n ↔ n ≤ m], [CSIMPSEQ : ⊦ m + 1 ≤ n ↔ m < n], [CSIMPSEQ : ⊦ m + n = n + m], [CSIMPSEQ : ⊦ (m + n0) + n1 = m + n0 + n1], [CSIMPSEQ : ⊦ m < n + 1 ↔ ¬ n < m])]]