Lines Matching +full:- +full:i
61 for (int i = 0; i < dim(limited_funcs); i++)
62 if (limited_funcs[i] == name)
77 for (int i = 0; i < String::length(s); i++) {
78 int c = s[i];
80 c = c - 'a' + 'A';
106 for (x = -10; x <= 10; x += .1) {
112 sy = sprintf("%.-eL", y);
121 sy = "-" + sy;
125 printf(" { .line = __LINE__, .x = %.-eL, .y = %s },\n", x, sy);
126 } catch invalid_argument(string s, int i, poly x) {
131 printf(" unsigned int i;\n");
133 printf(" for (i = 0; i < sizeof(%s)/sizeof(%s[0]); i++) {\n", vec, vec);
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, …
152 obits -= exponent(x);
156 return imprecise(exp(x) - 1, bits);
166 raise infinity(-1);
167 return exponent(imprecise(x)) - 1;
171 real round(x) { if (x < 0) return -round(-x); return floor(x+0.5); }
172 real trunc(x) { if (x < 0) return -trunc(-x); return floor(x); }
177 return log(x + sqrt(x*x-1));
184 sign = -1;
185 x = -x;
195 return 0.5 * log((1 + x) / (1 - x));
199 return (exp(x) + exp(-x)) / 2;
203 return (exp(x) - exp(-x)) / 2;
222 y = ceil(x-0.5);
225 if (abs(x-y) == 0.5) {
228 y--;
245 real val = x - off;
249 real a = ((-1)**n * x**f) / (n! * f);
251 if (exponent(val) - exponent(a) > obits)
264 return -_erf(x, 1);
277 real a = ((-1)**m / (m! * gamma(m + n + 1))) * (x/2)**(2 * m + n);
279 if (exponent(val) - exponent(a) > obits)
305 real fpart = mant - ipart;
313 real ret = ipart * (2 ** (exp - bits));
315 ret = -ret;
322 real default_prec = 1e-20;
378 for (x0 = -4; x0 <= 4; x0 += .25) {
379 for (x1 = -4; x1 <= 4; x1 += 0.25) {
385 sy = sprintf("%.-eL", y);
394 sy = "-" + sy;
398 printf(" { .line = __LINE__, .x0 = %.-eL, .x1 = %.-eL, .y = %s },\n", x0, x1, sy);
399 } catch invalid_argument(string s, int i, poly x) {
405 printf(" unsigned int i;\n");
407 printf(" for (i = 0; i < sizeof(%s)/sizeof(%s[0]); i++) {\n", vec, vec);
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…
428 for (x0 = -4; x0 <= 4; x0 += 0.6) {
429 for (x1 = -4; x1 <= 4; x1 += 0.6) {
430 for (x2 = -4; x2 <= 4; x2 += 0.6) {
436 sy = sprintf("%.-eL", y);
445 sy = "-" + sy;
449 …printf(" { .line = __LINE__, .x0 = %.-eL, .x1 = %.-eL, .x2 = %.-eL, .y = %s },\n", x0, x1, x2, …
450 } catch invalid_argument(string s, int i, poly x) {
457 printf(" unsigned int i;\n");
459 printf(" for (i = 0; i < sizeof(%s)/sizeof(%s[0]); i++) {\n", vec, vec);
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…
477 return x - n * y;
479 real fdim(real x, real y) { return max(x-y, 0); }
492 n = ceil(q - 0.5);
495 if (abs(q-n) == 0.5) {
498 n--;
503 return x - n * y;
513 x = -x;
596 for (x0 = -4; x0 <= 4; x0 += .25) {
597 for (x1 = -16; x1 <= 16; x1 += 1) {
603 sy = sprintf("%.-eL", y);
612 sy = "-" + sy;
616 printf(" { .line = __LINE__, .x0 = %.-eL, .x1 = %d, .y = %s },\n", x0, x1, sy);
617 } catch invalid_argument(string s, int i, poly x) {
623 printf(" unsigned int i;\n");
625 printf(" for (i = 0; i < sizeof(%s)/sizeof(%s[0]); i++) {\n", vec, vec);
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…
654 for (x = -10; x <= 10; x += .1) {
663 printf(" { .line = __LINE__, .x = %.-eL, .y = %s },\n", x, sy);
664 } catch invalid_argument(string s, int i, poly x) {
669 printf(" unsigned int i;\n");
671 printf(" for (i = 0; i < sizeof(%s)/sizeof(%s[0]); i++) {\n", vec, vec);
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);
688 return exponent(imprecise(x)) - 1;
705 real diff = x - ix;
711 /* Functions of the form i(x) */
739 for (int i = 0; i < dim(funcs_i_f); i++)
740 gen_real_i_f(funcs_i_f[i]);
742 for (int i = 0; i < dim(funcs_f_fi); i++)
743 gen_real_f_fi(funcs_f_fi[i]);
745 for (int i = 0; i < dim(funcs_f_ff); i++)
746 gen_real_f_ff(funcs_f_ff[i]);
748 for (int i = 0; i < dim(funcs_f_f); i++)
749 gen_real_f_f(funcs_f_f[i]);
751 for (int i = 0; i < dim(funcs_f_fff); i++)
752 gen_real_f_fff(funcs_f_fff[i]);
755 for (int i = 0; i < dim(funcs_f_f); i++) {
756 if (is_full_func(funcs_f_f[i].name))
758 printf(" { .name = \"%s\", .test = test_%s },\n", funcs_f_f[i].name, funcs_f_f[i].name);
759 if (is_full_func(funcs_f_f[i].name))
762 for (int i = 0; i < dim(funcs_f_ff); i++) {
763 if (is_full_func(funcs_f_ff[i].name))
765 printf(" { .name = \"%s\", .test = test_%s },\n", funcs_f_ff[i].name, funcs_f_ff[i].name);
766 if (is_full_func(funcs_f_ff[i].name))
769 for (int i = 0; i < dim(funcs_f_fff); i++) {
770 if (is_full_func(funcs_f_fff[i].name))
772 printf(" { .name = \"%s\", .test = test_%s },\n", funcs_f_fff[i].name, funcs_f_fff[i].name);
773 if (is_full_func(funcs_f_fff[i].name))
776 for (int i = 0; i < dim(funcs_f_fi); i++) {
777 if (is_full_func(funcs_f_fi[i].name))
779 printf(" { .name = \"%s\", .test = test_%s },\n", funcs_f_fi[i].name, funcs_f_fi[i].name);
780 if (is_full_func(funcs_f_fi[i].name))
783 for (int i = 0; i < dim(funcs_i_f); i++) {
784 if (is_full_func(funcs_i_f[i].name))
786 printf(" { .name = \"%s\", .test = test_%s },\n", funcs_i_f[i].name, funcs_i_f[i].name);
787 if (is_full_func(funcs_i_f[i].name))