SCM_COMPLEX_IMAG 143 src/hash.c hashval = (unsigned long)((SCM_COMPLEX_REAL(obj)+SCM_COMPLEX_IMAG(obj))*2654435761UL); SCM_COMPLEX_IMAG 292 src/number.c double i = SCM_COMPLEX_IMAG(z); SCM_COMPLEX_IMAG 308 src/number.c double i = SCM_COMPLEX_IMAG(z); SCM_COMPLEX_IMAG 705 src/number.c double i = SCM_COMPLEX_IMAG(obj); SCM_COMPLEX_IMAG 754 src/number.c -SCM_COMPLEX_IMAG(obj)); SCM_COMPLEX_IMAG 774 src/number.c double i = SCM_COMPLEX_IMAG(obj), i1; SCM_COMPLEX_IMAG 952 src/number.c result_imag = SCM_COMPLEX_IMAG(arg0); SCM_COMPLEX_IMAG 963 src/number.c result_imag += SCM_COMPLEX_IMAG(arg1); SCM_COMPLEX_IMAG 1052 src/number.c result_imag = SCM_COMPLEX_IMAG(arg0); SCM_COMPLEX_IMAG 1063 src/number.c result_imag -= SCM_COMPLEX_IMAG(arg1); SCM_COMPLEX_IMAG 1155 src/number.c result_imag = SCM_COMPLEX_IMAG(arg0); SCM_COMPLEX_IMAG 1170 src/number.c double i = SCM_COMPLEX_IMAG(arg1); SCM_COMPLEX_IMAG 1275 src/number.c result_imag = SCM_COMPLEX_IMAG(arg0); SCM_COMPLEX_IMAG 1287 src/number.c div_imag = SCM_COMPLEX_IMAG(arg1); SCM_COMPLEX_IMAG 1595 src/number.c && (SCM_COMPLEX_IMAG(arg0) == SCM_COMPLEX_IMAG(arg1))); SCM_COMPLEX_IMAG 2138 src/number.c double_print(buf, FLT_BUF, SCM_COMPLEX_IMAG(obj), TRUE); SCM_COMPLEX_IMAG 374 src/stdlib.c && SCM_COMPLEX_IMAG(obj) == 0.0); SCM_COMPLEX_IMAG 1125 src/stdlib.c } else { SCM_RETURN(Scm_Values2(Scm_MakeFlonum(SCM_COMPLEX_REAL(z)), Scm_MakeFlonum(SCM_COMPLEX_IMAG(z))));} SCM_COMPLEX_IMAG 1162 src/stdlib.c SCM_RETURN(Scm_MakeFlonum(SCM_COMPLEX_IMAG(z)));