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