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

Lines Matching defs:OFRN
107 #define OFRN(object)		(object)->data.ratio.numerator
573 	    RFRN(real) = OFRN(obj);
617 	    NRFRN(num) = OFRN(obj);
684 	    OFRN(obj) = RFRN(real);
735 		OFRN(obj) = NRFRN(num);
953 		    r##OP##_fi_fr(real, OFRN(obj), OFRD(obj));		\
956 		    r##OP##_bi_fr(real, OFRN(obj), OFRD(obj));		\
960 				(double)OFRN(obj) / (double)OFRD(obj));	\
963 		    r##OP##_fr_fr(real, OFRN(obj), OFRD(obj));		\
966 		    r##OP##_br_fr(real, OFRN(obj), OFRD(obj));		\
1119 			r##OP##_fi_fr(NREAL(num), OFRN(obj), OFRD(obj));\
1122 			r##OP##_bi_fr(NREAL(num), OFRN(obj), OFRD(obj));\
1126 				    (double)OFRN(obj) /			\
1130 			r##OP##_fr_fr(NREAL(num), OFRN(obj), OFRD(obj));\
1133 			r##OP##_br_fr(NREAL(num), OFRN(obj), OFRD(obj));\
2238 				   (double)OFRN(obj) / (double)OFRD(obj),
2418 		    return (cmp_fi_fr(RFI(op1), OFRN(op2), OFRD(op2)));
2420 		    return (cmp_bi_fr(RBI(op1), OFRN(op2), OFRD(op2)));
2423 				       (double)OFRN(op2) / (double)OFRD(op2)));
2426 				      OFRN(op2), OFRD(op2)));
2428 		    return (cmp_br_fr(RBR(op1), OFRN(op2), OFRD(op2)));
2531 			return (cmp_fi_fr(NRFI(op1), OFRN(op2), OFRD(op2)));
2533 			return (cmp_bi_fr(NRBI(op1), OFRN(op2), OFRD(op2)));
2536 					   (double)OFRN(op2) / (double)OFRD(op2)));
2539 					  OFRN(op2), OFRD(op2)));
2541 			return (cmp_br_fr(NRBR(op1), OFRN(op2), OFRD(op2)));
2605 					  OFRN(op2), OFRD(op2)));
2624 					  OFRN(op2), OFRD(op2)));
2643 					  OFRN(op2), OFRD(op2)));
2663 					   (double)OFRN(op2) /
2674 			return (cmp_fr_fi(OFRN(op1), OFRD(op1), OFI(op2)));
2676 			return (cmp_fr_fi(OFRN(op1), OFRD(op1), OII(op2)));
2678 			return (cmp_fr_bi(OFRN(op1), OFRD(op1), OBI(op2)));
2680 			return (cmp_flonum((double)OFRN(op1) /
2684 			return (cmp_fr_fr(OFRN(op1), OFRD(op1),
2685 					  OFRN(op2), OFRD(op2)));
2687 			return (cmp_fr_br(OFRN(op1), OFRD(op1), OBR(op2)));
2703 			return (cmp_br_fr(OBR(op1), OFRN(op2), OFRD(op2)));
3222 	mpr_seti(rem, OFRN(div), OFRD(div));
3459 	dsign = OFRN(div) < 0 ? -1 : OFRN(div) > 0 ? 1 : 0;
3461 	mpi_muli(mpr_den(bigr), mpr_den(bigr), OFRN(div));