| /src/lib/libm/src/ |
| s_cos.c | 18 /* cos(x)
27 * Let S,C and T denote the sin, cos and tan respectively on
32 * n sin(x) cos(x) tan(x)
41 * Let trig be any of sin, cos, or tan.
53 __weak_alias(cos, _cos)
56 cos(double x)
68 /* cos(Inf or NaN) is NaN */
|
| e_jn.c | 85 * Jn(x) = cos(x-(2n+1)*pi/4)*sqrt(2/x*pi)
87 * Let s=sin(x), c=cos(x),
90 * n sin(xn)*sqt2 cos(xn)*sqt2
98 case 0: temp = cos(x)+sin(x); break;
99 case 1: temp = -cos(x)+sin(x); break;
100 case 2: temp = -cos(x)-sin(x); break;
101 case 3: temp = cos(x)-sin(x); break;
241 * Jn(x) = cos(x-(2n+1)*pi/4)*sqrt(2/x*pi)
243 * Let s=sin(x), c=cos(x),
246 * n sin(xn)*sqt2 cos(xn)*sqt
[all...] |
| s_cosl.c | 81 /* If x = +-0 or x is a subnormal number, then cos(x) = 1 */
85 /* If x = NaN or Inf, then cos(x) = NaN. */
121 return cos(x);
|
| e_j0.c | 27 * j0(x) = sqrt(2/(pi*x))*(p0(x)*cos(x0)-q0(x)*sin(x0))
28 * where x0 = x-pi/4. It is better to compute sin(x0),cos(x0)
30 * cos(x0) = cos(x)cos(pi/4)+sin(x)sin(pi/4)
31 * = 1/sqrt(2) * (cos(x) + sin(x))
32 * sin(x0) = sin(x)cos(pi/4)-cos(x)sin(pi/4)
33 * = 1/sqrt(2) * (sin(x) - cos(x))
35 * sin(x) +- cos(x) = -cos(2x)/(sin(x) -+ cos(x)
[all...] |
| e_j1.c | 27 * j1(x) = sqrt(2/(pi*x))*(p1(x)*cos(x1)-q1(x)*sin(x1))
28 * y1(x) = sqrt(2/(pi*x))*(p1(x)*sin(x1)+q1(x)*cos(x1))
29 * where x1 = x-3*pi/4. It is better to compute sin(x1),cos(x1)
31 * cos(x1) = cos(x)cos(3pi/4)+sin(x)sin(3pi/4)
32 * = 1/sqrt(2) * (sin(x) - cos(x))
33 * sin(x1) = sin(x)cos(3pi/4)-cos(x)sin(3pi/4)
34 * = -1/sqrt(2) * (sin(x) + cos(x)
[all...] |
| /src/lib/libm/complex/ |
| ccos.c | 44 w = cos(creal(z)) * ch - (sin(creal(z)) * sh) * I;
|
| ccosh.c | 44 w = cosh(x) * cos(y) + (sinh(x) * sin(y)) * I;
|
| cexp.c | 45 w = r * cos(y) + r * sin(y) * I;
|
| csin.c | 44 w = sin(creal(z)) * ch + (cos(creal(z)) * sh) * I;
|
| csinh.c | 44 w = sinh(x) * cos(y) + (cosh(x) * sin(y)) * I;
|
| ctanh.c | 44 d = cosh(2.0 * x) + cos(2.0 * y);
|
| ctan.c | 46 d = cos(2.0 * creal(z)) + cosh(2.0 * cimag(z));
|
| cpow.c | 55 w = r * cos(theta) + (r * sin(theta)) * I;
|
| /src/lib/libm/arch/mc68881/ |
| s_cos.S | 43 WEAK_ALIAS(cos, _cos)
|
| /src/lib/libm/noieee_src/ |
| n_sincos1.c | 45 *c = cos(x);
|
| n_sincos.c | 88 __weak_alias(cos, _cos)
90 cos(double x)
94 if(!finite(x)) /* cos(NaN) and cos(INF) must be NaN */
123 return cos(x);
|
| n_jn.c | 142 * Jn(x) = cos(x-(2n+1)*pi/4)*sqrt(2/x*pi)
144 * Let s=sin(x), c=cos(x),
147 * n sin(xn)*sqt2 cos(xn)*sqt2
155 case 0: temp = cos(x)+sin(x); break;
156 case 1: temp = -cos(x)+sin(x); break;
157 case 2: temp = -cos(x)-sin(x); break;
158 case 3: temp = cos(x)-sin(x); break;
287 * Jn(x) = cos(x-(2n+1)*pi/4)*sqrt(2/x*pi)
289 * Let s=sin(x), c=cos(x),
292 * n sin(xn)*sqt2 cos(xn)*sqt
[all...] |
| n_j0.c | 76 * j0(x) = sqrt(2/(pi*x))*(p0(x)*cos(x0)-q0(x)*sin(x0))
77 * where x0 = x-pi/4. It is better to compute sin(x0),cos(x0)
79 * cos(x0) = cos(x)cos(pi/4)+sin(x)sin(pi/4)
80 * = 1/sqrt(2) * (cos(x) + sin(x))
81 * sin(x0) = sin(x)cos(pi/4)-cos(x)sin(pi/4)
82 * = 1/sqrt(2) * (sin(x) - cos(x))
84 * sin(x) +- cos(x) = -cos(2x)/(sin(x) -+ cos(x)
[all...] |
| n_j1.c | 76 * j1(x) = sqrt(2/(pi*x))*(p1(x)*cos(x1)-q1(x)*sin(x1))
77 * y1(x) = sqrt(2/(pi*x))*(p1(x)*sin(x1)+q1(x)*cos(x1))
78 * where x1 = x-3*pi/4. It is better to compute sin(x1),cos(x1)
80 * cos(x1) = cos(x)cos(3pi/4)+sin(x)sin(3pi/4)
81 * = 1/sqrt(2) * (sin(x) - cos(x))
82 * sin(x1) = sin(x)cos(3pi/4)-cos(x)sin(3pi/4)
83 * = -1/sqrt(2) * (sin(x) + cos(x)
[all...] |
| /src/lib/libm/arch/m68060/ |
| s_cos.S | 4 * FPLSP wrapper for cos
12 WEAK_ALIAS(cos, _cos)
|
| /src/tests/lib/libpthread/ |
| t_fpu.c | 81 x = sin ((y = cos (x + y + .4)) - (z = cos (x + z + .6)));
|
| /src/tests/lib/libm/ |
| t_cos.c | 88 atf_tc_fail_nonfatal("cos(%d deg = %.17Lg) = %.17Lg"
164 * cos(3)
183 if (!(fabs((cos(theta) - cos_theta)/cos_theta) <= eps)) {
184 atf_tc_fail_nonfatal("cos(%d deg = %.17g) = %.17g"
186 deg, theta, cos(theta), cos_theta);
194 atf_tc_set_md_var(tc, "descr", "Test cos(NaN) == NaN");
202 ATF_CHECK(isnan(cos(x)) != 0);
208 atf_tc_set_md_var(tc, "descr", "Test cos(-Inf) == NaN");
214 const double y = cos(x);
222 atf_tc_set_md_var(tc, "descr", "Test cos(+Inf) == NaN")
[all...] |
| /src/tests/lib/lua/libm/ |
| h_lualibm.c | 24 TEST(cos(M_PI_2));
25 TEST(acos(cos(M_PI_2)));
|
| lualibm.lua | 30 test("cos(M_PI_2)", lm.cos(lm.M_PI_2))
31 test("acos(cos(M_PI_2))", lm.acos(lm.cos(lm.M_PI_2)))
|
| /src/lib/libm/arch/vax/ |
| n_sincos.S | 40 * cos() observed maximum error = 0.792 ulps
85 * double cos(arg)
102 WEAK_ALIAS(cos, _cos)
|
