| ⊦ unique_al(ax + p ' + ay) → unique_al(ax + ay) |
unique_al(ax + p ' + ay) ⊦ ax + ay = [], ¬ (ax + ay).first.1 ∈ (ax + ay).rest ∧ unique_al((ax + ay).rest)
Used simplifier rules: k-unique-r: ⊦ unique_al(ay) ↔ ay = [] ∨ ¬ ay.first.1 ∈ ay.rest ∧ unique_al(ay.rest);