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