D[ArcTan[2xy/(x^2-y^2)], x]