| ⊦ n < # ar ∧ m < n ∧ sorted(ar, m + 1, n + 1, ⊑) ∧ (m + 1 < n → ⊑(ar[m], ar[m + 2])) ∧ ¬ ⊑(ar[m], ar[m + 1]) ∧ total(⊑) ∧ reflexive(⊑) ∧ transitive(⊑) → (¬ sorted(ar[m + 1, ar[m]][m, ar[m + 1]], m, n + 1, ⊑) ↔ false) |
[[CONCRETESIMPRULES : ([CSIMPNAMEDSEQ : sorted-sub, , , ⊦ sorted(ar, n0, n1, ⊑) ↔ (∀ n, m. n0 ≤ n ∧ n < m ∧ m < n1 → ⊑(ar[n], ar[m]))], [CSIMPNAMEDSEQ : nat-basic2, , succ, ⊦ m +1 = m + 1], [CSIMPNAMEDSEQ : nat-basic1, , f, ⊦ m < n → n ≠ 0], [CSIMPNAMEDFORWARD : nat-basic1, , trans-1, ⊦ n < n0 ∧ n0 < n1 → n < n1], [CSIMPNAMEDFORWARD : nat-basic1, , lf, ⊦ m < n ∧ n < n0 → m +1 < n0], [CSIMPNAMEDFORWARD : nat-basic1, , f, ⊦ m < n → n ≠ 0], [CSIMPNAMEDFORWARD : nat, , fle, ⊦ m < n ∧ n ≤ n0 → m < n0], [CSIMPNAMEDFORWARD : nat, , fle-01, ⊦ m ≤ n ∧ n < n0 → m < n0], [CSIMPNAMEDSEQ : nat, , lels, ⊦ ¬ m < n ↔ n ≤ m], [CSIMPNAMEDSEQ : nat, , succ-01, ⊦ m + 1 ≤ n ↔ m < n], [CSIMPNAMEDSEQ : array, , cngetput, m ≠ n ⊦ (ar[m, a][n]) = ar[n]], [CSIMPNAMEDSEQ : nat, , ls-le-simp, ⊦ m < n → (n ≤ m ↔ false)], [CSIMPNAMEDSEQ : nat-basic2, , c, ⊦ m + n = n + m], [CSIMPNAMEDSEQ : nat-basic2, , a, ⊦ (m + n0) + n1 = m + n0 + n1], [CSIMPNAMEDSEQ : nat-basic2, , s, ⊦ m < n + 1 ↔ ¬ n < m])]]