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