libc/sysdeps/ieee754/dbl-wrap/s_atan.c


1
2
3
4
5
6
7
8
9
10
11
12
13

#include "dbl-wrap.h"

wrap_type_t WRAP_FUNC (atan) (wrap_type_t);

double
atan (double x)
{
  return (double) WRAP_FUNC (atan) ((wrap_type_t) x);
}

#ifdef NO_LONG_DOUBLE
weak_alias (atan, atanl)
#endif