OpenCores
URL https://opencores.org/ocsvn/openrisc_me/openrisc_me/trunk

Subversion Repositories openrisc_me

[/] [openrisc/] [trunk/] [gnu-src/] [newlib-1.18.0/] [newlib/] [libm/] [mathfp/] [sf_atan2.c] - Blame information for rev 207

Details | Compare with Previous | View Log

Line No. Rev Author Line
1 207 jeremybenn
 
2
/* @(#)z_atan2f.c 1.0 98/08/13 */
3
/******************************************************************
4
 * Arctangent2
5
 *
6
 * Input:
7
 *   v, u - floating point values
8
 *
9
 * Output:
10
 *   arctan2 of v / u
11
 *
12
 * Description:
13
 *   This routine returns the arctan2 of v / u.
14
 *
15
 *****************************************************************/
16
 
17
#include "fdlibm.h"
18
#include "zmath.h"
19
 
20
float
21
_DEFUN (atan2f, (float, float),
22
        float v _AND
23
        float u)
24
{
25
  return (atangentf (0.0, v, u, 1));
26
}
27
 
28
#ifdef _DOUBLE_IS_32BITS
29
double atan2 (double v, double u)
30
{
31
  return (double) atangentf (0.0, (float) v, (float) u, 1);
32
}
33
 
34
#endif /* defined(_DOUBLE_IS_32BITS) */

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.