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