| /netbsd/src/external/lgpl3/mpc/dist/src/ |
| D | rootofunity.c | 34 mpc_rootofunity (mpc_ptr rop, unsigned long n, unsigned long k, mpc_rnd_t rnd) in mpc_rootofunity() argument 45 mpfr_set_nan (mpc_realref (rop)); in mpc_rootofunity() 46 mpfr_set_nan (mpc_imagref (rop)); in mpc_rootofunity() 65 return mpc_set_ui_ui (rop, 1, 0, rnd); in mpc_rootofunity() 71 return mpc_set_si_si (rop, -1, 0, rnd); in mpc_rootofunity() 79 return mpc_set_ui_ui (rop, 0, 1, rnd); in mpc_rootofunity() 81 return mpc_set_si_si (rop, 0, -1, rnd); in mpc_rootofunity() 89 inex_re = mpfr_set_si (mpc_realref (rop), (n == 3 ? -1 : 1), in mpc_rootofunity() 95 inex_im = mpfr_sqrt_ui (mpc_imagref (rop), 3, rnd_im); in mpc_rootofunity() 96 mpc_div_2ui (rop, rop, 1, MPC_RNDNN); in mpc_rootofunity() [all …]
|
| D | log.c | 25 mpc_log (mpc_ptr rop, mpc_srcptr op, mpc_rnd_t rnd){ in mpc_log() argument 41 mpfr_set_inf (mpc_realref (rop), +1); in mpc_log() 43 mpfr_set_nan (mpc_realref (rop)); in mpc_log() 44 mpfr_set_nan (mpc_imagref (rop)); in mpc_log() 49 mpfr_set_inf (mpc_realref (rop), +1); in mpc_log() 51 mpfr_set_nan (mpc_realref (rop)); in mpc_log() 52 mpfr_set_nan (mpc_imagref (rop)); in mpc_log() 56 inex_im = mpfr_atan2 (mpc_imagref (rop), mpc_imagref (op), mpc_realref (op), in mpc_log() 58 mpfr_set_inf (mpc_realref (rop), +1); in mpc_log() 68 inex_im = mpfr_atan2 (mpc_imagref (rop), mpc_imagref (op), mpc_realref (op), in mpc_log() [all …]
|
| D | tan.c | 89 mpc_tan (mpc_ptr rop, mpc_srcptr op, mpc_rnd_t rnd) in mpc_tan() argument 108 inex = mpc_set_si_si (rop, 0, in mpc_tan() 116 mpfr_set_nan (mpc_realref (rop)); in mpc_tan() 117 mpfr_set_nan (mpc_imagref (rop)); in mpc_tan() 127 mpc_set (rop, op, rnd); in mpc_tan() 133 mpfr_set_nan (mpc_realref (rop)); in mpc_tan() 134 mpfr_set_nan (mpc_imagref (rop)); in mpc_tan() 148 mpfr_set_ui (mpc_realref (rop), 0, MPC_RND_RE (rnd)); in mpc_tan() 149 mpfr_setsign (mpc_realref (rop), mpc_realref (rop), sign_re, MPFR_RNDN); in mpc_tan() 152 inex_im = mpfr_set_si (mpc_imagref (rop), in mpc_tan() [all …]
|
| D | acos.c | 25 mpc_acos (mpc_ptr rop, mpc_srcptr op, mpc_rnd_t rnd) in mpc_acos() argument 44 mpfr_set_inf (mpc_imagref (rop), mpfr_signbit (mpc_imagref (op)) ? +1 : -1); in mpc_acos() 45 mpfr_set_nan (mpc_realref (rop)); in mpc_acos() 49 inex_re = set_pi_over_2 (mpc_realref (rop), +1, MPC_RND_RE (rnd)); in mpc_acos() 50 mpfr_set_nan (mpc_imagref (rop)); in mpc_acos() 54 mpfr_set_nan (mpc_realref (rop)); in mpc_acos() 55 mpfr_set_nan (mpc_imagref (rop)); in mpc_acos() 70 set_pi_over_2 (mpc_realref (rop), +1, MPC_RND_RE (rnd)); in mpc_acos() 71 mpfr_div_2ui (mpc_realref (rop), mpc_realref (rop), 1, MPFR_RNDN); in mpc_acos() 85 prec = mpfr_get_prec (mpc_realref (rop)); in mpc_acos() [all …]
|
| D | exp.c | 24 mpc_exp (mpc_ptr rop, mpc_srcptr op, mpc_rnd_t rnd) in mpc_exp() argument 44 return mpc_set (rop, op, MPC_RNDNN); in mpc_exp() 49 return mpc_set_ui_ui (rop, 0, 0, MPC_RNDNN); in mpc_exp() 52 mpfr_set_inf (mpc_realref (rop), +1); in mpc_exp() 53 mpfr_set_nan (mpc_imagref (rop)); in mpc_exp() 57 mpfr_set_nan (mpc_realref (rop)); in mpc_exp() 58 mpfr_set_nan (mpc_imagref (rop)); in mpc_exp() 67 inex_re = mpfr_exp (mpc_realref(rop), mpc_realref(op), MPC_RND_RE(rnd)); in mpc_exp() 68 inex_im = mpfr_set (mpc_imagref(rop), mpc_imagref(op), MPC_RND_IM(rnd)); in mpc_exp() 75 inex_re = mpfr_cos (mpc_realref (rop), mpc_imagref (op), MPC_RND_RE(rnd)); in mpc_exp() [all …]
|
| D | atan.c | 30 set_pi_over_2 (mpfr_ptr rop, int s, mpfr_rnd_t rnd) in set_pi_over_2() argument 34 inex = mpfr_const_pi (rop, s < 0 ? INV_RND (rnd) : rnd); in set_pi_over_2() 35 mpfr_div_2ui (rop, rop, 1, MPFR_RNDN); in set_pi_over_2() 39 mpfr_neg (rop, rop, MPFR_RNDN); in set_pi_over_2() 46 mpc_atan (mpc_ptr rop, mpc_srcptr op, mpc_rnd_t rnd) in mpc_atan() argument 62 mpfr_set_nan (mpc_realref (rop)); in mpc_atan() 65 mpfr_set_ui (mpc_imagref (rop), 0, MPFR_RNDN); in mpc_atan() 67 mpc_conj (rop, rop, MPC_RNDNN); in mpc_atan() 70 mpfr_set_nan (mpc_imagref (rop)); in mpc_atan() 76 inex_re = set_pi_over_2 (mpc_realref (rop), -s_re, MPC_RND_RE (rnd)); in mpc_atan() [all …]
|
| D | asin.c | 31 mpc_asin_special (mpc_ptr rop, mpc_srcptr op, mpc_rnd_t rnd, mpc_ptr z1) in mpc_asin_special() argument 49 mpfr_get_prec (mpc_realref(rop)) + in mpc_asin_special() 78 mpfr_get_prec (mpc_imagref(rop)) + in mpc_asin_special() 90 mpc_asin_series (mpc_srcptr rop, mpc_ptr s, mpc_srcptr z, mpc_rnd_t rnd) in mpc_asin_series() argument 173 mpfr_get_prec (mpc_realref (rop)) + in mpc_asin_series() 200 mpfr_get_prec (mpc_imagref (rop)) + in mpc_asin_series() 206 asin_taylor1 (int *inex, mpc_ptr rop, mpc_srcptr z, mpc_rnd_t rnd) in asin_taylor1() argument 240 prec_re = mpfr_get_prec (mpc_realref (rop)); in asin_taylor1() 241 prec_im = mpfr_get_prec (mpc_imagref (rop)); in asin_taylor1() 254 mpfr_get_prec (mpc_realref (rop)) in asin_taylor1() [all …]
|
| D | sqr.c | 163 mpc_sqr (mpc_ptr rop, mpc_srcptr op, mpc_rnd_t rnd) in mpc_sqr() argument 178 mpfr_set_nan (mpc_realref (rop)); in mpc_sqr() 179 mpfr_set_nan (mpc_imagref (rop)); in mpc_sqr() 183 mpfr_set_inf (mpc_imagref (rop), in mpc_sqr() 185 mpfr_set_nan (mpc_realref (rop)); in mpc_sqr() 189 mpfr_set_nan (mpc_imagref (rop)); in mpc_sqr() 191 mpfr_set_inf (mpc_imagref (rop), in mpc_sqr() 193 mpfr_set_inf (mpc_realref (rop), +1); in mpc_sqr() 198 mpfr_set_nan (mpc_imagref (rop)); in mpc_sqr() 200 mpfr_set_inf (mpc_imagref (rop), in mpc_sqr() [all …]
|
| D | agm.c | 24 mpc_agm_angle_zero (mpc_ptr rop, mpc_srcptr a, mpc_srcptr b, mpc_rnd_t rnd, in mpc_agm_angle_zero() argument 34 prec = MPC_MAX_PREC (rop); in mpc_agm_angle_zero() 59 MPFR_RNDN, MPFR_RNDU, mpfr_get_prec (mpc_realref (rop)) + 1) in mpc_agm_angle_zero() 61 MPFR_RNDN, MPFR_RNDU, mpfr_get_prec (mpc_imagref (rop)) + 1)); in mpc_agm_angle_zero() 63 inex = mpc_set (rop, agm, rnd); in mpc_agm_angle_zero() 74 mpc_agm_general (mpc_ptr rop, mpc_srcptr a, mpc_srcptr b, mpc_rnd_t rnd) in mpc_agm_general() argument 106 return mpc_agm_angle_zero (rop, a, b, rnd, cmp); in mpc_agm_general() 119 N = MPC_MAX_PREC (rop) + 20; in mpc_agm_general() 182 MPFR_RNDN, MPFR_RNDU, mpfr_get_prec (mpc_realref (rop)) + 1); in mpc_agm_general() 184 MPFR_RNDN, MPFR_RNDU, mpfr_get_prec (mpc_imagref (rop)) + 1); in mpc_agm_general() [all …]
|
| D | balls.c | 34 mpcb_init (mpcb_ptr rop) in mpcb_init() argument 36 mpc_init2 (rop->c, 2); in mpcb_init() 37 mpcr_set_inf (rop->r); in mpcb_init() 42 mpcb_clear (mpcb_ptr rop) in mpcb_clear() argument 44 mpc_clear (rop->c); in mpcb_clear() 56 mpcb_set_prec (mpcb_ptr rop, mpfr_prec_t prec) in mpcb_set_prec() argument 58 mpc_set_prec (rop->c, prec); in mpcb_set_prec() 59 mpcr_set_inf (rop->r); in mpcb_set_prec() 64 mpcb_set (mpcb_ptr rop, mpcb_srcptr op) in mpcb_set() argument 66 if (rop != op) { in mpcb_set() [all …]
|
| D | div.c | 41 mpc_div_inf_fin (mpc_ptr rop, mpc_srcptr z, mpc_srcptr w) in mpc_div_inf_fin() argument 99 mpfr_set_nan (mpc_realref (rop)); in mpc_div_inf_fin() 101 mpfr_set_inf (mpc_realref (rop), x); in mpc_div_inf_fin() 103 mpfr_set_nan (mpc_imagref (rop)); in mpc_div_inf_fin() 105 mpfr_set_inf (mpc_imagref (rop), y); in mpc_div_inf_fin() 113 mpc_div_fin_inf (mpc_ptr rop, mpc_srcptr z, mpc_srcptr w) in mpc_div_fin_inf() argument 141 MPFR_COPYSIGN (mpc_realref (rop), zero, x, MPFR_RNDN); in mpc_div_fin_inf() 142 MPFR_COPYSIGN (mpc_imagref (rop), zero, y, MPFR_RNDN); in mpc_div_fin_inf() 157 mpc_div_real (mpc_ptr rop, mpc_srcptr z, mpc_srcptr w, mpc_rnd_t rnd) in mpc_div_real() argument 169 inex_im = mpfr_div (mpc_imagref(rop), mpc_imagref(z), mpc_realref(w), MPC_RND_IM(rnd)); in mpc_div_real() [all …]
|
| D | mul.c | 145 mpc_t rop; in mul_imag() local 148 mpc_init3 (rop, MPC_PREC_RE (z), MPC_PREC_IM (z)); in mul_imag() 150 rop [0] = z[0]; in mul_imag() 155 inex_re = -mpfr_mul (mpc_realref (rop), mpc_imagref (x), mpc_imagref (y), in mul_imag() 157 mpfr_neg (mpc_realref (rop), mpc_realref (rop), MPFR_RNDN); /* exact */ in mul_imag() 158 inex_im = mpfr_mul (mpc_imagref (rop), mpc_realref (x), mpc_imagref (y), in mul_imag() 160 mpc_set (z, rop, MPC_RNDNN); in mul_imag() 168 mpc_clear (rop); in mul_imag() 180 mpc_t rop; in mpc_mul_naive() local 186 mpc_init3 (rop, MPC_PREC_RE (z), MPC_PREC_IM (z)); in mpc_mul_naive() [all …]
|
| D | logging.c | 57 __MPC_DECLSPEC int mpc_log_##funcname (mpc_ptr rop, mpc_srcptr op, mpc_rnd_t rnd) \ 63 MPC_LOGGING_OUT_PREC (rop); \ 66 return func (rop, op, rnd); \ 70 __MPC_DECLSPEC int mpc_log_##funcname (mpc_ptr rop, mpc_srcptr op1, mpc_srcptr op2, mpc_rnd_t rnd) \ 76 MPC_LOGGING_OUT_PREC (rop); \ 80 return func (rop, op1, op2, rnd); \ 84 __MPC_DECLSPEC int mpc_log_##funcname (mpc_ptr rop, mpc_srcptr op1, mpc_srcptr op2, mpc_srcptr op3,… 90 MPC_LOGGING_OUT_PREC (rop); \ 95 return func (rop, op1, op2, op3, rnd); \
|
| D | strtoc.c | 35 mpc_strtoc (mpc_ptr rop, const char *nptr, char **endptr, int base, mpc_rnd_t rnd) in mpc_strtoc() argument 54 inex_re = mpfr_strtofr (mpc_realref(rop), p, &end, base, MPC_RND_RE (rnd)); in mpc_strtoc() 60 inex_im = mpfr_set_ui (mpc_imagref (rop), 0ul, MPFR_RNDN); in mpc_strtoc() 67 inex_im = mpfr_strtofr (mpc_imagref(rop), p, &end, base, MPC_RND_IM (rnd)); in mpc_strtoc() 86 mpfr_set_nan (mpc_realref (rop)); in mpc_strtoc() 87 mpfr_set_nan (mpc_imagref (rop)); in mpc_strtoc()
|
| D | acosh.c | 24 mpc_acosh (mpc_ptr rop, mpc_srcptr op, mpc_rnd_t rnd) in mpc_acosh() argument 38 mpfr_set_nan (mpc_realref (rop)); in mpc_acosh() 39 mpfr_set_nan (mpc_imagref (rop)); in mpc_acosh() 44 mpc_init3 (a, MPC_PREC_IM(rop), MPC_PREC_RE(rop)); in mpc_acosh() 71 mpc_set (rop, a, rnd); in mpc_acosh()
|
| /netbsd/src/external/lgpl3/mpfr/dist/src/ |
| D | rndna.c | 64 mpfr_round_nearest_away_begin (mpfr_ptr rop) in mpfr_round_nearest_away_begin() argument 79 p = MPFR_PREC (rop) + 1; in mpfr_round_nearest_away_begin() 92 ext[OLD_MANTISSA].pi = MPFR_MANT(rop); in mpfr_round_nearest_away_begin() 93 ext[OLD_EXPONENT].ex = MPFR_EXP(rop); in mpfr_round_nearest_away_begin() 94 ext[OLD_SIGN].sg = MPFR_SIGN(rop); in mpfr_round_nearest_away_begin() 95 ext[OLD_PREC].pr = MPFR_PREC(rop); in mpfr_round_nearest_away_begin() 112 MPFR_DBGRES (inexact = mpfr_set(tmp, rop, MPFR_RNDN)); in mpfr_round_nearest_away_begin() 116 rop[0] = tmp[0]; in mpfr_round_nearest_away_begin() 132 mpfr_round_nearest_away_end (mpfr_ptr rop, int inex) in mpfr_round_nearest_away_end() argument 147 ext = ((mpfr_size_limb_extended_t *) (void *) MPFR_MANT(rop)) - MANTISSA; in mpfr_round_nearest_away_end() [all …]
|
| D | urandom.c | 54 mpfr_urandom (mpfr_ptr rop, gmp_randstate_t rstate, mpfr_rnd_t rnd_mode) in mpfr_urandom() argument 73 rp = MPFR_MANT (rop); in mpfr_urandom() 74 nbits = MPFR_PREC (rop); in mpfr_urandom() 75 MPFR_SET_EXP (rop, 0); in mpfr_urandom() 76 MPFR_SET_POS (rop); in mpfr_urandom() 112 nlimbs = MPFR_LIMB_SIZE (rop); in mpfr_urandom() 127 mpfr_nextabove (rop); in mpfr_urandom() 135 MPFR_EXP (rop) += exp; /* may be smaller than emin */ in mpfr_urandom() 137 return mpfr_check_range (rop, inex, rnd_mode); in mpfr_urandom()
|
| D | urandomb.c | 50 mpfr_urandomb (mpfr_ptr rop, gmp_randstate_t rstate) in mpfr_urandomb() argument 59 rp = MPFR_MANT (rop); in mpfr_urandomb() 60 nbits = MPFR_PREC (rop); in mpfr_urandomb() 61 nlimbs = MPFR_LIMB_SIZE (rop); in mpfr_urandomb() 62 MPFR_SET_POS (rop); in mpfr_urandomb() 94 MPFR_SET_NAN (rop); in mpfr_urandomb() 98 MPFR_SET_EXP (rop, exp); in mpfr_urandomb() 107 MPFR_SET_ZERO (rop); in mpfr_urandomb()
|
| /netbsd/src/external/lgpl3/mpc/dist/tests/ |
| D | tgeneric.c | 32 tgeneric_cc (mpc_function *function, mpc_ptr op, mpc_ptr rop, in tgeneric_cc() argument 42 function->pointer.CC (rop, op, rnd); in tgeneric_cc() 46 if (MPFR_CAN_ROUND (mpc_realref (rop4), 1, MPC_PREC_RE (rop), in tgeneric_cc() 48 && MPFR_CAN_ROUND (mpc_imagref (rop4), 1, MPC_PREC_IM (rop), in tgeneric_cc() 55 if (same_mpc_value (rop, rop4rnd, ks)) in tgeneric_cc() 67 MPC_OUT (rop); in tgeneric_cc() 135 tgeneric_fc (mpc_function *function, mpc_ptr op, mpfr_ptr rop, in tgeneric_fc() argument 139 function->pointer.FC (rop, op, rnd); in tgeneric_fc() 140 if (MPFR_CAN_ROUND (rop4, 1, mpfr_get_prec (rop), rnd)) in tgeneric_fc() 145 if (same_mpfr_value (rop, rop4rnd, 1)) in tgeneric_fc() [all …]
|
| /netbsd/src/sys/dev/sun/ |
| D | cgsixreg.h | 261 #define GX_ROP_00_0(rop) ((rop) << 0) argument 262 #define GX_ROP_00_1(rop) ((rop) << 2) argument 263 #define GX_ROP_01_0(rop) ((rop) << 4) argument 264 #define GX_ROP_01_1(rop) ((rop) << 6) argument 265 #define GX_ROP_10_0(rop) ((rop) << 8) argument 266 #define GX_ROP_10_1(rop) ((rop) << 10) argument 267 #define GX_ROP_11_0(rop) ((rop) << 12) argument 268 #define GX_ROP_11_1(rop) ((rop) << 14) argument
|
| /netbsd/src/external/lgpl3/gmp/dist/mpq/ |
| D | aors.c | 39 mpq_aors (mpq_ptr rop, mpq_srcptr op1, mpq_srcptr op2, in mpq_aors() argument 79 mpz_set (NUM(rop), t); in mpq_aors() 80 mpz_mul (DEN(rop), DEN(op2), tmp2); in mpq_aors() 84 mpz_divexact_gcd (NUM(rop), t, gcd); in mpq_aors() 86 mpz_mul (DEN(rop), tmp1, tmp2); in mpq_aors() 95 (*fun) (NUM(rop), tmp1, tmp2); in mpq_aors() 96 mpz_mul (DEN(rop), DEN(op1), DEN(op2)); in mpq_aors() 103 mpq_add (mpq_ptr rop, mpq_srcptr op1, mpq_srcptr op2) in mpq_add() argument 105 mpq_aors (rop, op1, op2, mpz_add); in mpq_add() 109 mpq_sub (mpq_ptr rop, mpq_srcptr op1, mpq_srcptr op2) in mpq_sub() argument [all …]
|
| /netbsd/src/external/lgpl3/gmp/dist/tests/ |
| D | misc.c | 374 mpz_erandomb (mpz_ptr rop, gmp_randstate_t rstate, unsigned long nbits) in mpz_erandomb() argument 376 mpz_urandomb (rop, rstate, gmp_urandomm_ui (rstate, nbits)); in mpz_erandomb() 380 mpz_erandomb_nonzero (mpz_ptr rop, gmp_randstate_t rstate, unsigned long nbits) in mpz_erandomb_nonzero() argument 382 mpz_erandomb (rop, rstate, nbits); in mpz_erandomb_nonzero() 383 if (mpz_sgn (rop) == 0) in mpz_erandomb_nonzero() 384 mpz_set_ui (rop, 1L); in mpz_erandomb_nonzero() 388 mpz_errandomb (mpz_ptr rop, gmp_randstate_t rstate, unsigned long nbits) in mpz_errandomb() argument 390 mpz_rrandomb (rop, rstate, gmp_urandomm_ui (rstate, nbits)); in mpz_errandomb() 394 mpz_errandomb_nonzero (mpz_ptr rop, gmp_randstate_t rstate, unsigned long nbits) in mpz_errandomb_nonzero() argument 396 mpz_errandomb (rop, rstate, nbits); in mpz_errandomb_nonzero() [all …]
|
| /netbsd/src/sys/arch/hp300/dev/ |
| D | diofb_mono.c | 119 uint16_t dx, uint16_t dy, uint16_t cx, uint16_t cy, int16_t rop, in diofb_mono_windowmove() argument 164 getandputrop(psrc, srcBit, dstBit, cx, pdst, rop); in diofb_mono_windowmove() 192 (dx & 0x1f), nstart, pdst, rop); in diofb_mono_windowmove() 202 if (rop == RR_CLEAR) in diofb_mono_windowmove() 212 if (rop == RR_CLEAR) in diofb_mono_windowmove() 224 pdst, rop); in diofb_mono_windowmove() 246 pdst, rop); in diofb_mono_windowmove() 253 if (rop == RR_CLEAR) in diofb_mono_windowmove() 265 (dx & 0x1f), nstart, pdst, rop); in diofb_mono_windowmove()
|
| /netbsd/src/external/lgpl3/gmp/dist/tests/rand/ |
| D | statlib.c | 378 merit (mpf_t rop, unsigned int t, mpf_t v, mpz_t m) in merit() argument 418 mpf_set (rop, v); in merit() 420 mpf_mul (rop, rop, v); in merit() 421 mpf_mul (rop, rop, f_const); in merit() 422 mpf_div (rop, rop, f_m); in merit() 432 mpf_t rop; in merit_u() local 435 mpf_init (rop); in merit_u() 436 merit (rop, t, v, m); in merit_u() 437 res = mpf_get_d (rop); in merit_u() 438 mpf_clear (rop); in merit_u() [all …]
|
| /netbsd/src/external/bsd/am-utils/dist/amd/ |
| D | am_ops.c | 377 am_ops *rop = NULL; in ops_search() local 378 for (vp = vops; (rop = *vp); vp++) in ops_search() 379 if (STREQ(rop->fs_type, type)) in ops_search() 381 return rop; in ops_search() 388 am_ops *rop = NULL; in ops_match() local 395 rop = &amfs_error_ops; in ops_match() 398 rop = &amfs_error_ops; in ops_match() 403 rop = ops_search(fo->opt_type); in ops_match() 404 if (!rop) { in ops_match() 406 rop = &amfs_error_ops; in ops_match() [all …]
|