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