(VAR x)
(RULES f (x, f (f (f (a, a), a), a)) -> f (f (x, a), x))