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