|
/*
|
|
* Note: tan(x) = sin(x)/cos(x) also, but the final assembly ends up being
|
|
* twice as long for R600 (maybe for others as well).
|
|
*/
|
|
_CLC_OVERLOAD _CLC_DEF __CLC_GENTYPE tan(__CLC_GENTYPE x) {
|
|
__CLC_GENTYPE sinx = sin(x);
|
|
return sinx / sqrt( (__CLC_GENTYPE) 1.0 - (sinx*sinx) );
|
|
}
|