Used simplifier rules: gen: ⊦ ;%sel-1: ⊦ (a + x).head = a;%sel-2: ⊦ (a + x).tail = x;%f: ⊦ a + x = a + y ↔ x = y;