Lines Matching refs:f

7 	real(real a) f;
12 real(real a, real b) f;
17 real(real a, real b, real c) f;
22 real(real a, int b) f;
27 int(real a) f;
100 string vec = sprintf("%s_vec", f.name);
102 if (is_full_func(f.name))
104 string prec_name = make_prec(f.name);
111 y = imprecise(f.f(imprecise(x, prec)), out_prec);
115 raise invalid_argument(f.name, 0, x);
130 printf("static int test_%s(void) {\n", f.name);
134 printf(" long double y = %s(%s[i].x);\n", f.name, vec);
135 …printf(" result += check_long_double(\"%s\", %s[i].line, %s, %s[i].y, y);\n", f.name, vec, …
139 if (is_full_func(f.name))
248 int f = 2 * n + 1;
249 real a = ((-1)**n * x**f) / (n! * f);
325 { .f = acosh, .name = "acoshl" },
326 { .f = acos, .name = "acosl" },
327 { .f = asinh, .name = "asinhl" },
328 { .f = asin, .name = "asinl" },
329 { .f = atanh, .name = "atanhl" },
330 { .f = atan, .name = "atanl" },
331 { .f = cbrt, .name = "cbrtl" },
332 { .f = ceil, .name = "ceill" },
333 { .f = cosh, .name = "coshl" },
334 { .f = cos, .name = "cosl" },
335 { .f = erfc, .name = "erfcl" },
336 { .f = erf, .name = "erfl" },
337 { .f = exp10, .name = "exp10l" },
338 { .f = exp2, .name = "exp2l" },
339 { .f = exp, .name = "expl" },
340 { .f = expm1, .name = "expm1l" },
341 { .f = floor, .name = "floorl" },
345 { .f = lgamma, .name = "lgammal" },
346 { .f = log10, .name = "log10l" },
347 { .f = log1p, .name = "log1pl" },
348 { .f = log2, .name = "log2l" },
349 { .f = logb, .name = "logbl" },
350 { .f = log, .name = "logl" },
351 { .f = nearbyint, .name = "nearbyintl" },
353 { .f = rintl, .name = "rintl" },
354 { .f = round, .name = "roundl" },
355 { .f = sinh, .name = "sinhl" },
356 { .f = sin, .name = "sinl" },
357 { .f = sqrt, .name = "sqrtl" },
358 { .f = tanh, .name = "tanhl" },
359 { .f = tan, .name = "tanl" },
360 { .f = tgamma, .name = "tgammal" },
361 { .f = trunc, .name = "truncl" },
371 string vec = sprintf("%s_vec", f.name);
374 if (is_full_func(f.name))
376 string prec_name = make_prec(f.name);
384 y = round_even(f.f(imprecise(x0, prec), imprecise(x1, prec)), out_prec);
388 raise invalid_argument(f.name, 0, x);
404 printf("static int test_%s(void) {\n", f.name);
408 printf(" long double y = %s(%s[i].x0, %s[i].x1);\n", f.name, vec, vec);
409 …printf(" result += check_long_double(\"%s\", %s[i].line, %s, %s[i].y, y);\n", f.name, vec,p…
413 if (is_full_func(f.name))
421 string vec = sprintf("%s_vec", f.name);
424 if (is_full_func(f.name))
426 string prec_name = make_prec(f.name);
435 y = imprecise(f.f(imprecise(x0, prec), imprecise(x1, prec), imprecise(x2, prec)), out_prec);
439 raise invalid_argument(f.name, 0, x);
456 printf("static int test_%s(void) {\n", f.name);
460 printf(" long double y = %s(%s[i].x0, %s[i].x1, %s[i].x2);\n", f.name, vec, vec, vec);
461 …printf(" result += check_long_double(\"%s\", %s[i].line, %s, %s[i].y, y);\n", f.name, vec,p…
465 if (is_full_func(f.name))
555 /* Functions of the form f(x,y) */
557 { .f = atan2, .name = "atan2l" },
558 { .f = powl, .name = "powl" },
559 { .f = fmod, .name = "fmodl" },
562 { .f = fdim, .name = "fdiml" },
563 { .f = fmax, .name = "fmaxl" },
564 { .f = fmin, .name = "fminl" },
565 { .f = hypot, .name = "hypotl" },
566 { .f = scalb, .name = "scalbl" },
567 { .f = remainder, .name = "remainderl" },
568 { .f = drem, .name = "dreml" },
569 { .f = copysign, .name = "copysignl" },
579 /* Functions of the form f(x,y,z) */
581 { .f = fma, .name = "fmal" },
589 string vec = sprintf("%s_vec", f.name);
592 if (is_full_func(f.name))
594 string prec_name = make_prec(f.name);
602 y = imprecise(f.f(imprecise(x0, prec), x1), out_prec);
606 raise invalid_argument(f.name, 0, x);
622 printf("static int test_%s(void) {\n", f.name);
626 printf(" long double y = %s(%s[i].x0, %s[i].x1);\n", f.name, vec, vec);
627 …printf(" result += check_long_double(\"%s\", %s[i].line, %s, %s[i].y, y);\n", f.name, vec,p…
631 if (is_full_func(f.name))
635 /* Functions of the form f(x,y) */
637 { .f = ldexpl, .name = "ldexpl" },
638 { .f = scalbnl, .name = "scalbnl" },
648 string vec = sprintf("%s_vec", f.name);
651 if (is_full_func(f.name))
658 y = f.f(imprecise(x, prec));
668 printf("static int test_%s(void) {\n", f.name);
672 printf(" long long y = %s(%s[i].x);\n", f.name, vec);
673 printf(" result += check_long_long(\"%s\", %s[i].line, %s[i].y, y);\n", f.name, vec, vec);
677 if (is_full_func(f.name))
713 { .f = finite, .name = "finitel" },
714 { .f = ilogb, .name = "ilogb" },
715 { .f = isinf, .name = "isinfl" },
716 { .f = isnan, .name = "isnanl" },
717 { .f = lrint, .name = "lrintl" },
718 { .f = lrint, .name = "llrintl" },
719 { .f = lround, .name = "lroundl" },
720 { .f = lround, .name = "llroundl" },