r=sqrt(x*x+y*y) phi=atan2(y,x) if (phi < 0.0) then phi=phi+2*pi endif
r = sqrt(x * x + y * y); theta = atan2(y, x); if (phi < 0.0) phi += 2 * pi;
なお、