theta 1579 src/number.c double theta = dy * M_PI; theta 1580 src/number.c return Scm_MakeComplexNormalized(mag * cos(theta), mag * sin(theta));