x=0.0 y=0.0 z=atan2(x,y) print *,z end