sincos_special.c File Reference

#include <fpieee.h>
#include <excpt.h>
#include <float.h>
#include <math.h>
#include <errno.h>
#include "libm_new.h"

Include dependency graph for sincos_special.c:

Go to the source code of this file.

Functions
double	_sincos_special (double x, char *name, unsigned int operation)
float	_sincosf_special (float x, char *name, unsigned int operation)
float	_sinf_special (float x)
double	_sin_special (double x)
float	_cosf_special (float x)
double	_cos_special (double x)
double	_tan_special (double x)
float	_tanf_special (float x)

Function Documentation

_cos_special()

double _cos_special

(

double

x

)

Definition at line 117 of file sincos_special.c.

{
    return _sincos_special(x, "cos", _FpCodeCos);
}

_cosf_special()

float _cosf_special

(

float

x

)

Definition at line 112 of file sincos_special.c.

{
    return _sincosf_special(x, "cosf", _FpCodeCos);
}

_sin_special()

double _sin_special

(

double

x

)

Definition at line 107 of file sincos_special.c.

{
    return _sincos_special(x, "sin", _FpCodeSin);
}

_sincos_special()

double _sincos_special	(	double	x,
		char *	name,
		unsigned int	operation
	)

Definition at line 35 of file sincos_special.c.

{
    UT64 xu;
    unsigned int is_snan;
 
    xu.f64 = x;
 
    if((xu.u64 & INF_POS_64) == INF_POS_64)
    {
        // x is Inf or NaN
        if((xu.u64 & MANTISSA_MASK_64) == 0x0)
        {
            // x is Inf
            xu.u64 = IND_64;
            _handle_error(name, operation, xu.u64, _DOMAIN, AMD_F_INVALID, EDOM, x, 0, 1);
        }
        else 
        {
            // x is NaN
            is_snan = (((xu.u64 & QNAN_MASK_64) == QNAN_MASK_64) ? 0 : 1);
            if(is_snan)
            {
                xu.u64 |= QNAN_MASK_64;
            }
            _handle_error(name, operation, xu.u64, _DOMAIN, 0, EDOM, x, 0, 1);
        }
    }
 
    return xu.f64;
}

Referenced by _cos_special(), _sin_special(), and _tan_special().

_sincosf_special()

float _sincosf_special	(	float	x,
		char *	name,
		unsigned int	operation
	)

Definition at line 66 of file sincos_special.c.

{
    UT64 xu;
    unsigned int is_snan;
 
    xu.u64    = 0;
    xu.f32[0] = x;
 
    if((xu.u32[0] & INF_POS_32) == INF_POS_32)
    {
        // x is Inf or NaN
        if((xu.u32[0] & MANTISSA_MASK_32) == 0x0)
        {
            // x is Inf 
            xu.u32[0] = IND_32; 
            _handle_errorf(name, operation, xu.u64, _DOMAIN, AMD_F_INVALID, EDOM, x, 0, 1);
        }
        else
        {
            // x is NaN
            is_snan = (((xu.u32[0] & QNAN_MASK_32) == QNAN_MASK_32) ? 0 : 1);
            if(is_snan) 
            {
                xu.u32[0] |= QNAN_SET_32;
                _handle_errorf(name, operation, xu.u64, _DOMAIN, AMD_F_INVALID, EDOM, x, 0, 1);
            }
            else 
            {
                _handle_errorf(name, operation, xu.u64, _DOMAIN, 0, EDOM, x, 0, 1);
            }
        }
    }
 
    return xu.f32[0];
}

Referenced by _cosf_special(), _sinf_special(), and _tanf_special().

_sinf_special()

float _sinf_special

(

float

x

)

Definition at line 102 of file sincos_special.c.

{
    return _sincosf_special(x, "sinf", _FpCodeSin);
}

_tan_special()

double _tan_special

(

double

x

)

Definition at line 122 of file sincos_special.c.

{
        return  _sincos_special(x, "tan",_FpCodeTan);
}

_tanf_special()

float _tanf_special

(

float

x

)

Definition at line 127 of file sincos_special.c.

{
        return  _sincosf_special(x, "tanf",_FpCodeTan);
}