YES

TRS:

  app(app(app(uncurry(),f),x),y) -> app(app(f,x),y)

linear polynomial interpretations on N:

  app_A(x1,x2) = x1 + x2 + 1
  app#_A(x1,x2) = x1 + x2 + 1
  uncurry_A = 0
  uncurry#_A = 0

precedence:

  app = uncurry