Cross Reference: /xsrc/external/mit/xedit/dist/lisp/mathimp.c

Lines Matching refs:bigratio
66 #define NRBR(num)		(num)->real.data.bigratio
81 #define NIBR(num)		(num)->imag.data.bigratio
92 #define RBR(real)		(real)->data.bigratio
132 	mpr *bigratio;
327 /* fixnum bigratio */
359 /* bignum bigratio */
395 /* fixratio bigratio */
403 /* bigratio fixnum */
411 /* bigratio bignum */
419 /* bigratio fixratio */
427 /* bigratio bigratio */
500 br_getd(mpr *bigratio)
502     double value = mpr_getd(bigratio);
2795 	mpr *bigratio = XALLOC(mpr);
2797 	mpr_init(bigratio);
2798 	mpr_seti(bigratio, num, den);
2800 	RBR(real) = bigratio;
4474 rop_bi_br_as_xr(n_real *real, mpr *bigratio, int nop)
4482     mpr_set(bigr, bigratio);
4484     mpi_mul(&iop, &iop, mpr_den(bigratio));
4499 rop_bi_br_md_xr(n_real *real, mpr *bigratio, int nop)
4505 	mpr_set(bigr, bigratio);
4507 	mpr_inv(bigr, bigratio);
4518 radd_bi_br(n_real *real, mpr *bigratio)
4520     rop_bi_br_as_xr(real, bigratio, NOP_ADD);
4524 rsub_bi_br(n_real *real, mpr *bigratio)
4526     rop_bi_br_as_xr(real, bigratio, NOP_SUB);
4530 rmul_bi_br(n_real *real, mpr *bigratio)
4532     rop_bi_br_md_xr(real, bigratio, NOP_MUL);
4536 rdiv_bi_br(n_real *real, mpr *bigratio)
4538     rop_bi_br_md_xr(real, bigratio, NOP_DIV);
4542 cmp_bi_br(mpi *bignum, mpr *bigratio)
4551     cmp = mpr_cmp(&cmp1, bigratio);
4896 rop_fr_br_asmd_xr(n_real *real, mpr *bigratio, int nop)
4905 	    mpr_add(bigr, bigr, bigratio);
4908 	    mpr_sub(bigr, bigr, bigratio);
4911 	    mpr_mul(bigr, bigr, bigratio);
4914 	    mpr_div(bigr, bigr, bigratio);
4924 radd_fr_br(n_real *real, mpr *bigratio)
4926     rop_fr_br_asmd_xr(real, bigratio, NOP_ADD);
4930 rsub_fr_br(n_real *real, mpr *bigratio)
4932     rop_fr_br_asmd_xr(real, bigratio, NOP_SUB);
4936 rmul_fr_br(n_real *real, mpr *bigratio)
4938     rop_fr_br_asmd_xr(real, bigratio, NOP_MUL);
4942 rdiv_fr_br(n_real *real, mpr *bigratio)
4944     rop_fr_br_asmd_xr(real, bigratio, NOP_DIV);
4948 cmp_fr_br(long num, long den, mpr *bigratio)
4956     cmp = mpr_cmp(&cmp1, bigratio);
4969     mpr *bigratio = RBR(real);
4973 	    mpr_addi(bigratio, bigratio, fixnum);
4976 	    mpr_subi(bigratio, bigratio, fixnum);
4979 	    mpr_muli(bigratio, bigratio, fixnum);
4984 	    mpr_divi(bigratio, bigratio, fixnum);
5015 cmp_br_fi(mpr *bigratio, long fixnum)
5022     cmp = mpr_cmp(bigratio, &cmp2);
5076 cmp_br_bi(mpr *bigratio, mpi *bignum)
5085     cmp = mpr_cmp(bigratio, &cmp1);
5098     mpr *bigratio = RBR(real), rop;
5104 	    mpr_add(bigratio, bigratio, &rop);
5107 	    mpr_sub(bigratio, bigratio, &rop);
5110 	    mpr_mul(bigratio, bigratio, &rop);
5113 	    mpr_div(bigratio, bigratio, &rop);
5145 cmp_br_fr(mpr *bigratio, long num, long den)
5152     cmp = mpr_cmp(bigratio, &cmp2);
5163 radd_br_br(n_real *real, mpr *bigratio)
5165     mpr_add(RBR(real), RBR(real), bigratio);
5170 rsub_br_br(n_real *real, mpr *bigratio)
5172     mpr_sub(RBR(real), RBR(real), bigratio);
5177 rmul_br_br(n_real *real, mpr *bigratio)
5179     mpr_mul(RBR(real), RBR(real), bigratio);
5184 rdiv_br_br(n_real *real, mpr *bigratio)
5186     mpr_div(RBR(real), RBR(real), bigratio);