mirror of
https://github.com/autc04/Retro68.git
synced 2024-12-13 03:29:50 +00:00
19 lines
335 B
C
19 lines
335 B
C
|
#include "headers/atanhf4.h"
|
||
|
|
#include "headers/dom_chkf_negone_one.h"
|
||
|
|
|
||
|
|
static __inline float _atanhf(float x)
|
||
|
|
{
|
||
|
|
float res;
|
||
|
|
vector float vx;
|
||
|
|
|
||
|
|
vx = spu_splats(x);
|
||
|
|
res = spu_extract(_atanhf4(vx), 0);
|
||
|
|
#ifndef _IEEE_LIBM
|
||
|
|
/*
|
||
|
|
* Domain error if not in the interval [-1, +1]
|
||
|
|
*/
|
||
|
|
dom_chkf_negone_one(vx);
|
||
|
|
#endif
|
||
|
|
return res;
|
||
|
|
}
|