| ⊦ m < # A ∧ nodups(A) → (∀ n. (n < m → #oc(A[n], A, m) = 1) ∧ (m ≤ n ∧ n < # A → #oc(A[n], A, m) = 0)) |
nodups(A), m < # A ⊦ (n < m → #oc(A[n], A, m) = 1) ∧ (m ≤ n ∧ n < # A → #oc(A[n], A, m) = 0)
[Concretesimprules((Csimpnamedseq(nat-basic1,,f, ⊦ m < n → n ≠ 0) Csimpnamedforward(nat-basic1,,f, ⊦ m < n → n ≠ 0)))]