Lines Matching defs:imag
73 /* imag part from number */
74 #define NIMAG(num) &((num)->imag)
75 #define NITYPE(num) (num)->imag.type
76 #define NIFI(num) (num)->imag.data.fixnum
77 #define NIBI(num) (num)->imag.data.bignum
78 #define NIFF(num) (num)->imag.data.flonum
79 #define NIFRN(Num) (Num)->imag.data.fixratio.num
80 #define NIFRD(num) (num)->imag.data.fixratio.den
81 #define NIBR(num) (num)->imag.data.bigratio
113 #define OCXI(object) (object)->data.complex.imag
139 n_real imag;
1523 n_real *real, *imag;
1526 imag = &(mag.imag);
1528 set_real_real(imag, NIMAG(num));
1531 nabs_cx(&mag); /* this will free the imag part data */
1551 /* remember old imag part */
1552 memcpy(imag, NIMAG(num), sizeof(n_real));
1559 if (cmp_real_real(imag, &zero) < 0)
1564 /* start with old imag part */
1565 memcpy(NREAL(num), imag, sizeof(n_real));