Lines Matching refs:rem
242 /* rem */
2902 long quo, rem;
2919 rem = NRFI(num) % div;
2924 if ((rem < 0 && div < 0) || (rem > 0 && div > 0)) {
2926 rem -= div;
2930 if ((rem < 0 && div > 0) || (rem > 0 && div < 0)) {
2932 rem += div;
2937 if (rem > 0) {
2938 if (rem >= (div + 1) / 2) {
2940 rem -= div;
2944 if (rem <= (-div - 1) / 2) {
2946 rem += div;
2951 if (rem > 0) {
2952 if (rem >= (-div + 1) / 2) {
2954 rem += div;
2958 if (rem <= (div - 1) / 2) {
2960 rem -= div;
2968 NIFI(num) = rem;
2982 mpi *quo, *rem;
2991 rem = XALLOC(mpi);
2992 mpi_init(rem);
2996 mpi_seti(rem, OFI(div));
2999 mpi_seti(rem, OII(div));
3002 mpi_set(rem, OBI(div));
3005 dsign = mpi_sgn(rem);
3007 mpi_divqr(quo, rem, quo, rem);
3008 rsign = mpi_sgn(rem);
3037 if (mpi_cmp(rem, &test) >= 0)
3044 if (mpi_cmp(rem, &test) <= 0)
3053 if (mpi_cmp(rem, &test) >= 0)
3059 if (mpi_cmp(rem, &test) <= 0)
3071 mpi_subi(rem, rem, OFI(div));
3074 mpi_subi(rem, rem, OII(div));
3077 mpi_sub(rem, rem, OBI(div));
3084 mpi_addi(rem, rem, OFI(div));
3087 mpi_addi(rem, rem, OII(div));
3090 mpi_add(rem, rem, OBI(div));
3094 if (mpi_fiti(rem)) {
3096 NIFI(num) = mpi_geti(rem);
3097 mpi_clear(rem);
3098 XFREE(rem);
3102 NIBI(num) = rem;
3125 double quo, rem, modp, tmp;
3128 rem = num - quo * div;
3132 if ((rem < 0.0 && div < 0.0) || (rem > 0.0 && div > 0.0)) {
3134 rem -= div;
3138 if ((rem < 0.0 && div > 0.0) || (rem > 0.0 && div < 0.0)) {
3140 rem += div;
3146 if (rem > 0.0) {
3147 if (rem >= div * 0.5) {
3149 rem -= div;
3153 if (rem <= div * -0.5) {
3155 rem += div;
3160 if (rem > 0.0) {
3161 if (rem >= div * -0.5) {
3163 rem += div;
3167 if (rem <= div * 0.5) {
3169 rem -= div;
3176 if (!finite(quo) || !finite(rem))
3180 NIFF(number) = rem;
3209 mpr *rem;
3218 rem = XALLOC(mpr);
3219 mpr_init(rem);
3222 mpr_seti(rem, OFRN(div), OFRD(div));
3224 mpr_set(rem, OBR(div));
3225 dsign = mpi_sgn(mpr_num(rem));
3226 mpi_mul(quo, quo, mpr_den(rem));
3228 mpi_divqr(quo, mpr_num(rem), quo, mpr_num(rem));
3229 mpr_canonicalize(rem);
3231 rsign = mpi_sgn(mpr_num(rem));
3232 if (mpr_fiti(rem)) {
3233 if (mpi_geti(mpr_den(rem)) == 1) {
3235 NIFI(num) = mpi_geti(mpr_num(rem));
3239 NIFRN(num) = mpi_geti(mpr_num(rem));
3240 NIFRD(num) = mpi_geti(mpr_den(rem));
3242 mpr_clear(rem);
3243 XFREE(rem);
3246 if (mpi_fiti(mpr_den(rem)) && mpi_geti(mpr_den(rem)) == 1) {
3248 NIBI(num) = mpr_num(rem);
3249 mpi_clear(mpr_den(rem));
3250 XFREE(rem);
3254 NIBR(num) = rem;
3330 mpr *rem;
3349 rem = XALLOC(mpr);
3350 mpr_init(rem);
3352 mpr_seti(rem, NRFRN(num), NRFRD(num));
3356 mpr_set(rem, NRBR(num));
3359 mpi_divqr(quo, mpr_num(rem), mpr_num(rem), quo);
3360 mpr_canonicalize(rem);
3362 rsign = mpi_sgn(mpr_num(rem));
3363 if (mpr_fiti(rem)) {
3365 NIFRN(num) = mpi_geti(mpr_num(rem));
3366 NIFRD(num) = mpi_geti(mpr_den(rem));
3367 mpr_clear(rem);
3368 XFREE(rem);
3372 NIBR(num) = rem;