Used simplifier rules: fr: ⊦ x ≠ [] ∧ x ≠ x.head + [] → x.tail.head + x.tail.tail = x.tail;%fr-02: ⊦ x ≠ [] → x.head + x.tail = x;