| unique_al(ax), ∀ a. a ∈ ax → a ∈ ay ⊦ # ax ≤ # ay |
# ay < # ax, unique_al(ax.rest), ∀ a. a ∈ ax → a ∈ ay ⊦ ax = [], ax.first.1 ∈ ax.rest
Used simplifier rules: k-unique-r: ⊦ unique_al(ay) ↔ ay = [] ∨ ¬ ay.first.1 ∈ ay.rest ∧ unique_al(ay.rest);%l: ⊦ # ax = 0 ↔ ax = []; from specification list-data[assoclista]%f: ⊦ m < n → n ≠ 0; (forward) from specification nat-basic1%lels-01: ⊦ ¬ m ≤ n ↔ n < m; from specification nat