Lines Matching refs:my
71 static int adjust(mpfr_t mr, mpfr_t my, int t, int r, int type)
75 //debug(my);
76 t = adjust_round(mr, my, t, r);
99 //static int eflags(mpfr_t mr, mpfr_t my, int t)
106 // if (mpfr_underflow_p() && (t || mpfr_cmp(mr, my) != 0))
118 static void genf(struct t *p, mpfr_t my, int t, int r)
123 t = adjust(mr, my, t, r, FLT);
130 mpfr_sub(my, mr, my, MPFR_RNDN);
131 mpfr_div_2si(my, my, i, MPFR_RNDN);
132 p->dy = mpfr_get_flt(my, MPFR_RNDN);
146 MPFR_DECL_INIT(my, 128);
150 tn = fmp(my, mx, r);
152 genf(p, my, tn, r);
162 MPFR_DECL_INIT(my, 128);
167 tn = fmp(my, mx, mx2, r);
168 genf(p, my, tn, r);
172 static void gend(struct t *p, mpfr_t my, int t, int r)
177 t = adjust(mr, my, t, r, DBL);
184 mpfr_sub(my, mr, my, MPFR_RNDN);
185 mpfr_div_2si(my, my, i, MPFR_RNDN);
186 p->dy = mpfr_get_flt(my, MPFR_RNDN);
200 MPFR_DECL_INIT(my, 128);
204 tn = fmp(my, mx, r);
206 gend(p, my, tn, r);
216 MPFR_DECL_INIT(my, 128);
221 tn = fmp(my, mx, mx2, r);
222 gend(p, my, tn, r);
227 static void genl(struct t *p, mpfr_t my, int t, int r)
232 t = adjust(mr, my, t, r, LDBL);
239 mpfr_sub(my, mr, my, MPFR_RNDN);
240 mpfr_div_2si(my, my, i, MPFR_RNDN);
241 p->dy = mpfr_get_flt(my, MPFR_RNDN);
259 MPFR_DECL_INIT(my, 128);
263 tn = fmp(my, mx, r);
265 genl(p, my, tn, r);
281 MPFR_DECL_INIT(my, 128);
286 tn = fmp(my, mx, mx2, r);
287 genl(p, my, tn, r);
296 static int wrap_lgamma(mpfr_t my, const mpfr_t mx, mpfr_rnd_t r)
298 return mpfr_lgamma(my, &mplgamma_sign, mx, r);
301 static int wrap_remquo(mpfr_t my, const mpfr_t mx, const mpfr_t mx2, mpfr_rnd_t r)
303 return mpfr_remquo(my, &mpremquo_q, mx, mx2, r);
306 static int wrap_jn(mpfr_t my, const mpfr_t mx, mpfr_rnd_t r)
308 return mpfr_jn(my, mpbessel_n, mx, r);
310 static int wrap_yn(mpfr_t my, const mpfr_t mx, mpfr_rnd_t r)
312 return mpfr_yn(my, mpbessel_n, mx, r);
314 static int wrap_ceil(mpfr_t my, const mpfr_t mx, mpfr_rnd_t r)
316 return mpfr_ceil(my, mx);
318 static int wrap_floor(mpfr_t my, const mpfr_t mx, mpfr_rnd_t r)
320 return mpfr_floor(my, mx);
322 static int wrap_round(mpfr_t my, const mpfr_t mx, mpfr_rnd_t r)
324 return mpfr_round(my, mx);
326 static int wrap_trunc(mpfr_t my, const mpfr_t mx, mpfr_rnd_t r)
328 return mpfr_trunc(my, mx);
330 static int wrap_nearbyint(mpfr_t my, const mpfr_t mx, mpfr_rnd_t r)
332 int i = mpfr_rint(my, mx, r);
336 static int wrap_pow10(mpfr_t my, const mpfr_t mx, mpfr_rnd_t r)
338 return mpfr_ui_pow(my, 10, mx, r);
342 static int wrap_sinpi(mpfr_t my, const mpfr_t mx, mpfr_rnd_t r)
348 return mpfr_sin(my, mz, r);
903 MPFR_DECL_INIT(my, 128);
909 tn = mpfr_fma(my, mx, mx2, mx3, r);
910 gend(t, my, tn, r);
921 MPFR_DECL_INIT(my, 128);
927 tn = mpfr_fma(my, mx, mx2, mx3, r);
928 genf(t, my, tn, r);
942 MPFR_DECL_INIT(my, 128);
948 tn = mpfr_fma(my, mx, mx2, mx3, r);
949 genl(t, my, tn, r);