1 /* $OpenBSD: fpaccuracy.c,v 1.2 2018/03/10 20:52:58 kettenis Exp $ */ 2 3 /* 4 * Written by Martynas Venckus. Public domain 5 */ 6 7 #include <err.h> 8 #include <stdio.h> 9 10 #include "fpaccuracy.h" 11 12 int 13 main(int argc, char *argv[]) 14 { 15 FILE *out; 16 int retval = 0; 17 18 if ((out = fopen("fpaccuracy.out", "w")) == NULL) 19 err(1, NULL); 20 21 fprintf(out, "%8s %5s %27s %26s %25s\n", "function", "tests", 22 "max err in ulps", "argument (max err)", "value (max err)"); 23 retval |= fpaccuracy_Gamma(out); 24 retval |= fpaccuracy_INV(out); 25 retval |= fpaccuracy_Pix(out); 26 retval |= fpaccuracy_acos(out); 27 retval |= fpaccuracy_acosh(out); 28 retval |= fpaccuracy_asin(out); 29 retval |= fpaccuracy_asinh(out); 30 retval |= fpaccuracy_atan(out); 31 retval |= fpaccuracy_atanh(out); 32 retval |= fpaccuracy_cos(out); 33 retval |= fpaccuracy_cosh(out); 34 retval |= fpaccuracy_erf(out); 35 retval |= fpaccuracy_erfc(out); 36 retval |= fpaccuracy_exp(out); 37 retval |= fpaccuracy_j0(out); 38 retval |= fpaccuracy_j1(out); 39 retval |= fpaccuracy_lgamma(out); 40 retval |= fpaccuracy_log(out); 41 retval |= fpaccuracy_log10(out); 42 retval |= fpaccuracy_pow2_x(out); 43 retval |= fpaccuracy_powx_275(out); 44 retval |= fpaccuracy_sin(out); 45 retval |= fpaccuracy_sincos_sin(out); 46 retval |= fpaccuracy_sincos_cos(out); 47 retval |= fpaccuracy_sinh(out); 48 retval |= fpaccuracy_sqrt(out); 49 retval |= fpaccuracy_tan(out); 50 retval |= fpaccuracy_tanh(out); 51 retval |= fpaccuracy_y0(out); 52 retval |= fpaccuracy_y1(out); 53 54 fclose(out); 55 56 return retval; 57 } 58 59