div_imag 1199 src/number.c double div_real = 0.0, div_imag = 0.0; div_imag 1203 src/number.c result_real = result_imag = div_real = div_imag = 0.0; div_imag 1278 src/number.c div_imag = 0.0; div_imag 1287 src/number.c div_imag = SCM_COMPLEX_IMAG(arg1); div_imag 1294 src/number.c d = div_real*div_real + div_imag*div_imag; div_imag 1295 src/number.c r = (result_real*div_real + result_imag*div_imag)/d; div_imag 1296 src/number.c i = (result_imag*div_real - result_real*div_imag)/d;