| ⊦ ordered≤(x) ↔ (∀ m, n. m ≤ n ∧ n < # x → ¬ x[n] < x[m]) |
ordered≤(x0) ↔ (∀ m, n. m ≤ n ∧ n < # x0 → ¬ x0[n] < x0[m]) ⊦ ordered≤(a + x0) ↔ (∀ m, n. m ≤ n ∧ n < #(a + x0) → ¬ (a + x0)[n] < (a + x0)[m])
Used simplifier rules: le-e: ⊦ ordered≤([]);%list freely generated by [], +;;%size-01: ⊦ # [] = 0; from specification list-data%less-1: ⊦ ¬ n < 0; from specification nat-basic1