DSolve[Derivative[1][y][x] == (-E^((2*(x - y[x])^3*(x + y[x])^3)/(-1 + x^2 - y[x]^2)) - x^2 - 2*x*y[x] - y[x]^2)/(E^((2*(x - y[x])^3*(x + y[x])^3)/(-1 + x^2 - y[x]^2)) - x^2 - 2*x*y[x] - y[x]^2),y[x],x]