TIMEOUT
MAYBE
Trs:
 {   mark(a()) -> a(),
    mark(g(X)) -> g(mark(X)),
    mark(f(X)) -> a__f(X),
  a__f(f(a())) -> a__f(g(f(a()))),
       a__f(X) -> f(X)}
 Open