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