D[Log[Sqrt[x^2+y^2]],{x, 1}] == D[ArcTan[y/x],{y, 1}]