| unique_al(ay), unique_al(ax), ∀ a. a ∈ ax ↔ a ∈ ay ⊦ # ax = # ay |
unique_al([]), unique_al(ay), ∀ a. a ∈ [] ↔ a ∈ ay ⊦ # [] = # ay
unique_al(p + ax0), unique_al(ay), ∀ a. a ∈ p + ax0 ↔ a ∈ ay, ∀ ay. unique_al(ay) ∧ unique_al(ax0) ∧ (∀ a. a ∈ ax0 ↔ a ∈ ay) → # ax0 = # ay ⊦ #(p + ax0) = # ay
Used simplifier rules: assoclist freely generated by [], +;;