div_real 1199 src/number.c double div_real = 0.0, div_imag = 0.0; div_real 1203 src/number.c result_real = result_imag = div_real = div_imag = 0.0; div_real 1252 src/number.c div_real = (double)SCM_INT_VALUE(arg1); div_real 1254 src/number.c div_real = Scm_BignumToDouble(SCM_BIGNUM(arg1)); div_real 1256 src/number.c div_real = SCM_FLONUM_VALUE(arg1); div_real 1265 src/number.c result_real /= div_real; div_real 1280 src/number.c div_real = (double)SCM_INT_VALUE(arg1); div_real 1282 src/number.c div_real = Scm_BignumToDouble(SCM_BIGNUM(arg1)); div_real 1284 src/number.c div_real = SCM_FLONUM_VALUE(arg1); div_real 1286 src/number.c div_real = SCM_COMPLEX_REAL(arg1); div_real 1294 src/number.c d = div_real*div_real + div_imag*div_imag; div_real 1295 src/number.c r = (result_real*div_real + result_imag*div_imag)/d; div_real 1296 src/number.c i = (result_imag*div_real - result_real*div_imag)/d;