Subversion Repositories Kolibri OS

Rev

Go to most recent revision | Details | Last modification | View Log | RSS feed

Rev Author Line No. Line
1906 serge 1 
/*
2 
 * Written by J.T. Conklin .
3 
 * Public domain.
4 
 *
5 
 */
6 
 
7 
#include
8 
 
9 
float
10 
atanf (float x)
11 
{
12 
  float res;
13 
 
14 
  asm ("fld1\n\t"
15 
       "fpatan" : "=t" (res) : "0" (x));
16 
  return res;
17 
}
18 
 
19 
double
20 
atan (double x)
21 
{
22 
  double res;
23 
 
24 
  asm ("fld1 \n\t"
25 
       "fpatan" : "=t" (res) : "0" (x));
26 
  return res;
27 
}
28