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