1
2 /* @(#)z_cosf.c 1.0 98/08/13 */
3 /******************************************************************
4 * Cosine
5 *
6 * Input:
7 * x - floating point value
8 *
9 * Output:
10 * cosine of x
11 *
12 * Description:
13 * This routine returns the cosine of x.
14 *
15 *****************************************************************/
16
17 #include "fdlibm.h"
18 #include "zmath.h"
19
20 float
21 _DEFUN (cosf, (float),
22 float x)
23 {
24 return (sinef (x, 1));
25 }
26
27 #ifdef _DOUBLE_IS_32BITS
28
cos(double x)29 double cos (double x)
30 {
31 return (double) sinef ((float) x, 1);
32 }
33
34 #endif /* defined(_DOUBLE_IS_32BITS) */
35