Example #1
0
__declspec ( naked ) void nseel_asm_atan(void)
{
  FUNC1_ENTER

  *__nextBlock = __atan(*parm_a);

  FUNC_LEAVE
}
Example #2
0
/*
 * ATAN - pass by value for real(kind=4)
 */
_f_real4
_HATAN(_f_real4 x)
{
	_f_real8 __atan(_f_real8 x);
	return ((_f_real4) __atan((_f_real8) x));
}
Example #3
0
Err mathlib_atan(UInt16 refnum, double x, double *result) {
#pragma unused(refnum)
	*result = __atan(x);
	return mlErrNone;
}