4 lines
122 B
Text
4 lines
122 B
Text
function mean_angle, phi
|
|
z = total(exp(complex(0,phi*!dtor)))
|
|
return, atan(imaginary(z),real_part(z))*!radeg
|
|
end
|