Open64 (mfef90, whirl2f, and IR tools)  TAG: version-openad; SVN changeset: 916
r_cis.c File Reference
#include "cmplx.h"
#include <errno.h>
#include "moremath.h"
Include dependency graph for r_cis.c:

Go to the source code of this file.

Classes

union  du

Defines

#define ROUND(d)   (int)(((d) >= 0.0) ? ((d) + 0.5) : ((d) - 0.5))

Functions

double fabs (double)
complex __rcis (float x)

Variables

float __libm_qnan_f
int * __errnoaddr
static const du S []
static const du C []
static const du rpiby2
static const du piby2hi
static const du piby2lo
static const du zero
static const du half
static const du one
static const du twopm12

Define Documentation

#define ROUND (   d)    (int)(((d) >= 0.0) ? ((d) + 0.5) : ((d) - 0.5))

Definition at line 53 of file r_cis.c.

Referenced by __rcis().


Function Documentation

complex __rcis ( float  x)

Definition at line 115 of file r_cis.c.

References __errnoaddr, __libm_qnan_f, d, du::d, fabs(), complex::imag, L, complex::real, result, and ROUND.

Referenced by r_cis().

Here is the call graph for this function:

double fabs ( double  )

Variable Documentation

Referenced by __rcis().

const du C[] [static]
Initial value:
{
{D(0x3ff00000,  0x00000000)},
{D(0xbfdffffb,  0x2a77e083)},
{D(0x3fa553e7,  0xf02ac8aa)},
{D(0xbf5644d6,  0x2993c4ad)},
}

Definition at line 77 of file r_cis.c.

const du half [static]
Initial value:
{D(0x3fe00000,  0x00000000)}

Definition at line 97 of file r_cis.c.

const du one [static]
Initial value:
{D(0x3ff00000,  0x00000000)}

Definition at line 100 of file r_cis.c.

const du piby2hi [static]
Initial value:
{D(0x3ff921fb,  0x50000000)}

Definition at line 88 of file r_cis.c.

const du piby2lo [static]
Initial value:
{D(0x3e5110b4,  0x611a6263)}

Definition at line 91 of file r_cis.c.

const du rpiby2 [static]
Initial value:
{D(0x3fe45f30,  0x6dc9c883)}

Definition at line 85 of file r_cis.c.

const du S[] [static]
Initial value:
{
{D(0x3ff00000,  0x00000000)},
{D(0xbfc55554,  0x5268a030)},
{D(0x3f811073,  0xafd14db9)},
{D(0xbf29943e,  0x0fc79aa9)},
}

Definition at line 69 of file r_cis.c.

const du twopm12 [static]
Initial value:
{D(0x3f300000,  0x00000000)}

Definition at line 103 of file r_cis.c.

const du zero [static]
Initial value:
{D(0x00000000,  0x00000000)}

Definition at line 94 of file r_cis.c.

 All Classes Namespaces Files Functions Variables Typedefs Enumerations Enumerator Friends Defines