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;