| ⊦ dups(x) ↔ (∃ m, n. m < # x ∧ n < # x ∧ m ≠ n ∧ x[m] = x[n]) |
dups(x0) ↔ (∃ m, n. m < # x0 ∧ n < # x0 ∧ m ≠ n ∧ x0[m] = x0[n]) ⊦ dups(a + x0) ↔ (∃ m, n. m < #(a + x0) ∧ n < #(a + x0) ∧ m ≠ n ∧ (a + x0)[m] = (a + x0)[n])
Used simplifier rules: list freely generated by [], +;;% ⊦ ¬ dups([]); (s)% ⊦ # [] = 0; (s)% ⊦ ¬ n < 0; (s)